1

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

     2

 *

     3

 *  $Id$

     4

 *

     5

 *  Copyright (C) 2006-2012  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

 *  vim: expandtab

    29

 *

    30

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

    31

    32

/**

    33

   \file

    34

   EtherCAT slave configuration methods.

    35

*/

    36

    37

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

    38

    39

#include <linux/module.h>

    40

#include <linux/slab.h>

    41

    42

#include "globals.h"

    43

#include "master.h"

    44

#include "voe_handler.h"

    45

    46

#include "slave_config.h"

    47

    48

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

    49

    50

/** Slave configuration constructor.

    51

 *

    52

 * See ecrt_master_slave_config() for the usage of the \a alias and \a

    53

 * position parameters.

    54

 */

    55

void ec_slave_config_init(

    56

        ec_slave_config_t *sc, /**< Slave configuration. */

    57

        ec_master_t *master, /**< EtherCAT master. */

    58

        uint16_t alias, /**< Slave alias. */

    59

        uint16_t position, /**< Slave position. */

    60

        uint32_t vendor_id, /**< Expected vendor ID. */

    61

        uint32_t product_code /**< Expected product code. */

    62

        )

    63

{

    64

    unsigned int i;

    65

    66

    sc->master = master;

    67

    68

    sc->alias = alias;

    69

    sc->position = position;

    70

    sc->vendor_id = vendor_id;

    71

    sc->product_code = product_code;

    72

    sc->watchdog_divider = 0; // use default

    73

    sc->watchdog_intervals = 0; // use default

    74

    75

    sc->slave = NULL;

    76

    77

    for (i = 0; i < EC_MAX_SYNC_MANAGERS; i++)

    78

        ec_sync_config_init(&sc->sync_configs[i]);

    79

    80

    sc->used_fmmus = 0;

    81

    sc->dc_assign_activate = 0x0000;

    82

    sc->dc_sync[0].cycle_time = 0U;

    83

    sc->dc_sync[1].cycle_time = 0;

    84

    sc->dc_sync[0].shift_time = 0U;

    85

    sc->dc_sync[1].shift_time = 0;

    86

    87

    INIT_LIST_HEAD(&sc->sdo_configs);

    88

    INIT_LIST_HEAD(&sc->sdo_requests);

    89

    INIT_LIST_HEAD(&sc->reg_requests);

    90

    INIT_LIST_HEAD(&sc->voe_handlers);

    91

    INIT_LIST_HEAD(&sc->soe_configs);

    92

    93

    ec_coe_emerg_ring_init(&sc->emerg_ring, sc);

    94

}

    95

    96

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

    97

    98

/** Slave configuration destructor.

    99

 *

   100

 * Clears and frees a slave configuration object.

   101

 */

   102

void ec_slave_config_clear(

   103

        ec_slave_config_t *sc /**< Slave configuration. */

   104

        )

   105

{

   106

    unsigned int i;

   107

    ec_sdo_request_t *req, *next_req;

   108

    ec_voe_handler_t *voe, *next_voe;

   109

    ec_reg_request_t *reg, *next_reg;

   110

    ec_soe_request_t *soe, *next_soe;

   111

   112

    ec_slave_config_detach(sc);

   113

   114

    // Free sync managers

   115

    for (i = 0; i < EC_MAX_SYNC_MANAGERS; i++)

   116

        ec_sync_config_clear(&sc->sync_configs[i]);

   117

   118

    // free all SDO configurations

   119

    list_for_each_entry_safe(req, next_req, &sc->sdo_configs, list) {

   120

        list_del(&req->list);

   121

        ec_sdo_request_clear(req);

   122

        kfree(req);

   123

    }

   124

   125

    // free all SDO requests

   126

    list_for_each_entry_safe(req, next_req, &sc->sdo_requests, list) {

   127

        list_del(&req->list);

   128

        ec_sdo_request_clear(req);

   129

        kfree(req);

   130

    }

   131

   132

    // free all register requests

   133

    list_for_each_entry_safe(reg, next_reg, &sc->reg_requests, list) {

   134

        list_del(&reg->list);

   135

        ec_reg_request_clear(reg);

   136

        kfree(reg);

   137

    }

   138

   139

    // free all VoE handlers

   140

    list_for_each_entry_safe(voe, next_voe, &sc->voe_handlers, list) {

   141

        list_del(&voe->list);

   142

        ec_voe_handler_clear(voe);

   143

        kfree(voe);

   144

    }

   145

   146

    // free all SoE configurations

   147

    list_for_each_entry_safe(soe, next_soe, &sc->soe_configs, list) {

   148

        list_del(&soe->list);

   149

        ec_soe_request_clear(soe);

   150

        kfree(soe);

   151

    }

   152

   153

    ec_coe_emerg_ring_clear(&sc->emerg_ring);

   154

}

   155

   156

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

   157

   158

/** Prepares an FMMU configuration.

   159

 *

   160

 * Configuration data for the FMMU is saved in the slave config structure and

   161

 * is written to the slave during the configuration. The FMMU configuration

   162

 * is done in a way, that the complete data range of the corresponding sync

   163

 * manager is covered. Seperate FMMUs are configured for each domain. If the

   164

 * FMMU configuration is already prepared, the function does nothing and

   165

 * returns with success.

   166

 *

   167

 * \retval >=0 Success, logical offset byte address.

   168

 * \retval  <0 Error code.

   169

 */

   170

int ec_slave_config_prepare_fmmu(

   171

        ec_slave_config_t *sc, /**< Slave configuration. */

   172

        ec_domain_t *domain, /**< Domain. */

   173

        uint8_t sync_index, /**< Sync manager index. */

   174

        ec_direction_t dir /**< PDO direction. */

   175

        )

   176

{

   177

    unsigned int i;

   178

    ec_fmmu_config_t *fmmu;

   179

   180

    // FMMU configuration already prepared?

   181

    for (i = 0; i < sc->used_fmmus; i++) {

   182

        fmmu = &sc->fmmu_configs[i];

   183

        if (fmmu->domain == domain && fmmu->sync_index == sync_index)

   184

            return fmmu->logical_start_address;

   185

    }

   186

   187

    if (sc->used_fmmus == EC_MAX_FMMUS) {

   188

        EC_CONFIG_ERR(sc, "FMMU limit reached!\n");

   189

        return -EOVERFLOW;

   190

    }

   191

   192

    fmmu = &sc->fmmu_configs[sc->used_fmmus++];

   193

   194

    down(&sc->master->master_sem);

   195

    ec_fmmu_config_init(fmmu, sc, domain, sync_index, dir);

   196

    up(&sc->master->master_sem);

   197

   198

    return fmmu->logical_start_address;

   199

}

   200

   201

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

   202

   203

/** Attaches the configuration to the addressed slave object.

   204

 *

   205

 * \retval  0 Success.

   206

 * \retval <0 Error code.

   207

 */

   208

int ec_slave_config_attach(

   209

        ec_slave_config_t *sc /**< Slave configuration. */

   210

        )

   211

{

   212

    ec_slave_t *slave;

   213

   214

    if (sc->slave)

   215

        return 0; // already attached

   216

   217

    if (!(slave = ec_master_find_slave(

   218

                    sc->master, sc->alias, sc->position))) {

   219

        EC_CONFIG_DBG(sc, 1, "Failed to find slave for configuration.\n");

   220

        return -ENOENT;

   221

    }

   222

   223

    if (slave->config) {

   224

        EC_CONFIG_DBG(sc, 1, "Failed to attach configuration. Slave %u"

   225

                " already has a configuration!\n", slave->ring_position);

   226

        return -EEXIST;

   227

    }

   228

   229

    if (

   230

#ifdef EC_IDENT_WILDCARDS

   231

            sc->vendor_id != 0xffffffff &&

   232

#endif

   233

            slave->sii.vendor_id != sc->vendor_id

   234

       ) {

   235

        EC_CONFIG_DBG(sc, 1, "Slave %u has no matching vendor ID (0x%08X)"

   236

                " for configuration (0x%08X).\n",

   237

                slave->ring_position, slave->sii.vendor_id, sc->vendor_id);

   238

        return -EINVAL;

   239

    }

   240

   241

    if (

   242

#ifdef EC_IDENT_WILDCARDS

   243

            sc->product_code != 0xffffffff &&

   244

#endif

   245

            slave->sii.product_code != sc->product_code

   246

       ) {

   247

        EC_CONFIG_DBG(sc, 1, "Slave %u has no matching product code (0x%08X)"

   248

                " for configuration (0x%08X).\n",

   249

                slave->ring_position, slave->sii.product_code,

   250

                sc->product_code);

   251

        return -EINVAL;

   252

    }

   253

   254

    // attach slave

   255

    slave->config = sc;

   256

    sc->slave = slave;

   257

   258

    EC_CONFIG_DBG(sc, 1, "Attached slave %u.\n", slave->ring_position);

   259

    return 0;

   260

}

   261

   262

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

   263

   264

/** Detaches the configuration from a slave object.

   265

 */

   266

void ec_slave_config_detach(

   267

        ec_slave_config_t *sc /**< Slave configuration. */

   268

        )

   269

{

   270

    if (sc->slave) {

   271

        sc->slave->config = NULL;

   272

        sc->slave = NULL;

   273

    }

   274

}

   275

   276

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

   277

   278

/** Loads the default PDO assignment from the slave object.

   279

 */

   280

void ec_slave_config_load_default_sync_config(ec_slave_config_t *sc)

   281

{

   282

    uint8_t sync_index;

   283

    ec_sync_config_t *sync_config;

   284

    const ec_sync_t *sync;

   285

   286

    if (!sc->slave)

   287

        return;

   288

   289

    for (sync_index = 0; sync_index < EC_MAX_SYNC_MANAGERS; sync_index++) {

   290

        sync_config = &sc->sync_configs[sync_index];

   291

        if ((sync = ec_slave_get_sync(sc->slave, sync_index))) {

   292

            sync_config->dir = ec_sync_default_direction(sync);

   293

            if (sync_config->dir == EC_DIR_INVALID)

   294

                EC_SLAVE_WARN(sc->slave,

   295

                        "SM%u has an invalid direction field!\n", sync_index);

   296

            ec_pdo_list_copy(&sync_config->pdos, &sync->pdos);

   297

        }

   298

    }

   299

}

   300

   301

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

   302

   303

/** Loads the default mapping for a PDO from the slave object.

   304

 */

   305

void ec_slave_config_load_default_mapping(

   306

        const ec_slave_config_t *sc,

   307

        ec_pdo_t *pdo

   308

        )

   309

{

   310

    unsigned int i;

   311

    const ec_sync_t *sync;

   312

    const ec_pdo_t *default_pdo;

   313

   314

    if (!sc->slave)

   315

        return;

   316

   317

    EC_CONFIG_DBG(sc, 1, "Loading default mapping for PDO 0x%04X.\n",

   318

            pdo->index);

   319

   320

    // find PDO in any sync manager (it could be reassigned later)

   321

    for (i = 0; i < sc->slave->sii.sync_count; i++) {

   322

        sync = &sc->slave->sii.syncs[i];

   323

   324

        list_for_each_entry(default_pdo, &sync->pdos.list, list) {

   325

            if (default_pdo->index != pdo->index)

   326

                continue;

   327

   328

            if (default_pdo->name) {

   329

                EC_CONFIG_DBG(sc, 1, "Found PDO name \"%s\".\n",

   330

                        default_pdo->name);

   331

   332

                // take PDO name from assigned one

   333

                ec_pdo_set_name(pdo, default_pdo->name);

   334

            }

   335

   336

            // copy entries (= default PDO mapping)

   337

            if (ec_pdo_copy_entries(pdo, default_pdo))

   338

                return;

   339

   340

            if (sc->master->debug_level) {

   341

                const ec_pdo_entry_t *entry;

   342

                list_for_each_entry(entry, &pdo->entries, list) {

   343

                    EC_CONFIG_DBG(sc, 1, "Entry 0x%04X:%02X.\n",

   344

                            entry->index, entry->subindex);

   345

                }

   346

            }

   347

   348

            return;

   349

        }

   350

    }

   351

   352

    EC_CONFIG_DBG(sc, 1, "No default mapping found.\n");

   353

}

   354

   355

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

   356

   357

/** Get the number of SDO configurations.

   358

 *

   359

 * \return Number of SDO configurations.

   360

 */

   361

unsigned int ec_slave_config_sdo_count(

   362

        const ec_slave_config_t *sc /**< Slave configuration. */

   363

        )

   364

{

   365

    const ec_sdo_request_t *req;

   366

    unsigned int count = 0;

   367

   368

    list_for_each_entry(req, &sc->sdo_configs, list) {

   369

        count++;

   370

    }

   371

   372

    return count;

   373

}

   374

   375

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

   376

   377

/** Finds an SDO configuration via its position in the list.

   378

 *

   379

 * Const version.

   380

 */

   381

const ec_sdo_request_t *ec_slave_config_get_sdo_by_pos_const(

   382

        const ec_slave_config_t *sc, /**< Slave configuration. */

   383

        unsigned int pos /**< Position in the list. */

   384

        )

   385

{

   386

    const ec_sdo_request_t *req;

   387

   388

    list_for_each_entry(req, &sc->sdo_configs, list) {

   389

        if (pos--)

   390

            continue;

   391

        return req;

   392

    }

   393

   394

    return NULL;

   395

}

   396

   397

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

   398

   399

/** Get the number of IDN configurations.

   400

 *

   401

 * \return Number of SDO configurations.

   402

 */

   403

unsigned int ec_slave_config_idn_count(

   404

        const ec_slave_config_t *sc /**< Slave configuration. */

   405

        )

   406

{

   407

    const ec_soe_request_t *req;

   408

    unsigned int count = 0;

   409

   410

    list_for_each_entry(req, &sc->soe_configs, list) {

   411

        count++;

   412

    }

   413

   414

    return count;

   415

}

   416

   417

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

   418

   419

/** Finds an IDN configuration via its position in the list.

   420

 *

   421

 * Const version.

   422

 */

   423

const ec_soe_request_t *ec_slave_config_get_idn_by_pos_const(

   424

        const ec_slave_config_t *sc, /**< Slave configuration. */

   425

        unsigned int pos /**< Position in the list. */

   426

        )

   427

{

   428

    const ec_soe_request_t *req;

   429

   430

    list_for_each_entry(req, &sc->soe_configs, list) {

   431

        if (pos--)

   432

            continue;

   433

        return req;

   434

    }

   435

   436

    return NULL;

   437

}

   438

   439

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

   440

   441

/** Finds a CoE handler via its position in the list.

   442

 */

   443

ec_sdo_request_t *ec_slave_config_find_sdo_request(

   444

        ec_slave_config_t *sc, /**< Slave configuration. */

   445

        unsigned int pos /**< Position in the list. */

   446

        )

   447

{

   448

    ec_sdo_request_t *req;

   449

   450

    list_for_each_entry(req, &sc->sdo_requests, list) {

   451

        if (pos--)

   452

            continue;

   453

        return req;

   454

    }

   455

   456

    return NULL;

   457

}

   458

   459

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

   460

   461

/** Finds a register handler via its position in the list.

   462

 */

   463

ec_reg_request_t *ec_slave_config_find_reg_request(

   464

        ec_slave_config_t *sc, /**< Slave configuration. */

   465

        unsigned int pos /**< Position in the list. */

   466

        )

   467

{

   468

    ec_reg_request_t *reg;

   469

   470

    list_for_each_entry(reg, &sc->reg_requests, list) {

   471

        if (pos--)

   472

            continue;

   473

        return reg;

   474

    }

   475

   476

    return NULL;

   477

}

   478

   479

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

   480

   481

/** Finds a VoE handler via its position in the list.

   482

 */

   483

ec_voe_handler_t *ec_slave_config_find_voe_handler(

   484

        ec_slave_config_t *sc, /**< Slave configuration. */

   485

        unsigned int pos /**< Position in the list. */

   486

        )

   487

{

   488

    ec_voe_handler_t *voe;

   489

   490

    list_for_each_entry(voe, &sc->voe_handlers, list) {

   491

        if (pos--)

   492

            continue;

   493

        return voe;

   494

    }

   495