universe.c 8.3 KB

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