board/sc520_spunk/sc520_spunk.c

   1 /*
   2  *
   3  * (C) Copyright 2002
   4  * Daniel Engström, Omicron Ceti AB <daniel@omicron.se>.
   5  *
   6  * See file CREDITS for list of people who contributed to this
   7  * project.
   8  *
   9  * This program is free software; you can redistribute it and/or
  10  * modify it under the terms of the GNU General Public License as
  11  * published by the Free Software Foundation; either version 2 of
  12  * the License, or (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  22  * MA 02111-1307 USA
  23  */
  24
  25 #include <common.h>
  26 #include <pci.h>
  27 #include <ssi.h>
  28 #include <asm/io.h>
  29 #include <asm/pci.h>
  30 #include <asm/ic/sc520.h>
  31
  32
  33 /* ------------------------------------------------------------------------- */
  34
  35
  36 /*
  37  * Theory:
  38  * We first set up all IRQs to be non-pci, edge triggered,
  39  * when we later enumerate the pci bus and pci_sc520_fixup_irq() gets
  40  * called we reallocate irqs to the pci bus with sc520_pci_set_irq()
  41  * as needed. Whe choose the irqs to gram from a configurable list
  42  * inside pci_sc520_fixup_irq() (If this list contains stupid irq's
  43  * such as 0 thngas will not work)
  44  */
  45
  46 static void irq_init(void)
  47 {
  48         /* disable global interrupt mode */
  49         write_mmcr_byte(SC520_PICICR, 0x40);
  50
  51         /* set all irqs to edge */
  52         write_mmcr_byte(SC520_MPICMODE, 0x00);
  53         write_mmcr_byte(SC520_SL1PICMODE, 0x00);
  54         write_mmcr_byte(SC520_SL2PICMODE, 0x00);
  55
  56         /* active low polarity on PIC interrupt pins,
  57          *  active high polarity on all other irq pins */
  58         write_mmcr_word(SC520_INTPINPOL, 0x0000);
  59
  60         /* set irq number mapping */
  61         write_mmcr_byte(SC520_GPTMR0MAP, SC520_IRQ_DISABLED);   /* disable GP timer 0 INT */
  62         write_mmcr_byte(SC520_GPTMR1MAP, SC520_IRQ_DISABLED);   /* disable GP timer 1 INT */
  63         write_mmcr_byte(SC520_GPTMR2MAP, SC520_IRQ_DISABLED);   /* disable GP timer 2 INT */
  64         write_mmcr_byte(SC520_PIT0MAP, SC520_IRQ0);             /* Set PIT timer 0 INT to IRQ0 */
  65         write_mmcr_byte(SC520_PIT1MAP, SC520_IRQ_DISABLED);     /* disable PIT timer 1 INT */
  66         write_mmcr_byte(SC520_PIT2MAP, SC520_IRQ_DISABLED);     /* disable PIT timer 2 INT */
  67         write_mmcr_byte(SC520_PCIINTAMAP, SC520_IRQ_DISABLED);  /* disable PCI INT A */
  68         write_mmcr_byte(SC520_PCIINTBMAP, SC520_IRQ_DISABLED);  /* disable PCI INT B */
  69         write_mmcr_byte(SC520_PCIINTCMAP, SC520_IRQ_DISABLED);  /* disable PCI INT C */
  70         write_mmcr_byte(SC520_PCIINTDMAP, SC520_IRQ_DISABLED);  /* disable PCI INT D */
  71         write_mmcr_byte(SC520_DMABCINTMAP, SC520_IRQ_DISABLED); /* disable DMA INT */
  72         write_mmcr_byte(SC520_SSIMAP, SC520_IRQ6);              /* Set Synchronius serial INT to IRQ6*/
  73         write_mmcr_byte(SC520_WDTMAP, SC520_IRQ_DISABLED);      /* disable Watchdog INT */
  74         write_mmcr_byte(SC520_RTCMAP, SC520_IRQ8);              /* Set RTC int to 8 */
  75         write_mmcr_byte(SC520_WPVMAP, SC520_IRQ_DISABLED);      /* disable write protect INT */
  76         write_mmcr_byte(SC520_ICEMAP, SC520_IRQ1);              /* Set ICE Debug Serielport INT to IRQ1 */
  77         write_mmcr_byte(SC520_FERRMAP,SC520_IRQ13);             /* Set FP error INT to IRQ13 */
  78
  79         write_mmcr_byte(SC520_UART1MAP, SC520_IRQ4);            /* Set internal UART2 INT to IRQ4 */
  80         write_mmcr_byte(SC520_UART2MAP, SC520_IRQ3);            /* Set internal UART2 INT to IRQ3 */
  81
  82         write_mmcr_byte(SC520_GP0IMAP, SC520_IRQ7);             /* Set GPIRQ0 (PC-Card AUX IRQ) to IRQ7 */
  83         write_mmcr_byte(SC520_GP1IMAP, SC520_IRQ14);            /* Set GPIRQ1 (CF IRQ) to IRQ14 */
  84         write_mmcr_byte(SC520_GP3IMAP, SC520_IRQ5);             /* Set GPIRQ3 ( CAN IRQ ) ti IRQ5 */
  85         write_mmcr_byte(SC520_GP4IMAP, SC520_IRQ_DISABLED);     /* disbale GIRQ4 ( IRR IRQ ) */
  86         write_mmcr_byte(SC520_GP5IMAP, SC520_IRQ_DISABLED);     /* disable GPIRQ5 */
  87         write_mmcr_byte(SC520_GP6IMAP, SC520_IRQ_DISABLED);     /* disable GPIRQ6 */
  88         write_mmcr_byte(SC520_GP7IMAP, SC520_IRQ_DISABLED);     /* disable GPIRQ7 */
  89         write_mmcr_byte(SC520_GP8IMAP, SC520_IRQ_DISABLED);     /* disable GPIRQ8 */
  90         write_mmcr_byte(SC520_GP9IMAP, SC520_IRQ_DISABLED);     /* disable GPIRQ9 */
  91         write_mmcr_byte(SC520_GP2IMAP, SC520_IRQ_DISABLED);     /* disable GPIRQ2 */
  92         write_mmcr_byte(SC520_GP10IMAP,SC520_IRQ_DISABLED);     /* disable GPIRQ10 */
  93
  94         write_mmcr_word(SC520_PCIHOSTMAP, 0x11f);               /* Map PCI hostbridge INT to NMI */
  95         write_mmcr_word(SC520_ECCMAP, 0x100);                   /* Map SDRAM ECC failure INT to NMI */
  96
  97 }
  98
  99
 100 /* PCI stuff */
 101 static void pci_sc520_spunk_fixup_irq(struct pci_controller *hose, pci_dev_t dev)
 102 {
 103         int version = read_mmcr_byte(SC520_SYSINFO);
 104
 105         /* a configurable lists of irqs to steal
 106          * when we need one (a board with more pci interrupt pins
 107          * would use a larger table */
 108         static int irq_list[] = {
 109                 CFG_FIRST_PCI_IRQ,
 110                 CFG_SECOND_PCI_IRQ,
 111                 CFG_THIRD_PCI_IRQ,
 112                 CFG_FORTH_PCI_IRQ
 113         };
 114         static int next_irq_index=0;
 115
 116         char tmp_pin;
 117         int pin;
 118
 119         pci_hose_read_config_byte(hose, dev, PCI_INTERRUPT_PIN, &tmp_pin);
 120         pin = tmp_pin;
 121
 122         pin-=1; /* pci config space use 1-based numbering */
 123         if (-1 == pin) {
 124                 return; /* device use no irq */
 125         }
 126
 127
 128         /* map device number +  pin to a pin on the sc520 */
 129         switch (PCI_DEV(dev)) {
 130         case 6:  /* ETH0 */
 131                 pin+=SC520_PCI_INTA;
 132                 break;
 133
 134         case 7:  /* ETH1 */
 135                 pin+=SC520_PCI_INTB;
 136                 break;
 137
 138         case 8:  /* Crypto */
 139                 pin+=SC520_PCI_INTC;
 140                 break;
 141
 142         case 9: /* PMC slot */
 143                 pin+=SC520_PCI_INTD;
 144                 break;
 145
 146         case 10: /* PC-Card */
 147
 148                 if (version < 10) {
 149                         pin+=SC520_PCI_INTD;
 150                 } else {
 151                         pin+=SC520_PCI_INTC;
 152                 }
 153                 break;
 154
 155         default:
 156                 return;
 157         }
 158
 159         pin&=3; /* wrap around */
 160
 161         if (sc520_pci_ints[pin] == -1) {
 162                 /* re-route one interrupt for us */
 163                 if (next_irq_index > 3) {
 164                         return;
 165                 }
 166                 if (pci_sc520_set_irq(pin, irq_list[next_irq_index])) {
 167                         return;
 168                 }
 169                 next_irq_index++;
 170         }
 171
 172
 173         if (-1 != sc520_pci_ints[pin]) {
 174                 pci_hose_write_config_byte(hose, dev, PCI_INTERRUPT_LINE,
 175                                            sc520_pci_ints[pin]);
 176         }
 177 #if 0
 178         printf("fixup_irq: device %d pin %c irq %d\n",
 179                PCI_DEV(dev), 'A' + pin, sc520_pci_ints[pin]);
 180 #endif
 181 }
 182
 183
 184 static void pci_sc520_spunk_configure_cardbus(struct pci_controller *hose,
 185                                               pci_dev_t dev, struct pci_config_table *te)
 186 {
 187         u32 io_base;
 188         u32 temp;
 189
 190         pciauto_config_device(hose, dev);
 191
 192         pci_hose_write_config_word(hose, dev, PCI_COMMAND, 0x07);  /* enable device */
 193         pci_hose_write_config_byte(hose, dev, 0x0c, 0x10);         /* cacheline size */
 194         pci_hose_write_config_byte(hose, dev, 0x0d, 0x40);         /* latency timer */
 195         pci_hose_write_config_byte(hose, dev, 0x1b, 0x40);         /* cardbus latency timer */
 196         pci_hose_write_config_word(hose, dev, PCI_BRIDGE_CONTROL, 0x0040);  /* reset cardbus */
 197         pci_hose_write_config_word(hose, dev, PCI_BRIDGE_CONTROL, 0x0080);  /* route interrupts though ExCA */
 198         pci_hose_write_config_word(hose, dev,  0x44, 0x3e0); /* map legacy I/O port to 0x3e0 */
 199
 200         pci_hose_read_config_dword(hose, dev,  0x80, &temp); /* System control */
 201         pci_hose_write_config_dword(hose, dev,  0x80, temp | 0x60); /* System control: disable clockrun */
 202         /* route MF0 to ~INT and MF3 to IRQ7
 203          * reserve all others */
 204         pci_hose_write_config_dword(hose, dev, 0x8c, 0x00007002);
 205         pci_hose_write_config_byte(hose, dev, 0x91, 0x00);    /* card control */
 206         pci_hose_write_config_byte(hose, dev, 0x92, 0x62);    /* device control */
 207
 208         if (te->device != 0xac56) {
 209                 pci_hose_write_config_byte(hose, dev, 0x93, 0x21);    /* async interrupt enable */
 210                 pci_hose_write_config_word(hose, dev, 0xa8, 0x0000);  /* reset GPIO */
 211                 pci_hose_write_config_word(hose, dev, 0xac, 0x0000);  /* reset GPIO */
 212                 pci_hose_write_config_word(hose, dev, 0xaa, 0x0000);  /* reset GPIO */
 213                 pci_hose_write_config_word(hose, dev, 0xae, 0x0000);  /* reset GPIO */
 214         } else {
 215                 pci_hose_write_config_byte(hose, dev, 0x93, 0x20);    /*  */
 216         }
 217         pci_hose_write_config_word(hose, dev, 0xa4, 0x8000);  /* reset power management */
 218
 219
 220         pci_hose_read_config_dword(hose, dev, PCI_BASE_ADDRESS_0, &io_base);
 221         io_base &= ~0xfL;
 222
 223         writeb(0x07, io_base+0x803); /* route CSC irq though ExCA and enable IRQ7 */
 224         writel(0, io_base+0x10);     /* CLKRUN default */
 225         writel(0, io_base+0x20);     /* CLKRUN default */
 226
 227 }
 228
 229
 230 static struct pci_config_table pci_sc520_spunk_config_table[] = {
 231         { 0x104c, 0xac50, PCI_ANY_ID, 0, 0x0a, 0, pci_sc520_spunk_configure_cardbus, { 0, 0, 0} },
 232         { 0x104c, 0xac56, PCI_ANY_ID, 0, 0x0a, 0, pci_sc520_spunk_configure_cardbus, { 0, 0, 0} },
 233         { 0, 0, 0, 0, 0, 0, NULL, {0,0,0}}
 234 };
 235
 236 static struct pci_controller sc520_spunk_hose = {
 237         fixup_irq: pci_sc520_spunk_fixup_irq,
 238         config_table: pci_sc520_spunk_config_table,
 239         first_busno: 0x00,
 240         last_busno: 0xff,
 241 };
 242
 243 void pci_init_board(void)
 244 {
 245         pci_sc520_init(&sc520_spunk_hose);
 246 }
 247
 248
 249 /* set up the ISA bus timing and system address mappings */
 250 static void bus_init(void)
 251 {
 252         /* versions
 253          * 0   Hyglo versions 0.95 and 0.96 (large baords)
 254          * ??  Hyglo version 0.97 (small board)
 255          * 10  Spunk board
 256          */
 257         int version = read_mmcr_byte(SC520_SYSINFO);
 258
 259         if (version) {
 260                 /* set up the GP IO pins (for the Spunk board) */
 261                 write_mmcr_word(SC520_PIOPFS31_16, 0xfff0);     /* set the GPIO pin function 31-16 reg */
 262                 write_mmcr_word(SC520_PIOPFS15_0,  0x000f);     /* set the GPIO pin function 15-0 reg */
 263                 write_mmcr_word(SC520_PIODIR31_16, 0x000f);     /* set the GPIO direction 31-16 reg */
 264                 write_mmcr_word(SC520_PIODIR15_0,  0x1ff0);     /* set the GPIO direction 15-0 reg */
 265                 write_mmcr_byte(SC520_CSPFS, 0xc0);             /* set the CS pin function reg */
 266                 write_mmcr_byte(SC520_CLKSEL, 0x70);
 267
 268                 write_mmcr_word(SC520_PIOCLR31_16, 0x0003);     /* reset SSI chip-selects */
 269                 write_mmcr_word(SC520_PIOSET31_16, 0x000c);
 270
 271         } else {
 272                 /* set up the GP IO pins (for the Hyglo board) */
 273                 write_mmcr_word(SC520_PIOPFS31_16, 0xffc0);     /* set the GPIO pin function 31-16 reg */
 274                 write_mmcr_word(SC520_PIOPFS15_0, 0x1e7f);      /* set the GPIO pin function 15-0 reg */
 275                 write_mmcr_word(SC520_PIODIR31_16, 0x003f);     /* set the GPIO direction 31-16 reg */
 276                 write_mmcr_word(SC520_PIODIR15_0, 0xe180);      /* set the GPIO direction 15-0 reg */
 277                 write_mmcr_byte(SC520_CSPFS, 0x00);             /* set the CS pin function reg */
 278                 write_mmcr_byte(SC520_CLKSEL, 0x70);
 279
 280                 write_mmcr_word(SC520_PIOCLR15_0, 0x0180);      /* reset SSI chip-selects */
 281         }
 282
 283         write_mmcr_byte(SC520_GPCSRT, 1);   /* set the GP CS offset */
 284         write_mmcr_byte(SC520_GPCSPW, 3);   /* set the GP CS pulse width */
 285         write_mmcr_byte(SC520_GPCSOFF, 1);  /* set the GP CS offset */
 286         write_mmcr_byte(SC520_GPRDW, 3);    /* set the RD pulse width */
 287         write_mmcr_byte(SC520_GPRDOFF, 1);  /* set the GP RD offset */
 288         write_mmcr_byte(SC520_GPWRW, 3);    /* set the GP WR pulse width */
 289         write_mmcr_byte(SC520_GPWROFF, 1);  /* set the GP WR offset */
 290
 291         write_mmcr_word(SC520_BOOTCSCTL, 0x0407);               /* set up timing of BOOTCS */
 292
 293         /* adjust the memory map:
 294          * by default the first 256MB (0x00000000 - 0x0fffffff) is mapped to SDRAM
 295          * and 256MB to 1G-128k  (0x1000000 - 0x37ffffff) is mapped to PCI mmio
 296          * we need to map 1G-128k - 1G (0x38000000 - 0x3fffffff) to CS1 */
 297
 298
 299         /* bootcs */
 300         write_mmcr_long(SC520_PAR12, 0x8bffe800);
 301
 302         /* IDE0 = GPCS6 1f0-1f7 */
 303         write_mmcr_long(SC520_PAR3,  0x380801f0);
 304
 305         /* IDE1 = GPCS7 3f6 */
 306         write_mmcr_long(SC520_PAR4,  0x3c0003f6);
 307
 308         asm ("wbinvd\n"); /* Flush cache, req. after setting the unchached attribute ona PAR */
 309
 310         write_mmcr_byte(SC520_ADDDECCTL, read_mmcr_byte(SC520_ADDDECCTL) & ~(UART2_DIS|UART1_DIS));
 311
 312 }
 313
 314
 315 /* par usage:
 316  * PAR0   (legacy_video)
 317  * PAR1   (PCI ROM mapping)
 318  * PAR2
 319  * PAR3   IDE
 320  * PAR4   IDE
 321  * PAR5   (legacy_video)
 322  * PAR6
 323  * PAR7   (legacy_video)
 324  * PAR8   (legacy_video)
 325  * PAR9   (legacy_video)
 326  * PAR10
 327  * PAR11  (ISAROM)
 328  * PAR12  BOOTCS
 329  * PAR13
 330  * PAR14
 331  * PAR15
 332  */
 333
 334 /*
 335  * This function should map a chunk of size bytes
 336  * of the system address space to the ISA bus
 337  *
 338  * The function will return the memory address
 339  * as seen by the host (which may very will be the
 340  * same as the bus address)
 341  */
 342 u32 isa_map_rom(u32 bus_addr, int size)
 343 {
 344         u32 par;
 345
 346         printf("isa_map_rom asked to map %d bytes at %x\n",
 347                size, bus_addr);
 348
 349         par = size;
 350         if (par < 0x80000) {
 351                 par = 0x80000;
 352         }
 353         par >>= 12;
 354         par--;
 355         par&=0x7f;
 356         par <<= 18;
 357         par |= (bus_addr>>12);
 358         par |= 0x50000000;
 359
 360         printf ("setting PAR11 to %x\n", par);
 361
 362         /* Map rom 0x10000 with PAR1 */
 363         write_mmcr_long(SC520_PAR11,  par);
 364
 365         return bus_addr;
 366 }
 367
 368 /*
 369  * this function removed any mapping created
 370  * with pci_get_rom_window()
 371  */
 372 void isa_unmap_rom(u32 addr)
 373 {
 374         printf("isa_unmap_rom asked to unmap %x", addr);
 375         if ((addr>>12) == (read_mmcr_long(SC520_PAR11)&0x3ffff)) {
 376                 write_mmcr_long(SC520_PAR11, 0);
 377                 printf(" done\n");
 378                 return;
 379         }
 380         printf(" not ours\n");
 381 }
 382
 383 #ifdef CONFIG_PCI
 384 #define PCI_ROM_TEMP_SPACE 0x10000
 385 /*
 386  * This function should map a chunk of size bytes
 387  * of the system address space to the PCI bus,
 388  * suitable to map PCI ROMS (bus address < 16M)
 389  * the function will return the host memory address
 390  * which should be converted into a bus address
 391  * before used to configure the PCI rom address
 392  * decoder
 393  */
 394 u32 pci_get_rom_window(struct pci_controller *hose, int size)
 395 {
 396         u32 par;
 397
 398         par = size;
 399         if (par < 0x80000) {
 400                 par = 0x80000;
 401         }
 402         par >>= 16;
 403         par--;
 404         par&=0x7ff;
 405         par <<= 14;
 406         par |= (PCI_ROM_TEMP_SPACE>>16);
 407         par |= 0x72000000;
 408
 409         printf ("setting PAR1 to %x\n", par);
 410
 411         /* Map rom 0x10000 with PAR1 */
 412         write_mmcr_long(SC520_PAR1,  par);
 413
 414         return PCI_ROM_TEMP_SPACE;
 415 }
 416
 417 /*
 418  * this function removed any mapping created
 419  * with pci_get_rom_window()
 420  */
 421 void pci_remove_rom_window(struct pci_controller *hose, u32 addr)
 422 {
 423         printf("pci_remove_rom_window: %x", addr);
 424         if (addr == PCI_ROM_TEMP_SPACE) {
 425                 write_mmcr_long(SC520_PAR1, 0);
 426                 printf(" done\n");
 427                 return;
 428         }
 429         printf(" not ours\n");
 430
 431 }
 432
 433 /*
 434  * This function is called in order to provide acces to the
 435  * legacy video I/O ports on the PCI bus.
 436  * After this function accesses to I/O ports 0x3b0-0x3bb and
 437  * 0x3c0-0x3df shuld result in transactions on the PCI bus.
 438  *
 439  */
 440 int pci_enable_legacy_video_ports(struct pci_controller *hose)
 441 {
 442         /* Map video memory to 0xa0000*/
 443         write_mmcr_long(SC520_PAR0,  0x7200400a);
 444
 445         /* forward all I/O accesses to PCI */
 446         write_mmcr_byte(SC520_ADDDECCTL,
 447                         read_mmcr_byte(SC520_ADDDECCTL) | IO_HOLE_DEST_PCI);
 448
 449
 450         /* so we map away all io ports to pci (only way to access pci io
 451          * below 0x400. But then we have to map back the portions that we dont
 452          * use so that the generate cycles on the GPIO bus where the sio and
 453          * ISA slots are connected, this requre the use of several PAR registers
 454          */
 455
 456         /* bring 0x100 - 0x2f7 back to ISA using PAR5 */
 457         write_mmcr_long(SC520_PAR5, 0x31f70100);
 458
 459         /* com2 use 2f8-2ff */
 460
 461         /* bring 0x300 - 0x3af back to ISA using PAR7 */
 462         write_mmcr_long(SC520_PAR7, 0x30af0300);
 463
 464         /* vga use 3b0-3bb */
 465
 466         /* bring 0x3bc - 0x3bf back to ISA using PAR8 */
 467         write_mmcr_long(SC520_PAR8, 0x300303bc);
 468
 469         /* vga use 3c0-3df */
 470
 471         /* bring 0x3e0 - 0x3f7 back to ISA using PAR9 */
 472         write_mmcr_long(SC520_PAR9, 0x301703e0);
 473
 474         /* com1 use 3f8-3ff */
 475
 476         return 0;
 477 }
 478 #endif
 479
 480 /*
 481  * Miscelaneous platform dependent initialisations
 482  */
 483
 484 int board_init(void)
 485 {
 486         DECLARE_GLOBAL_DATA_PTR;
 487
 488         init_sc520();
 489         bus_init();
 490         irq_init();
 491
 492         /* max drive current on SDRAM */
 493         write_mmcr_word(SC520_DSCTL, 0x0100);
 494
 495         /* enter debug mode after next reset (only if jumper is also set) */
 496         write_mmcr_byte(SC520_RESCFG, 0x08);
 497         /* configure the software timer to 33.000MHz */
 498         write_mmcr_byte(SC520_SWTMRCFG, 1);
 499         gd->bus_clk = 33000000;
 500
 501         return 0;
 502 }
 503
 504 int dram_init(void)
 505 {
 506         init_sc520_dram();
 507         return 0;
 508 }
 509
 510 void show_boot_progress(int val)
 511 {
 512         int version = read_mmcr_byte(SC520_SYSINFO);
 513
 514         if (version == 0) {
 515                 /* PIO31-PIO16 Data */
 516                 write_mmcr_word(SC520_PIODATA31_16,
 517                                 (read_mmcr_word(SC520_PIODATA31_16) & 0xffc0)| ((val&0x7e)>>1)); /* 0x1f8 >> 3 */
 518
 519                 /* PIO0-PIO15 Data */
 520                 write_mmcr_word(SC520_PIODATA15_0,
 521                                 (read_mmcr_word(SC520_PIODATA15_0) & 0x1fff)| ((val&0x7)<<13));
 522         } else {
 523                 /* newer boards use PIO4-PIO12 */
 524                 /* PIO0-PIO15 Data */
 525 #if 0
 526                 val = (val & 0x007) | ((val & 0x038) << 3) | ((val & 0x1c0) >> 3);
 527 #else
 528                 val = (val & 0x007) | ((val & 0x07e) << 2);
 529 #endif
 530                 write_mmcr_word(SC520_PIODATA15_0,
 531                                 (read_mmcr_word(SC520_PIODATA15_0) & 0xe00f) | ((val&0x01ff)<<4));
 532         }
 533 }
 534
 535
 536 int last_stage_init(void)
 537 {
 538
 539         int version = read_mmcr_byte(SC520_SYSINFO);
 540
 541         printf("Omicron Ceti SC520 Spunk revision %x\n", version);
 542
 543 #if 0
 544         if (version) {
 545                 int x, y;
 546
 547                 printf("eeprom probe %d\n", spi_eeprom_probe(1));
 548
 549                 spi_eeprom_read(1, 0, (u8*)&x, 2);
 550                 spi_eeprom_read(1, 1, (u8*)&y, 2);
 551                 printf("eeprom bytes %04x%04x\n", x, y);
 552                 x ^= 0xffff;
 553                 y ^= 0xffff;
 554                 spi_eeprom_write(1, 0, (u8*)&x, 2);
 555                 spi_eeprom_write(1, 1, (u8*)&y, 2);
 556
 557                 spi_eeprom_read(1, 0, (u8*)&x, 2);
 558                 spi_eeprom_read(1, 1, (u8*)&y, 2);
 559                 printf("eeprom bytes %04x%04x\n", x, y);
 560
 561         } else {
 562                 int x, y;
 563
 564                 printf("eeprom probe %d\n", mw_eeprom_probe(1));
 565
 566                 mw_eeprom_read(1, 0, (u8*)&x, 2);
 567                 mw_eeprom_read(1, 1, (u8*)&y, 2);
 568                 printf("eeprom bytes %04x%04x\n", x, y);
 569
 570                 x ^= 0xffff;
 571                 y ^= 0xffff;
 572                 mw_eeprom_write(1, 0, (u8*)&x, 2);
 573                 mw_eeprom_write(1, 1, (u8*)&y, 2);
 574
 575                 mw_eeprom_read(1, 0, (u8*)&x, 2);
 576                 mw_eeprom_read(1, 1, (u8*)&y, 2);
 577                 printf("eeprom bytes %04x%04x\n", x, y);
 578
 579
 580         }
 581 #endif
 582
 583         ds1722_probe(2);
 584
 585         return 0;
 586 }
 587
 588 void ssi_chip_select(int dev)
 589 {
 590         int version = read_mmcr_byte(SC520_SYSINFO);
 591
 592         if (version) {
 593                 /* Spunk board: EEPROM and CAN are actove-low, TEMP and AUX are active high */
 594                 switch (dev) {
 595                 case 1: /* EEPROM */
 596                         write_mmcr_word(SC520_PIOCLR31_16, 0x0004);
 597                         break;
 598
 599                 case 2: /* Temp Probe */
 600                         write_mmcr_word(SC520_PIOSET31_16, 0x0002);
 601                         break;
 602
 603                 case 3: /* CAN */
 604                         write_mmcr_word(SC520_PIOCLR31_16, 0x0008);
 605                         break;
 606
 607                 case 4: /* AUX */
 608                         write_mmcr_word(SC520_PIOSET31_16, 0x0001);
 609                         break;
 610
 611                 case 0:
 612                         write_mmcr_word(SC520_PIOCLR31_16, 0x0003);
 613                         write_mmcr_word(SC520_PIOSET31_16, 0x000c);
 614                         break;
 615
 616                 default:
 617                         printf("Illegal SSI device requested: %d\n", dev);
 618                 }
 619         } else {
 620
 621                 /* Globox board: Both EEPROM and TEMP are active-high */
 622
 623                 switch (dev) {
 624                 case 1: /* EEPROM */
 625                         write_mmcr_word(SC520_PIOSET15_0, 0x0100);
 626                         break;
 627
 628                 case 2: /* Temp Probe */
 629                         write_mmcr_word(SC520_PIOSET15_0, 0x0080);
 630                         break;
 631
 632                 case 0:
 633                         write_mmcr_word(SC520_PIOCLR15_0, 0x0180);
 634                         break;
 635
 636                 default:
 637                         printf("Illegal SSI device requested: %d\n", dev);
 638                 }
 639         }
 640 }
 641
 642
 643 void spi_init_f(void)
 644 {
 645         read_mmcr_byte(SC520_SYSINFO) ?
 646                 spi_eeprom_probe(1) :
 647         mw_eeprom_probe(1);
 648
 649 }
 650
 651 ssize_t spi_read(uchar *addr, int alen, uchar *buffer, int len)
 652 {
 653         int offset;
 654         int i;
 655
 656         offset = 0;
 657         for (i=0;i<alen;i++) {
 658                 offset <<= 8;
 659                 offset |= addr[i];
 660         }
 661
 662         return  read_mmcr_byte(SC520_SYSINFO) ?
 663                 spi_eeprom_read(1, offset, buffer, len) :
 664         mw_eeprom_read(1, offset, buffer, len);
 665 }
 666
 667 ssize_t spi_write(uchar *addr, int alen, uchar *buffer, int len)
 668 {
 669         int offset;
 670         int i;
 671
 672         offset = 0;
 673         for (i=0;i<alen;i++) {
 674                 offset <<= 8;
 675                 offset |= addr[i];
 676         }
 677
 678         return  read_mmcr_byte(SC520_SYSINFO) ?
 679                 spi_eeprom_write(1, offset, buffer, len) :
 680         mw_eeprom_write(1, offset, buffer, len);
 681 }