Subversion Repositories test_project

/* drivers/atm/suni.c - PMC PM5346 SUNI (PHY) driver */

/* Written 1995-2000 by Werner Almesberger, EPFL LRC/ICA */

#include <linux/module.h>

#include <linux/jiffies.h>

#include <linux/kernel.h>

#include <linux/mm.h>

#include <linux/errno.h>

#include <linux/atmdev.h>

#include <linux/sonet.h>

#include <linux/delay.h>

#include <linux/timer.h>

#include <linux/init.h>

#include <linux/capability.h>

#include <linux/atm_suni.h>

#include <asm/system.h>

#include <asm/param.h>

#include <asm/uaccess.h>

#include <asm/atomic.h>

#include "suni.h"

#if 0

#define DPRINTK(format,args...) printk(KERN_DEBUG format,##args)

#else

#define DPRINTK(format,args...)

#endif

struct suni_priv {

        struct k_sonet_stats sonet_stats; /* link diagnostics */

        int loop_mode;                  /* loopback mode */

        struct atm_dev *dev;            /* device back-pointer */

        struct suni_priv *next;         /* next SUNI */

};

#define PRIV(dev) ((struct suni_priv *) dev->phy_data)

#define PUT(val,reg) dev->ops->phy_put(dev,val,SUNI_##reg)

#define GET(reg) dev->ops->phy_get(dev,SUNI_##reg)

#define REG_CHANGE(mask,shift,value,reg) \

  PUT((GET(reg) & ~(mask)) | ((value) << (shift)),reg)

static struct timer_list poll_timer;

static struct suni_priv *sunis = NULL;

static DEFINE_SPINLOCK(sunis_lock);

#define ADD_LIMITED(s,v) \

    atomic_add((v),&stats->s); \

    if (atomic_read(&stats->s) < 0) atomic_set(&stats->s,INT_MAX);

static void suni_hz(unsigned long from_timer)

{

        struct suni_priv *walk;

        struct atm_dev *dev;

        struct k_sonet_stats *stats;

        for (walk = sunis; walk; walk = walk->next) {

                dev = walk->dev;

                stats = &walk->sonet_stats;

                PUT(0,MRI); /* latch counters */

                udelay(1);

                ADD_LIMITED(section_bip,(GET(RSOP_SBL) & 0xff) |

                    ((GET(RSOP_SBM) & 0xff) << 8));

                ADD_LIMITED(line_bip,(GET(RLOP_LBL) & 0xff) |

                    ((GET(RLOP_LB) & 0xff) << 8) |

                    ((GET(RLOP_LBM) & 0xf) << 16));

                ADD_LIMITED(path_bip,(GET(RPOP_PBL) & 0xff) |

                    ((GET(RPOP_PBM) & 0xff) << 8));

                ADD_LIMITED(line_febe,(GET(RLOP_LFL) & 0xff) |

                    ((GET(RLOP_LF) & 0xff) << 8) |

                    ((GET(RLOP_LFM) & 0xf) << 16));

                ADD_LIMITED(path_febe,(GET(RPOP_PFL) & 0xff) |

                    ((GET(RPOP_PFM) & 0xff) << 8));

                ADD_LIMITED(corr_hcs,GET(RACP_CHEC) & 0xff);

                ADD_LIMITED(uncorr_hcs,GET(RACP_UHEC) & 0xff);

                ADD_LIMITED(rx_cells,(GET(RACP_RCCL) & 0xff) |

                    ((GET(RACP_RCC) & 0xff) << 8) |

                    ((GET(RACP_RCCM) & 7) << 16));

                ADD_LIMITED(tx_cells,(GET(TACP_TCCL) & 0xff) |

                    ((GET(TACP_TCC) & 0xff) << 8) |

                    ((GET(TACP_TCCM) & 7) << 16));

        }

        if (from_timer) mod_timer(&poll_timer,jiffies+HZ);

}

#undef ADD_LIMITED

static int fetch_stats(struct atm_dev *dev,struct sonet_stats __user *arg,int zero)

{

        struct sonet_stats tmp;

        int error = 0;

        sonet_copy_stats(&PRIV(dev)->sonet_stats,&tmp);

        if (arg) error = copy_to_user(arg,&tmp,sizeof(tmp));

        if (zero && !error) sonet_subtract_stats(&PRIV(dev)->sonet_stats,&tmp);

        return error ? -EFAULT : 0;

}

#define HANDLE_FLAG(flag,reg,bit) \

  if (todo & flag) { \

    if (set) PUT(GET(reg) | bit,reg); \

    else PUT(GET(reg) & ~bit,reg); \

    todo &= ~flag; \

  }

static int change_diag(struct atm_dev *dev,void __user *arg,int set)

{

        int todo;

        if (get_user(todo,(int __user *)arg)) return -EFAULT;

        HANDLE_FLAG(SONET_INS_SBIP,TSOP_DIAG,SUNI_TSOP_DIAG_DBIP8);

        HANDLE_FLAG(SONET_INS_LBIP,TLOP_DIAG,SUNI_TLOP_DIAG_DBIP);

        HANDLE_FLAG(SONET_INS_PBIP,TPOP_CD,SUNI_TPOP_DIAG_DB3);

        HANDLE_FLAG(SONET_INS_FRAME,RSOP_CIE,SUNI_RSOP_CIE_FOOF);

        HANDLE_FLAG(SONET_INS_LAIS,TSOP_CTRL,SUNI_TSOP_CTRL_LAIS);

        HANDLE_FLAG(SONET_INS_PAIS,TPOP_CD,SUNI_TPOP_DIAG_PAIS);

        HANDLE_FLAG(SONET_INS_LOS,TSOP_DIAG,SUNI_TSOP_DIAG_DLOS);

        HANDLE_FLAG(SONET_INS_HCS,TACP_CS,SUNI_TACP_CS_DHCS);

        return put_user(todo,(int __user *)arg) ? -EFAULT : 0;

}

#undef HANDLE_FLAG

static int get_diag(struct atm_dev *dev,void __user *arg)

{

        int set;

        set = 0;

        if (GET(TSOP_DIAG) & SUNI_TSOP_DIAG_DBIP8) set |= SONET_INS_SBIP;

        if (GET(TLOP_DIAG) & SUNI_TLOP_DIAG_DBIP) set |= SONET_INS_LBIP;

        if (GET(TPOP_CD) & SUNI_TPOP_DIAG_DB3) set |= SONET_INS_PBIP;

        /* SONET_INS_FRAME is one-shot only */

        if (GET(TSOP_CTRL) & SUNI_TSOP_CTRL_LAIS) set |= SONET_INS_LAIS;

        if (GET(TPOP_CD) & SUNI_TPOP_DIAG_PAIS) set |= SONET_INS_PAIS;

        if (GET(TSOP_DIAG) & SUNI_TSOP_DIAG_DLOS) set |= SONET_INS_LOS;

        if (GET(TACP_CS) & SUNI_TACP_CS_DHCS) set |= SONET_INS_HCS;

        return put_user(set,(int __user *)arg) ? -EFAULT : 0;

}

static int set_loopback(struct atm_dev *dev,int mode)

{

        unsigned char control;

        control = GET(MCT) & ~(SUNI_MCT_DLE | SUNI_MCT_LLE);

        switch (mode) {

                case ATM_LM_NONE:

                        break;

                case ATM_LM_LOC_PHY:

                        control |= SUNI_MCT_DLE;

                        break;

                case ATM_LM_RMT_PHY:

                        control |= SUNI_MCT_LLE;

                        break;

                default:

                        return -EINVAL;

        }

        PUT(control,MCT);

        PRIV(dev)->loop_mode = mode;

        return 0;

}

static int suni_ioctl(struct atm_dev *dev,unsigned int cmd,void __user *arg)

{

        switch (cmd) {

                case SONET_GETSTATZ:

                case SONET_GETSTAT:

                        return fetch_stats(dev, arg, cmd == SONET_GETSTATZ);

                case SONET_SETDIAG:

                        return change_diag(dev,arg,1);

                case SONET_CLRDIAG:

                        return change_diag(dev,arg,0);

                case SONET_GETDIAG:

                        return get_diag(dev,arg);

                case SONET_SETFRAMING:

                        if ((int)(unsigned long)arg != SONET_FRAME_SONET) return -EINVAL;

                        return 0;

                case SONET_GETFRAMING:

                        return put_user(SONET_FRAME_SONET,(int __user *)arg) ?

                            -EFAULT : 0;

                case SONET_GETFRSENSE:

                        return -EINVAL;

                case ATM_SETLOOP:

                        return set_loopback(dev,(int)(unsigned long)arg);

                case ATM_GETLOOP:

                        return put_user(PRIV(dev)->loop_mode,(int __user *)arg) ?

                            -EFAULT : 0;

                case ATM_QUERYLOOP:

                        return put_user(ATM_LM_LOC_PHY | ATM_LM_RMT_PHY,

                            (int __user *) arg) ? -EFAULT : 0;

                default:

                        return -ENOIOCTLCMD;

        }

}

static void poll_los(struct atm_dev *dev)

{

        dev->signal = GET(RSOP_SIS) & SUNI_RSOP_SIS_LOSV ? ATM_PHY_SIG_LOST :

          ATM_PHY_SIG_FOUND;

}

static void suni_int(struct atm_dev *dev)

{

        poll_los(dev);

        printk(KERN_NOTICE "%s(itf %d): signal %s\n",dev->type,dev->number,

            dev->signal == ATM_PHY_SIG_LOST ?  "lost" : "detected again");

}

static int suni_start(struct atm_dev *dev)

{

        unsigned long flags;

        int first;

        if (!(dev->phy_data = kmalloc(sizeof(struct suni_priv),GFP_KERNEL)))

                return -ENOMEM;

        PRIV(dev)->dev = dev;

        spin_lock_irqsave(&sunis_lock,flags);

        first = !sunis;

        PRIV(dev)->next = sunis;

        sunis = PRIV(dev);

        spin_unlock_irqrestore(&sunis_lock,flags);

        memset(&PRIV(dev)->sonet_stats,0,sizeof(struct k_sonet_stats));

        PUT(GET(RSOP_CIE) | SUNI_RSOP_CIE_LOSE,RSOP_CIE);

                /* interrupt on loss of signal */

        poll_los(dev); /* ... and clear SUNI interrupts */

        if (dev->signal == ATM_PHY_SIG_LOST)

                printk(KERN_WARNING "%s(itf %d): no signal\n",dev->type,

                    dev->number);

        PRIV(dev)->loop_mode = ATM_LM_NONE;

        suni_hz(0); /* clear SUNI counters */

        (void) fetch_stats(dev,NULL,1); /* clear kernel counters */

        if (first) {

                init_timer(&poll_timer);

                poll_timer.expires = jiffies+HZ;

                poll_timer.function = suni_hz;

                poll_timer.data = 1;

#if 0

printk(KERN_DEBUG "[u] p=0x%lx,n=0x%lx\n",(unsigned long) poll_timer.list.prev,

    (unsigned long) poll_timer.list.next);

#endif

                add_timer(&poll_timer);

        }

        return 0;

}

static int suni_stop(struct atm_dev *dev)

{

        struct suni_priv **walk;

        unsigned long flags;

        /* let SAR driver worry about stopping interrupts */

        spin_lock_irqsave(&sunis_lock,flags);

        for (walk = &sunis; *walk != PRIV(dev);

            walk = &PRIV((*walk)->dev)->next);

        *walk = PRIV((*walk)->dev)->next;

        if (!sunis) del_timer_sync(&poll_timer);

        spin_unlock_irqrestore(&sunis_lock,flags);

        kfree(PRIV(dev));

        return 0;

}

static const struct atmphy_ops suni_ops = {

        .start          = suni_start,

        .ioctl          = suni_ioctl,

        .interrupt      = suni_int,

        .stop           = suni_stop,

};

int suni_init(struct atm_dev *dev)

{

        unsigned char mri;

        mri = GET(MRI); /* reset SUNI */

        PUT(mri | SUNI_MRI_RESET,MRI);

        PUT(mri,MRI);

        PUT((GET(MT) & SUNI_MT_DS27_53),MT); /* disable all tests */

        REG_CHANGE(SUNI_TPOP_APM_S,SUNI_TPOP_APM_S_SHIFT,SUNI_TPOP_S_SONET,

            TPOP_APM); /* use SONET */

        REG_CHANGE(SUNI_TACP_IUCHP_CLP,0,SUNI_TACP_IUCHP_CLP,

            TACP_IUCHP); /* idle cells */

        PUT(SUNI_IDLE_PATTERN,TACP_IUCPOP);

        dev->phy = &suni_ops;

        return 0;

}

EXPORT_SYMBOL(suni_init);

MODULE_LICENSE("GPL");