release/src-rt-6.x.4708/linux/linux-2.6.36/drivers/staging/cxt1e1/comet.c

   1 /* Copyright (C) 2003-2005  SBE, Inc.
   2  *
   3  *   This program is free software; you can redistribute it and/or modify
   4  *   it under the terms of the GNU General Public License as published by
   5  *   the Free Software Foundation; either version 2 of the License, or
   6  *   (at your option) any later version.
   7  *
   8  *   This program is distributed in the hope that it will be useful,
   9  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11  *   GNU General Public License for more details.
  12  */
  13
  14 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
  15
  16 #include <asm/io.h>
  17 #include <linux/hdlc.h>
  18 #include "pmcc4_sysdep.h"
  19 #include "sbecom_inline_linux.h"
  20 #include "libsbew.h"
  21 #include "pmcc4.h"
  22 #include "comet.h"
  23 #include "comet_tables.h"
  24
  25 #ifdef SBE_INCLUDE_SYMBOLS
  26 #define STATIC
  27 #else
  28 #define STATIC  static
  29 #endif
  30
  31
  32 extern int  log_level;
  33
  34 #define COMET_NUM_SAMPLES   24  /* Number of entries in the waveform table */
  35 #define COMET_NUM_UNITS     5   /* Number of points per entry in table */
  36
  37 /* forward references */
  38 STATIC void SetPwrLevel (comet_t * comet);
  39 STATIC void WrtRcvEqualizerTbl (ci_t * ci, comet_t * comet, u_int32_t *table);
  40 STATIC void WrtXmtWaveformTbl (ci_t * ci, comet_t * comet, u_int8_t table[COMET_NUM_SAMPLES][COMET_NUM_UNITS]);
  41
  42
  43 void       *TWV_table[12] = {
  44     TWVLongHaul0DB, TWVLongHaul7_5DB, TWVLongHaul15DB, TWVLongHaul22_5DB,
  45     TWVShortHaul0, TWVShortHaul1, TWVShortHaul2, TWVShortHaul3, TWVShortHaul4,
  46     TWVShortHaul5,
  47     TWV_E1_75Ohm,    /** PORT POINT - 75 Ohm not supported **/
  48     TWV_E1_120Ohm
  49 };
  50
  51
  52 static int
  53 lbo_tbl_lkup (int t1, int lbo)
  54 {
  55     if ((lbo < CFG_LBO_LH0) || (lbo > CFG_LBO_E120))    /* error switches to
  56                                                          * default */
  57     {
  58         if (t1)
  59             lbo = CFG_LBO_LH0;  /* default T1 waveform table */
  60         else
  61             lbo = CFG_LBO_E120;     /* default E1 waveform table */
  62     }
  63     return (lbo - 1);               /* make index ZERO relative */
  64 }
  65
  66
  67 void
  68 init_comet (void *ci, comet_t * comet, u_int32_t port_mode, int clockmaster,
  69             u_int8_t moreParams)
  70 {
  71     u_int8_t isT1mode;
  72     u_int8_t    tix = CFG_LBO_LH0;      /* T1 default */
  73
  74     isT1mode = IS_FRAME_ANY_T1 (port_mode);
  75     /* T1 or E1 */
  76     if (isT1mode)
  77     {
  78         pci_write_32 ((u_int32_t *) &comet->gbl_cfg, 0xa0);     /* Select T1 Mode & PIO
  79                                                                  * output enabled */
  80         tix = lbo_tbl_lkup (isT1mode, CFG_LBO_LH0);     /* default T1 waveform
  81                                                          * table */
  82     } else
  83     {
  84         pci_write_32 ((u_int32_t *) &comet->gbl_cfg, 0x81);     /* Select E1 Mode & PIO
  85                                                                  * output enabled */
  86         tix = lbo_tbl_lkup (isT1mode, CFG_LBO_E120);    /* default E1 waveform
  87                                                          * table */
  88     }
  89
  90     if (moreParams & CFG_LBO_MASK)
  91         tix = lbo_tbl_lkup (isT1mode, moreParams & CFG_LBO_MASK);       /* dial-in requested
  92                                                                          * waveform table */
  93
  94     /* Tx line Intfc cfg     ** Set for analog & no special patterns */
  95     pci_write_32 ((u_int32_t *) &comet->tx_line_cfg, 0x00);     /* Transmit Line
  96                                                                  * Interface Config. */
  97
  98     /* master test    ** Ignore Test settings for now */
  99     pci_write_32 ((u_int32_t *) &comet->mtest, 0x00);   /* making sure it's
 100                                                          * Default value */
 101
 102     /* Turn on Center (CENT) and everything else off */
 103     pci_write_32 ((u_int32_t *) &comet->rjat_cfg, 0x10);        /* RJAT cfg */
 104     /* Set Jitter Attenuation to recommend T1 values */
 105     if (isT1mode)
 106     {
 107         pci_write_32 ((u_int32_t *) &comet->rjat_n1clk, 0x2F);  /* RJAT Divider N1
 108                                                                  * Control */
 109         pci_write_32 ((u_int32_t *) &comet->rjat_n2clk, 0x2F);  /* RJAT Divider N2
 110                                                                  * Control */
 111     } else
 112     {
 113         pci_write_32 ((u_int32_t *) &comet->rjat_n1clk, 0xFF);  /* RJAT Divider N1
 114                                                                  * Control */
 115         pci_write_32 ((u_int32_t *) &comet->rjat_n2clk, 0xFF);  /* RJAT Divider N2
 116                                                                  * Control */
 117     }
 118
 119     /* Turn on Center (CENT) and everything else off */
 120     pci_write_32 ((u_int32_t *) &comet->tjat_cfg, 0x10);        /* TJAT Config. */
 121
 122     /* Do not bypass jitter attenuation and bypass elastic store */
 123     pci_write_32 ((u_int32_t *) &comet->rx_opt, 0x00);  /* rx opts */
 124
 125     /* TJAT ctrl & TJAT divider ctrl */
 126     /* Set Jitter Attenuation to recommended T1 values */
 127     if (isT1mode)
 128     {
 129         pci_write_32 ((u_int32_t *) &comet->tjat_n1clk, 0x2F);  /* TJAT Divider N1
 130                                                                  * Control */
 131         pci_write_32 ((u_int32_t *) &comet->tjat_n2clk, 0x2F);  /* TJAT Divider N2
 132                                                                  * Control */
 133     } else
 134     {
 135         pci_write_32 ((u_int32_t *) &comet->tjat_n1clk, 0xFF);  /* TJAT Divider N1
 136                                                                  * Control */
 137         pci_write_32 ((u_int32_t *) &comet->tjat_n2clk, 0xFF);  /* TJAT Divider N2
 138                                                                  * Control */
 139     }
 140
 141     /* 1c: rx ELST cfg   20: tx ELST cfg  28&38: rx&tx data link ctrl */
 142     if (isT1mode)
 143     {                               /* Select 193-bit frame format */
 144         pci_write_32 ((u_int32_t *) &comet->rx_elst_cfg, 0x00);
 145         pci_write_32 ((u_int32_t *) &comet->tx_elst_cfg, 0x00);
 146     } else
 147     {                               /* Select 256-bit frame format */
 148         pci_write_32 ((u_int32_t *) &comet->rx_elst_cfg, 0x03);
 149         pci_write_32 ((u_int32_t *) &comet->tx_elst_cfg, 0x03);
 150         pci_write_32 ((u_int32_t *) &comet->rxce1_ctl, 0x00);   /* disable T1 data link
 151                                                                  * receive */
 152         pci_write_32 ((u_int32_t *) &comet->txci1_ctl, 0x00);   /* disable T1 data link
 153                                                                  * transmit */
 154     }
 155
 156     /* the following is a default value */
 157     /* Enable 8 out of 10 validation */
 158     pci_write_32 ((u_int32_t *) &comet->t1_rboc_ena, 0x00);     /* t1RBOC
 159                                                                  * enable(BOC:BitOriented
 160                                                                  * Code) */
 161     if (isT1mode)
 162     {
 163
 164         /* IBCD cfg: aka Inband Code Detection ** loopback code length set to */
 165         pci_write_32 ((u_int32_t *) &comet->ibcd_cfg, 0x04);    /* 6 bit down, 5 bit up
 166                                                                  * (assert)  */
 167         pci_write_32 ((u_int32_t *) &comet->ibcd_act, 0x08);    /* line loopback
 168                                                                  * activate pattern */
 169         pci_write_32 ((u_int32_t *) &comet->ibcd_deact, 0x24);  /* deactivate code
 170                                                                  * pattern (i.e.001) */
 171     }
 172     /* 10: CDRC cfg 28&38: rx&tx data link 1 ctrl 48: t1 frmr cfg  */
 173     /* 50: SIGX cfg, COSS (change of signaling state) 54: XBAS cfg  */
 174     /* 60: t1 ALMI cfg */
 175     /* Configure Line Coding */
 176
 177     switch (port_mode)
 178     {
 179     case CFG_FRAME_SF:              /* 1 - T1 B8ZS */
 180         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0);
 181         pci_write_32 ((u_int32_t *) &comet->t1_frmr_cfg, 0);
 182         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 183         pci_write_32 ((u_int32_t *) &comet->t1_xbas_cfg, 0x20); /* 5:B8ZS */
 184         pci_write_32 ((u_int32_t *) &comet->t1_almi_cfg, 0);
 185         break;
 186     case CFG_FRAME_ESF:     /* 2 - T1 B8ZS */
 187         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0);
 188         pci_write_32 ((u_int32_t *) &comet->rxce1_ctl, 0x20);   /* Bit 5: T1 DataLink
 189                                                                  * Enable */
 190         pci_write_32 ((u_int32_t *) &comet->txci1_ctl, 0x20);   /* 5: T1 DataLink Enable */
 191         pci_write_32 ((u_int32_t *) &comet->t1_frmr_cfg, 0x30); /* 4:ESF  5:ESFFA */
 192         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0x04);    /* 2:ESF */
 193         pci_write_32 ((u_int32_t *) &comet->t1_xbas_cfg, 0x30); /* 4:ESF  5:B8ZS */
 194         pci_write_32 ((u_int32_t *) &comet->t1_almi_cfg, 0x10); /* 4:ESF */
 195         break;
 196     case CFG_FRAME_E1PLAIN:         /* 3 - HDB3 */
 197         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0);
 198         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 199         pci_write_32 ((u_int32_t *) &comet->e1_tran_cfg, 0);
 200         pci_write_32 ((u_int32_t *) &comet->e1_frmr_aopts, 0x40);
 201         break;
 202     case CFG_FRAME_E1CAS:           /* 4 - HDB3 */
 203         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0);
 204         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 205         pci_write_32 ((u_int32_t *) &comet->e1_tran_cfg, 0x60);
 206         pci_write_32 ((u_int32_t *) &comet->e1_frmr_aopts, 0);
 207         break;
 208     case CFG_FRAME_E1CRC:           /* 5 - HDB3 */
 209         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0);
 210         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 211         pci_write_32 ((u_int32_t *) &comet->e1_tran_cfg, 0x10);
 212         pci_write_32 ((u_int32_t *) &comet->e1_frmr_aopts, 0xc2);
 213         break;
 214     case CFG_FRAME_E1CRC_CAS:       /* 6 - HDB3 */
 215         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0);
 216         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 217         pci_write_32 ((u_int32_t *) &comet->e1_tran_cfg, 0x70);
 218         pci_write_32 ((u_int32_t *) &comet->e1_frmr_aopts, 0x82);
 219         break;
 220     case CFG_FRAME_SF_AMI:          /* 7 - T1 AMI */
 221         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0x80);    /* Enable AMI Line
 222                                                                  * Decoding */
 223         pci_write_32 ((u_int32_t *) &comet->t1_frmr_cfg, 0);
 224         pci_write_32 ((u_int32_t *) &comet->t1_xbas_cfg, 0);
 225         pci_write_32 ((u_int32_t *) &comet->t1_almi_cfg, 0);
 226         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 227         break;
 228     case CFG_FRAME_ESF_AMI:         /* 8 - T1 AMI */
 229         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0x80);    /* Enable AMI Line
 230                                                                  * Decoding */
 231         pci_write_32 ((u_int32_t *) &comet->rxce1_ctl, 0x20);   /* 5: T1 DataLink Enable */
 232         pci_write_32 ((u_int32_t *) &comet->txci1_ctl, 0x20);   /* 5: T1 DataLink Enable */
 233         pci_write_32 ((u_int32_t *) &comet->t1_frmr_cfg, 0x30); /* Bit 4:ESF  5:ESFFA */
 234         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0x04);    /* 2:ESF */
 235         pci_write_32 ((u_int32_t *) &comet->t1_xbas_cfg, 0x10); /* 4:ESF */
 236         pci_write_32 ((u_int32_t *) &comet->t1_almi_cfg, 0x10); /* 4:ESF */
 237         break;
 238     case CFG_FRAME_E1PLAIN_AMI:       /* 9 - AMI */
 239         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0x80);    /* Enable AMI Line
 240                                                                  * Decoding */
 241         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 242         pci_write_32 ((u_int32_t *) &comet->e1_tran_cfg, 0x80);
 243         pci_write_32 ((u_int32_t *) &comet->e1_frmr_aopts, 0x40);
 244         break;
 245     case CFG_FRAME_E1CAS_AMI:       /* 10 - AMI */
 246         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0x80);    /* Enable AMI Line
 247                                                                  * Decoding */
 248         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 249         pci_write_32 ((u_int32_t *) &comet->e1_tran_cfg, 0xe0);
 250         pci_write_32 ((u_int32_t *) &comet->e1_frmr_aopts, 0);
 251         break;
 252     case CFG_FRAME_E1CRC_AMI:       /* 11 - AMI */
 253         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0x80);    /* Enable AMI Line
 254                                                                  * Decoding */
 255         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 256         pci_write_32 ((u_int32_t *) &comet->e1_tran_cfg, 0x90);
 257         pci_write_32 ((u_int32_t *) &comet->e1_frmr_aopts, 0xc2);
 258         break;
 259     case CFG_FRAME_E1CRC_CAS_AMI:   /* 12 - AMI */
 260         pci_write_32 ((u_int32_t *) &comet->cdrc_cfg, 0x80);    /* Enable AMI Line
 261                                                                  * Decoding */
 262         pci_write_32 ((u_int32_t *) &comet->sigx_cfg, 0);
 263         pci_write_32 ((u_int32_t *) &comet->e1_tran_cfg, 0xf0);
 264         pci_write_32 ((u_int32_t *) &comet->e1_frmr_aopts, 0x82);
 265         break;
 266     }                               /* end switch */
 267
 268     /***
 269      * Set Full Frame mode (NXDSO[1] = 0, NXDSO[0] = 0)
 270      * CMODE=1: Clock slave mode with BRCLK as an input,
 271      * DE=0: Use falling edge of BRCLK for data,
 272      * FE=0: Use falling edge of BRCLK for frame,
 273      * CMS=0: Use backplane freq,
 274      * RATE[1:0]=0,0: T1
 275      ***/
 276
 277
 278     /* 0x30: "BRIF cfg"; 0x20 is 'CMODE', 0x03 is (bit) rate */
 279     /* note "rate bits can only be set once after reset" */
 280     if (clockmaster)
 281     {                               /* CMODE == clockMode, 0=clock master (so
 282                                      * all 3 others should be slave) */
 283         if (isT1mode)               /* rate = 1.544 Mb/s */
 284             pci_write_32 ((u_int32_t *) &comet->brif_cfg, 0x00);        /* Comet 0 Master
 285                                                                          * Mode(CMODE=0) */
 286         else                        /* rate = 2.048 Mb/s */
 287             pci_write_32 ((u_int32_t *) &comet->brif_cfg, 0x01);        /* Comet 0 Master
 288                                                                          * Mode(CMODE=0) */
 289
 290         /* 31: BRIF frame pulse cfg  06: tx timing options */
 291         pci_write_32 ((u_int32_t *) &comet->brif_fpcfg, 0x00);  /* Master Mode
 292                                                                  * i.e.FPMODE=0 (@0x20) */
 293         if ((moreParams & CFG_CLK_PORT_MASK) == CFG_CLK_PORT_INTERNAL)
 294         {
 295             if (log_level >= LOG_SBEBUG12)
 296                 pr_info(">> %s: clockmaster internal clock\n", __func__);
 297             pci_write_32 ((u_int32_t *) &comet->tx_time, 0x0d); /* internal oscillator */
 298         } else                      /* external clock source */
 299         {
 300             if (log_level >= LOG_SBEBUG12)
 301                 pr_info(">> %s: clockmaster external clock\n", __func__);
 302             pci_write_32 ((u_int32_t *) &comet->tx_time, 0x09); /* loop timing
 303                                                                  * (external) */
 304         }
 305
 306     } else                          /* slave */
 307     {
 308         if (isT1mode)
 309             pci_write_32 ((u_int32_t *) &comet->brif_cfg, 0x20);        /* Slave Mode(CMODE=1,
 310                                                                          * see above) */
 311         else
 312             pci_write_32 ((u_int32_t *) &comet->brif_cfg, 0x21);        /* Slave Mode (CMODE=1) */
 313         pci_write_32 ((u_int32_t *) &comet->brif_fpcfg, 0x20);  /* Slave Mode i.e.
 314                                                                  * FPMODE=1 (@0x20) */
 315         if (log_level >= LOG_SBEBUG12)
 316             pr_info(">> %s: clockslave internal clock\n", __func__);
 317         pci_write_32 ((u_int32_t *) &comet->tx_time, 0x0d);     /* oscillator timing */
 318     }
 319
 320     /* 32: BRIF parity F-bit cfg */
 321     /* Totem-pole operation */
 322     pci_write_32 ((u_int32_t *) &comet->brif_pfcfg, 0x01);      /* Receive Backplane
 323                                                                  * Parity/F-bit */
 324
 325     /* dc: RLPS equalizer V ref */
 326     /* Configuration */
 327     if (isT1mode)
 328         pci_write_32 ((u_int32_t *) &comet->rlps_eqvr, 0x2c);   /* RLPS Equalizer
 329                                                                  * Voltage  */
 330     else
 331         pci_write_32 ((u_int32_t *) &comet->rlps_eqvr, 0x34);   /* RLPS Equalizer
 332                                                                  * Voltage  */
 333
 334     /* Reserved bit set and SQUELCH enabled */
 335     /* f8: RLPS cfg & status  f9: RLPS ALOS detect/clear threshold */
 336     pci_write_32 ((u_int32_t *) &comet->rlps_cfgsts, 0x11);     /* RLPS Configuration
 337                                                                  * Status */
 338     if (isT1mode)
 339         pci_write_32 ((u_int32_t *) &comet->rlps_alos_thresh, 0x55);    /* ? */
 340     else
 341         pci_write_32 ((u_int32_t *) &comet->rlps_alos_thresh, 0x22);    /* ? */
 342
 343
 344     /* Set Full Frame mode (NXDSO[1] = 0, NXDSO[0] = 0) */
 345     /* CMODE=0: Clock slave mode with BTCLK as an input, DE=1: Use rising */
 346     /* edge of BTCLK for data, FE=1: Use rising edge of BTCLK for frame, */
 347     /* CMS=0: Use backplane freq, RATE[1:0]=0,0: T1 */
 348 /***    Transmit side is always an Input, Slave Clock*/
 349     /* 40: BTIF cfg  41: BTIF frame pulse cfg */
 350     if (isT1mode)
 351         pci_write_32 ((u_int32_t *) &comet->btif_cfg, 0x38);    /* BTIF Configuration
 352                                                                  * Reg. */
 353     else
 354         pci_write_32 ((u_int32_t *) &comet->btif_cfg, 0x39);    /* BTIF Configuration
 355                                                                  * Reg. */
 356
 357     pci_write_32 ((u_int32_t *) &comet->btif_fpcfg, 0x01);      /* BTIF Frame Pulse
 358                                                                  * Config. */
 359
 360     /* 0a: master diag  06: tx timing options */
 361     /* if set Comet to loop back */
 362
 363     /* Comets set to normal */
 364     pci_write_32 ((u_int32_t *) &comet->mdiag, 0x00);
 365
 366     /* BTCLK driven by TCLKI internally (crystal driven) and Xmt Elasted  */
 367     /* Store is enabled. */
 368
 369     WrtXmtWaveformTbl (ci, comet, TWV_table[tix]);
 370     if (isT1mode)
 371         WrtRcvEqualizerTbl ((ci_t *) ci, comet, &T1_Equalizer[0]);
 372     else
 373         WrtRcvEqualizerTbl ((ci_t *) ci, comet, &E1_Equalizer[0]);
 374     SetPwrLevel (comet);
 375 }
 376
 377 /*
 378 ** Name:        WrtXmtWaveform
 379 ** Description: Formulate the Data for the Pulse Waveform Storage
 380 **                Write register, (F2), from the sample and unit inputs.
 381 **                Write the data to the Pulse Waveform Storage Data register.
 382 ** Returns:     Nothing
 383 */
 384 STATIC void
 385 WrtXmtWaveform (ci_t * ci, comet_t * comet, u_int32_t sample, u_int32_t unit, u_int8_t data)
 386 {
 387     u_int8_t    WaveformAddr;
 388
 389     WaveformAddr = (sample << 3) + (unit & 7);
 390     pci_write_32 ((u_int32_t *) &comet->xlpg_pwave_addr, WaveformAddr);
 391     pci_flush_write (ci);           /* for write order preservation when
 392                                      * Optimizing driver */
 393     pci_write_32 ((u_int32_t *) &comet->xlpg_pwave_data, 0x7F & data);
 394 }
 395
 396 /*
 397 ** Name:        WrtXmtWaveformTbl
 398 ** Description: Fill in the Transmit Waveform Values
 399 **                for driving the transmitter DAC.
 400 ** Returns:     Nothing
 401 */
 402 STATIC void
 403 WrtXmtWaveformTbl (ci_t * ci, comet_t * comet,
 404                    u_int8_t table[COMET_NUM_SAMPLES][COMET_NUM_UNITS])
 405 {
 406     u_int32_t sample, unit;
 407
 408     for (sample = 0; sample < COMET_NUM_SAMPLES; sample++)
 409     {
 410         for (unit = 0; unit < COMET_NUM_UNITS; unit++)
 411             WrtXmtWaveform (ci, comet, sample, unit, table[sample][unit]);
 412     }
 413
 414     /* Enable transmitter and set output amplitude */
 415     pci_write_32 ((u_int32_t *) &comet->xlpg_cfg, table[COMET_NUM_SAMPLES][0]);
 416 }
 417
 418
 419 /*
 420 ** Name:        WrtXmtWaveform
 421 ** Description: Fill in the Receive Equalizer RAM from the desired
 422 **                table.
 423 ** Returns:     Nothing
 424 **
 425 ** Remarks:  Per PM4351 Device Errata, Receive Equalizer RAM Initialization
 426 **           is coded with early setup of indirect address.
 427 */
 428
 429 STATIC void
 430 WrtRcvEqualizerTbl (ci_t * ci, comet_t * comet, u_int32_t *table)
 431 {
 432     u_int32_t   ramaddr;
 433     volatile u_int32_t value;
 434
 435     for (ramaddr = 0; ramaddr < 256; ramaddr++)
 436     {
 437         /*** the following lines are per Errata 7, 2.5 ***/
 438         {
 439             pci_write_32 ((u_int32_t *) &comet->rlps_eq_rwsel, 0x80);   /* Set up for a read
 440                                                                          * operation */
 441             pci_flush_write (ci);   /* for write order preservation when
 442                                      * Optimizing driver */
 443             pci_write_32 ((u_int32_t *) &comet->rlps_eq_iaddr, (u_int8_t) ramaddr); /* write the addr,
 444                                                                                   * initiate a read */
 445             pci_flush_write (ci);   /* for write order preservation when
 446                                      * Optimizing driver */
 447             /*
 448              * wait 3 line rate clock cycles to ensure address bits are
 449              * captured by T1/E1 clock
 450              */
 451             OS_uwait (4, "wret");   /* 683ns * 3 = 1366 ns, approx 2us (but
 452                                      * use 4us) */
 453         }
 454
 455         value = *table++;
 456         pci_write_32 ((u_int32_t *) &comet->rlps_idata3, (u_int8_t) (value >> 24));
 457         pci_write_32 ((u_int32_t *) &comet->rlps_idata2, (u_int8_t) (value >> 16));
 458         pci_write_32 ((u_int32_t *) &comet->rlps_idata1, (u_int8_t) (value >> 8));
 459         pci_write_32 ((u_int32_t *) &comet->rlps_idata0, (u_int8_t) value);
 460         pci_flush_write (ci);       /* for write order preservation when
 461                                      * Optimizing driver */
 462
 463         /* Storing RAM address, causes RAM to be updated */
 464
 465         pci_write_32 ((u_int32_t *) &comet->rlps_eq_rwsel, 0);  /* Set up for a write
 466                                                                  * operation */
 467         pci_flush_write (ci);       /* for write order preservation when
 468                                      * Optimizing driver */
 469         pci_write_32 ((u_int32_t *) &comet->rlps_eq_iaddr, (u_int8_t) ramaddr); /* write the addr,
 470                                                                                  * initiate a read */
 471         pci_flush_write (ci);       /* for write order preservation when
 472                                      * Optimizing driver */
 473         /*
 474          * wait 3 line rate clock cycles to ensure address bits are captured
 475          * by T1/E1 clock
 476          */
 477         OS_uwait (4, "wret");       /* 683ns * 3 = 1366 ns, approx 2us (but
 478                                      * use 4us) */
 479     }
 480
 481     pci_write_32 ((u_int32_t *) &comet->rlps_eq_cfg, 0xCB);     /* Enable Equalizer &
 482                                                                  * set it to use 256
 483                                                                  * periods */
 484 }
 485
 486
 487 /*
 488 ** Name:        SetPwrLevel
 489 ** Description: Implement power level setting algorithm described below
 490 ** Returns:     Nothing
 491 */
 492
 493 STATIC void
 494 SetPwrLevel (comet_t * comet)
 495 {
 496     volatile u_int32_t temp;
 497
 498 /*
 499 **    Algorithm to Balance the Power Distribution of Ttip Tring
 500 **
 501 **    Zero register F6
 502 **    Write 0x01 to register F4
 503 **    Write another 0x01 to register F4
 504 **    Read register F4
 505 **    Remove the 0x01 bit by Anding register F4 with 0xFE
 506 **    Write the resultant value to register F4
 507 **    Repeat these steps for register F5
 508 **    Write 0x01 to register F6
 509 */
 510     pci_write_32 ((u_int32_t *) &comet->xlpg_fdata_sel, 0x00);  /* XLPG Fuse Data Select */
 511
 512     pci_write_32 ((u_int32_t *) &comet->xlpg_atest_pctl, 0x01); /* XLPG Analog Test
 513                                                                  * Positive control */
 514     pci_write_32 ((u_int32_t *) &comet->xlpg_atest_pctl, 0x01);
 515
 516     temp = pci_read_32 ((u_int32_t *) &comet->xlpg_atest_pctl) & 0xfe;
 517     pci_write_32 ((u_int32_t *) &comet->xlpg_atest_pctl, temp);
 518
 519     pci_write_32 ((u_int32_t *) &comet->xlpg_atest_nctl, 0x01); /* XLPG Analog Test
 520                                                                  * Negative control */
 521     pci_write_32 ((u_int32_t *) &comet->xlpg_atest_nctl, 0x01);
 522
 523     temp = pci_read_32 ((u_int32_t *) &comet->xlpg_atest_nctl) & 0xfe;
 524     pci_write_32 ((u_int32_t *) &comet->xlpg_atest_nctl, temp);
 525     pci_write_32 ((u_int32_t *) &comet->xlpg_fdata_sel, 0x01);  /* XLPG */
 526 }
 527
 528
 529 /*
 530 ** Name:        SetCometOps
 531 ** Description: Set up the selected Comet's clock edge drive for both
 532 **                the transmit out the analog side and receive to the
 533 **                backplane side.
 534 ** Returns:     Nothing
 535 */
 536
 537 /***  End-of-File  ***/