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

   EtherCAT slave configuration methods.

    33

*/

    34

    35

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

    36

    37

#include <linux/slab.h>

    38

    39

#include "globals.h"

    40

#include "master.h"

    41

#include "voe_handler.h"

    42

    43

#include "slave_config.h"

    44

    45

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

    46

    47

/** Slave configuration constructor.

    48

 *

    49

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

    50

 * position parameters.

    51

 */

    52

void ec_slave_config_init(

    53

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

    54

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

    55

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

    56

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

    57

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

    58

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

    59

        )

    60

{

    61

    unsigned int i;

    62

    63

    sc->master = master;

    64

    65

    sc->alias = alias;

    66

    sc->position = position;

    67

    sc->vendor_id = vendor_id;

    68

    sc->product_code = product_code;

    69

    70

    sc->slave = NULL;

    71

    72

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

    73

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

    74

    75

    sc->used_fmmus = 0;

    76

    77

	sc->dc_assign_activate = 0x0000;

    78

	sc->dc_sync_cycle_times[0] = 0x00000000;

    79

	sc->dc_sync_cycle_times[1] = 0x00000000;

    80

    81

    INIT_LIST_HEAD(&sc->sdo_configs);

    82

    INIT_LIST_HEAD(&sc->sdo_requests);

    83

    INIT_LIST_HEAD(&sc->voe_handlers);

    84

}

    85

    86

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

    87

    88

/** Slave configuration destructor.

    89

 *

    90

 * Clears and frees a slave configuration object.

    91

 */

    92

void ec_slave_config_clear(

    93

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

    94

        )

    95

{

    96

    unsigned int i;

    97

    ec_sdo_request_t *req, *next_req;

    98

    ec_voe_handler_t *voe, *next_voe;

    99

   100

    ec_slave_config_detach(sc);

   101

   102

    // Free sync managers

   103

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

   104

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

   105

   106

    // free all SDO configurations

   107

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

   108

        list_del(&req->list);

   109

        ec_sdo_request_clear(req);

   110

        kfree(req);

   111

    }

   112

   113

    // free all SDO requests

   114

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

   115

        list_del(&req->list);

   116

        ec_sdo_request_clear(req);

   117

        kfree(req);

   118

    }

   119

   120

    // free all VoE handlers

   121

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

   122

        list_del(&voe->list);

   123

        ec_voe_handler_clear(voe);

   124

        kfree(voe);

   125

    }

   126

}

   127

   128

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

   129

   130

/** Prepares an FMMU configuration.

   131

 *

   132

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

   133

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

   134

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

   135

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

   136

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

   137

 * returns with success.

   138

 *

   139

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

   140

 * \retval  <0 Error code.

   141

 */

   142

int ec_slave_config_prepare_fmmu(

   143

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

   144

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

   145

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

   146

        ec_direction_t dir /**< PDO direction. */

   147

        )

   148

{

   149

    unsigned int i;

   150

    ec_fmmu_config_t *fmmu;

   151

   152

    // FMMU configuration already prepared?

   153

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

   154

        fmmu = &sc->fmmu_configs[i];

   155

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

   156

            return fmmu->logical_start_address;

   157

    }

   158

   159

    if (sc->used_fmmus == EC_MAX_FMMUS) {

   160

        EC_ERR("FMMU limit reached for slave configuration %u:%u!\n",

   161

                sc->alias, sc->position);

   162

        return -EOVERFLOW;

   163

    }

   164

   165

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

   166

   167

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

   168

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

   169

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

   170

   171

    return fmmu->logical_start_address;

   172

}

   173

   174

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

   175

   176

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

   177

 *

   178

 * \retval  0 Success.

   179

 * \retval <0 Error code.

   180

 */

   181

int ec_slave_config_attach(

   182

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

   183

        )

   184

{

   185

	ec_slave_t *slave;

   186

   187

	if (sc->slave)

   188

		return 0; // already attached

   189

   190

    if (!(slave = ec_master_find_slave(

   191

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

   192

        if (sc->master->debug_level)

   193

            EC_DBG("Failed to find slave for configuration %u:%u.\n",

   194

                    sc->alias, sc->position);

   195

        return -ENOENT;

   196

    }

   197

   198

	if (slave->config) {

   199

        if (sc->master->debug_level)

   200

            EC_DBG("Failed to attach slave configuration %u:%u. Slave %u"

   201

                    " already has a configuration!\n", sc->alias,

   202

                    sc->position, slave->ring_position);

   203

        return -EEXIST;

   204

    }

   205

   206

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

   207

            || slave->sii.product_code != sc->product_code) {

   208

        if (sc->master->debug_level)

   209

            EC_DBG("Slave %u has an invalid type (0x%08X/0x%08X) for"

   210

                    " configuration %u:%u (0x%08X/0x%08X).\n",

   211

                    slave->ring_position, slave->sii.vendor_id,

   212

                    slave->sii.product_code, sc->alias, sc->position,

   213

                    sc->vendor_id, sc->product_code);

   214

        return -EINVAL;

   215

	}

   216

   217

	// attach slave

   218

	slave->config = sc;

   219

	sc->slave = slave;

   220

   221

    ec_slave_request_state(slave, EC_SLAVE_STATE_OP);

   222

   223

    if (sc->master->debug_level)

   224

        EC_DBG("Attached slave %u to config %u:%u.\n",

   225

                slave->ring_position, sc->alias, sc->position);

   226

   227

	return 0;

   228

}

   229

   230

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

   231

   232

/** Detaches the configuration from a slave object.

   233

 */

   234

void ec_slave_config_detach(

   235

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

   236

        )

   237

{

   238

    if (sc->slave) {

   239

        sc->slave->config = NULL;

   240

        sc->slave = NULL;

   241

    }

   242

}

   243

   244

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

   245

   246

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

   247

 */

   248

void ec_slave_config_load_default_sync_config(ec_slave_config_t *sc)

   249

{

   250

    uint8_t sync_index;

   251

    ec_sync_config_t *sync_config;

   252

    const ec_sync_t *sync;

   253

   254

    if (!sc->slave)

   255

        return;

   256

   257

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

   258

        sync_config = &sc->sync_configs[sync_index];

   259

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

   260

            sync_config->dir = ec_sync_default_direction(sync);

   261

            if (sync_config->dir == EC_DIR_INVALID)

   262

                EC_WARN("SM%u of slave %u has an invalid direction field!\n",

   263

                        sync_index, sc->slave->ring_position);

   264

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

   265

        }

   266

    }

   267

}

   268

   269

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

   270

   271

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

   272

 */

   273

void ec_slave_config_load_default_mapping(

   274

        const ec_slave_config_t *sc,

   275

        ec_pdo_t *pdo

   276

        )

   277

{

   278

    unsigned int i;

   279

    const ec_sync_t *sync;

   280

    const ec_pdo_t *default_pdo;

   281

   282

    if (!sc->slave)

   283

        return;

   284

   285

    if (sc->master->debug_level)

   286

        EC_DBG("Loading default mapping for PDO 0x%04X in config %u:%u.\n",

   287

                pdo->index, sc->alias, sc->position);

   288

   289

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

   290

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

   291

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

   292

   293

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

   294

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

   295

                continue;

   296

   297

            if (default_pdo->name) {

   298

                if (sc->master->debug_level)

   299

                    EC_DBG("Found PDO name \"%s\".\n", default_pdo->name);

   300

   301

                // take PDO name from assigned one

   302

                ec_pdo_set_name(pdo, default_pdo->name);

   303

            }

   304

   305

            // copy entries (= default PDO mapping)

   306

            if (ec_pdo_copy_entries(pdo, default_pdo))

   307

                return;

   308

   309

            if (sc->master->debug_level) {

   310

                const ec_pdo_entry_t *entry;

   311

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

   312

                    EC_DBG("Entry 0x%04X:%02X.\n",

   313

                            entry->index, entry->subindex);

   314

                }

   315

            }

   316

   317

            return;

   318

        }

   319

    }

   320

   321

    if (sc->master->debug_level)

   322

        EC_DBG("No default mapping found.\n");

   323

}

   324

   325

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

   326

   327

/** Get the number of SDO configurations.

   328

 *

   329

 * \return Number of SDO configurations.

   330

 */

   331

unsigned int ec_slave_config_sdo_count(

   332

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

   333

        )

   334

{

   335

	const ec_sdo_request_t *req;

   336

	unsigned int count = 0;

   337

   338

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

   339

		count++;

   340

	}

   341

   342

	return count;

   343

}

   344

   345

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

   346

   347

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

   348

 *

   349

 * Const version.

   350

 */

   351

const ec_sdo_request_t *ec_slave_config_get_sdo_by_pos_const(

   352

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

   353

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

   354

        )

   355

{

   356

    const ec_sdo_request_t *req;

   357

   358

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

   359

        if (pos--)

   360

            continue;

   361

        return req;

   362

    }

   363

   364

    return NULL;

   365

}

   366

   367

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

   368

   369

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

   370

 */

   371

ec_sdo_request_t *ec_slave_config_find_sdo_request(

   372

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

   373

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

   374

        )

   375

{

   376

    ec_sdo_request_t *req;

   377

   378

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

   379

        if (pos--)

   380

            continue;

   381

        return req;

   382

    }

   383

   384

    return NULL;

   385

}

   386

   387

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

   388

   389

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

   390

 */

   391

ec_voe_handler_t *ec_slave_config_find_voe_handler(

   392

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

   393

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

   394

        )

   395

{

   396

    ec_voe_handler_t *voe;

   397

   398

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

   399

        if (pos--)

   400

            continue;

   401

        return voe;

   402

    }

   403

   404

    return NULL;

   405

}

   406

   407

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

   408

 *  Application interface

   409

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

   410

   411

int ecrt_slave_config_sync_manager(ec_slave_config_t *sc, uint8_t sync_index,

   412

        ec_direction_t dir)

   413

{

   414

    ec_sync_config_t *sync_config;

   415

   416

    if (sc->master->debug_level)

   417

        EC_DBG("ecrt_slave_config_sync_manager(sc = 0x%x, sync_index = %u, "

   418

                "dir = %u)\n", (u32) sc, sync_index, dir);

   419

   420

    if (sync_index >= EC_MAX_SYNC_MANAGERS) {

   421

        EC_ERR("Invalid sync manager index %u!\n", sync_index);

   422

        return -ENOENT;

   423

    }

   424

   425

    if (dir != EC_DIR_OUTPUT && dir != EC_DIR_INPUT) {

   426

        EC_ERR("Invalid direction %u!\n", (u32) dir);

   427

        return -EINVAL;

   428

    }

   429

   430

    sync_config = &sc->sync_configs[sync_index];

   431

    sync_config->dir = dir;

   432

    return 0;

   433

}

   434

   435

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

   436

   437

int ecrt_slave_config_pdo_assign_add(ec_slave_config_t *sc,

   438

        uint8_t sync_index, uint16_t pdo_index)

   439

{

   440

    ec_pdo_t *pdo;

   441

   442

    if (sc->master->debug_level)

   443

        EC_DBG("ecrt_slave_config_pdo_assign_add(sc = 0x%x, sync_index = %u, "

   444

                "pdo_index = 0x%04X)\n", (u32) sc, sync_index, pdo_index);

   445

   446

    if (sync_index >= EC_MAX_SYNC_MANAGERS) {

   447

        EC_ERR("Invalid sync manager index %u!\n", sync_index);

   448

        return -EINVAL;

   449

    }

   450

   451

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

   452

   453

    pdo = ec_pdo_list_add_pdo(&sc->sync_configs[sync_index].pdos, pdo_index);

   454

    if (IS_ERR(pdo)) {

   455

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

   456

        return PTR_ERR(pdo);

   457

    }

   458

    pdo->sync_index = sync_index;

   459

   460

    ec_slave_config_load_default_mapping(sc, pdo);

   461

   462

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

   463

    return 0;

   464

}

   465

   466

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

   467

   468

void ecrt_slave_config_pdo_assign_clear(ec_slave_config_t *sc,

   469

        uint8_t sync_index)

   470

{

   471

    if (sc->master->debug_level)

   472

        EC_DBG("ecrt_slave_config_pdo_assign_clear(sc = 0x%x, "

   473

                "sync_index = %u)\n", (u32) sc, sync_index);

   474

   475

    if (sync_index >= EC_MAX_SYNC_MANAGERS) {

   476

        EC_ERR("Invalid sync manager index %u!\n", sync_index);

   477

        return;

   478

    }

   479

   480

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

   481

    ec_pdo_list_clear_pdos(&sc->sync_configs[sync_index].pdos);

   482

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

   483

}

   484

   485

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

   486

   487

int ecrt_slave_config_pdo_mapping_add(ec_slave_config_t *sc,

   488

        uint16_t pdo_index, uint16_t entry_index, uint8_t entry_subindex,

   489

        uint8_t entry_bit_length)

   490

{

   491

    uint8_t sync_index;

   492

    ec_pdo_t *pdo = NULL;

   493

    ec_pdo_entry_t *entry;

   494

    int retval = 0;

   495

   496

    if (sc->master->debug_level)