sys/net/i4b/layer1/ifpi/i4b_ifpi_l1.c

   1 /*
   2  * Copyright (c) 1997, 2000 Hellmuth Michaelis. All rights reserved.
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  *
  13  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  23  * SUCH DAMAGE.
  24  *
  25  *---------------------------------------------------------------------------
  26  *
  27  *      i4b_ifpi_l1.c - AVM Fritz PCI layer 1 handler
  28  *      ---------------------------------------------
  29  *
  30  *      $Id: i4b_ifpi_l1.c,v 1.4 2000/06/02 16:14:36 hm Exp $
  31  *
  32  * $FreeBSD: src/sys/i4b/layer1/ifpi/i4b_ifpi_l1.c,v 1.4.2.1 2001/08/10 14:08:36 obrien Exp $
  33  * $DragonFly: src/sys/net/i4b/layer1/ifpi/i4b_ifpi_l1.c,v 1.3 2003/08/07 21:17:25 dillon Exp $
  34  *
  35  *      last edit-date: [Fri Jun  2 14:54:30 2000]
  36  *
  37  *---------------------------------------------------------------------------*/
  38
  39 #include "use_ifpi.h"
  40 #include "use_pci.h"
  41
  42 #if (NIFPI > 0) && (NPCI > 0)
  43
  44 #include <sys/param.h>
  45 #include <sys/systm.h>
  46 #include <sys/mbuf.h>
  47 #include <sys/socket.h>
  48
  49
  50 #include <net/if.h>
  51
  52 #include <machine/i4b_debug.h>
  53 #include <machine/i4b_ioctl.h>
  54 #include <machine/i4b_trace.h>
  55
  56 #include "../isic/i4b_isic.h"
  57 #include "../isic/i4b_isac.h"
  58
  59 #include "i4b_ifpi_ext.h"
  60
  61 #include "../i4b_l1.h"
  62
  63 #include "../../include/i4b_mbuf.h"
  64 #include "../../include/i4b_global.h"
  65
  66 /*---------------------------------------------------------------------------*
  67  *
  68  *      L2 -> L1: PH-DATA-REQUEST
  69  *      =========================
  70  *
  71  *      parms:
  72  *              unit            physical interface unit number
  73  *              m               mbuf containing L2 frame to be sent out
  74  *              freeflag        MBUF_FREE: free mbuf here after having sent
  75  *                                              it out
  76  *                              MBUF_DONTFREE: mbuf is freed by Layer 2
  77  *      returns:
  78  *              ==0     fail, nothing sent out
  79  *              !=0     ok, frame sent out
  80  *
  81  *---------------------------------------------------------------------------*/
  82 int
  83 ifpi_ph_data_req(int unit, struct mbuf *m, int freeflag)
  84 {
  85         u_char cmd;
  86         int s;
  87         struct l1_softc *sc = ifpi_scp[unit];
  88
  89 #ifdef NOTDEF
  90         NDBGL1(L1_PRIM, "PH-DATA-REQ, unit %d, freeflag=%d", unit, freeflag);
  91 #endif
  92
  93         if(m == NULL)                   /* failsafe */
  94                 return (0);
  95
  96         s = SPLI4B();
  97
  98         if(sc->sc_I430state == ST_F3)   /* layer 1 not running ? */
  99         {
 100                 NDBGL1(L1_I_ERR, "still in state F3!");
 101                 ifpi_ph_activate_req(unit);
 102         }
 103
 104         if(sc->sc_state & ISAC_TX_ACTIVE)
 105         {
 106                 if(sc->sc_obuf2 == NULL)
 107                 {
 108                         sc->sc_obuf2 = m;               /* save mbuf ptr */
 109
 110                         if(freeflag)
 111                                 sc->sc_freeflag2 = 1;   /* IRQ must mfree */
 112                         else
 113                                 sc->sc_freeflag2 = 0;   /* IRQ must not mfree */
 114
 115                         NDBGL1(L1_I_MSG, "using 2nd ISAC TX buffer, state = %s", ifpi_printstate(sc));
 116
 117                         if(sc->sc_trace & TRACE_D_TX)
 118                         {
 119                                 i4b_trace_hdr_t hdr;
 120                                 hdr.unit = L0IFPIUNIT(unit);
 121                                 hdr.type = TRC_CH_D;
 122                                 hdr.dir = FROM_TE;
 123                                 hdr.count = ++sc->sc_trace_dcount;
 124                                 MICROTIME(hdr.time);
 125                                 i4b_l1_trace_ind(&hdr, m->m_len, m->m_data);
 126                         }
 127                         splx(s);
 128                         return(1);
 129                 }
 130
 131                 NDBGL1(L1_I_ERR, "No Space in TX FIFO, state = %s", ifpi_printstate(sc));
 132
 133                 if(freeflag == MBUF_FREE)
 134                         i4b_Dfreembuf(m);
 135
 136                 splx(s);
 137                 return (0);
 138         }
 139
 140         if(sc->sc_trace & TRACE_D_TX)
 141         {
 142                 i4b_trace_hdr_t hdr;
 143                 hdr.unit = L0IFPIUNIT(unit);
 144                 hdr.type = TRC_CH_D;
 145                 hdr.dir = FROM_TE;
 146                 hdr.count = ++sc->sc_trace_dcount;
 147                 MICROTIME(hdr.time);
 148                 i4b_l1_trace_ind(&hdr, m->m_len, m->m_data);
 149         }
 150
 151         sc->sc_state |= ISAC_TX_ACTIVE; /* set transmitter busy flag */
 152
 153         NDBGL1(L1_I_MSG, "ISAC_TX_ACTIVE set");
 154
 155         sc->sc_freeflag = 0;            /* IRQ must NOT mfree */
 156
 157         ISAC_WRFIFO(m->m_data, min(m->m_len, ISAC_FIFO_LEN)); /* output to TX fifo */
 158
 159         if(m->m_len > ISAC_FIFO_LEN)    /* message > 32 bytes ? */
 160         {
 161                 sc->sc_obuf = m;        /* save mbuf ptr */
 162                 sc->sc_op = m->m_data + ISAC_FIFO_LEN;  /* ptr for irq hdl */
 163                 sc->sc_ol = m->m_len - ISAC_FIFO_LEN;   /* length for irq hdl */
 164
 165                 if(freeflag)
 166                         sc->sc_freeflag = 1;    /* IRQ must mfree */
 167
 168                 cmd = ISAC_CMDR_XTF;
 169         }
 170         else
 171         {
 172                 sc->sc_obuf = NULL;
 173                 sc->sc_op = NULL;
 174                 sc->sc_ol = 0;
 175
 176                 if(freeflag)
 177                         i4b_Dfreembuf(m);
 178
 179                 cmd = ISAC_CMDR_XTF | ISAC_CMDR_XME;
 180         }
 181
 182         ISAC_WRITE(I_CMDR, cmd);
 183         ISACCMDRWRDELAY();
 184
 185         splx(s);
 186
 187         return(1);
 188 }
 189
 190 /*---------------------------------------------------------------------------*
 191  *
 192  *      L2 -> L1: PH-ACTIVATE-REQUEST
 193  *      =============================
 194  *
 195  *      parms:
 196  *              unit    physical interface unit number
 197  *
 198  *      returns:
 199  *              ==0
 200  *              !=0
 201  *
 202  *---------------------------------------------------------------------------*/
 203 int
 204 ifpi_ph_activate_req(int unit)
 205 {
 206         struct l1_softc *sc = ifpi_scp[unit];
 207         NDBGL1(L1_PRIM, "PH-ACTIVATE-REQ, unit %d", unit);
 208         ifpi_next_state(sc, EV_PHAR);
 209         return(0);
 210 }
 211
 212 /*---------------------------------------------------------------------------*
 213  *      command from the upper layers
 214  *---------------------------------------------------------------------------*/
 215 int
 216 ifpi_mph_command_req(int unit, int command, void *parm)
 217 {
 218         struct l1_softc *sc = ifpi_scp[unit];
 219
 220         switch(command)
 221         {
 222                 case CMR_DOPEN:         /* daemon running */
 223                         NDBGL1(L1_PRIM, "unit %d, command = CMR_DOPEN", unit);
 224                         sc->sc_enabled = 1;
 225                         break;
 226
 227                 case CMR_DCLOSE:        /* daemon not running */
 228                         NDBGL1(L1_PRIM, "unit %d, command = CMR_DCLOSE", unit);
 229                         sc->sc_enabled = 0;
 230                         break;
 231
 232                 case CMR_SETTRACE:
 233                         NDBGL1(L1_PRIM, "unit %d, command = CMR_SETTRACE, parm = %d", unit, (unsigned int)parm);
 234                         sc->sc_trace = (unsigned int)parm;
 235                         break;
 236
 237                 default:
 238                         NDBGL1(L1_ERROR, "ERROR, unknown command = %d, unit = %d, parm = %d", command, unit, (unsigned int)parm);
 239                         break;
 240         }
 241
 242         return(0);
 243 }
 244
 245 #endif /* NIFPI > 0 */