arch/powerpc/cpu/mpc8xx/scc.c

   1 /*
   2  * File:  scc.c
   3  * Description:
   4  *      Basic ET HW initialization and packet RX/TX routines
   5  *
   6  * NOTE  <<<IMPORTANT:  PLEASE READ>>>:
   7  *     Do not cache Rx/Tx buffers!
   8  */
   9
  10 /*
  11  * MPC823 <-> MC68160 Connections:
  12  *
  13  * Setup MPC823 to work with MC68160 Enhanced Ethernet
  14  * Serial Tranceiver as follows:
  15  *
  16  * MPC823 Signal                MC68160  Comments
  17  * ------ ------                -------  --------
  18  * PA-12 ETHTX    -------->   TX       Eth. Port Transmit Data
  19  * PB-18 E_TENA   -------->   TENA     Eth. Transmit Port Enable
  20  * PA-5 ETHTCK    <--------   TCLK     Eth. Port Transmit Clock
  21  * PA-13 ETHRX    <--------   RX       Eth. Port Receive Data
  22  * PC-8 E_RENA    <--------   RENA     Eth. Receive Enable
  23  * PA-6 ETHRCK    <--------   RCLK     Eth. Port Receive Clock
  24  * PC-9 E_CLSN    <--------   CLSN     Eth. Port Collision Indication
  25  *
  26  * FADS Board Signal              MC68160  Comments
  27  * -----------------              -------  --------
  28  * (BCSR1) ETHEN*     -------->  CS2      Eth. Port Enable
  29  * (BSCR4) TPSQEL*    -------->  TPSQEL   Twisted Pair Signal Quality Error Test Enable
  30  * (BCSR4) TPFLDL*    -------->  TPFLDL   Twisted Pair Full-Duplex
  31  * (BCSR4) ETHLOOP    -------->  LOOP     Eth. Port Diagnostic Loop-Back
  32  *
  33  */
  34
  35 #include <common.h>
  36 #include <malloc.h>
  37 #include <commproc.h>
  38 #include <net.h>
  39 #include <command.h>
  40
  41 #if defined(CONFIG_CMD_NET) && defined(SCC_ENET)
  42
  43 /* Ethernet Transmit and Receive Buffers */
  44 #define DBUF_LENGTH  1520
  45
  46 #define TX_BUF_CNT 2
  47
  48 #define TOUT_LOOP 10000 /* 10 ms to have a packet sent */
  49
  50 static char txbuf[DBUF_LENGTH];
  51
  52 static uint rxIdx;      /* index of the current RX buffer */
  53 static uint txIdx;      /* index of the current TX buffer */
  54
  55 /*
  56   * SCC Ethernet Tx and Rx buffer descriptors allocated at the
  57   *  immr->udata_bd address on Dual-Port RAM
  58   * Provide for Double Buffering
  59   */
  60
  61 typedef volatile struct CommonBufferDescriptor {
  62     cbd_t rxbd[PKTBUFSRX];      /* Rx BD */
  63     cbd_t txbd[TX_BUF_CNT];     /* Tx BD */
  64 } RTXBD;
  65
  66 static RTXBD *rtx;
  67
  68 static int scc_send(struct eth_device *dev, void *packet, int length);
  69 static int scc_recv(struct eth_device* dev);
  70 static int scc_init (struct eth_device* dev, bd_t * bd);
  71 static void scc_halt(struct eth_device* dev);
  72
  73 int scc_initialize(bd_t *bis)
  74 {
  75         struct eth_device* dev;
  76
  77         dev = (struct eth_device*) malloc(sizeof *dev);
  78         memset(dev, 0, sizeof *dev);
  79
  80         sprintf(dev->name, "SCC");
  81         dev->iobase = 0;
  82         dev->priv   = 0;
  83         dev->init   = scc_init;
  84         dev->halt   = scc_halt;
  85         dev->send   = scc_send;
  86         dev->recv   = scc_recv;
  87
  88         eth_register(dev);
  89
  90         return 1;
  91 }
  92
  93 static int scc_send(struct eth_device *dev, void *packet, int length)
  94 {
  95         int i, j=0;
  96 #if 0
  97         volatile char *in, *out;
  98 #endif
  99
 100         /* section 16.9.23.3
 101          * Wait for ready
 102          */
 103 #if 0
 104         while (rtx->txbd[txIdx].cbd_sc & BD_ENET_TX_READY);
 105         out = (char *)(rtx->txbd[txIdx].cbd_bufaddr);
 106         in = packet;
 107         for(i = 0; i < length; i++) {
 108                 *out++ = *in++;
 109         }
 110         rtx->txbd[txIdx].cbd_datlen = length;
 111         rtx->txbd[txIdx].cbd_sc |= (BD_ENET_TX_READY | BD_ENET_TX_LAST);
 112         while (rtx->txbd[txIdx].cbd_sc & BD_ENET_TX_READY) j++;
 113
 114 #ifdef ET_DEBUG
 115         printf("cycles: %d    status: %x\n", j, rtx->txbd[txIdx].cbd_sc);
 116 #endif
 117         i = (rtx->txbd[txIdx++].cbd_sc & BD_ENET_TX_STATS) /* return only status bits */;
 118
 119         /* wrap around buffer index when necessary */
 120         if (txIdx >= TX_BUF_CNT) txIdx = 0;
 121 #endif
 122
 123         while ((rtx->txbd[txIdx].cbd_sc & BD_ENET_TX_READY) && (j<TOUT_LOOP)) {
 124                 udelay (1);     /* will also trigger Wd if needed */
 125                 j++;
 126         }
 127         if (j>=TOUT_LOOP) printf("TX not ready\n");
 128         rtx->txbd[txIdx].cbd_bufaddr = (uint)packet;
 129         rtx->txbd[txIdx].cbd_datlen = length;
 130         rtx->txbd[txIdx].cbd_sc |= (BD_ENET_TX_READY | BD_ENET_TX_LAST |BD_ENET_TX_WRAP);
 131         while ((rtx->txbd[txIdx].cbd_sc & BD_ENET_TX_READY) && (j<TOUT_LOOP)) {
 132                 udelay (1);     /* will also trigger Wd if needed */
 133                 j++;
 134         }
 135         if (j>=TOUT_LOOP) printf("TX timeout\n");
 136 #ifdef ET_DEBUG
 137         printf("cycles: %d    status: %x\n", j, rtx->txbd[txIdx].cbd_sc);
 138 #endif
 139         i = (rtx->txbd[txIdx].cbd_sc & BD_ENET_TX_STATS) /* return only status bits */;
 140         return i;
 141 }
 142
 143 static int scc_recv (struct eth_device *dev)
 144 {
 145         int length;
 146
 147         for (;;) {
 148                 /* section 16.9.23.2 */
 149                 if (rtx->rxbd[rxIdx].cbd_sc & BD_ENET_RX_EMPTY) {
 150                         length = -1;
 151                         break;  /* nothing received - leave for() loop */
 152                 }
 153
 154                 length = rtx->rxbd[rxIdx].cbd_datlen;
 155
 156                 if (rtx->rxbd[rxIdx].cbd_sc & 0x003f) {
 157 #ifdef ET_DEBUG
 158                         printf ("err: %x\n", rtx->rxbd[rxIdx].cbd_sc);
 159 #endif
 160                 } else {
 161                         /* Pass the packet up to the protocol layers. */
 162                         NetReceive (NetRxPackets[rxIdx], length - 4);
 163                 }
 164
 165
 166                 /* Give the buffer back to the SCC. */
 167                 rtx->rxbd[rxIdx].cbd_datlen = 0;
 168
 169                 /* wrap around buffer index when necessary */
 170                 if ((rxIdx + 1) >= PKTBUFSRX) {
 171                         rtx->rxbd[PKTBUFSRX - 1].cbd_sc =
 172                                 (BD_ENET_RX_WRAP | BD_ENET_RX_EMPTY);
 173                         rxIdx = 0;
 174                 } else {
 175                         rtx->rxbd[rxIdx].cbd_sc = BD_ENET_RX_EMPTY;
 176                         rxIdx++;
 177                 }
 178         }
 179         return length;
 180 }
 181
 182 /**************************************************************
 183   *
 184   * SCC Ethernet Initialization Routine
 185   *
 186   *************************************************************/
 187
 188 static int scc_init (struct eth_device *dev, bd_t * bis)
 189 {
 190
 191         int i;
 192         scc_enet_t *pram_ptr;
 193
 194         volatile immap_t *immr = (immap_t *) CONFIG_SYS_IMMR;
 195
 196 #if defined(CONFIG_LWMON)
 197         reset_phy();
 198 #endif
 199
 200         pram_ptr = (scc_enet_t *) & (immr->im_cpm.cp_dparam[PROFF_ENET]);
 201
 202         rxIdx = 0;
 203         txIdx = 0;
 204
 205         if (!rtx) {
 206 #ifdef CONFIG_SYS_ALLOC_DPRAM
 207                 rtx = (RTXBD *) (immr->im_cpm.cp_dpmem +
 208                                  dpram_alloc_align (sizeof (RTXBD), 8));
 209 #else
 210                 rtx = (RTXBD *) (immr->im_cpm.cp_dpmem + CPM_SCC_BASE);
 211 #endif
 212         }
 213
 214 #if (defined(PA_ENET_RXD) && defined(PA_ENET_TXD))
 215         /* Configure port A pins for Txd and Rxd.
 216          */
 217         immr->im_ioport.iop_papar |= (PA_ENET_RXD | PA_ENET_TXD);
 218         immr->im_ioport.iop_padir &= ~(PA_ENET_RXD | PA_ENET_TXD);
 219         immr->im_ioport.iop_paodr &= ~PA_ENET_TXD;
 220 #elif (defined(PB_ENET_RXD) && defined(PB_ENET_TXD))
 221         /* Configure port B pins for Txd and Rxd.
 222          */
 223         immr->im_cpm.cp_pbpar |= (PB_ENET_RXD | PB_ENET_TXD);
 224         immr->im_cpm.cp_pbdir &= ~(PB_ENET_RXD | PB_ENET_TXD);
 225         immr->im_cpm.cp_pbodr &= ~PB_ENET_TXD;
 226 #else
 227 #error Configuration Error: exactly ONE of PA_ENET_[RT]XD, PB_ENET_[RT]XD must be defined
 228 #endif
 229
 230 #if defined(PC_ENET_LBK)
 231         /* Configure port C pins to disable External Loopback
 232          */
 233         immr->im_ioport.iop_pcpar &= ~PC_ENET_LBK;
 234         immr->im_ioport.iop_pcdir |= PC_ENET_LBK;
 235         immr->im_ioport.iop_pcso &= ~PC_ENET_LBK;
 236         immr->im_ioport.iop_pcdat &= ~PC_ENET_LBK;      /* Disable Loopback */
 237 #endif /* PC_ENET_LBK */
 238
 239         /* Configure port C pins to enable CLSN and RENA.
 240          */
 241         immr->im_ioport.iop_pcpar &= ~(PC_ENET_CLSN | PC_ENET_RENA);
 242         immr->im_ioport.iop_pcdir &= ~(PC_ENET_CLSN | PC_ENET_RENA);
 243         immr->im_ioport.iop_pcso |= (PC_ENET_CLSN | PC_ENET_RENA);
 244
 245         /* Configure port A for TCLK and RCLK.
 246          */
 247         immr->im_ioport.iop_papar |= (PA_ENET_TCLK | PA_ENET_RCLK);
 248         immr->im_ioport.iop_padir &= ~(PA_ENET_TCLK | PA_ENET_RCLK);
 249
 250         /*
 251          * Configure Serial Interface clock routing -- see section 16.7.5.3
 252          * First, clear all SCC bits to zero, then set the ones we want.
 253          */
 254
 255         immr->im_cpm.cp_sicr &= ~SICR_ENET_MASK;
 256         immr->im_cpm.cp_sicr |= SICR_ENET_CLKRT;
 257
 258
 259         /*
 260          * Initialize SDCR -- see section 16.9.23.7
 261          * SDMA configuration register
 262          */
 263         immr->im_siu_conf.sc_sdcr = 0x01;
 264
 265
 266         /*
 267          * Setup SCC Ethernet Parameter RAM
 268          */
 269
 270         pram_ptr->sen_genscc.scc_rfcr = 0x18;   /* Normal Operation and Mot byte ordering */
 271         pram_ptr->sen_genscc.scc_tfcr = 0x18;   /* Mot byte ordering, Normal access */
 272
 273         pram_ptr->sen_genscc.scc_mrblr = DBUF_LENGTH;   /* max. ET package len 1520 */
 274
 275         pram_ptr->sen_genscc.scc_rbase = (unsigned int) (&rtx->rxbd[0]);        /* Set RXBD tbl start at Dual Port */
 276         pram_ptr->sen_genscc.scc_tbase = (unsigned int) (&rtx->txbd[0]);        /* Set TXBD tbl start at Dual Port */
 277
 278         /*
 279          * Setup Receiver Buffer Descriptors (13.14.24.18)
 280          * Settings:
 281          *     Empty, Wrap
 282          */
 283
 284         for (i = 0; i < PKTBUFSRX; i++) {
 285                 rtx->rxbd[i].cbd_sc = BD_ENET_RX_EMPTY;
 286                 rtx->rxbd[i].cbd_datlen = 0;    /* Reset */
 287                 rtx->rxbd[i].cbd_bufaddr = (uint) NetRxPackets[i];
 288         }
 289
 290         rtx->rxbd[PKTBUFSRX - 1].cbd_sc |= BD_ENET_RX_WRAP;
 291
 292         /*
 293          * Setup Ethernet Transmitter Buffer Descriptors (13.14.24.19)
 294          * Settings:
 295          *    Add PADs to Short FRAMES, Wrap, Last, Tx CRC
 296          */
 297
 298         for (i = 0; i < TX_BUF_CNT; i++) {
 299                 rtx->txbd[i].cbd_sc =
 300                         (BD_ENET_TX_PAD | BD_ENET_TX_LAST | BD_ENET_TX_TC);
 301                 rtx->txbd[i].cbd_datlen = 0;    /* Reset */
 302                 rtx->txbd[i].cbd_bufaddr = (uint) (&txbuf[0]);
 303         }
 304
 305         rtx->txbd[TX_BUF_CNT - 1].cbd_sc |= BD_ENET_TX_WRAP;
 306
 307         /*
 308          * Enter Command:  Initialize Rx Params for SCC
 309          */
 310
 311         do {                    /* Spin until ready to issue command    */
 312                 __asm__ ("eieio");
 313         } while (immr->im_cpm.cp_cpcr & CPM_CR_FLG);
 314         /* Issue command */
 315         immr->im_cpm.cp_cpcr =
 316                 ((CPM_CR_INIT_RX << 8) | (CPM_CR_ENET << 4) | CPM_CR_FLG);
 317         do {                    /* Spin until command processed         */
 318                 __asm__ ("eieio");
 319         } while (immr->im_cpm.cp_cpcr & CPM_CR_FLG);
 320
 321         /*
 322          * Ethernet Specific Parameter RAM
 323          *     see table 13-16, pg. 660,
 324          *     pg. 681 (example with suggested settings)
 325          */
 326
 327         pram_ptr->sen_cpres = ~(0x0);   /* Preset CRC */
 328         pram_ptr->sen_cmask = 0xdebb20e3;       /* Constant Mask for CRC */
 329         pram_ptr->sen_crcec = 0x0;      /* Error Counter CRC (unused) */
 330         pram_ptr->sen_alec = 0x0;       /* Alignment Error Counter (unused) */
 331         pram_ptr->sen_disfc = 0x0;      /* Discard Frame Counter (unused) */
 332         pram_ptr->sen_pads = 0x8888;    /* Short Frame PAD Characters */
 333
 334         pram_ptr->sen_retlim = 15;      /* Retry Limit Threshold */
 335         pram_ptr->sen_maxflr = 1518;    /* MAX Frame Length Register */
 336         pram_ptr->sen_minflr = 64;      /* MIN Frame Length Register */
 337
 338         pram_ptr->sen_maxd1 = DBUF_LENGTH;      /* MAX DMA1 Length Register */
 339         pram_ptr->sen_maxd2 = DBUF_LENGTH;      /* MAX DMA2 Length Register */
 340
 341         pram_ptr->sen_gaddr1 = 0x0;     /* Group Address Filter 1 (unused) */
 342         pram_ptr->sen_gaddr2 = 0x0;     /* Group Address Filter 2 (unused) */
 343         pram_ptr->sen_gaddr3 = 0x0;     /* Group Address Filter 3 (unused) */
 344         pram_ptr->sen_gaddr4 = 0x0;     /* Group Address Filter 4 (unused) */
 345
 346 #define ea eth_get_dev()->enetaddr
 347         pram_ptr->sen_paddrh = (ea[5] << 8) + ea[4];
 348         pram_ptr->sen_paddrm = (ea[3] << 8) + ea[2];
 349         pram_ptr->sen_paddrl = (ea[1] << 8) + ea[0];
 350 #undef ea
 351
 352         pram_ptr->sen_pper = 0x0;       /* Persistence (unused) */
 353         pram_ptr->sen_iaddr1 = 0x0;     /* Individual Address Filter 1 (unused) */
 354         pram_ptr->sen_iaddr2 = 0x0;     /* Individual Address Filter 2 (unused) */
 355         pram_ptr->sen_iaddr3 = 0x0;     /* Individual Address Filter 3 (unused) */
 356         pram_ptr->sen_iaddr4 = 0x0;     /* Individual Address Filter 4 (unused) */
 357         pram_ptr->sen_taddrh = 0x0;     /* Tmp Address (MSB) (unused) */
 358         pram_ptr->sen_taddrm = 0x0;     /* Tmp Address (unused) */
 359         pram_ptr->sen_taddrl = 0x0;     /* Tmp Address (LSB) (unused) */
 360
 361         /*
 362          * Enter Command:  Initialize Tx Params for SCC
 363          */
 364
 365         do {                    /* Spin until ready to issue command    */
 366                 __asm__ ("eieio");
 367         } while (immr->im_cpm.cp_cpcr & CPM_CR_FLG);
 368         /* Issue command */
 369         immr->im_cpm.cp_cpcr =
 370                 ((CPM_CR_INIT_TX << 8) | (CPM_CR_ENET << 4) | CPM_CR_FLG);
 371         do {                    /* Spin until command processed         */
 372                 __asm__ ("eieio");
 373         } while (immr->im_cpm.cp_cpcr & CPM_CR_FLG);
 374
 375         /*
 376          * Mask all Events in SCCM - we use polling mode
 377          */
 378         immr->im_cpm.cp_scc[SCC_ENET].scc_sccm = 0;
 379
 380         /*
 381          * Clear Events in SCCE -- Clear bits by writing 1's
 382          */
 383
 384         immr->im_cpm.cp_scc[SCC_ENET].scc_scce = ~(0x0);
 385
 386
 387         /*
 388          * Initialize GSMR High 32-Bits
 389          * Settings:  Normal Mode
 390          */
 391
 392         immr->im_cpm.cp_scc[SCC_ENET].scc_gsmrh = 0;
 393
 394         /*
 395          * Initialize GSMR Low 32-Bits, but do not Enable Transmit/Receive
 396          * Settings:
 397          *     TCI = Invert
 398          *     TPL =  48 bits
 399          *     TPP = Repeating 10's
 400          *     MODE = Ethernet
 401          */
 402
 403         immr->im_cpm.cp_scc[SCC_ENET].scc_gsmrl = (SCC_GSMRL_TCI |
 404                                                    SCC_GSMRL_TPL_48 |
 405                                                    SCC_GSMRL_TPP_10 |
 406                                                    SCC_GSMRL_MODE_ENET);
 407
 408         /*
 409          * Initialize the DSR -- see section 13.14.4 (pg. 513) v0.4
 410          */
 411
 412         immr->im_cpm.cp_scc[SCC_ENET].scc_dsr = 0xd555;
 413
 414         /*
 415          * Initialize the PSMR
 416          * Settings:
 417          *  CRC = 32-Bit CCITT
 418          *  NIB = Begin searching for SFD 22 bits after RENA
 419          *  FDE = Full Duplex Enable
 420          *  LPB = Loopback Enable (Needed when FDE is set)
 421          *  BRO = Reject broadcast packets
 422          *  PROMISCOUS = Catch all packets regardless of dest. MAC adress
 423          */
 424         immr->im_cpm.cp_scc[SCC_ENET].scc_psmr = SCC_PSMR_ENCRC |
 425                 SCC_PSMR_NIB22 |
 426 #if defined(CONFIG_SCC_ENET_FULL_DUPLEX)
 427                 SCC_PSMR_FDE | SCC_PSMR_LPB |
 428 #endif
 429 #if defined(CONFIG_SCC_ENET_NO_BROADCAST)
 430                 SCC_PSMR_BRO |
 431 #endif
 432 #if defined(CONFIG_SCC_ENET_PROMISCOUS)
 433                 SCC_PSMR_PRO |
 434 #endif
 435                 0;
 436
 437         /*
 438          * Configure Ethernet TENA Signal
 439          */
 440
 441 #if (defined(PC_ENET_TENA) && !defined(PB_ENET_TENA))
 442         immr->im_ioport.iop_pcpar |= PC_ENET_TENA;
 443         immr->im_ioport.iop_pcdir &= ~PC_ENET_TENA;
 444 #elif (defined(PB_ENET_TENA) && !defined(PC_ENET_TENA))
 445         immr->im_cpm.cp_pbpar |= PB_ENET_TENA;
 446         immr->im_cpm.cp_pbdir |= PB_ENET_TENA;
 447 #else
 448 #error Configuration Error: exactly ONE of PB_ENET_TENA, PC_ENET_TENA must be defined
 449 #endif
 450
 451         /*
 452          * Set the ENT/ENR bits in the GSMR Low -- Enable Transmit/Receive
 453          */
 454
 455         immr->im_cpm.cp_scc[SCC_ENET].scc_gsmrl |=
 456                 (SCC_GSMRL_ENR | SCC_GSMRL_ENT);
 457
 458         return 1;
 459 }
 460
 461
 462 static void scc_halt (struct eth_device *dev)
 463 {
 464         volatile immap_t *immr = (immap_t *) CONFIG_SYS_IMMR;
 465
 466         immr->im_cpm.cp_scc[SCC_ENET].scc_gsmrl &=
 467                 ~(SCC_GSMRL_ENR | SCC_GSMRL_ENT);
 468
 469         immr->im_ioport.iop_pcso  &=  ~(PC_ENET_CLSN | PC_ENET_RENA);
 470 }
 471
 472 #if 0
 473 void restart (void)
 474 {
 475         volatile immap_t *immr = (immap_t *) CONFIG_SYS_IMMR;
 476
 477         immr->im_cpm.cp_scc[SCC_ENET].scc_gsmrl |=
 478                 (SCC_GSMRL_ENR | SCC_GSMRL_ENT);
 479 }
 480 #endif
 481 #endif