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