cmd_universe.c 9.2 KB

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