1

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

     2

 *

     3

 *  $Id$

     4

 *

     5

 *  Copyright (C) 2006  Florian Pose, Ingenieurgemeinschaft IgH

     6

 *

     7

 *  This file is part of the IgH EtherCAT Master.

     8

 *

     9

 *  The IgH EtherCAT Master is free software; you can redistribute it

    10

 *  and/or modify it under the terms of the GNU General Public License

    11

 *  as published by the Free Software Foundation; either version 2 of the

    12

 *  License, or (at your option) any later version.

    13

 *

    14

 *  The IgH EtherCAT Master is distributed in the hope that it will be

    15

 *  useful, but WITHOUT ANY WARRANTY; without even the implied warranty of

    16

 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    17

 *  GNU General Public License for more details.

    18

 *

    19

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

    20

 *  along with the IgH EtherCAT Master; if not, write to the Free Software

    21

 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

    22

 *

    23

 *  The right to use EtherCAT Technology is granted and comes free of

    24

 *  charge under condition of compatibility of product made by

    25

 *  Licensee. People intending to distribute/sell products based on the

    26

 *  code, have to sign an agreement to guarantee that products using

    27

 *  software based on IgH EtherCAT master stay compatible with the actual

    28

 *  EtherCAT specification (which are released themselves as an open

    29

 *  standard) as the (only) precondition to have the right to use EtherCAT

    30

 *  Technology, IP and trade marks.

    31

 *

    32

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

    33

    34

/**

    35

   \file

    36

   Mailbox functionality.

    37

*/

    38

    39

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

    40

    41

#include <linux/slab.h>

    42

#include <linux/delay.h>

    43

    44

#include "mailbox.h"

    45

#include "datagram.h"

    46

#include "master.h"

    47

    48

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

    49

    50

/**

    51

   Prepares a mailbox-send datagram.

    52

   \return Pointer to mailbox datagram data, or ERR_PTR() code.

    53

*/

    54

    55

uint8_t *ec_slave_mbox_prepare_send(const ec_slave_t *slave, /**< slave */

    56

                                    ec_datagram_t *datagram, /**< datagram */

    57

                                    uint8_t type, /**< mailbox protocol */

    58

                                    size_t size /**< size of the data */

    59

                                    )

    60

{

    61

    size_t total_size;

    62

    int ret;

    63

    64

    if (unlikely(!slave->sii.mailbox_protocols)) {

    65

        EC_ERR("Slave %u does not support mailbox communication!\n",

    66

               slave->ring_position);

    67

        return ERR_PTR(-EPROTONOSUPPORT);

    68

    }

    69

    70

    total_size = EC_MBOX_HEADER_SIZE + size;

    71

    if (unlikely(total_size > slave->sii.rx_mailbox_size)) {

    72

        EC_ERR("Data size does not fit in mailbox!\n");

    73

        return ERR_PTR(-EOVERFLOW);

    74

    }

    75

    76

    ret = ec_datagram_fpwr(datagram, slave->station_address,

    77

                         slave->sii.rx_mailbox_offset,

    78

                         slave->sii.rx_mailbox_size);

    79

    if (ret)

    80

        return ERR_PTR(ret);

    81

    82

    EC_WRITE_U16(datagram->data,     size); // mailbox service data length

    83

    EC_WRITE_U16(datagram->data + 2, slave->station_address); // station addr.

    84

    EC_WRITE_U8 (datagram->data + 4, 0x00); // channel & priority

    85

    EC_WRITE_U8 (datagram->data + 5, type); // underlying protocol type

    86

    87

    return datagram->data + EC_MBOX_HEADER_SIZE;

    88

}

    89

    90

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

    91

    92

/**

    93

   Prepares a datagram for checking the mailbox state.

    94

   \todo Determine sync manager used for receive mailbox

    95

   \return 0 in case of success, else < 0

    96

*/

    97

    98

int ec_slave_mbox_prepare_check(const ec_slave_t *slave, /**< slave */

    99

                                ec_datagram_t *datagram /**< datagram */

   100

                                )

   101

{

   102

    int ret = ec_datagram_fprd(datagram, slave->station_address, 0x808, 8);

   103

    if (ret)

   104

        return ret;

   105

   106

    ec_datagram_zero(datagram);

   107

    return 0;

   108

}

   109

   110

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

   111

   112

/**

   113

   Processes a mailbox state checking datagram.

   114

   \return 0 in case of success, else < 0

   115

*/

   116

   117

int ec_slave_mbox_check(const ec_datagram_t *datagram /**< datagram */)

   118

{

   119

    return EC_READ_U8(datagram->data + 5) & 8 ? 1 : 0;

   120

}

   121

   122

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

   123

   124

/**

   125

   Prepares a datagram to fetch mailbox data.

   126

   \return 0 in case of success, else < 0

   127

*/

   128

   129

int ec_slave_mbox_prepare_fetch(const ec_slave_t *slave, /**< slave */

   130

                                ec_datagram_t *datagram /**< datagram */

   131

                                )

   132

{

   133

    int ret = ec_datagram_fprd(datagram, slave->station_address,

   134

                         slave->sii.tx_mailbox_offset,

   135

                         slave->sii.tx_mailbox_size);

   136

    if (ret)

   137

        return ret;

   138

   139

    ec_datagram_zero(datagram);

   140

    return 0;

   141

}

   142

   143

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

   144

   145

/**

   146

   Mailbox error codes.

   147

*/

   148

   149

const ec_code_msg_t mbox_error_messages[] = {

   150

    {0x00000001, "MBXERR_SYNTAX"},

   151

    {0x00000002, "MBXERR_UNSUPPORTEDPROTOCOL"},

   152

    {0x00000003, "MBXERR_INVAILDCHANNEL"},

   153

    {0x00000004, "MBXERR_SERVICENOTSUPPORTED"},

   154

    {0x00000005, "MBXERR_INVALIDHEADER"},

   155

    {0x00000006, "MBXERR_SIZETOOSHORT"},

   156

    {0x00000007, "MBXERR_NOMOREMEMORY"},

   157

    {0x00000008, "MBXERR_INVALIDSIZE"},

   158

    {}

   159

};

   160

   161

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

   162

   163

/** Processes received mailbox data.

   164

 *

   165

 * \return Pointer to the received data, or ERR_PTR() code.

   166

 */

   167

uint8_t *ec_slave_mbox_fetch(const ec_slave_t *slave, /**< slave */

   168

                             ec_datagram_t *datagram, /**< datagram */

   169

                             uint8_t *type, /**< expected mailbox protocol */

   170

                             size_t *size /**< size of the received data */

   171

                             )

   172

{

   173

    size_t data_size;

   174

   175

    data_size = EC_READ_U16(datagram->data);

   176

   177

    if (data_size + EC_MBOX_HEADER_SIZE > slave->sii.tx_mailbox_size) {

   178

        EC_ERR("Corrupt mailbox response received from slave %u!\n",

   179

               slave->ring_position);

   180

        ec_print_data(datagram->data, slave->sii.tx_mailbox_size);

   181

        return ERR_PTR(-EPROTO);

   182

    }

   183

   184

    *type = EC_READ_U8(datagram->data + 5) & 0x0F;

   185

    *size = data_size;

   186

   187

    if (*type == 0x00) {

   188

        const ec_code_msg_t *mbox_msg;

   189

        uint16_t code = EC_READ_U16(datagram->data + 8);

   190

   191

        EC_ERR("Mailbox error response received from slave %u - ",

   192

                slave->ring_position);

   193

   194

        for (mbox_msg = mbox_error_messages; mbox_msg->code; mbox_msg++) {

   195

            if (mbox_msg->code != code) continue;

   196

            printk("Code 0x%04X: \"%s\".\n",

   197

                   mbox_msg->code, mbox_msg->message);

   198

            break;

   199

        }

   200

   201

        if (!mbox_msg->code)

   202

            printk("Unknown error reply code 0x%04X.\n", code);

   203

   204

        if (slave->master->debug_level)

   205

            ec_print_data(datagram->data + EC_MBOX_HEADER_SIZE, data_size);

   206

   207

        return ERR_PTR(-EPROTO);

   208

    }

   209

   210

    return datagram->data + EC_MBOX_HEADER_SIZE;

   211

}

   212

   213

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