1

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

     2

 *

     3

 *  $Id$

     4

 *

     5

 *  Copyright (C) 2006-2008  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 and/or

    10

 *  modify it under the terms of the GNU General Public License version 2, as

    11

 *  published by the Free Software Foundation.

    12

 *

    13

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

    14

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

    15

 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General

    16

 *  Public License for more details.

    17

 *

    18

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

    19

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

    20

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

    21

 *

    22

 *  ---

    23

 *

    24

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

    25

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

    26

 *  industrial property and similar rights of Beckhoff Automation GmbH.

    27

 *

    28

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

    29

    30

/**

    31

   \file

    32

   Mailbox functionality.

    33

*/

    34

    35

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

    36

    37

#include <linux/slab.h>

    38

#include <linux/delay.h>

    39

    40

#include "mailbox.h"

    41

#include "datagram.h"

    42

#include "master.h"

    43

    44

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

    45

    46

/**

    47

   Prepares a mailbox-send datagram.

    48

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

    49

*/

    50

    51

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

    52

                                    ec_datagram_t *datagram, /**< datagram */

    53

                                    uint8_t type, /**< mailbox protocol */

    54

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

    55

                                    )

    56

{

    57

    size_t total_size;

    58

    int ret;

    59

    60

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

    61

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

    62

               slave->ring_position);

    63

        return ERR_PTR(-EPROTONOSUPPORT);

    64

    }

    65

    66

    total_size = EC_MBOX_HEADER_SIZE + size;

    67

    68

    if (unlikely(total_size > slave->configured_rx_mailbox_size)) {

    69

        EC_ERR("Data size (%u) does not fit in mailbox (%u)!\n",

    70

                total_size, slave->configured_rx_mailbox_size);

    71

        return ERR_PTR(-EOVERFLOW);

    72

    }

    73

    74

    ec_datagram_zero(datagram);

    75

    ret = ec_datagram_fpwr(datagram, slave->station_address,

    76

            slave->configured_rx_mailbox_offset,

    77

            slave->configured_rx_mailbox_size);

    78

    if (ret)

    79

        return ERR_PTR(ret);

    80

    81

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

    82

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

    83

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

    84

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

    85

    86

    return datagram->data + EC_MBOX_HEADER_SIZE;

    87

}

    88

    89

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

    90

    91

/**

    92

   Prepares a datagram for checking the mailbox state.

    93

   \todo Determine sync manager used for receive mailbox

    94

   \return 0 in case of success, else < 0

    95

*/

    96

    97

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

    98

                                ec_datagram_t *datagram /**< datagram */

    99

                                )

   100

{

   101

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

   102

    if (ret)

   103

        return ret;

   104

   105

    ec_datagram_zero(datagram);

   106

    return 0;

   107

}

   108

   109

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

   110

   111

/**

   112

   Processes a mailbox state checking datagram.

   113

   \return 0 in case of success, else < 0

   114

*/

   115

   116

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

   117

{

   118

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

   119

}

   120

   121

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

   122

   123

/**

   124

   Prepares a datagram to fetch mailbox data.

   125

   \return 0 in case of success, else < 0

   126

*/

   127

   128

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

   129

                                ec_datagram_t *datagram /**< datagram */

   130

                                )

   131

{

   132

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

   133

            slave->configured_tx_mailbox_offset,

   134

            slave->configured_tx_mailbox_size);

   135

    if (ret)

   136

        return ret;

   137

   138

    ec_datagram_zero(datagram);

   139

    return 0;

   140

}

   141

   142

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

   143

   144

/**

   145

   Mailbox error codes.

   146

*/

   147

   148

const ec_code_msg_t mbox_error_messages[] = {

   149

    {0x00000001, "MBXERR_SYNTAX"},

   150

    {0x00000002, "MBXERR_UNSUPPORTEDPROTOCOL"},

   151

    {0x00000003, "MBXERR_INVAILDCHANNEL"},

   152

    {0x00000004, "MBXERR_SERVICENOTSUPPORTED"},

   153

    {0x00000005, "MBXERR_INVALIDHEADER"},

   154

    {0x00000006, "MBXERR_SIZETOOSHORT"},

   155

    {0x00000007, "MBXERR_NOMOREMEMORY"},

   156

    {0x00000008, "MBXERR_INVALIDSIZE"},

   157

    {}

   158

};

   159

   160

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

   161

   162

/** Processes received mailbox data.

   163

 *

   164

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

   165

 */

   166

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

   167

                             ec_datagram_t *datagram, /**< datagram */

   168

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

   169

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

   170

                             )

   171

{

   172

    size_t data_size;

   173

   174

    data_size = EC_READ_U16(datagram->data);

   175

   176

    if (data_size + EC_MBOX_HEADER_SIZE > slave->configured_tx_mailbox_size) {

   177

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

   178

                slave->ring_position);

   179

        ec_print_data(datagram->data, slave->configured_tx_mailbox_size);

   180

        return ERR_PTR(-EPROTO);

   181

    }

   182

   183

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

   184

    *size = data_size;

   185

   186

    if (*type == 0x00) {

   187

        const ec_code_msg_t *mbox_msg;

   188

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

   189

   190

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

   191

                slave->ring_position);

   192

   193

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

   194

            if (mbox_msg->code != code)

   195

                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

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