xics.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:11k
源码类别:

Linux/Unix编程

开发平台:

Unix_Linux

  1. /* 
  2.  * arch/ppc/kernel/xics.c
  3.  *
  4.  * Copyright 2000 IBM Corporation.
  5.  *
  6.  *  This program is free software; you can redistribute it and/or
  7.  *  modify it under the terms of the GNU General Public License
  8.  *  as published by the Free Software Foundation; either version
  9.  *  2 of the License, or (at your option) any later version.
  10.  */
  11. #include <linux/config.h>
  12. #include <linux/types.h>
  13. #include <linux/threads.h>
  14. #include <linux/kernel.h>
  15. #include <linux/sched.h>
  16. #include <asm/prom.h>
  17. #include <asm/io.h>
  18. #include <asm/pgtable.h>
  19. #include <asm/smp.h>
  20. #include <asm/naca.h>
  21. #include <asm/rtas.h>
  22. #include "i8259.h"
  23. #include "xics.h"
  24. #include <asm/ppcdebug.h>
  25. void xics_enable_irq(u_int irq);
  26. void xics_disable_irq(u_int irq);
  27. void xics_mask_and_ack_irq(u_int irq);
  28. void xics_end_irq(u_int irq);
  29. void xics_set_affinity(unsigned int irq_nr, unsigned long cpumask);
  30. struct hw_interrupt_type xics_pic = {
  31. " XICS     ",
  32. NULL,
  33. NULL,
  34. xics_enable_irq,
  35. xics_disable_irq,
  36. xics_mask_and_ack_irq,
  37. xics_end_irq,
  38. xics_set_affinity
  39. };
  40. struct hw_interrupt_type xics_8259_pic = {
  41. " XICS/8259",
  42. NULL,
  43. NULL,
  44. NULL,
  45. NULL,
  46. xics_mask_and_ack_irq,
  47. NULL
  48. };
  49. #define XICS_IPI 2
  50. #define XICS_IRQ_OFFSET 0x10
  51. #define XICS_IRQ_SPURIOUS 0
  52. /* Want a priority other than 0.  Various HW issues require this. */
  53. #define DEFAULT_PRIORITY 5
  54. struct xics_ipl {
  55. union {
  56. u32 word;
  57. u8 bytes[4];
  58. } xirr_poll;
  59. union {
  60. u32 word;
  61. u8 bytes[4];
  62. } xirr;
  63. u32 dummy;
  64. union {
  65. u32 word;
  66. u8 bytes[4];
  67. } qirr;
  68. };
  69. struct xics_info {
  70. volatile struct xics_ipl * per_cpu[NR_CPUS];
  71. };
  72. struct xics_info xics_info;
  73. unsigned long long intr_base = 0;
  74. int xics_irq_8259_cascade = 0;
  75. int xics_irq_8259_cascade_real = 0;
  76. unsigned int default_server = 0xFF;
  77. unsigned int default_distrib_server = 0;
  78. /* RTAS service tokens */
  79. int ibm_get_xive;
  80. int ibm_set_xive;
  81. int ibm_int_off;
  82. struct xics_interrupt_node {
  83. unsigned long long addr;
  84. unsigned long long size;
  85. } inodes[NR_CPUS*2];  
  86. typedef struct {
  87. int (*xirr_info_get)(int cpu);
  88. void (*xirr_info_set)(int cpu, int val);
  89. void (*cppr_info)(int cpu, u8 val);
  90. void (*qirr_info)(int cpu, u8 val);
  91. } xics_ops;
  92. static int pSeries_xirr_info_get(int n_cpu)
  93. {
  94. return (xics_info.per_cpu[n_cpu]->xirr.word);
  95. }
  96. static void pSeries_xirr_info_set(int n_cpu, int value)
  97. {
  98. xics_info.per_cpu[n_cpu]->xirr.word = value;
  99. }
  100. static void pSeries_cppr_info(int n_cpu, u8 value)
  101. {
  102. xics_info.per_cpu[n_cpu]->xirr.bytes[0] = value;
  103. }
  104. static void pSeries_qirr_info(int n_cpu , u8 value)
  105. {
  106. xics_info.per_cpu[n_cpu]->qirr.bytes[0] = value;
  107. }
  108. static xics_ops pSeries_ops = {
  109. pSeries_xirr_info_get,
  110. pSeries_xirr_info_set,
  111. pSeries_cppr_info,
  112. pSeries_qirr_info
  113. };
  114. static xics_ops *ops = &pSeries_ops;
  115. extern xics_ops pSeriesLP_ops;
  116. void
  117. xics_enable_irq(
  118. u_int virq
  119. )
  120. {
  121. u_int irq;
  122. unsigned long status;
  123. long         call_status;
  124. virq -= XICS_IRQ_OFFSET;
  125. irq = virt_irq_to_real(virq);
  126. if (irq == XICS_IPI)
  127. return;
  128. #ifdef CONFIG_IRQ_ALL_CPUS
  129. call_status = rtas_call(ibm_set_xive, 3, 1, (unsigned long*)&status,
  130. irq, smp_threads_ready ? default_distrib_server : default_server, DEFAULT_PRIORITY);
  131. #else
  132. call_status = rtas_call(ibm_set_xive, 3, 1, (unsigned long*)&status,
  133. irq, default_server, DEFAULT_PRIORITY);
  134. #endif
  135. if( call_status != 0 ) {
  136. printk("xics_enable_irq: irq=%x: rtas_call failed; retn=%lx, status=%lxn",
  137.        irq, call_status, status);
  138. return;
  139. }
  140. }
  141. void
  142. xics_disable_irq(
  143. u_int virq
  144. )
  145. {
  146. u_int irq;
  147. unsigned long  status;
  148. long          call_status;
  149. virq -= XICS_IRQ_OFFSET;
  150. irq = virt_irq_to_real(virq);
  151. call_status = rtas_call(ibm_int_off, 1, 1, (unsigned long*)&status, 
  152. irq);
  153. if( call_status != 0 ) {
  154. printk("xics_disable_irq: irq=%x: rtas_call failed, retn=%lxn",
  155.        irq, call_status);
  156. return;
  157. }
  158. }
  159. void
  160. xics_end_irq(
  161. u_int irq
  162. )
  163. {
  164. int cpu = smp_processor_id();
  165. ops->cppr_info(cpu, 0); /* actually the value overwritten by ack */
  166. iosync();
  167. ops->xirr_info_set(cpu, ((0xff<<24) | (virt_irq_to_real(irq-XICS_IRQ_OFFSET))));
  168. iosync();
  169. }
  170. void
  171. xics_mask_and_ack_irq(u_int irq)
  172. {
  173. int cpu = smp_processor_id();
  174. if( irq < XICS_IRQ_OFFSET ) {
  175. i8259_pic.ack(irq);
  176. iosync();
  177. ops->xirr_info_set(cpu, ((0xff<<24) | xics_irq_8259_cascade_real));
  178. iosync();
  179. }
  180. else {
  181. ops->cppr_info(cpu, 0xff);
  182. iosync();
  183. }
  184. }
  185. int
  186. xics_get_irq(struct pt_regs *regs)
  187. {
  188. u_int cpu = smp_processor_id();
  189. u_int vec;
  190. int irq;
  191. vec = ops->xirr_info_get(cpu);
  192. /*  (vec >> 24) == old priority */
  193. vec &= 0x00ffffff;
  194. /* for sanity, this had better be < NR_IRQS - 16 */
  195. if( vec == xics_irq_8259_cascade_real ) {
  196. irq = i8259_irq(cpu);
  197. if(irq == -1) {
  198. /* Spurious cascaded interrupt.  Still must ack xics */
  199.                         xics_end_irq(XICS_IRQ_OFFSET + xics_irq_8259_cascade);
  200. irq = -1;
  201. }
  202. } else if( vec == XICS_IRQ_SPURIOUS ) {
  203. irq = -1;
  204. } else {
  205. irq = real_irq_to_virt(vec) + XICS_IRQ_OFFSET;
  206. }
  207. return irq;
  208. }
  209. #ifdef CONFIG_SMP
  210. void xics_ipi_action(int irq, void *dev_id, struct pt_regs *regs)
  211. {
  212. extern volatile unsigned long xics_ipi_message[];
  213. int cpu = smp_processor_id();
  214. ops->qirr_info(cpu, 0xff);
  215. while (xics_ipi_message[cpu]) {
  216. if (test_and_clear_bit(PPC_MSG_CALL_FUNCTION, &xics_ipi_message[cpu])) {
  217. mb();
  218. smp_message_recv(PPC_MSG_CALL_FUNCTION, regs);
  219. }
  220. if (test_and_clear_bit(PPC_MSG_RESCHEDULE, &xics_ipi_message[cpu])) {
  221. mb();
  222. smp_message_recv(PPC_MSG_RESCHEDULE, regs);
  223. }
  224. #ifdef CONFIG_XMON
  225. if (test_and_clear_bit(PPC_MSG_XMON_BREAK, &xics_ipi_message[cpu])) {
  226. mb();
  227. smp_message_recv(PPC_MSG_XMON_BREAK, regs);
  228. }
  229. #endif
  230. }
  231. }
  232. void xics_cause_IPI(int cpu)
  233. {
  234. ops->qirr_info(cpu,0) ;
  235. }
  236. void xics_setup_cpu(void)
  237. {
  238. int cpu = smp_processor_id();
  239. ops->cppr_info(cpu, 0xff);
  240. iosync();
  241. }
  242. #endif /* CONFIG_SMP */
  243. void
  244. xics_init_IRQ( void )
  245. {
  246. int i;
  247. unsigned long intr_size = 0;
  248. struct device_node *np;
  249. uint *ireg, ilen, indx=0;
  250. ppc64_boot_msg(0x20, "XICS Init");
  251. ibm_get_xive = rtas_token("ibm,get-xive");
  252. ibm_set_xive = rtas_token("ibm,set-xive");
  253. ibm_int_off = rtas_token("ibm,int-off");
  254. np = find_type_devices("PowerPC-External-Interrupt-Presentation");
  255. if (!np) {
  256. printk(KERN_WARNING "Can't find Interrupt Presentationn");
  257. udbg_printf("Can't find Interrupt Presentationn");
  258. while (1);
  259. }
  260. nextnode:
  261. ireg = (uint *)get_property(np, "ibm,interrupt-server-ranges", 0);
  262. if (ireg) {
  263. /*
  264.  * set node starting index for this node
  265.  */
  266. indx = *ireg;
  267. }
  268. ireg = (uint *)get_property(np, "reg", &ilen);
  269. if (!ireg) {
  270. printk(KERN_WARNING "Can't find Interrupt Reg Propertyn");
  271. udbg_printf("Can't find Interrupt Reg Propertyn");
  272. while (1);
  273. }
  274. while (ilen) {
  275. inodes[indx].addr = (unsigned long long)*ireg++ << 32;
  276. ilen -= sizeof(uint);
  277. inodes[indx].addr |= *ireg++;
  278. ilen -= sizeof(uint);
  279. inodes[indx].size = (unsigned long long)*ireg++ << 32;
  280. ilen -= sizeof(uint);
  281. inodes[indx].size |= *ireg++;
  282. ilen -= sizeof(uint);
  283. indx++;
  284. if (indx >= NR_CPUS) break;
  285. }
  286. np = np->next;
  287. if ((indx < NR_CPUS) && np) goto nextnode;
  288. /* Find the server numbers for the boot cpu. */
  289. for (np = find_type_devices("cpu"); np; np = np->next) {
  290. ireg = (uint *)get_property(np, "reg", &ilen);
  291. if (ireg && ireg[0] == hard_smp_processor_id()) {
  292. ireg = (uint *)get_property(np, "ibm,ppc-interrupt-gserver#s", &ilen);
  293. i = ilen / sizeof(int);
  294. if (ireg && i > 0) {
  295. default_server = ireg[0];
  296. default_distrib_server = ireg[i-1]; /* take last element */
  297. }
  298. break;
  299. }
  300. }
  301. intr_base = inodes[0].addr;
  302. intr_size = (ulong)inodes[0].size;
  303. np = find_type_devices("interrupt-controller");
  304. if (!np) {
  305. printk(KERN_WARNING "xics:  no ISA Interrupt Controllern");
  306. xics_irq_8259_cascade_real = -1;
  307. xics_irq_8259_cascade = -1;
  308. } else {
  309. ireg = (uint *) get_property(np, "interrupts", 0);
  310. if (!ireg) {
  311. printk(KERN_WARNING "Can't find ISA Interrupts Propertyn");
  312. udbg_printf("Can't find ISA Interrupts Propertyn");
  313. while (1);
  314. }
  315. xics_irq_8259_cascade_real = *ireg;
  316. xics_irq_8259_cascade = virt_irq_create_mapping(xics_irq_8259_cascade_real);
  317. }
  318. if (naca->platform == PLATFORM_PSERIES) {
  319. #ifdef CONFIG_SMP
  320. for (i = 0; i < naca->processorCount; ++i) {
  321. xics_info.per_cpu[i] =
  322.   __ioremap((ulong)inodes[get_hard_smp_processor_id(i)].addr, 
  323.   (ulong)inodes[get_hard_smp_processor_id(i)].size, _PAGE_NO_CACHE);
  324. }
  325. #else
  326. xics_info.per_cpu[0] = __ioremap((ulong)intr_base, intr_size, _PAGE_NO_CACHE);
  327. #endif /* CONFIG_SMP */
  328. #ifdef CONFIG_PPC_PSERIES
  329. /* actually iSeries does not use any of xics...but it has link dependencies
  330.  * for now, except this new one...
  331.  */
  332. } else if (naca->platform == PLATFORM_PSERIES_LPAR) {
  333. ops = &pSeriesLP_ops;
  334. #endif
  335. }
  336. xics_8259_pic.enable = i8259_pic.enable;
  337. xics_8259_pic.disable = i8259_pic.disable;
  338. for (i = 0; i < 16; ++i)
  339. irq_desc[i].handler = &xics_8259_pic;
  340. for (; i < NR_IRQS; ++i)
  341. irq_desc[i].handler = &xics_pic;
  342. ops->cppr_info(0, 0xff);
  343. iosync();
  344. if (xics_irq_8259_cascade != -1) {
  345. if (request_irq(xics_irq_8259_cascade + XICS_IRQ_OFFSET, no_action,
  346. 0, "8259 cascade", 0))
  347. printk(KERN_ERR "xics_init_IRQ: couldn't get 8259 cascaden");
  348. i8259_init();
  349. }
  350. #ifdef CONFIG_SMP
  351. real_irq_to_virt_map[XICS_IPI] = virt_irq_to_real_map[XICS_IPI] = XICS_IPI;
  352. request_irq(XICS_IPI + XICS_IRQ_OFFSET, xics_ipi_action, 0, "IPI", 0);
  353. irq_desc[XICS_IPI+XICS_IRQ_OFFSET].status |= IRQ_PER_CPU;
  354. #endif
  355. ppc64_boot_msg(0x21, "XICS Done");
  356. }
  357. void xics_isa_init(void)
  358. {
  359. return;
  360. if (request_irq(xics_irq_8259_cascade + XICS_IRQ_OFFSET, no_action,
  361. 0, "8259 cascade", 0))
  362. printk(KERN_ERR "xics_init_IRQ: couldn't get 8259 cascaden");
  363. i8259_init();
  364. }
  365. /*
  366.  * Find first logical cpu and return its physical cpu number
  367.  */
  368. static inline u32 physmask(u32 cpumask)
  369. {
  370. int i;
  371. for (i = 0; i < smp_num_cpus; ++i, cpumask >>= 1) {
  372. if (cpumask & 1)
  373. return get_hard_smp_processor_id(i);
  374. }
  375. printk(KERN_ERR "xics_set_affinity: invalid irq maskn");
  376. return default_distrib_server;
  377. }
  378. void xics_set_affinity(unsigned int virq, unsigned long cpumask)
  379. {
  380.         irq_desc_t *desc = irq_desc + virq;
  381. unsigned int irq;
  382. unsigned long flags;
  383. long status;
  384. unsigned long xics_status[2];
  385. u32 newmask;
  386. virq -= XICS_IRQ_OFFSET;
  387. irq = virt_irq_to_real(virq);
  388. if (irq == XICS_IPI)
  389. return;
  390.         spin_lock_irqsave(&desc->lock, flags);
  391. status = rtas_call(ibm_get_xive, 1, 3, (void *)&xics_status, irq);
  392. if (status) {
  393. printk("xics_set_affinity: irq=%d ibm,get-xive returns %ldn",
  394. irq, status);
  395. goto out;
  396. }
  397. /* For the moment only implement delivery to all cpus or one cpu */
  398. if (cpumask == 0xffffffff)
  399. newmask = default_distrib_server;
  400. else
  401. newmask = physmask(cpumask);
  402. status = rtas_call(ibm_set_xive, 3, 1, NULL,
  403. irq, newmask, xics_status[1]);
  404. if (status) {
  405. printk("xics_set_affinity irq=%d ibm,set-xive returns %ldn",
  406. irq, status);
  407. goto out;
  408. }
  409. out:
  410.         spin_unlock_irqrestore(&desc->lock, flags);
  411. }