| /* |
| * $Id: pmcc4_drv.c,v 3.1 2007/08/15 23:32:17 rickd PMCC4_3_1B $ |
| */ |
| |
| |
| /*----------------------------------------------------------------------------- |
| * pmcc4_drv.c - |
| * |
| * Copyright (C) 2007 One Stop Systems, Inc. |
| * Copyright (C) 2002-2006 SBE, Inc. |
| * |
| * This program 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. |
| * |
| * This program 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. |
| * |
| * For further information, contact via email: support@onestopsystems.com |
| * One Stop Systems, Inc. Escondido, California U.S.A. |
| *----------------------------------------------------------------------------- |
| * RCS info: |
| * RCS revision: $Revision: 3.1 $ |
| * Last changed on $Date: 2007/08/15 23:32:17 $ |
| * Changed by $Author: rickd $ |
| *----------------------------------------------------------------------------- |
| * $Log: pmcc4_drv.c,v $ |
| * Revision 3.1 2007/08/15 23:32:17 rickd |
| * Use 'if 0' instead of GNU comment delimeter to avoid line wrap induced compiler errors. |
| * |
| * Revision 3.0 2007/08/15 22:19:55 rickd |
| * Correct sizeof() castings and pi->regram to support 64bit compatibility. |
| * |
| * Revision 2.10 2006/04/21 00:56:40 rickd |
| * workqueue files now prefixed with <sbecom> prefix. |
| * |
| * Revision 2.9 2005/11/01 19:22:49 rickd |
| * Add sanity checks against max_port for ioctl functions. |
| * |
| * Revision 2.8 2005/10/27 18:59:25 rickd |
| * Code cleanup. Default channel config to HDLC_FCS16. |
| * |
| * Revision 2.7 2005/10/18 18:16:30 rickd |
| * Further NCOMM code repairs - (1) interrupt matrix usage inconsistant |
| * for indexing into nciInterrupt[][], code missing double parameters. |
| * (2) check input of ncomm interrupt registration cardID for correct |
| * boundary values. |
| * |
| * Revision 2.6 2005/10/17 23:55:28 rickd |
| * Initial port of NCOMM support patches from original work found |
| * in pmc_c4t1e1 as updated by NCOMM. Ref: CONFIG_SBE_PMCC4_NCOMM. |
| * Corrected NCOMMs wanpmcC4T1E1_getBaseAddress() to correctly handle |
| * multiple boards. |
| * |
| * Revision 2.5 2005/10/13 23:01:28 rickd |
| * Correct panic for illegal address reference w/in get_brdinfo on |
| * first_if/last_if name acquistion under Linux 2.6 |
| * |
| * Revision 2.4 2005/10/13 21:20:19 rickd |
| * Correction of c4_cleanup() wherein next should be acquired before |
| * ci_t structure is free'd. |
| * |
| * Revision 2.3 2005/10/13 19:20:10 rickd |
| * Correct driver removal cleanup code for multiple boards. |
| * |
| * Revision 2.2 2005/10/11 18:34:04 rickd |
| * New routine added to determine number of ports (comets) on board. |
| * |
| * Revision 2.1 2005/10/05 00:48:13 rickd |
| * Add some RX activation trace code. |
| * |
| * Revision 2.0 2005/09/28 00:10:06 rickd |
| * Implement 2.6 workqueue for TX/RX restart. Correction to |
| * hardware register boundary checks allows expanded access of MUSYCC. |
| * Implement new musycc reg&bits namings. |
| * |
| *----------------------------------------------------------------------------- |
| */ |
| |
| char OSSIid_pmcc4_drvc[] = |
| "@(#)pmcc4_drv.c - $Revision: 3.1 $ (c) Copyright 2002-2007 One Stop Systems, Inc."; |
| |
| #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt |
| |
| #if defined (__FreeBSD__) || defined (__NetBSD__) |
| #include <sys/param.h> |
| #include <sys/systm.h> |
| #include <sys/errno.h> |
| #else |
| #include <linux/types.h> |
| #include "pmcc4_sysdep.h" |
| #include <linux/errno.h> |
| #include <linux/kernel.h> |
| #include <linux/sched.h> /* include for timer */ |
| #include <linux/timer.h> /* include for timer */ |
| #include <linux/hdlc.h> |
| #include <asm/io.h> |
| #endif |
| |
| #include "sbecom_inline_linux.h" |
| #include "libsbew.h" |
| #include "pmcc4_private.h" |
| #include "pmcc4.h" |
| #include "pmcc4_ioctls.h" |
| #include "musycc.h" |
| #include "comet.h" |
| #include "sbe_bid.h" |
| |
| #ifdef SBE_INCLUDE_SYMBOLS |
| #define STATIC |
| #else |
| #define STATIC static |
| #endif |
| |
| |
| #define KERN_WARN KERN_WARNING |
| |
| /* forward references */ |
| #if LINUX_VERSION_CODE > KERNEL_VERSION(2,5,41) |
| status_t c4_wk_chan_init (mpi_t *, mch_t *); |
| void c4_wq_port_cleanup (mpi_t *); |
| status_t c4_wq_port_init (mpi_t *); |
| |
| #endif |
| int c4_loop_port (ci_t *, int, u_int8_t); |
| status_t c4_set_port (ci_t *, int); |
| status_t musycc_chan_down (ci_t *, int); |
| |
| u_int32_t musycc_chan_proto (int); |
| status_t musycc_dump_ring (ci_t *, unsigned int); |
| status_t __init musycc_init (ci_t *); |
| void musycc_init_mdt (mpi_t *); |
| void musycc_serv_req (mpi_t *, u_int32_t); |
| void musycc_update_timeslots (mpi_t *); |
| |
| extern void musycc_update_tx_thp (mch_t *); |
| extern int log_level; |
| extern int max_mru; |
| extern int max_mtu; |
| extern int max_rxdesc_used, max_rxdesc_default; |
| extern int max_txdesc_used, max_txdesc_default; |
| |
| #if defined (__powerpc__) |
| extern void *memset (void *s, int c, size_t n); |
| |
| #endif |
| |
| int drvr_state = SBE_DRVR_INIT; |
| ci_t *c4_list = 0; |
| ci_t *CI; /* dummy pointer to board ZEROE's data - |
| * DEBUG USAGE */ |
| |
| |
| void |
| sbecom_set_loglevel (int d) |
| { |
| /* |
| * The code within the following -if- clause is a backdoor debug facility |
| * which can be used to display the state of a board's channel. |
| */ |
| if (d > LOG_DEBUG) |
| { |
| unsigned int channum = d - (LOG_DEBUG + 1); /* convert to ZERO |
| * relativity */ |
| |
| (void) musycc_dump_ring ((ci_t *) CI, channum); /* CI implies support |
| * for card 0 only */ |
| } else |
| { |
| if (log_level != d) |
| { |
| pr_info("log level changed from %d to %d\n", log_level, d); |
| log_level = d; /* set new */ |
| } else |
| pr_info("log level is %d\n", log_level); |
| } |
| } |
| |
| |
| mch_t * |
| c4_find_chan (int channum) |
| { |
| ci_t *ci; |
| mch_t *ch; |
| int portnum, gchan; |
| |
| for (ci = c4_list; ci; ci = ci->next) |
| for (portnum = 0; portnum < ci->max_port; portnum++) |
| for (gchan = 0; gchan < MUSYCC_NCHANS; gchan++) |
| { |
| if ((ch = ci->port[portnum].chan[gchan])) |
| { |
| if ((ch->state != UNASSIGNED) && |
| (ch->channum == channum)) |
| return (ch); |
| } |
| } |
| return 0; |
| } |
| |
| |
| ci_t *__init |
| c4_new (void *hi) |
| { |
| ci_t *ci; |
| |
| #ifdef SBE_MAP_DEBUG |
| pr_warning("c4_new() entered, ci needs %u.\n", |
| (unsigned int) sizeof (ci_t)); |
| #endif |
| |
| ci = (ci_t *) OS_kmalloc (sizeof (ci_t)); |
| if (ci) |
| { |
| ci->hdw_info = hi; |
| ci->state = C_INIT; /* mark as hardware not available */ |
| ci->next = c4_list; |
| c4_list = ci; |
| ci->brdno = ci->next ? ci->next->brdno + 1 : 0; |
| } else |
| pr_warning("failed CI malloc, size %u.\n", |
| (unsigned int) sizeof (ci_t)); |
| |
| if (CI == 0) |
| CI = ci; /* DEBUG, only board 0 usage */ |
| return ci; |
| } |
| |
| |
| /*** |
| * Check port state and set LED states using watchdog or ioctl... |
| * also check for in-band SF loopback commands (& cause results if they are there) |
| * |
| * Alarm function depends on comet bits indicating change in |
| * link status (linkMask) to keep the link status indication straight. |
| * |
| * Indications are only LED and system log -- except when ioctl is invoked. |
| * |
| * "alarmed" record (a.k.a. copyVal, in some cases below) decodes as: |
| * |
| * RMAI (E1 only) 0x100 |
| * alarm LED on 0x80 |
| * link LED on 0x40 |
| * link returned 0x20 (link was down, now it's back and 'port get' hasn't run) |
| * change in LED 0x10 (update LED register because value has changed) |
| * link is down 0x08 |
| * YelAlm(RAI) 0x04 |
| * RedAlm 0x02 |
| * AIS(blue)Alm 0x01 |
| * |
| * note "link has returned" indication is reset on read |
| * (e.g. by use of the c4_control port get command) |
| */ |
| |
| #define sbeLinkMask 0x41 /* change in signal status (lost/recovered) + |
| * state */ |
| #define sbeLinkChange 0x40 |
| #define sbeLinkDown 0x01 |
| #define sbeAlarmsMask 0x07 /* red / yellow / blue alarm conditions */ |
| #define sbeE1AlarmsMask 0x107 /* alarm conditions */ |
| |
| #define COMET_LBCMD_READ 0x80 /* read only (do not set, return read value) */ |
| |
| void |
| checkPorts (ci_t * ci) |
| { |
| #ifndef CONFIG_SBE_PMCC4_NCOMM |
| /* |
| * PORT POINT - NCOMM needs to avoid this code since the polling of |
| * alarms conflicts with NCOMM's interrupt servicing implementation. |
| */ |
| |
| comet_t *comet; |
| volatile u_int32_t value; |
| u_int32_t copyVal, LEDval; |
| |
| u_int8_t portnum; |
| |
| LEDval = 0; |
| for (portnum = 0; portnum < ci->max_port; portnum++) |
| { |
| copyVal = 0x12f & (ci->alarmed[portnum]); /* port's alarm record */ |
| comet = ci->port[portnum].cometbase; |
| value = pci_read_32 ((u_int32_t *) &comet->cdrc_ists) & sbeLinkMask; /* link loss reg */ |
| |
| if (value & sbeLinkChange) /* is there a change in the link stuff */ |
| { |
| /* if there's been a change (above) and yet it's the same (below) */ |
| if (!(((copyVal >> 3) & sbeLinkDown) ^ (value & sbeLinkDown))) |
| { |
| if (value & sbeLinkDown) |
| pr_warning("%s: Port %d momentarily recovered.\n", |
| ci->devname, portnum); |
| else |
| pr_warning("%s: Warning: Port %d link was briefly down.\n", |
| ci->devname, portnum); |
| } else if (value & sbeLinkDown) |
| pr_warning("%s: Warning: Port %d link is down.\n", |
| ci->devname, portnum); |
| else |
| { |
| pr_warning("%s: Port %d link has recovered.\n", |
| ci->devname, portnum); |
| copyVal |= 0x20; /* record link transition to up */ |
| } |
| copyVal |= 0x10; /* change (link) --> update LEDs */ |
| } |
| copyVal &= 0x137; /* clear LED & link old history bits & |
| * save others */ |
| if (value & sbeLinkDown) |
| copyVal |= 0x08; /* record link status (now) */ |
| else |
| { /* if link is up, do this */ |
| copyVal |= 0x40; /* LED indicate link is up */ |
| /* Alarm things & the like ... first if E1, then if T1 */ |
| if (IS_FRAME_ANY_E1 (ci->port[portnum].p.port_mode)) |
| { |
| /* |
| * first check Codeword (SaX) changes & CRC and |
| * sub-multi-frame errors |
| */ |
| /* |
| * note these errors are printed every time they are detected |
| * vs. alarms |
| */ |
| value = pci_read_32 ((u_int32_t *) &comet->e1_frmr_nat_ists); /* codeword */ |
| if (value & 0x1f) |
| { /* if errors (crc or smf only) */ |
| if (value & 0x10) |
| pr_warning("%s: E1 Port %d Codeword Sa4 change detected.\n", |
| ci->devname, portnum); |
| if (value & 0x08) |
| pr_warning("%s: E1 Port %d Codeword Sa5 change detected.\n", |
| ci->devname, portnum); |
| if (value & 0x04) |
| pr_warning("%s: E1 Port %d Codeword Sa6 change detected.\n", |
| ci->devname, portnum); |
| if (value & 0x02) |
| pr_warning("%s: E1 Port %d Codeword Sa7 change detected.\n", |
| ci->devname, portnum); |
| if (value & 0x01) |
| pr_warning("%s: E1 Port %d Codeword Sa8 change detected.\n", |
| ci->devname, portnum); |
| } |
| value = pci_read_32 ((u_int32_t *) &comet->e1_frmr_mists); /* crc & smf */ |
| if (value & 0x3) |
| { /* if errors (crc or smf only) */ |
| if (value & sbeE1CRC) |
| pr_warning("%s: E1 Port %d CRC-4 error(s) detected.\n", |
| ci->devname, portnum); |
| if (value & sbeE1errSMF) /* error in sub-multiframe */ |
| pr_warning("%s: E1 Port %d received errored SMF.\n", |
| ci->devname, portnum); |
| } |
| value = pci_read_32 ((u_int32_t *) &comet->e1_frmr_masts) & 0xcc; /* alarms */ |
| /* |
| * pack alarms together (bitmiser), and construct similar to |
| * T1 |
| */ |
| /* RAI,RMAI,.,.,LOF,AIS,.,. ==> RMAI,.,.,.,.,.,RAI,LOF,AIS */ |
| /* see 0x97 */ |
| value = (value >> 2); |
| if (value & 0x30) |
| { |
| if (value & 0x20) |
| value |= 0x40; /* RAI */ |
| if (value & 0x10) |
| value |= 0x100; /* RMAI */ |
| value &= ~0x30; |
| } /* finished packing alarm in handy order */ |
| if (value != (copyVal & sbeE1AlarmsMask)) |
| { /* if alarms changed */ |
| copyVal |= 0x10;/* change LED status */ |
| if ((copyVal & sbeRedAlm) && !(value & sbeRedAlm)) |
| { |
| copyVal &= ~sbeRedAlm; |
| pr_warning("%s: E1 Port %d LOF alarm ended.\n", |
| ci->devname, portnum); |
| } else if (!(copyVal & sbeRedAlm) && (value & sbeRedAlm)) |
| { |
| copyVal |= sbeRedAlm; |
| pr_warning("%s: E1 Warning: Port %d LOF alarm.\n", |
| ci->devname, portnum); |
| } else if ((copyVal & sbeYelAlm) && !(value & sbeYelAlm)) |
| { |
| copyVal &= ~sbeYelAlm; |
| pr_warning("%s: E1 Port %d RAI alarm ended.\n", |
| ci->devname, portnum); |
| } else if (!(copyVal & sbeYelAlm) && (value & sbeYelAlm)) |
| { |
| copyVal |= sbeYelAlm; |
| pr_warning("%s: E1 Warning: Port %d RAI alarm.\n", |
| ci->devname, portnum); |
| } else if ((copyVal & sbeE1RMAI) && !(value & sbeE1RMAI)) |
| { |
| copyVal &= ~sbeE1RMAI; |
| pr_warning("%s: E1 Port %d RMAI alarm ended.\n", |
| ci->devname, portnum); |
| } else if (!(copyVal & sbeE1RMAI) && (value & sbeE1RMAI)) |
| { |
| copyVal |= sbeE1RMAI; |
| pr_warning("%s: E1 Warning: Port %d RMAI alarm.\n", |
| ci->devname, portnum); |
| } else if ((copyVal & sbeAISAlm) && !(value & sbeAISAlm)) |
| { |
| copyVal &= ~sbeAISAlm; |
| pr_warning("%s: E1 Port %d AIS alarm ended.\n", |
| ci->devname, portnum); |
| } else if (!(copyVal & sbeAISAlm) && (value & sbeAISAlm)) |
| { |
| copyVal |= sbeAISAlm; |
| pr_warning("%s: E1 Warning: Port %d AIS alarm.\n", |
| ci->devname, portnum); |
| } |
| } |
| /* end of E1 alarm code */ |
| } else |
| { /* if a T1 mode */ |
| value = pci_read_32 ((u_int32_t *) &comet->t1_almi_ists); /* alarms */ |
| value &= sbeAlarmsMask; |
| if (value != (copyVal & sbeAlarmsMask)) |
| { /* if alarms changed */ |
| copyVal |= 0x10;/* change LED status */ |
| if ((copyVal & sbeRedAlm) && !(value & sbeRedAlm)) |
| { |
| copyVal &= ~sbeRedAlm; |
| pr_warning("%s: Port %d red alarm ended.\n", |
| ci->devname, portnum); |
| } else if (!(copyVal & sbeRedAlm) && (value & sbeRedAlm)) |
| { |
| copyVal |= sbeRedAlm; |
| pr_warning("%s: Warning: Port %d red alarm.\n", |
| ci->devname, portnum); |
| } else if ((copyVal & sbeYelAlm) && !(value & sbeYelAlm)) |
| { |
| copyVal &= ~sbeYelAlm; |
| pr_warning("%s: Port %d yellow (RAI) alarm ended.\n", |
| ci->devname, portnum); |
| } else if (!(copyVal & sbeYelAlm) && (value & sbeYelAlm)) |
| { |
| copyVal |= sbeYelAlm; |
| pr_warning("%s: Warning: Port %d yellow (RAI) alarm.\n", |
| ci->devname, portnum); |
| } else if ((copyVal & sbeAISAlm) && !(value & sbeAISAlm)) |
| { |
| copyVal &= ~sbeAISAlm; |
| pr_warning("%s: Port %d blue (AIS) alarm ended.\n", |
| ci->devname, portnum); |
| } else if (!(copyVal & sbeAISAlm) && (value & sbeAISAlm)) |
| { |
| copyVal |= sbeAISAlm; |
| pr_warning("%s: Warning: Port %d blue (AIS) alarm.\n", |
| ci->devname, portnum); |
| } |
| } |
| } /* end T1 mode alarm checks */ |
| } |
| if (copyVal & sbeAlarmsMask) |
| copyVal |= 0x80; /* if alarm turn yel LED on */ |
| if (copyVal & 0x10) |
| LEDval |= 0x100; /* tag if LED values have changed */ |
| LEDval |= ((copyVal & 0xc0) >> (6 - (portnum * 2))); |
| |
| ci->alarmed[portnum] &= 0xfffff000; /* out with the old (it's fff |
| * ... foo) */ |
| ci->alarmed[portnum] |= (copyVal); /* in with the new */ |
| |
| /* |
| * enough with the alarms and LED's, now let's check for loopback |
| * requests |
| */ |
| |
| if (IS_FRAME_ANY_T1 (ci->port[portnum].p.port_mode)) |
| { /* if a T1 mode */ |
| /* |
| * begin in-band (SF) loopback code detection -- start by reading |
| * command |
| */ |
| value = pci_read_32 ((u_int32_t *) &comet->ibcd_ies); /* detect reg. */ |
| value &= 0x3; /* trim to handy bits */ |
| if (value & 0x2) |
| { /* activate loopback (sets for deactivate |
| * code length) */ |
| copyVal = c4_loop_port (ci, portnum, COMET_LBCMD_READ); /* read line loopback |
| * mode */ |
| if (copyVal != COMET_MDIAG_LINELB) /* don't do it again if |
| * already in that mode */ |
| c4_loop_port (ci, portnum, COMET_MDIAG_LINELB); /* put port in line |
| * loopback mode */ |
| } |
| if (value & 0x1) |
| { /* deactivate loopback (sets for activate |
| * code length) */ |
| copyVal = c4_loop_port (ci, portnum, COMET_LBCMD_READ); /* read line loopback |
| * mode */ |
| if (copyVal != COMET_MDIAG_LBOFF) /* don't do it again if |
| * already in that mode */ |
| c4_loop_port (ci, portnum, COMET_MDIAG_LBOFF); /* take port out of any |
| * loopback mode */ |
| } |
| } |
| if (IS_FRAME_ANY_T1ESF (ci->port[portnum].p.port_mode)) |
| { /* if a T1 ESF mode */ |
| /* begin ESF loopback code */ |
| value = pci_read_32 ((u_int32_t *) &comet->t1_rboc_sts) & 0x3f; /* read command */ |
| if (value == 0x07) |
| c4_loop_port (ci, portnum, COMET_MDIAG_LINELB); /* put port in line |
| * loopback mode */ |
| if (value == 0x0a) |
| c4_loop_port (ci, portnum, COMET_MDIAG_PAYLB); /* put port in payload |
| * loopbk mode */ |
| if ((value == 0x1c) || (value == 0x19) || (value == 0x12)) |
| c4_loop_port (ci, portnum, COMET_MDIAG_LBOFF); /* take port out of any |
| * loopbk mode */ |
| if (log_level >= LOG_DEBUG) |
| if (value != 0x3f) |
| pr_warning("%s: BOC value = %x on Port %d\n", |
| ci->devname, value, portnum); |
| /* end ESF loopback code */ |
| } |
| } |
| |
| /* if something is new, update LED's */ |
| if (LEDval & 0x100) |
| pci_write_32 ((u_int32_t *) &ci->cpldbase->leds, LEDval & 0xff); |
| #endif /*** CONFIG_SBE_PMCC4_NCOMM ***/ |
| } |
| |
| |
| STATIC void |
| c4_watchdog (ci_t * ci) |
| { |
| #if 0 |
| //unsigned long flags; |
| #endif |
| |
| if (drvr_state != SBE_DRVR_AVAILABLE) |
| { |
| if (log_level >= LOG_MONITOR) |
| pr_info("drvr not available (%x)\n", drvr_state); |
| return; |
| } |
| #if 0 |
| SD_SEM_TAKE (&ci->sem_wdbusy, "_wd_"); /* only 1 thru here, per |
| * board */ |
| #endif |
| |
| ci->wdcount++; |
| checkPorts (ci); |
| #if LINUX_VERSION_CODE <= KERNEL_VERSION(2,5,41) |
| if (ci->wd_notify) |
| { /* is there a state change to search for */ |
| int port, gchan; |
| |
| ci->wd_notify = 0; /* reset notification */ |
| for (gchan = 0; gchan < MUSYCC_NCHANS; gchan++) |
| { |
| for (port = 0; port < ci->max_port; port++) |
| { |
| mch_t *ch = ci->port[port].chan[gchan]; |
| |
| if (!ch || ci->state != C_RUNNING) /* state changed while |
| * acquiring semaphore */ |
| break; |
| if (ch->state == UP)/* channel must be set up */ |
| { |
| #if 0 |
| #ifdef RLD_TRANS_DEBUG |
| if (1 || log_level >= LOG_MONITOR) |
| #else |
| if (log_level >= LOG_MONITOR) |
| #endif |
| pr_info("%s: watchdog reviving Port %d Channel %d [%d] sts %x/%x, start_TX %x free %x start_RX %x\n", |
| ci->devname, ch->channum, port, gchan, ch->channum, |
| ch->p.status, ch->status, |
| ch->ch_start_tx, ch->txd_free, ch->ch_start_rx); |
| #endif |
| |
| /**********************************/ |
| /** check for RX restart request **/ |
| /**********************************/ |
| |
| if (ch->ch_start_rx && |
| (ch->status & RX_ENABLED)) /* requires start on |
| * enabled RX */ |
| { |
| ch->ch_start_rx = 0; /* we are restarting RX... */ |
| #ifdef RLD_TRANS_DEBUG |
| pr_info("++ c4_watchdog() CHAN RX ACTIVATE: chan %d\n", |
| ch->channum); |
| #endif |
| #ifdef RLD_RXACT_DEBUG |
| { |
| struct mdesc *md; |
| static int hereb4 = 7; |
| |
| if (hereb4) |
| { |
| hereb4--; |
| md = &ch->mdr[ch->rxix_irq_srv]; |
| pr_info("++ c4_watchdog[%d] CHAN RX ACTIVATE: rxix_irq_srv %d, md %p sts %x, rxpkt %lu\n", |
| ch->channum, ch->rxix_irq_srv, md, le32_to_cpu (md->status), ch->s.rx_packets); |
| musycc_dump_rxbuffer_ring (ch, 1); /* RLD DEBUG */ |
| } |
| } |
| #endif |
| musycc_serv_req (ch->up, SR_CHANNEL_ACTIVATE | SR_RX_DIRECTION | gchan); |
| } |
| /**********************************/ |
| /** check for TX restart request **/ |
| /**********************************/ |
| |
| if (ch->ch_start_tx && |
| (ch->status & TX_ENABLED)) /* requires start on |
| * enabled TX */ |
| { |
| struct mdesc *md; |
| |
| /* |
| * find next unprocessed message, then set TX thp to |
| * it |
| */ |
| musycc_update_tx_thp (ch); |
| |
| #if 0 |
| spin_lock_irqsave (&ch->ch_txlock, flags); |
| #endif |
| md = ch->txd_irq_srv; |
| if (!md) |
| { |
| pr_info("-- c4_watchdog[%d]: WARNING, starting NULL md\n", |
| ch->channum); |
| pr_info("-- chan %d txd_irq_srv %p sts %x usr_add %p sts %x, txpkt %lu\n", |
| ch->channum, ch->txd_irq_srv, le32_to_cpu ((struct mdesc *) (ch->txd_irq_srv)->status), |
| ch->txd_usr_add, le32_to_cpu ((struct mdesc *) (ch->txd_usr_add)->status), |
| ch->s.tx_packets); |
| #if 0 |
| spin_unlock_irqrestore (&ch->ch_txlock, flags); |
| #endif |
| } else if (md->data && ((le32_to_cpu (md->status)) & MUSYCC_TX_OWNED)) |
| { |
| #ifdef RLD_TRANS_DEBUG |
| pr_info("++ c4_watchdog[%d] CHAN TX ACTIVATE: start_tx %x\n", |
| ch->channum, ch->ch_start_tx); |
| #endif |
| ch->ch_start_tx = 0; /* we are restarting |
| * TX... */ |
| #if 0 |
| spin_unlock_irqrestore (&ch->ch_txlock, flags); /* allow interrupts for |
| * service request */ |
| #endif |
| musycc_serv_req (ch->up, SR_CHANNEL_ACTIVATE | SR_TX_DIRECTION | gchan); |
| #ifdef RLD_TRANS_DEBUG |
| if (1 || log_level >= LOG_MONITOR) |
| #else |
| if (log_level >= LOG_MONITOR) |
| #endif |
| pr_info("++ SACK[P%d/C%d] ack'd, continuing...\n", |
| ch->up->portnum, ch->channum); |
| } |
| } |
| } |
| } |
| } |
| } |
| #else |
| ci->wd_notify = 0; |
| #endif |
| #if 0 |
| SD_SEM_GIVE (&ci->sem_wdbusy);/* release per-board hold */ |
| #endif |
| } |
| |
| |
| void |
| c4_cleanup (void) |
| { |
| ci_t *ci, *next; |
| mpi_t *pi; |
| int portnum, j; |
| |
| ci = c4_list; |
| while (ci) |
| { |
| next = ci->next; /* protect <next> from upcoming <free> */ |
| pci_write_32 ((u_int32_t *) &ci->cpldbase->leds, PMCC4_CPLD_LED_OFF); |
| for (portnum = 0; portnum < ci->max_port; portnum++) |
| { |
| pi = &ci->port[portnum]; |
| #if LINUX_VERSION_CODE > KERNEL_VERSION(2,5,41) |
| c4_wq_port_cleanup (pi); |
| #endif |
| for (j = 0; j < MUSYCC_NCHANS; j++) |
| { |
| if (pi->chan[j]) |
| OS_kfree (pi->chan[j]); /* free mch_t struct */ |
| } |
| OS_kfree (pi->regram_saved); |
| } |
| #if 0 |
| /* obsolete - watchdog is now static w/in ci_t */ |
| OS_free_watchdog (ci->wd); |
| #endif |
| OS_kfree (ci->iqd_p_saved); |
| OS_kfree (ci); |
| ci = next; /* cleanup next board, if any */ |
| } |
| } |
| |
| |
| /* |
| * This function issues a write to all comet chips and expects the same data |
| * to be returned from the subsequent read. This determines the board build |
| * to be a 1-port, 2-port, or 4-port build. The value returned represents a |
| * bit-mask of the found ports. Only certain configurations are considered |
| * VALID or LEGAL builds. |
| */ |
| |
| int |
| c4_get_portcfg (ci_t * ci) |
| { |
| comet_t *comet; |
| int portnum, mask; |
| u_int32_t wdata, rdata; |
| |
| wdata = COMET_MDIAG_LBOFF; /* take port out of any loopback mode */ |
| |
| mask = 0; |
| for (portnum = 0; portnum < MUSYCC_NPORTS; portnum++) |
| { |
| comet = ci->port[portnum].cometbase; |
| pci_write_32 ((u_int32_t *) &comet->mdiag, wdata); |
| rdata = pci_read_32 ((u_int32_t *) &comet->mdiag) & COMET_MDIAG_LBMASK; |
| if (wdata == rdata) |
| mask |= 1 << portnum; |
| } |
| return mask; |
| } |
| |
| |
| /* nothing herein should generate interrupts */ |
| |
| status_t __init |
| c4_init (ci_t * ci, u_char *func0, u_char *func1) |
| { |
| mpi_t *pi; |
| mch_t *ch; |
| static u_int32_t count = 0; |
| int portnum, j; |
| |
| ci->state = C_INIT; |
| ci->brdno = count++; |
| ci->intlog.this_status_new = 0; |
| atomic_set (&ci->bh_pending, 0); |
| |
| ci->reg = (struct musycc_globalr *) func0; |
| ci->eeprombase = (u_int32_t *) (func1 + EEPROM_OFFSET); |
| ci->cpldbase = (c4cpld_t *) ((u_int32_t *) (func1 + ISPLD_OFFSET)); |
| |
| /*** PORT POINT - the following is the first access of any type to the hardware ***/ |
| #ifdef CONFIG_SBE_PMCC4_NCOMM |
| /* NCOMM driver uses INTB interrupt to monitor CPLD register */ |
| pci_write_32 ((u_int32_t *) &ci->reg->glcd, GCD_MAGIC); |
| #else |
| /* standard driver POLLS for INTB via CPLD register */ |
| pci_write_32 ((u_int32_t *) &ci->reg->glcd, GCD_MAGIC | MUSYCC_GCD_INTB_DISABLE); |
| #endif |
| |
| { |
| int pmsk; |
| |
| /* need comet addresses available for determination of hardware build */ |
| for (portnum = 0; portnum < MUSYCC_NPORTS; portnum++) |
| { |
| pi = &ci->port[portnum]; |
| pi->cometbase = (comet_t *) ((u_int32_t *) (func1 + COMET_OFFSET (portnum))); |
| pi->reg = (struct musycc_globalr *) ((u_char *) ci->reg + (portnum * 0x800)); |
| pi->portnum = portnum; |
| pi->p.portnum = portnum; |
| pi->openchans = 0; |
| #ifdef SBE_MAP_DEBUG |
| pr_info("Comet-%d: addr = %p\n", portnum, pi->cometbase); |
| #endif |
| } |
| pmsk = c4_get_portcfg (ci); |
| switch (pmsk) |
| { |
| case 0x1: |
| ci->max_port = 1; |
| break; |
| case 0x3: |
| ci->max_port = 2; |
| break; |
| #if 0 |
| case 0x7: /* not built, but could be... */ |
| ci->max_port = 3; |
| break; |
| #endif |
| case 0xf: |
| ci->max_port = 4; |
| break; |
| default: |
| ci->max_port = 0; |
| pr_warning("%s: illegal port configuration (%x)\n", |
| ci->devname, pmsk); |
| return SBE_DRVR_FAIL; |
| } |
| #ifdef SBE_MAP_DEBUG |
| pr_info(">> %s: c4_get_build - pmsk %x max_port %x\n", |
| ci->devname, pmsk, ci->max_port); |
| #endif |
| } |
| |
| for (portnum = 0; portnum < ci->max_port; portnum++) |
| { |
| pi = &ci->port[portnum]; |
| pi->up = ci; |
| pi->sr_last = 0xffffffff; |
| pi->p.port_mode = CFG_FRAME_SF; /* T1 B8ZS, the default */ |
| pi->p.portP = (CFG_CLK_PORT_EXTERNAL | CFG_LBO_LH0); /* T1 defaults */ |
| |
| OS_sem_init (&pi->sr_sem_busy, SEM_AVAILABLE); |
| OS_sem_init (&pi->sr_sem_wait, SEM_TAKEN); |
| |
| for (j = 0; j < 32; j++) |
| { |
| pi->fifomap[j] = -1; |
| pi->tsm[j] = 0; /* no assignments, all available */ |
| } |
| |
| /* allocate channel structures for this port */ |
| for (j = 0; j < MUSYCC_NCHANS; j++) |
| { |
| ch = OS_kmalloc (sizeof (mch_t)); |
| if (ch) |
| { |
| pi->chan[j] = ch; |
| ch->state = UNASSIGNED; |
| ch->up = pi; |
| ch->gchan = (-1); /* channel assignment not yet known */ |
| ch->channum = (-1); /* channel assignment not yet known */ |
| ch->p.card = ci->brdno; |
| ch->p.port = portnum; |
| ch->p.channum = (-1); /* channel assignment not yet known */ |
| ch->p.mode_56k = 0; /* default is 64kbps mode */ |
| } else |
| { |
| pr_warning("failed mch_t malloc, port %d channel %d size %u.\n", |
| portnum, j, (unsigned int) sizeof (mch_t)); |
| break; |
| } |
| } |
| } |
| |
| |
| { |
| /* |
| * Set LEDs through their paces to supply visual proof that LEDs are |
| * functional and not burnt out nor broken. |
| * |
| * YELLOW + GREEN -> OFF. |
| */ |
| |
| pci_write_32 ((u_int32_t *) &ci->cpldbase->leds, |
| PMCC4_CPLD_LED_GREEN | PMCC4_CPLD_LED_YELLOW); |
| OS_uwait (750000, "leds"); |
| pci_write_32 ((u_int32_t *) &ci->cpldbase->leds, PMCC4_CPLD_LED_OFF); |
| } |
| |
| OS_init_watchdog (&ci->wd, (void (*) (void *)) c4_watchdog, ci, WATCHDOG_TIMEOUT); |
| return SBE_DRVR_SUCCESS; |
| } |
| |
| |
| /* better be fully setup to handle interrupts when you call this */ |
| |
| status_t __init |
| c4_init2 (ci_t * ci) |
| { |
| status_t ret; |
| |
| /* PORT POINT: this routine generates first interrupt */ |
| if ((ret = musycc_init (ci)) != SBE_DRVR_SUCCESS) |
| return ret; |
| |
| #if 0 |
| ci->p.framing_type = FRAMING_CBP; |
| ci->p.h110enable = 1; |
| #if 0 |
| ci->p.hypersize = 0; |
| #else |
| hyperdummy = 0; |
| #endif |
| ci->p.clock = 0; /* Use internal clocking until set to |
| * external */ |
| c4_card_set_params (ci, &ci->p); |
| #endif |
| OS_start_watchdog (&ci->wd); |
| return SBE_DRVR_SUCCESS; |
| } |
| |
| |
| /* This function sets the loopback mode (or clears it, as the case may be). */ |
| |
| int |
| c4_loop_port (ci_t * ci, int portnum, u_int8_t cmd) |
| { |
| comet_t *comet; |
| volatile u_int32_t loopValue; |
| |
| comet = ci->port[portnum].cometbase; |
| loopValue = pci_read_32 ((u_int32_t *) &comet->mdiag) & COMET_MDIAG_LBMASK; |
| |
| if (cmd & COMET_LBCMD_READ) |
| return loopValue; /* return the read value */ |
| |
| if (loopValue != cmd) |
| { |
| switch (cmd) |
| { |
| case COMET_MDIAG_LINELB: |
| /* set(SF)loopback down (turn off) code length to 6 bits */ |
| pci_write_32 ((u_int32_t *) &comet->ibcd_cfg, 0x05); |
| break; |
| case COMET_MDIAG_LBOFF: |
| /* set (SF) loopback up (turn on) code length to 5 bits */ |
| pci_write_32 ((u_int32_t *) &comet->ibcd_cfg, 0x00); |
| break; |
| } |
| |
| pci_write_32 ((u_int32_t *) &comet->mdiag, cmd); |
| if (log_level >= LOG_WARN) |
| pr_info("%s: loopback mode changed to %2x from %2x on Port %d\n", |
| ci->devname, cmd, loopValue, portnum); |
| loopValue = pci_read_32 ((u_int32_t *) &comet->mdiag) & COMET_MDIAG_LBMASK; |
| if (loopValue != cmd) |
| { |
| if (log_level >= LOG_ERROR) |
| pr_info("%s: write to loop register failed, unknown state for Port %d\n", |
| ci->devname, portnum); |
| } |
| } else |
| { |
| if (log_level >= LOG_WARN) |
| pr_info("%s: loopback already in that mode (%2x)\n", |
| ci->devname, loopValue); |
| } |
| return 0; |
| } |
| |
| |
| /* c4_frame_rw: read or write the comet register specified |
| * (modifies use of port_param to non-standard use of struct) |
| * Specifically: |
| * pp.portnum (one guess) |
| * pp.port_mode offset of register |
| * pp.portP write (or not, i.e. read) |
| * pp.portStatus write value |
| * BTW: |
| * pp.portStatus also used to return read value |
| * pp.portP also used during write, to return old reg value |
| */ |
| |
| status_t |
| c4_frame_rw (ci_t * ci, struct sbecom_port_param * pp) |
| { |
| comet_t *comet; |
| volatile u_int32_t data; |
| |
| if (pp->portnum >= ci->max_port)/* sanity check */ |
| return ENXIO; |
| |
| comet = ci->port[pp->portnum].cometbase; |
| data = pci_read_32 ((u_int32_t *) comet + pp->port_mode) & 0xff; |
| |
| if (pp->portP) |
| { /* control says this is a register |
| * _write_ */ |
| if (pp->portStatus == data) |
| pr_info("%s: Port %d already that value! Writing again anyhow.\n", |
| ci->devname, pp->portnum); |
| pp->portP = (u_int8_t) data; |
| pci_write_32 ((u_int32_t *) comet + pp->port_mode, |
| pp->portStatus); |
| data = pci_read_32 ((u_int32_t *) comet + pp->port_mode) & 0xff; |
| } |
| pp->portStatus = (u_int8_t) data; |
| return 0; |
| } |
| |
| |
| /* c4_pld_rw: read or write the pld register specified |
| * (modifies use of port_param to non-standard use of struct) |
| * Specifically: |
| * pp.port_mode offset of register |
| * pp.portP write (or not, i.e. read) |
| * pp.portStatus write value |
| * BTW: |
| * pp.portStatus also used to return read value |
| * pp.portP also used during write, to return old reg value |
| */ |
| |
| status_t |
| c4_pld_rw (ci_t * ci, struct sbecom_port_param * pp) |
| { |
| volatile u_int32_t *regaddr; |
| volatile u_int32_t data; |
| int regnum = pp->port_mode; |
| |
| regaddr = (u_int32_t *) ci->cpldbase + regnum; |
| data = pci_read_32 ((u_int32_t *) regaddr) & 0xff; |
| |
| if (pp->portP) |
| { /* control says this is a register |
| * _write_ */ |
| pp->portP = (u_int8_t) data; |
| pci_write_32 ((u_int32_t *) regaddr, pp->portStatus); |
| data = pci_read_32 ((u_int32_t *) regaddr) & 0xff; |
| } |
| pp->portStatus = (u_int8_t) data; |
| return 0; |
| } |
| |
| /* c4_musycc_rw: read or write the musycc register specified |
| * (modifies use of port_param to non-standard use of struct) |
| * Specifically: |
| * mcp.RWportnum port number and write indication bit (0x80) |
| * mcp.offset offset of register |
| * mcp.value write value going in and read value returning |
| */ |
| |
| /* PORT POINT: TX Subchannel Map registers are write-only |
| * areas within the MUSYCC and always return FF */ |
| /* PORT POINT: regram and reg structures are minorly different and <offset> ioctl |
| * settings are aligned with the <reg> struct musycc_globalr{} usage. |
| * Also, regram is separately allocated shared memory, allocated for each port. |
| * PORT POINT: access offsets of 0x6000 for Msg Cfg Desc Tbl are for 4-port MUSYCC |
| * only. (An 8-port MUSYCC has 0x16000 offsets for accessing its upper 4 tables.) |
| */ |
| |
| status_t |
| c4_musycc_rw (ci_t * ci, struct c4_musycc_param * mcp) |
| { |
| mpi_t *pi; |
| volatile u_int32_t *dph; /* hardware implemented register */ |
| u_int32_t *dpr = 0; /* RAM image of registers for group command |
| * usage */ |
| int offset = mcp->offset % 0x800; /* group relative address |
| * offset, mcp->portnum is |
| * not used */ |
| int portnum, ramread = 0; |
| volatile u_int32_t data; |
| |
| /* |
| * Sanity check hardware accessibility. The 0x6000 portion handles port |
| * numbers associated with Msg Descr Tbl decoding. |
| */ |
| portnum = (mcp->offset % 0x6000) / 0x800; |
| if (portnum >= ci->max_port) |
| return ENXIO; |
| pi = &ci->port[portnum]; |
| if (mcp->offset >= 0x6000) |
| offset += 0x6000; /* put back in MsgCfgDesc address offset */ |
| dph = (u_int32_t *) ((u_long) pi->reg + offset); |
| |
| /* read of TX are from RAM image, since hardware returns FF */ |
| dpr = (u_int32_t *) ((u_long) pi->regram + offset); |
| if (mcp->offset < 0x6000) /* non MsgDesc Tbl accesses might require |
| * RAM access */ |
| { |
| if (offset >= 0x200 && offset < 0x380) |
| ramread = 1; |
| if (offset >= 0x10 && offset < 0x200) |
| ramread = 1; |
| } |
| /* read register from RAM or hardware, depending... */ |
| if (ramread) |
| { |
| data = *dpr; |
| //pr_info("c4_musycc_rw: RAM addr %p read data %x (portno %x offset %x RAM ramread %x)\n", dpr, data, portnum, offset, ramread); /* RLD DEBUG */ |
| } else |
| { |
| data = pci_read_32 ((u_int32_t *) dph); |
| //pr_info("c4_musycc_rw: REG addr %p read data %x (portno %x offset %x RAM ramread %x)\n", dph, data, portnum, offset, ramread); /* RLD DEBUG */ |
| } |
| |
| |
| if (mcp->RWportnum & 0x80) |
| { /* control says this is a register |
| * _write_ */ |
| if (mcp->value == data) |
| pr_info("%s: musycc grp%d already that value! writing again anyhow.\n", |
| ci->devname, (mcp->RWportnum & 0x7)); |
| /* write register RAM */ |
| if (ramread) |
| *dpr = mcp->value; |
| /* write hardware register */ |
| pci_write_32 ((u_int32_t *) dph, mcp->value); |
| } |
| mcp->value = data; /* return the read value (or the 'old |
| * value', if is write) */ |
| return 0; |
| } |
| |
| status_t |
| c4_get_port (ci_t * ci, int portnum) |
| { |
| if (portnum >= ci->max_port) /* sanity check */ |
| return ENXIO; |
| |
| SD_SEM_TAKE (&ci->sem_wdbusy, "_wd_"); /* only 1 thru here, per |
| * board */ |
| checkPorts (ci); |
| ci->port[portnum].p.portStatus = (u_int8_t) ci->alarmed[portnum]; |
| ci->alarmed[portnum] &= 0xdf; |
| SD_SEM_GIVE (&ci->sem_wdbusy); /* release per-board hold */ |
| return 0; |
| } |
| |
| status_t |
| c4_set_port (ci_t * ci, int portnum) |
| { |
| mpi_t *pi; |
| struct sbecom_port_param *pp; |
| int e1mode; |
| u_int8_t clck; |
| int i; |
| |
| if (portnum >= ci->max_port) /* sanity check */ |
| return ENXIO; |
| |
| pi = &ci->port[portnum]; |
| pp = &ci->port[portnum].p; |
| e1mode = IS_FRAME_ANY_E1 (pp->port_mode); |
| if (log_level >= LOG_MONITOR2) |
| { |
| pr_info("%s: c4_set_port[%d]: entered, e1mode = %x, openchans %d.\n", |
| ci->devname, |
| portnum, e1mode, pi->openchans); |
| } |
| if (pi->openchans) |
| return EBUSY; /* group needs initialization only for |
| * first channel of a group */ |
| |
| #if LINUX_VERSION_CODE > KERNEL_VERSION(2,5,41) |
| { |
| status_t ret; |
| |
| if ((ret = c4_wq_port_init (pi))) /* create/init |
| * workqueue_struct */ |
| return (ret); |
| } |
| #endif |
| |
| init_comet (ci, pi->cometbase, pp->port_mode, 1 /* clockmaster == true */ , pp->portP); |
| clck = pci_read_32 ((u_int32_t *) &ci->cpldbase->mclk) & PMCC4_CPLD_MCLK_MASK; |
| if (e1mode) |
| clck |= 1 << portnum; |
| else |
| clck &= 0xf ^ (1 << portnum); |
| |
| pci_write_32 ((u_int32_t *) &ci->cpldbase->mclk, clck); |
| pci_write_32 ((u_int32_t *) &ci->cpldbase->mcsr, PMCC4_CPLD_MCSR_IND); |
| pci_write_32 ((u_int32_t *) &pi->reg->gbp, OS_vtophys (pi->regram)); |
| |
| /*********************************************************************/ |
| /* ERRATA: If transparent mode is used, do not set OOFMP_DISABLE bit */ |
| /*********************************************************************/ |
| |
| pi->regram->grcd = |
| __constant_cpu_to_le32 (MUSYCC_GRCD_RX_ENABLE | |
| MUSYCC_GRCD_TX_ENABLE | |
| MUSYCC_GRCD_OOFMP_DISABLE | |
| MUSYCC_GRCD_SF_ALIGN | /* per MUSYCC ERRATA, |
| * for T1 * fix */ |
| MUSYCC_GRCD_COFAIRQ_DISABLE | |
| MUSYCC_GRCD_MC_ENABLE | |
| (MUSYCC_GRCD_POLLTH_32 << MUSYCC_GRCD_POLLTH_SHIFT)); |
| |
| pi->regram->pcd = |
| __constant_cpu_to_le32 ((e1mode ? 1 : 0) | |
| MUSYCC_PCD_TXSYNC_RISING | |
| MUSYCC_PCD_RXSYNC_RISING | |
| MUSYCC_PCD_RXDATA_RISING); |
| |
| /* Message length descriptor */ |
| pi->regram->mld = __constant_cpu_to_le32 (max_mru | (max_mru << 16)); |
| |
| /* tsm algorithm */ |
| for (i = 0; i < 32; i++) |
| { |
| |
| /*** ASSIGNMENT NOTES: ***/ |
| /*** Group's channel ZERO unavailable if E1. ***/ |
| /*** Group's channel 16 unavailable if E1 CAS. ***/ |
| /*** Group's channels 24-31 unavailable if T1. ***/ |
| |
| if (((i == 0) && e1mode) || |
| ((i == 16) && ((pp->port_mode == CFG_FRAME_E1CRC_CAS) || (pp->port_mode == CFG_FRAME_E1CRC_CAS_AMI))) |
| || ((i > 23) && (!e1mode))) |
| { |
| pi->tsm[i] = 0xff; /* make tslot unavailable for this mode */ |
| } else |
| { |
| pi->tsm[i] = 0x00; /* make tslot available for assignment */ |
| } |
| } |
| for (i = 0; i < MUSYCC_NCHANS; i++) |
| { |
| pi->regram->ttsm[i] = 0; |
| pi->regram->rtsm[i] = 0; |
| } |
| FLUSH_MEM_WRITE (); |
| musycc_serv_req (pi, SR_GROUP_INIT | SR_RX_DIRECTION); |
| musycc_serv_req (pi, SR_GROUP_INIT | SR_TX_DIRECTION); |
| |
| musycc_init_mdt (pi); |
| |
| pi->group_is_set = 1; |
| pi->p = *pp; |
| return 0; |
| } |
| |
| |
| unsigned int max_int = 0; |
| |
| status_t |
| c4_new_chan (ci_t * ci, int portnum, int channum, void *user) |
| { |
| mpi_t *pi; |
| mch_t *ch; |
| int gchan; |
| |
| if (c4_find_chan (channum)) /* a new channel shouldn't already exist */ |
| return EEXIST; |
| |
| if (portnum >= ci->max_port) /* sanity check */ |
| return ENXIO; |
| |
| pi = &(ci->port[portnum]); |
| /* find any available channel within this port */ |
| for (gchan = 0; gchan < MUSYCC_NCHANS; gchan++) |
| { |
| ch = pi->chan[gchan]; |
| if (ch && ch->state == UNASSIGNED) /* no assignment is good! */ |
| break; |
| } |
| if (gchan == MUSYCC_NCHANS) /* exhausted table, all were assigned */ |
| return ENFILE; |
| |
| ch->up = pi; |
| |
| /* NOTE: mch_t already cleared during OS_kmalloc() */ |
| ch->state = DOWN; |
| ch->user = user; |
| ch->gchan = gchan; |
| ch->channum = channum; /* mark our channel assignment */ |
| ch->p.channum = channum; |
| #if 1 |
| ch->p.card = ci->brdno; |
| ch->p.port = portnum; |
| #endif |
| ch->p.chan_mode = CFG_CH_PROTO_HDLC_FCS16; |
| ch->p.idlecode = CFG_CH_FLAG_7E; |
| ch->p.pad_fill_count = 2; |
| spin_lock_init (&ch->ch_rxlock); |
| spin_lock_init (&ch->ch_txlock); |
| |
| #if LINUX_VERSION_CODE > KERNEL_VERSION(2,5,41) |
| { |
| status_t ret; |
| |
| if ((ret = c4_wk_chan_init (pi, ch))) |
| return ret; |
| } |
| #endif |
| |
| /* save off interface assignments which bound a board */ |
| if (ci->first_if == 0) /* first channel registered is assumed to |
| * be the lowest channel */ |
| { |
| ci->first_if = ci->last_if = user; |
| ci->first_channum = ci->last_channum = channum; |
| } else |
| { |
| ci->last_if = user; |
| if (ci->last_channum < channum) /* higher number channel found */ |
| ci->last_channum = channum; |
| } |
| return 0; |
| } |
| |
| status_t |
| c4_del_chan (int channum) |
| { |
| mch_t *ch; |
| |
| if (!(ch = c4_find_chan (channum))) |
| return ENOENT; |
| if (ch->state == UP) |
| musycc_chan_down ((ci_t *) 0, channum); |
| ch->state = UNASSIGNED; |
| ch->gchan = (-1); |
| ch->channum = (-1); |
| ch->p.channum = (-1); |
| return 0; |
| } |
| |
| status_t |
| c4_del_chan_stats (int channum) |
| { |
| mch_t *ch; |
| |
| if (!(ch = c4_find_chan (channum))) |
| return ENOENT; |
| |
| memset (&ch->s, 0, sizeof (struct sbecom_chan_stats)); |
| return 0; |
| } |
| |
| |
| status_t |
| c4_set_chan (int channum, struct sbecom_chan_param * p) |
| { |
| mch_t *ch; |
| int i, x = 0; |
| |
| if (!(ch = c4_find_chan (channum))) |
| return ENOENT; |
| |
| #if 1 |
| if (ch->p.card != p->card || |
| ch->p.port != p->port || |
| ch->p.channum != p->channum) |
| return EINVAL; |
| #endif |
| |
| if (!(ch->up->group_is_set)) |
| { |
| return EIO; /* out of order, SET_PORT command |
| * required prior to first group's |
| * SET_CHAN command */ |
| } |
| /* |
| * Check for change of parameter settings in order to invoke closing of |
| * channel prior to hardware poking. |
| */ |
| |
| if (ch->p.status != p->status || ch->p.chan_mode != p->chan_mode || |
| ch->p.data_inv != p->data_inv || ch->p.intr_mask != p->intr_mask || |
| ch->txd_free < ch->txd_num) /* to clear out queued messages */ |
| x = 1; /* we have a change requested */ |
| for (i = 0; i < 32; i++) /* check for timeslot mapping changes */ |
| if (ch->p.bitmask[i] != p->bitmask[i]) |
| x = 1; /* we have a change requested */ |
| ch->p = *p; |
| if (x && (ch->state == UP)) /* if change request and channel is |
| * open... */ |
| { |
| status_t ret; |
| |
| if ((ret = musycc_chan_down ((ci_t *) 0, channum))) |
| return ret; |
| if ((ret = c4_chan_up (ch->up->up, channum))) |
| return ret; |
| sd_enable_xmit (ch->user); /* re-enable to catch flow controlled |
| * channel */ |
| } |
| return 0; |
| } |
| |
| |
| status_t |
| c4_get_chan (int channum, struct sbecom_chan_param * p) |
| { |
| mch_t *ch; |
| |
| if (!(ch = c4_find_chan (channum))) |
| return ENOENT; |
| *p = ch->p; |
| return 0; |
| } |
| |
| status_t |
| c4_get_chan_stats (int channum, struct sbecom_chan_stats * p) |
| { |
| mch_t *ch; |
| |
| if (!(ch = c4_find_chan (channum))) |
| return ENOENT; |
| *p = ch->s; |
| p->tx_pending = atomic_read (&ch->tx_pending); |
| return 0; |
| } |
| |
| STATIC int |
| c4_fifo_alloc (mpi_t * pi, int chan, int *len) |
| { |
| int i, l = 0, start = 0, max = 0, maxstart = 0; |
| |
| for (i = 0; i < 32; i++) |
| { |
| if (pi->fifomap[i] != -1) |
| { |
| l = 0; |
| start = i + 1; |
| continue; |
| } |
| ++l; |
| if (l > max) |
| { |
| max = l; |
| maxstart = start; |
| } |
| if (max == *len) |
| break; |
| } |
| if (max != *len) |
| { |
| if (log_level >= LOG_WARN) |
| pr_info("%s: wanted to allocate %d fifo space, but got only %d\n", |
| pi->up->devname, *len, max); |
| *len = max; |
| } |
| if (log_level >= LOG_DEBUG) |
| pr_info("%s: allocated %d fifo at %d for channel %d/%d\n", |
| pi->up->devname, max, start, chan, pi->p.portnum); |
| for (i = maxstart; i < (maxstart + max); i++) |
| pi->fifomap[i] = chan; |
| return start; |
| } |
| |
| void |
| c4_fifo_free (mpi_t * pi, int chan) |
| { |
| int i; |
| |
| if (log_level >= LOG_DEBUG) |
| pr_info("%s: deallocated fifo for channel %d/%d\n", |
| pi->up->devname, chan, pi->p.portnum); |
| for (i = 0; i < 32; i++) |
| if (pi->fifomap[i] == chan) |
| pi->fifomap[i] = -1; |
| } |
| |
| |
| status_t |
| c4_chan_up (ci_t * ci, int channum) |
| { |
| mpi_t *pi; |
| mch_t *ch; |
| struct mbuf *m; |
| struct mdesc *md; |
| int nts, nbuf, txnum, rxnum; |
| int addr, i, j, gchan; |
| u_int32_t tmp; /* for optimizing conversion across BE |
| * platform */ |
| |
| if (!(ch = c4_find_chan (channum))) |
| return ENOENT; |
| if (ch->state == UP) |
| { |
| if (log_level >= LOG_MONITOR) |
| pr_info("%s: channel already UP, graceful early exit\n", |
| ci->devname); |
| return 0; |
| } |
| pi = ch->up; |
| gchan = ch->gchan; |
| /* find nts ('number of timeslots') */ |
| nts = 0; |
| for (i = 0; i < 32; i++) |
| { |
| if (ch->p.bitmask[i] & pi->tsm[i]) |
| { |
| if (1 || log_level >= LOG_WARN) |
| { |
| pr_info("%s: c4_chan_up[%d] EINVAL (attempt to cfg in-use or unavailable TimeSlot[%d])\n", |
| ci->devname, channum, i); |
| pr_info("+ ask4 %x, currently %x\n", |
| ch->p.bitmask[i], pi->tsm[i]); |
| } |
| return EINVAL; |
| } |
| for (j = 0; j < 8; j++) |
| if (ch->p.bitmask[i] & (1 << j)) |
| nts++; |
| } |
| |
| nbuf = nts / 8 ? nts / 8 : 1; |
| if (!nbuf) |
| { |
| /* if( log_level >= LOG_WARN) */ |
| pr_info("%s: c4_chan_up[%d] ENOBUFS (no TimeSlots assigned)\n", |
| ci->devname, channum); |
| return ENOBUFS; /* this should not happen */ |
| } |
| addr = c4_fifo_alloc (pi, gchan, &nbuf); |
| ch->state = UP; |
| |
| /* Setup the Time Slot Map */ |
| musycc_update_timeslots (pi); |
| |
| /* ch->tx_limit = nts; */ |
| ch->s.tx_pending = 0; |
| |
| /* Set Channel Configuration Descriptors */ |
| { |
| u_int32_t ccd; |
| |
| ccd = musycc_chan_proto (ch->p.chan_mode) << MUSYCC_CCD_PROTO_SHIFT; |
| if ((ch->p.chan_mode == CFG_CH_PROTO_ISLP_MODE) || |
| (ch->p.chan_mode == CFG_CH_PROTO_TRANS)) |
| { |
| ccd |= MUSYCC_CCD_FCS_XFER; /* Non FSC Mode */ |
| } |
| ccd |= 2 << MUSYCC_CCD_MAX_LENGTH; /* Select second MTU */ |
| ccd |= ch->p.intr_mask; |
| ccd |= addr << MUSYCC_CCD_BUFFER_LOC; |
| if (ch->p.chan_mode == CFG_CH_PROTO_TRANS) |
| ccd |= (nbuf) << MUSYCC_CCD_BUFFER_LENGTH; |
| else |
| ccd |= (nbuf - 1) << MUSYCC_CCD_BUFFER_LENGTH; |
| |
| if (ch->p.data_inv & CFG_CH_DINV_TX) |
| ccd |= MUSYCC_CCD_INVERT_DATA; /* Invert data */ |
| pi->regram->tcct[gchan] = cpu_to_le32 (ccd); |
| |
| if (ch->p.data_inv & CFG_CH_DINV_RX) |
| ccd |= MUSYCC_CCD_INVERT_DATA; /* Invert data */ |
| else |
| ccd &= ~MUSYCC_CCD_INVERT_DATA; /* take away data inversion */ |
| pi->regram->rcct[gchan] = cpu_to_le32 (ccd); |
| FLUSH_MEM_WRITE (); |
| } |
| |
| /* Reread the Channel Configuration Descriptor for this channel */ |
| musycc_serv_req (pi, SR_CHANNEL_CONFIG | SR_RX_DIRECTION | gchan); |
| musycc_serv_req (pi, SR_CHANNEL_CONFIG | SR_TX_DIRECTION | gchan); |
| |
| /* |
| * Figure out how many buffers we want. If the customer has changed from |
| * the defaults, then use the changed values. Otherwise, use Transparent |
| * mode's specific minimum default settings. |
| */ |
| if (ch->p.chan_mode == CFG_CH_PROTO_TRANS) |
| { |
| if (max_rxdesc_used == max_rxdesc_default) /* use default setting */ |
| max_rxdesc_used = MUSYCC_RXDESC_TRANS; |
| if (max_txdesc_used == max_txdesc_default) /* use default setting */ |
| max_txdesc_used = MUSYCC_TXDESC_TRANS; |
| } |
| /* |
| * Increase counts when hyperchanneling, since this implies an increase |
| * in throughput per channel |
| */ |
| rxnum = max_rxdesc_used + (nts / 4); |
| txnum = max_txdesc_used + (nts / 4); |
| |
| #if 0 |
| /* DEBUG INFO */ |
| if (log_level >= LOG_MONITOR) |
| pr_info("%s: mode %x rxnum %d (rxused %d def %d) txnum %d (txused %d def %d)\n", |
| ci->devname, ch->p.chan_mode, |
| rxnum, max_rxdesc_used, max_rxdesc_default, |
| txnum, max_txdesc_used, max_txdesc_default); |
| #endif |
| |
| ch->rxd_num = rxnum; |
| ch->txd_num = txnum; |
| ch->rxix_irq_srv = 0; |
| |
| ch->mdr = OS_kmalloc (sizeof (struct mdesc) * rxnum); |
| ch->mdt = OS_kmalloc (sizeof (struct mdesc) * txnum); |
| if (ch->p.chan_mode == CFG_CH_PROTO_TRANS) |
| tmp = __constant_cpu_to_le32 (max_mru | EOBIRQ_ENABLE); |
| else |
| tmp = __constant_cpu_to_le32 (max_mru); |
| |
| for (i = 0, md = ch->mdr; i < rxnum; i++, md++) |
| { |
| if (i == (rxnum - 1)) |
| { |
| md->snext = &ch->mdr[0];/* wrapness */ |
| } else |
| { |
| md->snext = &ch->mdr[i + 1]; |
| } |
| md->next = cpu_to_le32 (OS_vtophys (md->snext)); |
| |
| if (!(m = OS_mem_token_alloc (max_mru))) |
| { |
| if (log_level >= LOG_MONITOR) |
| pr_info("%s: c4_chan_up[%d] - token alloc failure, size = %d.\n", |
| ci->devname, channum, max_mru); |
| goto errfree; |
| } |
| md->mem_token = m; |
| md->data = cpu_to_le32 (OS_vtophys (OS_mem_token_data (m))); |
| md->status = tmp | MUSYCC_RX_OWNED; /* MUSYCC owns RX descriptor ** |
| * CODING NOTE: |
| * MUSYCC_RX_OWNED = 0 so no |
| * need to byteSwap */ |
| } |
| |
| for (i = 0, md = ch->mdt; i < txnum; i++, md++) |
| { |
| md->status = HOST_TX_OWNED; /* Host owns TX descriptor ** CODING |
| * NOTE: HOST_TX_OWNED = 0 so no need to |
| * byteSwap */ |
| md->mem_token = 0; |
| md->data = 0; |
| if (i == (txnum - 1)) |
| { |
| md->snext = &ch->mdt[0];/* wrapness */ |
| } else |
| { |
| md->snext = &ch->mdt[i + 1]; |
| } |
| md->next = cpu_to_le32 (OS_vtophys (md->snext)); |
| } |
| ch->txd_irq_srv = ch->txd_usr_add = &ch->mdt[0]; |
| ch->txd_free = txnum; |
| ch->tx_full = 0; |
| ch->txd_required = 0; |
| |
| /* Configure it into the chip */ |
| tmp = cpu_to_le32 (OS_vtophys (&ch->mdt[0])); |
| pi->regram->thp[gchan] = tmp; |
| pi->regram->tmp[gchan] = tmp; |
| |
| tmp = cpu_to_le32 (OS_vtophys (&ch->mdr[0])); |
| pi->regram->rhp[gchan] = tmp; |
| pi->regram->rmp[gchan] = tmp; |
| |
| /* Activate the Channel */ |
| FLUSH_MEM_WRITE (); |
| if (ch->p.status & RX_ENABLED) |
| { |
| #ifdef RLD_TRANS_DEBUG |
| pr_info("++ c4_chan_up() CHAN RX ACTIVATE: chan %d\n", ch->channum); |
| #endif |
| ch->ch_start_rx = 0; /* we are restarting RX... */ |
| musycc_serv_req (pi, SR_CHANNEL_ACTIVATE | SR_RX_DIRECTION | gchan); |
| } |
| if (ch->p.status & TX_ENABLED) |
| { |
| #ifdef RLD_TRANS_DEBUG |
| pr_info("++ c4_chan_up() CHAN TX ACTIVATE: chan %d <delayed>\n", ch->channum); |
| #endif |
| ch->ch_start_tx = CH_START_TX_1ST; /* we are delaying start |
| * until receipt from user of |
| * first packet to transmit. */ |
| } |
| ch->status = ch->p.status; |
| pi->openchans++; |
| return 0; |
| |
| errfree: |
| while (i > 0) |
| { |
| /* Don't leak all the previously allocated mbufs in this loop */ |
| i--; |
| OS_mem_token_free (ch->mdr[i].mem_token); |
| } |
| OS_kfree (ch->mdt); |
| ch->mdt = 0; |
| ch->txd_num = 0; |
| OS_kfree (ch->mdr); |
| ch->mdr = 0; |
| ch->rxd_num = 0; |
| ch->state = DOWN; |
| return ENOBUFS; |
| } |
| |
| /* stop the hardware from servicing & interrupting */ |
| |
| void |
| c4_stopwd (ci_t * ci) |
| { |
| OS_stop_watchdog (&ci->wd); |
| SD_SEM_TAKE (&ci->sem_wdbusy, "_stop_"); /* ensure WD not running */ |
| SD_SEM_GIVE (&ci->sem_wdbusy); |
| } |
| |
| |
| void |
| sbecom_get_brdinfo (ci_t * ci, struct sbe_brd_info * bip, u_int8_t *bsn) |
| { |
| char *np; |
| u_int32_t sn = 0; |
| int i; |
| |
| bip->brdno = ci->brdno; /* our board number */ |
| bip->brd_id = ci->brd_id; |
| bip->brd_hdw_id = ci->hdw_bid; |
| bip->brd_chan_cnt = MUSYCC_NCHANS * ci->max_port; /* number of channels |
| * being used */ |
| bip->brd_port_cnt = ci->max_port; /* number of ports being used */ |
| bip->brd_pci_speed = BINFO_PCI_SPEED_unk; /* PCI speed not yet |
| * determinable */ |
| |
| if (ci->first_if) |
| { |
| #if LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0) |
| np = (char *) hdlc_to_name (ci->first_if); |
| #else |
| { |
| struct net_device *dev; |
| |
| dev = (struct net_device *) ci->first_if; |
| np = (char *) dev->name; |
| } |
| #endif |
| strncpy (bip->first_iname, np, CHNM_STRLEN - 1); |
| } else |
| strcpy (bip->first_iname, "<NULL>"); |
| if (ci->last_if) |
| { |
| #if LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0) |
| np = (char *) hdlc_to_name (ci->last_if); |
| #else |
| { |
| struct net_device *dev; |
| |
| dev = (struct net_device *) ci->last_if; |
| np = (char *) dev->name; |
| } |
| #endif |
| strncpy (bip->last_iname, np, CHNM_STRLEN - 1); |
| } else |
| strcpy (bip->last_iname, "<NULL>"); |
| |
| if (bsn) |
| { |
| for (i = 0; i < 3; i++) |
| { |
| bip->brd_mac_addr[i] = *bsn++; |
| } |
| for (; i < 6; i++) |
| { |
| bip->brd_mac_addr[i] = *bsn; |
| sn = (sn << 8) | *bsn++; |
| } |
| } else |
| { |
| for (i = 0; i < 6; i++) |
| bip->brd_mac_addr[i] = 0; |
| } |
| bip->brd_sn = sn; |
| } |
| |
| |
| status_t |
| c4_get_iidinfo (ci_t * ci, struct sbe_iid_info * iip) |
| { |
| struct net_device *dev; |
| char *np; |
| |
| if (!(dev = getuserbychan (iip->channum))) |
| return ENOENT; |
| |
| #if LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0) |
| np = (char *) hdlc_to_name (dev_to_hdlc (dev)); |
| #else |
| np = dev->name; |
| #endif |
| strncpy (iip->iname, np, CHNM_STRLEN - 1); |
| return 0; |
| } |
| |
| |
| #ifdef CONFIG_SBE_PMCC4_NCOMM |
| void (*nciInterrupt[MAX_BOARDS][4]) (void); |
| extern void wanpmcC4T1E1_hookInterrupt (int cardID, int deviceID, void *handler); |
| |
| void |
| wanpmcC4T1E1_hookInterrupt (int cardID, int deviceID, void *handler) |
| { |
| if (cardID < MAX_BOARDS) /* sanity check */ |
| nciInterrupt[cardID][deviceID] = handler; |
| } |
| |
| irqreturn_t |
| c4_ebus_intr_th_handler (void *devp) |
| { |
| ci_t *ci = (ci_t *) devp; |
| volatile u_int32_t ists; |
| int handled = 0; |
| int brdno; |
| |
| /* which COMET caused the interrupt */ |
| brdno = ci->brdno; |
| ists = pci_read_32 ((u_int32_t *) &ci->cpldbase->intr); |
| if (ists & PMCC4_CPLD_INTR_CMT_1) |
| { |
| handled = 0x1; |
| if (nciInterrupt[brdno][0] != NULL) |
| (*nciInterrupt[brdno][0]) (); |
| } |
| if (ists & PMCC4_CPLD_INTR_CMT_2) |
| { |
| handled |= 0x2; |
| if (nciInterrupt[brdno][1] != NULL) |
| (*nciInterrupt[brdno][1]) (); |
| } |
| if (ists & PMCC4_CPLD_INTR_CMT_3) |
| { |
| handled |= 0x4; |
| if (nciInterrupt[brdno][2] != NULL) |
| (*nciInterrupt[brdno][2]) (); |
| } |
| if (ists & PMCC4_CPLD_INTR_CMT_4) |
| { |
| handled |= 0x8; |
| if (nciInterrupt[brdno][3] != NULL) |
| (*nciInterrupt[brdno][3]) (); |
| } |
| #if 0 |
| /*** Test code just de-implements the asserted interrupt. Alternate |
| vendor will supply COMET interrupt handling code herein or such. |
| ***/ |
| pci_write_32 ((u_int32_t *) &ci->reg->glcd, GCD_MAGIC | MUSYCC_GCD_INTB_DISABLE); |
| #endif |
| |
| #if LINUX_VERSION_CODE <= KERNEL_VERSION(2,4,20) |
| return; |
| #else |
| return IRQ_RETVAL (handled); |
| #endif |
| } |
| |
| |
| unsigned long |
| wanpmcC4T1E1_getBaseAddress (int cardID, int deviceID) |
| { |
| ci_t *ci; |
| unsigned long base = 0; |
| |
| ci = c4_list; |
| while (ci) |
| { |
| if (ci->brdno == cardID) /* found valid device */ |
| { |
| if (deviceID < ci->max_port) /* comet is supported */ |
| base = ((unsigned long) ci->port[deviceID].cometbase); |
| break; |
| } |
| ci = ci->next; /* next board, if any */ |
| } |
| return (base); |
| } |
| |
| #endif /*** CONFIG_SBE_PMCC4_NCOMM ***/ |
| |
| |
| /*** End-of-File ***/ |
