1

/******************************************************************************

     2

 *  

     3

 *  $Id$

     4

 *  

     5

 *  Copyright (C) 2006-2009  Florian Pose, Ingenieurgemeinschaft IgH

     6

 *  

     7

 *  This file is part of the IgH EtherCAT master userspace library.

     8

 *  

     9

 *  The IgH EtherCAT master userspace library is free software; you can

    10

 *  redistribute it and/or modify it under the terms of the GNU Lesser General

    11

 *  Public License as published by the Free Software Foundation; version 2.1

    12

 *  of the License.

    13

 *

    14

 *  The IgH EtherCAT master userspace library is distributed in the hope that

    15

 *  it will be useful, but WITHOUT ANY WARRANTY; without even the implied

    16

 *  warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    17

 *  GNU Lesser General Public License for more details.

    18

 *

    19

 *  You should have received a copy of the GNU Lesser General Public License

    20

 *  along with the IgH EtherCAT master userspace library. If not, see

    21

 *  <http://www.gnu.org/licenses/>.

    22

 *  

    23

 *  ---

    24

 *  

    25

 *  The license mentioned above concerns the source code only. Using the

    26

 *  EtherCAT technology and brand is only permitted in compliance with the

    27

 *  industrial property and similar rights of Beckhoff Automation GmbH.

    28

 *

    29

 *****************************************************************************/

    30

    31

/**

    32

   \file

    33

   EtherCAT domain methods.

    34

*/

    35

    36

/*****************************************************************************/

    37

    38

#include <sys/ioctl.h>

    39

#include <sys/mman.h>

    40

#include <stdio.h>

    41

#include <errno.h>

    42

#include <string.h>

    43

    44

#include "domain.h"

    45

#include "master.h"

    46

#include "master/ioctl.h"

    47

    48

/*****************************************************************************/

    49

    50

void ec_domain_clear(ec_domain_t *domain)

    51

{

    52

    // nothing to do

    53

}

    54

    55

    56

/*****************************************************************************/

    57

unsigned int ecrt_domain_index(ec_domain_t *domain)

    58

{

    59

    return domain->index;

    60

}

    61

    62

/*****************************************************************************/

    63

    64

int ecrt_domain_reg_pdo_entry_list(ec_domain_t *domain,

    65

        const ec_pdo_entry_reg_t *regs)

    66

{

    67

    const ec_pdo_entry_reg_t *reg;

    68

    ec_slave_config_t *sc;

    69

    int ret;

    70

    71

    for (reg = regs; reg->index; reg++) {

    72

        if (!(sc = ecrt_master_slave_config(domain->master, reg->alias,

    73

                        reg->position, reg->vendor_id, reg->product_code)))

    74

            return -1; // FIXME

    75

    76

        if ((ret = ecrt_slave_config_reg_pdo_entry(sc, reg->index,

    77

                        reg->subindex, domain, reg->bit_position)) < 0)

    78

            return -1; // FIXME

    79

    80

        *reg->offset = ret;

    81

    }

    82

    83

    return 0;

    84

}

    85

    86

/*****************************************************************************/

    87

    88

uint8_t *ecrt_domain_data(ec_domain_t *domain)

    89

{

    90

    if (!domain->process_data) {

    91

        int offset = 0;

    92

    93

        offset = ioctl(domain->master->fd, EC_IOCTL_DOMAIN_OFFSET,

    94

                domain->index);

    95

        if (offset == -1) {

    96

            fprintf(stderr, "Failed to get domain offset: %s\n",

    97

                    strerror(errno));

    98

            return NULL; 

    99

        }

   100

   101

        domain->process_data = domain->master->process_data + offset;

   102

    }

   103

   104

    return domain->process_data;

   105

}

   106

   107

/*****************************************************************************/

   108

   109

void ecrt_domain_process(ec_domain_t *domain)

   110

{

   111

    if (ioctl(domain->master->fd, EC_IOCTL_DOMAIN_PROCESS,

   112

                domain->index) == -1) {

   113

        fprintf(stderr, "Failed to process domain: %s\n", strerror(errno));

   114

    }

   115

}

   116

   117

/*****************************************************************************/

   118

   119

void ecrt_domain_queue(ec_domain_t *domain)

   120

{

   121

    if (ioctl(domain->master->fd, EC_IOCTL_DOMAIN_QUEUE,

   122

                domain->index) == -1) {

   123

        fprintf(stderr, "Failed to queue domain: %s\n", strerror(errno));

   124

    }

   125

}

   126

   127

/*****************************************************************************/

   128

   129

void ecrt_domain_state(const ec_domain_t *domain, ec_domain_state_t *state)

   130

{

   131

    ec_ioctl_domain_state_t data;

   132

   133

    data.domain_index = domain->index;

   134

    data.state = state;

   135

   136

    if (ioctl(domain->master->fd, EC_IOCTL_DOMAIN_STATE, &data) == -1) {

   137

        fprintf(stderr, "Failed to get domain state: %s\n",

   138

                strerror(errno));

   139

    }

   140

}

   141

   142

/*****************************************************************************/