fsm_sii.c

Go to the documentation of this file.

/******************************************************************************
 *
 *  $Id: fsm_sii.c 682 2006-11-07 12:13:30Z fp $
 *
 *  Copyright (C) 2006  Florian Pose, Ingenieurgemeinschaft IgH
 *
 *  This file is part of the IgH EtherCAT Master.
 *
 *  The IgH EtherCAT Master is free software; you can redistribute it
 *  and/or modify it under the terms of the GNU General Public License
 *  as published by the Free Software Foundation; either version 2 of the
 *  License, or (at your option) any later version.
 *
 *  The IgH EtherCAT Master is distributed in the hope that it will be
 *  useful, but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with the IgH EtherCAT Master; if not, write to the Free Software
 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
 *
 *  The right to use EtherCAT Technology is granted and comes free of
 *  charge under condition of compatibility of product made by
 *  Licensee. People intending to distribute/sell products based on the
 *  code, have to sign an agreement to guarantee that products using
 *  software based on IgH EtherCAT master stay compatible with the actual
 *  EtherCAT specification (which are released themselves as an open
 *  standard) as the (only) precondition to have the right to use EtherCAT
 *  Technology, IP and trade marks.
 *
 *****************************************************************************/

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

#include "globals.h"
#include "mailbox.h"
#include "master.h"
#include "fsm_sii.h"

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

void ec_fsm_sii_start_reading(ec_fsm_sii_t *);
void ec_fsm_sii_read_check(ec_fsm_sii_t *);
void ec_fsm_sii_read_fetch(ec_fsm_sii_t *);
void ec_fsm_sii_start_writing(ec_fsm_sii_t *);
void ec_fsm_sii_write_check(ec_fsm_sii_t *);
void ec_fsm_sii_write_check2(ec_fsm_sii_t *);
void ec_fsm_sii_end(ec_fsm_sii_t *);
void ec_fsm_sii_error(ec_fsm_sii_t *);

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

void ec_fsm_sii_init(ec_fsm_sii_t *fsm, 
                     ec_datagram_t *datagram 
                     )
{
    fsm->state = NULL;
    fsm->datagram = datagram;
}

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

void ec_fsm_sii_clear(ec_fsm_sii_t *fsm )
{
}

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

void ec_fsm_sii_read(ec_fsm_sii_t *fsm, 
                     ec_slave_t *slave, 
                     uint16_t offset, 
                     ec_fsm_sii_addressing_t mode 
                     )
{
    fsm->state = ec_fsm_sii_start_reading;
    fsm->slave = slave;
    fsm->offset = offset;
    fsm->mode = mode;
}

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

void ec_fsm_sii_write(ec_fsm_sii_t *fsm, 
                      ec_slave_t *slave, 
                      uint16_t offset, 
                      uint16_t *value, 
                      ec_fsm_sii_addressing_t mode 
                      )
{
    fsm->state = ec_fsm_sii_start_writing;
    fsm->slave = slave;
    fsm->offset = offset;
    fsm->mode = mode;
    memcpy(fsm->value, value, 2);
}

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

int ec_fsm_sii_exec(ec_fsm_sii_t *fsm )
{
    fsm->state(fsm);

    return fsm->state != ec_fsm_sii_end && fsm->state != ec_fsm_sii_error;
}

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

int ec_fsm_sii_success(ec_fsm_sii_t *fsm )
{
    return fsm->state == ec_fsm_sii_end;
}

/******************************************************************************
 *  SII state machine
 *****************************************************************************/

void ec_fsm_sii_start_reading(ec_fsm_sii_t *fsm )
{
    ec_datagram_t *datagram = fsm->datagram;

    // initiate read operation
    switch (fsm->mode) {
        case EC_FSM_SII_POSITION:
            ec_datagram_apwr(datagram, fsm->slave->ring_position, 0x502, 4);
            break;
        case EC_FSM_SII_NODE:
            ec_datagram_npwr(datagram, fsm->slave->station_address, 0x502, 4);
            break;
    }

    EC_WRITE_U8 (datagram->data,     0x00); // read-only access
    EC_WRITE_U8 (datagram->data + 1, 0x01); // request read operation
    EC_WRITE_U16(datagram->data + 2, fsm->offset);
    ec_master_queue_datagram(fsm->slave->master, datagram);
    fsm->state = ec_fsm_sii_read_check;
}

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

void ec_fsm_sii_read_check(ec_fsm_sii_t *fsm )
{
    ec_datagram_t *datagram = fsm->datagram;

    if (datagram->state != EC_DATAGRAM_RECEIVED
        || datagram->working_counter != 1) {
        EC_ERR("SII: Reception of read datagram failed.\n");
        fsm->state = ec_fsm_sii_error;
        return;
    }

    fsm->cycles_start = datagram->cycles_sent;
    fsm->check_once_more = 1;

    // issue check/fetch datagram
    switch (fsm->mode) {
        case EC_FSM_SII_POSITION:
            ec_datagram_aprd(datagram, fsm->slave->ring_position, 0x502, 10);
            break;
        case EC_FSM_SII_NODE:
            ec_datagram_nprd(datagram, fsm->slave->station_address, 0x502, 10);
            break;
    }
    ec_master_queue_datagram(fsm->slave->master, datagram);
    fsm->state = ec_fsm_sii_read_fetch;
}

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

void ec_fsm_sii_read_fetch(ec_fsm_sii_t *fsm )
{
    ec_datagram_t *datagram = fsm->datagram;

    if (datagram->state != EC_DATAGRAM_RECEIVED
        || datagram->working_counter != 1) {
        EC_ERR("SII: Reception of check/fetch datagram failed.\n");
        fsm->state = ec_fsm_sii_error;
        return;
    }

    // check "busy bit"
    if (EC_READ_U8(datagram->data + 1) & 0x81) {
        // still busy... timeout?
        if (datagram->cycles_received
            - fsm->cycles_start >= (cycles_t) 10 * cpu_khz) {
            if (!fsm->check_once_more) {
                EC_ERR("SII: Read timeout.\n");
                fsm->state = ec_fsm_sii_error;
#if 0
                EC_DBG("SII busy: %02X %02X %02X %02X\n",
                       EC_READ_U8(datagram->data + 0),
                       EC_READ_U8(datagram->data + 1),
                       EC_READ_U8(datagram->data + 2),
                       EC_READ_U8(datagram->data + 3));
#endif
                return;
            }
            fsm->check_once_more = 0;
        }

        // issue check/fetch datagram again
        switch (fsm->mode) {
            case EC_FSM_SII_POSITION:
                ec_datagram_aprd(datagram, fsm->slave->ring_position, 0x502, 10);
                break;
            case EC_FSM_SII_NODE:
                ec_datagram_nprd(datagram, fsm->slave->station_address, 0x502, 10);
                break;
        }
        ec_master_queue_datagram(fsm->slave->master, datagram);
        return;
    }

#if 0
    EC_DBG("SII rec: %02X %02X %02X %02X - %02X %02X %02X %02X\n",
           EC_READ_U8(datagram->data + 0), EC_READ_U8(datagram->data + 1),
           EC_READ_U8(datagram->data + 2), EC_READ_U8(datagram->data + 3),
           EC_READ_U8(datagram->data + 6), EC_READ_U8(datagram->data + 7),
           EC_READ_U8(datagram->data + 8), EC_READ_U8(datagram->data + 9));
#endif

    // SII value received.
    memcpy(fsm->value, datagram->data + 6, 4);
    fsm->state = ec_fsm_sii_end;
}

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

void ec_fsm_sii_start_writing(ec_fsm_sii_t *fsm )
{
    ec_datagram_t *datagram = fsm->datagram;

    // initiate write operation
    ec_datagram_npwr(datagram, fsm->slave->station_address, 0x502, 8);
    EC_WRITE_U8 (datagram->data,     0x01); // enable write access
    EC_WRITE_U8 (datagram->data + 1, 0x02); // request write operation
    EC_WRITE_U32(datagram->data + 2, fsm->offset);
    memcpy(datagram->data + 6, fsm->value, 2);
    ec_master_queue_datagram(fsm->slave->master, datagram);
    fsm->state = ec_fsm_sii_write_check;
}

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

void ec_fsm_sii_write_check(ec_fsm_sii_t *fsm )
{
    ec_datagram_t *datagram = fsm->datagram;

    if (datagram->state != EC_DATAGRAM_RECEIVED
        || datagram->working_counter != 1) {
        EC_ERR("SII: Reception of write datagram failed.\n");
        fsm->state = ec_fsm_sii_error;
        return;
    }

    fsm->cycles_start = datagram->cycles_sent;
    fsm->check_once_more = 1;

    // issue check/fetch datagram
    ec_datagram_nprd(datagram, fsm->slave->station_address, 0x502, 2);
    ec_master_queue_datagram(fsm->slave->master, datagram);
    fsm->state = ec_fsm_sii_write_check2;
}

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

void ec_fsm_sii_write_check2(ec_fsm_sii_t *fsm )
{
    ec_datagram_t *datagram = fsm->datagram;

    if (datagram->state != EC_DATAGRAM_RECEIVED
        || datagram->working_counter != 1) {
        EC_ERR("SII: Reception of write check datagram failed.\n");
        fsm->state = ec_fsm_sii_error;
        return;
    }

    if (EC_READ_U8(datagram->data + 1) & 0x82) {
        // still busy... timeout?
        if (datagram->cycles_received
            - fsm->cycles_start >= (cycles_t) 10 * cpu_khz) {
            if (!fsm->check_once_more) {
                EC_ERR("SII: Write timeout.\n");
                fsm->state = ec_fsm_sii_error;
                return;
            }
            fsm->check_once_more = 0;
        }

        // issue check/fetch datagram again
        ec_master_queue_datagram(fsm->slave->master, datagram);
        return;
    }

    if (EC_READ_U8(datagram->data + 1) & 0x40) {
        EC_ERR("SII: Write operation failed!\n");
        fsm->state = ec_fsm_sii_error;
        return;
    }

    // success
    fsm->state = ec_fsm_sii_end;
}

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

void ec_fsm_sii_error(ec_fsm_sii_t *fsm )
{
}

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

void ec_fsm_sii_end(ec_fsm_sii_t *fsm )
{
}

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

---