bte_error.c

Go to the documentation of this file.

/*
 * This file is subject to the terms and conditions of the GNU General Public
 * License.  See the file "COPYING" in the main directory of this archive
 * for more details.
 *
 * Copyright (c) 2000-2007 Silicon Graphics, Inc.  All Rights Reserved.
 */

#include <linux/types.h>
#include <asm/sn/sn_sal.h>
#include "ioerror.h"
#include <asm/sn/addrs.h>
#include <asm/sn/shubio.h>
#include <asm/sn/geo.h>
#include "xtalk/xwidgetdev.h"
#include "xtalk/hubdev.h"
#include <asm/sn/bte.h>
#include <asm/param.h>

/*
 * Bte error handling is done in two parts.  The first captures
 * any crb related errors.  Since there can be multiple crbs per
 * interface and multiple interfaces active, we need to wait until
 * all active crbs are completed.  This is the first job of the
 * second part error handler.  When all bte related CRBs are cleanly
 * completed, it resets the interfaces and gets them ready for new
 * transfers to be queued.
 */

void bte_error_handler(unsigned long);

/*
 * Wait until all BTE related CRBs are completed
 * and then reset the interfaces.
 */
int shub1_bte_error_handler(unsigned long _nodepda)
{
    struct nodepda_s *err_nodepda = (struct nodepda_s *)_nodepda;
    struct timer_list *recovery_timer = &err_nodepda->bte_recovery_timer;
    nasid_t nasid;
    int i;
    int valid_crbs;
    ii_imem_u_t imem;   /* II IMEM Register */
    ii_icrb0_d_u_t icrbd;   /* II CRB Register D */
    ii_ibcr_u_t ibcr;
    ii_icmr_u_t icmr;
    ii_ieclr_u_t ieclr;

    BTE_PRINTK(("shub1_bte_error_handler(%p) - %d\n", err_nodepda,
            smp_processor_id()));

    if ((err_nodepda->bte_if[0].bh_error == BTE_SUCCESS) &&
        (err_nodepda->bte_if[1].bh_error == BTE_SUCCESS)) {
        BTE_PRINTK(("eh:%p:%d Nothing to do.\n", err_nodepda,
                smp_processor_id()));
        return 1;
    }

    /* Determine information about our hub */
    nasid = cnodeid_to_nasid(err_nodepda->bte_if[0].bte_cnode);

    /*
     * A BTE transfer can use multiple CRBs.  We need to make sure
     * that all the BTE CRBs are complete (or timed out) before
     * attempting to clean up the error.  Resetting the BTE while
     * there are still BTE CRBs active will hang the BTE.
     * We should look at all the CRBs to see if they are allocated
     * to the BTE and see if they are still active.  When none
     * are active, we can continue with the cleanup.
     *
     * We also want to make sure that the local NI port is up.
     * When a router resets the NI port can go down, while it
     * goes through the LLP handshake, but then comes back up.
     */
    icmr.ii_icmr_regval = REMOTE_HUB_L(nasid, IIO_ICMR);
    if (icmr.ii_icmr_fld_s.i_crb_mark != 0) {
        /*
         * There are errors which still need to be cleaned up by
         * hubiio_crb_error_handler
         */
        mod_timer(recovery_timer, jiffies + (HZ * 5));
        BTE_PRINTK(("eh:%p:%d Marked Giving up\n", err_nodepda,
                smp_processor_id()));
        return 1;
    }
    if (icmr.ii_icmr_fld_s.i_crb_vld != 0) {

        valid_crbs = icmr.ii_icmr_fld_s.i_crb_vld;

        for (i = 0; i < IIO_NUM_CRBS; i++) {
            if (!((1 << i) & valid_crbs)) {
                /* This crb was not marked as valid, ignore */
                continue;
            }
            icrbd.ii_icrb0_d_regval =
                REMOTE_HUB_L(nasid, IIO_ICRB_D(i));
            if (icrbd.d_bteop) {
                mod_timer(recovery_timer, jiffies + (HZ * 5));
                BTE_PRINTK(("eh:%p:%d Valid %d, Giving up\n",
                        err_nodepda, smp_processor_id(),
                        i));
                return 1;
            }
        }
    }

    BTE_PRINTK(("eh:%p:%d Cleaning up\n", err_nodepda, smp_processor_id()));
    /* Re-enable both bte interfaces */
    imem.ii_imem_regval = REMOTE_HUB_L(nasid, IIO_IMEM);
    imem.ii_imem_fld_s.i_b0_esd = imem.ii_imem_fld_s.i_b1_esd = 1;
    REMOTE_HUB_S(nasid, IIO_IMEM, imem.ii_imem_regval);

    /* Clear BTE0/1 error bits */
    ieclr.ii_ieclr_regval = 0;
    if (err_nodepda->bte_if[0].bh_error != BTE_SUCCESS)
        ieclr.ii_ieclr_fld_s.i_e_bte_0 = 1;
    if (err_nodepda->bte_if[1].bh_error != BTE_SUCCESS)
        ieclr.ii_ieclr_fld_s.i_e_bte_1 = 1;
    REMOTE_HUB_S(nasid, IIO_IECLR, ieclr.ii_ieclr_regval);

    /* Reinitialize both BTE state machines. */
    ibcr.ii_ibcr_regval = REMOTE_HUB_L(nasid, IIO_IBCR);
    ibcr.ii_ibcr_fld_s.i_soft_reset = 1;
    REMOTE_HUB_S(nasid, IIO_IBCR, ibcr.ii_ibcr_regval);

    del_timer(recovery_timer);
    return 0;
}

/*
 * Wait until all BTE related CRBs are completed
 * and then reset the interfaces.
 */
int shub2_bte_error_handler(unsigned long _nodepda)
{
    struct nodepda_s *err_nodepda = (struct nodepda_s *)_nodepda;
    struct timer_list *recovery_timer = &err_nodepda->bte_recovery_timer;
    struct bteinfo_s *bte;
    nasid_t nasid;
    u64 status;
    int i;

    nasid = cnodeid_to_nasid(err_nodepda->bte_if[0].bte_cnode);

    /*
     * Verify that all the BTEs are complete
     */
    for (i = 0; i < BTES_PER_NODE; i++) {
        bte = &err_nodepda->bte_if[i];
        status = BTE_LNSTAT_LOAD(bte);
        if (status & IBLS_ERROR) {
            bte->bh_error = BTE_SHUB2_ERROR(status);
            continue;
        }
        if (!(status & IBLS_BUSY))
            continue;
        mod_timer(recovery_timer, jiffies + (HZ * 5));
        BTE_PRINTK(("eh:%p:%d Marked Giving up\n", err_nodepda,
                smp_processor_id()));
        return 1;
    }
    if (ia64_sn_bte_recovery(nasid))
        panic("bte_error_handler(): Fatal BTE Error");

    del_timer(recovery_timer);
    return 0;
}

/*
 * Wait until all BTE related CRBs are completed
 * and then reset the interfaces.
 */
void bte_error_handler(unsigned long _nodepda)
{
    struct nodepda_s *err_nodepda = (struct nodepda_s *)_nodepda;
    spinlock_t *recovery_lock = &err_nodepda->bte_recovery_lock;
    int i;
    unsigned long irq_flags;
    volatile u64 *notify;
    bte_result_t bh_error;

    BTE_PRINTK(("bte_error_handler(%p) - %d\n", err_nodepda,
            smp_processor_id()));

    spin_lock_irqsave(recovery_lock, irq_flags);

    /*
     * Lock all interfaces on this node to prevent new transfers
     * from being queued.
     */
    for (i = 0; i < BTES_PER_NODE; i++) {
        if (err_nodepda->bte_if[i].cleanup_active) {
            continue;
        }
        spin_lock(&err_nodepda->bte_if[i].spinlock);
        BTE_PRINTK(("eh:%p:%d locked %d\n", err_nodepda,
                smp_processor_id(), i));
        err_nodepda->bte_if[i].cleanup_active = 1;
    }

    if (is_shub1()) {
        if (shub1_bte_error_handler(_nodepda)) {
            spin_unlock_irqrestore(recovery_lock, irq_flags);
            return;
        }
    } else {
        if (shub2_bte_error_handler(_nodepda)) {
            spin_unlock_irqrestore(recovery_lock, irq_flags);
            return;
        }
    }

    for (i = 0; i < BTES_PER_NODE; i++) {
        bh_error = err_nodepda->bte_if[i].bh_error;
        if (bh_error != BTE_SUCCESS) {
            /* There is an error which needs to be notified */
            notify = err_nodepda->bte_if[i].most_rcnt_na;
            BTE_PRINTK(("cnode %d bte %d error=0x%lx\n",
                    err_nodepda->bte_if[i].bte_cnode,
                    err_nodepda->bte_if[i].bte_num,
                    IBLS_ERROR | (u64) bh_error));
            *notify = IBLS_ERROR | bh_error;
            err_nodepda->bte_if[i].bh_error = BTE_SUCCESS;
        }

        err_nodepda->bte_if[i].cleanup_active = 0;
        BTE_PRINTK(("eh:%p:%d Unlocked %d\n", err_nodepda,
                smp_processor_id(), i));
        spin_unlock(&err_nodepda->bte_if[i].spinlock);
    }

    spin_unlock_irqrestore(recovery_lock, irq_flags);
}

/*
 * First part error handler.  This is called whenever any error CRB interrupt
 * is generated by the II.
 */
void
bte_crb_error_handler(cnodeid_t cnode, int btenum,
                      int crbnum, ioerror_t * ioe, int bteop)
{
    struct bteinfo_s *bte;


    bte = &(NODEPDA(cnode)->bte_if[btenum]);

    /*
     * The caller has already figured out the error type, we save that
     * in the bte handle structure for the thread exercising the
     * interface to consume.
     */
    bte->bh_error = ioe->ie_errortype + BTEFAIL_OFFSET;
    bte->bte_error_count++;

    BTE_PRINTK(("Got an error on cnode %d bte %d: HW error type 0x%x\n",
        bte->bte_cnode, bte->bte_num, ioe->ie_errortype));
    bte_error_handler((unsigned long) NODEPDA(cnode));
}