Merge branch 'master' of git://git.denx.de/u-boot-usb
[platform/kernel/u-boot.git] / common / cmd_universe.c
1 /*
2  * (C) Copyright 2003 Stefan Roese, stefan.roese@esd-electronics.com
3  *
4  * See file CREDITS for list of people who contributed to this
5  * project.
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License as
9  * published by the Free Software Foundation; either version 2 of
10  * the License, or (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
20  * MA 02111-1307 USA
21  */
22
23 #include <common.h>
24 #include <command.h>
25 #include <malloc.h>
26 #include <asm/io.h>
27 #include <pci.h>
28
29 #include <universe.h>
30
31 #define PCI_VENDOR PCI_VENDOR_ID_TUNDRA
32 #define PCI_DEVICE PCI_DEVICE_ID_TUNDRA_CA91C042
33
34
35 typedef struct _UNI_DEV UNI_DEV;
36
37 struct _UNI_DEV {
38         int            bus;
39         pci_dev_t      busdevfn;
40         UNIVERSE       *uregs;
41         unsigned int   pci_bs;
42 };
43
44 static UNI_DEV   *dev;
45
46
47 int universe_init(void)
48 {
49         int j, result;
50         pci_dev_t busdevfn;
51         unsigned int val;
52
53         busdevfn = pci_find_device(PCI_VENDOR, PCI_DEVICE, 0);
54         if (busdevfn == -1) {
55                 puts("No Tundra Universe found!\n");
56                 return -1;
57         }
58
59         /* Lets turn Latency off */
60         pci_write_config_dword(busdevfn, 0x0c, 0);
61
62         dev = malloc(sizeof(*dev));
63         if (NULL == dev) {
64                 puts("UNIVERSE: No memory!\n");
65                 result = -1;
66                 goto break_20;
67         }
68
69         memset(dev, 0, sizeof(*dev));
70         dev->busdevfn = busdevfn;
71
72         pci_read_config_dword(busdevfn, PCI_BASE_ADDRESS_1, &val);
73         if (val & 1) {
74                 pci_read_config_dword(busdevfn, PCI_BASE_ADDRESS_0, &val);
75         }
76         val &= ~0xf;
77         dev->uregs = (UNIVERSE *)val;
78
79         debug ("UNIVERSE-Base    : %p\n", dev->uregs);
80
81         /* check mapping  */
82         debug (" Read via mapping, PCI_ID = %08X\n", readl(&dev->uregs->pci_id));
83         if (((PCI_DEVICE <<16) | PCI_VENDOR) !=  readl(&dev->uregs->pci_id)) {
84                 printf ("UNIVERSE: Cannot read PCI-ID via Mapping: %08x\n",
85                         readl(&dev->uregs->pci_id));
86                 result = -1;
87                 goto break_30;
88         }
89
90         debug ("PCI_BS = %08X\n", readl(&dev->uregs->pci_bs));
91
92         dev->pci_bs = readl(&dev->uregs->pci_bs);
93
94         /* turn off windows */
95         for (j=0; j <4; j ++) {
96                 writel(0x00800000, &dev->uregs->lsi[j].ctl);
97                 writel(0x00800000, &dev->uregs->vsi[j].ctl);
98         }
99
100         /*
101          * Write to Misc Register
102          * Set VME Bus Time-out
103          *   Arbitration Mode
104          *   DTACK Enable
105          */
106         writel(0x15040000 | (readl(&dev->uregs->misc_ctl) & 0x00020000), &dev->uregs->misc_ctl);
107
108         if (readl(&dev->uregs->misc_ctl) & 0x00020000) {
109                 debug ("System Controller!\n"); /* test-only */
110         } else {
111                 debug ("Not System Controller!\n"); /* test-only */
112         }
113
114         /*
115          * Lets turn off interrupts
116          */
117         writel(0x00000000,&dev->uregs->lint_en);   /* Disable interrupts in the Universe first */
118         writel(0x0000FFFF,&dev->uregs->lint_stat); /* Clear Any Pending Interrupts */
119         eieio();
120         writel(0x0000, &dev->uregs->lint_map0);  /* Map all ints to 0 */
121         writel(0x0000, &dev->uregs->lint_map1);  /* Map all ints to 0 */
122         eieio();
123
124         return 0;
125
126  break_30:
127         free(dev);
128  break_20:
129         return result;
130 }
131
132
133 /*
134  * Create pci slave window (access: pci -> vme)
135  */
136 int universe_pci_slave_window(unsigned int pciAddr, unsigned int vmeAddr, int size, int vam, int pms, int vdw)
137 {
138         int result, i;
139         unsigned int ctl = 0;
140
141         if (NULL == dev) {
142                 result = -1;
143                 goto exit_10;
144         }
145
146         for (i = 0; i < 4; i++) {
147                 if (0x00800000 == readl(&dev->uregs->lsi[i].ctl))
148                         break;
149         }
150
151         if (i == 4) {
152                 printf ("universe: No Image available\n");
153                 result = -1;
154                 goto exit_10;
155         }
156
157         debug ("universe: Using image %d\n", i);
158
159         writel(pciAddr , &dev->uregs->lsi[i].bs);
160         writel((pciAddr + size), &dev->uregs->lsi[i].bd);
161         writel((vmeAddr - pciAddr), &dev->uregs->lsi[i].to);
162
163         switch (vam & VME_AM_Axx) {
164         case VME_AM_A16:
165                 ctl = 0x00000000;
166                 break;
167         case VME_AM_A24:
168                 ctl = 0x00010000;
169                 break;
170         case VME_AM_A32:
171                 ctl = 0x00020000;
172                 break;
173         }
174
175         switch (vam & VME_AM_Mxx) {
176         case VME_AM_DATA:
177                 ctl |= 0x00000000;
178                 break;
179         case VME_AM_PROG:
180                 ctl |= 0x00008000;
181                 break;
182         }
183
184         if (vam & VME_AM_SUP) {
185                 ctl |= 0x00001000;
186
187         }
188
189         switch (vdw & VME_FLAG_Dxx) {
190         case VME_FLAG_D8:
191                 ctl |= 0x00000000;
192                 break;
193         case VME_FLAG_D16:
194                 ctl |= 0x00400000;
195                 break;
196         case VME_FLAG_D32:
197                 ctl |= 0x00800000;
198                 break;
199         }
200
201         switch (pms & PCI_MS_Mxx) {
202         case PCI_MS_MEM:
203                 ctl |= 0x00000000;
204                 break;
205         case PCI_MS_IO:
206                 ctl |= 0x00000001;
207                 break;
208         case PCI_MS_CONFIG:
209                 ctl |= 0x00000002;
210                 break;
211         }
212
213         ctl |= 0x80000000;    /* enable */
214
215         writel(ctl, &dev->uregs->lsi[i].ctl);
216
217         debug ("universe: window-addr=%p\n", &dev->uregs->lsi[i].ctl);
218         debug ("universe: pci slave window[%d] ctl=%08x\n", i, readl(&dev->uregs->lsi[i].ctl));
219         debug ("universe: pci slave window[%d] bs=%08x\n", i, readl(&dev->uregs->lsi[i].bs));
220         debug ("universe: pci slave window[%d] bd=%08x\n", i, readl(&dev->uregs->lsi[i].bd));
221         debug ("universe: pci slave window[%d] to=%08x\n", i, readl(&dev->uregs->lsi[i].to));
222
223         return 0;
224
225  exit_10:
226         return -result;
227 }
228
229
230 /*
231  * Create vme slave window (access: vme -> pci)
232  */
233 int universe_vme_slave_window(unsigned int vmeAddr, unsigned int pciAddr, int size, int vam, int pms)
234 {
235         int result, i;
236         unsigned int ctl = 0;
237
238         if (NULL == dev) {
239                 result = -1;
240                 goto exit_10;
241         }
242
243         for (i = 0; i < 4; i++) {
244                 if (0x00800000 == readl(&dev->uregs->vsi[i].ctl))
245                         break;
246         }
247
248         if (i == 4) {
249                 printf ("universe: No Image available\n");
250                 result = -1;
251                 goto exit_10;
252         }
253
254         debug ("universe: Using image %d\n", i);
255
256         writel(vmeAddr , &dev->uregs->vsi[i].bs);
257         writel((vmeAddr + size), &dev->uregs->vsi[i].bd);
258         writel((pciAddr - vmeAddr), &dev->uregs->vsi[i].to);
259
260         switch (vam & VME_AM_Axx) {
261         case VME_AM_A16:
262                 ctl = 0x00000000;
263                 break;
264         case VME_AM_A24:
265                 ctl = 0x00010000;
266                 break;
267         case VME_AM_A32:
268                 ctl = 0x00020000;
269                 break;
270         }
271
272         switch (vam & VME_AM_Mxx) {
273         case VME_AM_DATA:
274                 ctl |= 0x00000000;
275                 break;
276         case VME_AM_PROG:
277                 ctl |= 0x00800000;
278                 break;
279         }
280
281         if (vam & VME_AM_SUP) {
282                 ctl |= 0x00100000;
283
284         }
285
286         switch (pms & PCI_MS_Mxx) {
287         case PCI_MS_MEM:
288                 ctl |= 0x00000000;
289                 break;
290         case PCI_MS_IO:
291                 ctl |= 0x00000001;
292                 break;
293         case PCI_MS_CONFIG:
294                 ctl |= 0x00000002;
295                 break;
296         }
297
298         ctl |= 0x80f00000;    /* enable */
299
300         writel(ctl, &dev->uregs->vsi[i].ctl);
301
302         debug ("universe: window-addr=%p\n", &dev->uregs->vsi[i].ctl);
303         debug ("universe: vme slave window[%d] ctl=%08x\n", i, readl(&dev->uregs->vsi[i].ctl));
304         debug ("universe: vme slave window[%d] bs=%08x\n", i, readl(&dev->uregs->vsi[i].bs));
305         debug ("universe: vme slave window[%d] bd=%08x\n", i, readl(&dev->uregs->vsi[i].bd));
306         debug ("universe: vme slave window[%d] to=%08x\n", i, readl(&dev->uregs->vsi[i].to));
307
308         return 0;
309
310  exit_10:
311         return -result;
312 }
313
314
315 /*
316  * Tundra Universe configuration
317  */
318 int do_universe(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
319 {
320         ulong addr1 = 0, addr2 = 0, size = 0, vam = 0, pms = 0, vdw = 0;
321         char cmd = 'x';
322
323         /* get parameter */
324         if (argc > 1)
325                 cmd = argv[1][0];
326         if (argc > 2)
327                 addr1 = simple_strtoul(argv[2], NULL, 16);
328         if (argc > 3)
329                 addr2 = simple_strtoul(argv[3], NULL, 16);
330         if (argc > 4)
331                 size = simple_strtoul(argv[4], NULL, 16);
332         if (argc > 5)
333                 vam = simple_strtoul(argv[5], NULL, 16);
334         if (argc > 6)
335                 pms = simple_strtoul(argv[6], NULL, 16);
336         if (argc > 7)
337                 vdw = simple_strtoul(argv[7], NULL, 16);
338
339         switch (cmd) {
340         case 'i':               /* init */
341                 universe_init();
342                 break;
343         case 'v':               /* vme */
344                 printf("Configuring Universe VME Slave Window (VME->PCI):\n");
345                 printf("  vme=%08lx pci=%08lx size=%08lx vam=%02lx pms=%02lx\n",
346                        addr1, addr2, size, vam, pms);
347                 universe_vme_slave_window(addr1, addr2, size, vam, pms);
348                 break;
349         case 'p':               /* pci */
350                 printf("Configuring Universe PCI Slave Window (PCI->VME):\n");
351                 printf("  pci=%08lx vme=%08lx size=%08lx vam=%02lx pms=%02lx vdw=%02lx\n",
352                        addr1, addr2, size, vam, pms, vdw);
353                 universe_pci_slave_window(addr1, addr2, size, vam, pms, vdw);
354                 break;
355         default:
356                 printf("Universe command %s not supported!\n", argv[1]);
357         }
358
359         return 0;
360 }
361
362
363 U_BOOT_CMD(
364         universe,       8,      1,      do_universe,
365         "initialize and configure Turndra Universe",
366         "init\n"
367         "    - initialize universe\n"
368         "universe vme [vme_addr] [pci_addr] [size] [vam] [pms]\n"
369         "    - create vme slave window (access: vme->pci)\n"
370         "universe pci [pci_addr] [vme_addr] [size] [vam] [pms] [vdw]\n"
371         "    - create pci slave window (access: pci->vme)\n"
372         "    [vam] = VMEbus Address-Modifier:  01 -> A16 Address Space\n"
373         "                                      02 -> A24 Address Space\n"
374         "                                      03 -> A32 Address Space\n"
375         "                                      04 -> Supervisor AM Code\n"
376         "                                      10 -> Data AM Code\n"
377         "                                      20 -> Program AM Code\n"
378         "    [pms] = PCI Memory Space:         01 -> Memory Space\n"
379         "                                      02 -> I/O Space\n"
380         "                                      03 -> Configuration Space\n"
381         "    [vdw] = VMEbus Maximum Datawidth: 01 -> D8 Data Width\n"
382         "                                      02 -> D16 Data Width\n"
383         "                                      03 -> D32 Data Width"
384 );