WebSVN – HelenOS – Diff – /branches/rcu/kernel/arch/ia32/src/smp/apic.c

 /*
  * Copyright (c) 2001-2004 Jakub Jermar
  * All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions
  * are met:
  *
  * - Redistributions of source code must retain the above copyright
  *   notice, this list of conditions and the following disclaimer.
  * - Redistributions in binary form must reproduce the above copyright
  *   notice, this list of conditions and the following disclaimer in the
  *   documentation and/or other materials provided with the distribution.
  * - The name of the author may not be used to endorse or promote products
  *   derived from this software without specific prior written permission.
  *
  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  */
 /** @addtogroup ia32
  * @{
  */
 /** @file
  */
 #include <arch/types.h>
 #include <arch/smp/apic.h>
 #include <arch/smp/ap.h>
 #include <arch/smp/mps.h>
 #include <arch/boot/boot.h>
 #include <mm/page.h>
 #include <time/delay.h>
 #include <interrupt.h>
 #include <arch/interrupt.h>
 #include <print.h>
 #include <arch/asm.h>
 #include <arch.h>
 #include <ddi/irq.h>
 #include <ddi/device.h>
 #ifdef CONFIG_SMP
 /*
  * Advanced Programmable Interrupt Controller for SMP systems.
  * Tested on:
  *  Bochs 2.0.2 - Bochs 2.2.6 with 2-8 CPUs
  *  Simics 2.0.28 - Simics 2.2.19 2-15 CPUs
  *  VMware Workstation 5.5 with 2 CPUs
  *  QEMU 0.8.0 with 2-15 CPUs
  *  ASUS P/I-P65UP5 + ASUS C-P55T2D REV. 1.41 with 2x 200Mhz Pentium CPUs
  *  ASUS PCH-DL with 2x 3000Mhz Pentium 4 Xeon (HT) CPUs
  *  MSI K7D Master-L with 2x 2100MHz Athlon MP CPUs
  */
 /*
  * These variables either stay configured as initilalized, or are changed by
  * the MP configuration code.
  *
  * Pay special attention to the volatile keyword. Without it, gcc -O2 would
  * optimize the code too much and accesses to l_apic and io_apic, that must
  * always be 32-bit, would use byte oriented instructions.
  */
 volatile uint32_t *l_apic = (uint32_t *) 0xfee00000;
 volatile uint32_t *io_apic = (uint32_t *) 0xfec00000;
 uint32_t apic_id_mask = 0;
 static irq_t l_apic_timer_irq;
 static int apic_poll_errors(void);
 #ifdef LAPIC_VERBOSE
 static char *delmod_str[] = {
     "Fixed",
     "Lowest Priority",
     "SMI",
     "Reserved",
     "NMI",
     "INIT",
     "STARTUP",
     "ExtInt"
 };
 static char *destmod_str[] = {
     "Physical",
     "Logical"
 };
 static char *trigmod_str[] = {
     "Edge",
     "Level"
 };
 static char *mask_str[] = {
     "Unmasked",
     "Masked"
 };
 static char *delivs_str[] = {
     "Idle",
     "Send Pending"
 };
 static char *tm_mode_str[] = {
     "One-shot",
     "Periodic"
 };
 static char *intpol_str[] = {
     "Polarity High",
     "Polarity Low"
 };
 #endif /* LAPIC_VERBOSE */
 /** APIC spurious interrupt handler.
  *
  * @param n Interrupt vector.
  * @param istate Interrupted state.
  */
 static void apic_spurious(int n, istate_t *istate)
 {
 #ifdef CONFIG_DEBUG
     printf("cpu%d: APIC spurious interrupt\n", CPU->id);
 #endif
 }
 static irq_ownership_t l_apic_timer_claim(void)
 {
     return IRQ_ACCEPT;
 }
 static void l_apic_timer_irq_handler(irq_t *irq, void *arg, ...)
 {
-    /*
+    clock();
-     * Holding a spinlock could prevent clock() from preempting
+}
-     * the current thread. In this case, we don't need to hold the
-     * irq->lock so we just unlock it and then lock it again.
+/** Initialize APIC on BSP. */
-     */
+void apic_init(void)
-    spinlock_unlock(&irq->lock);
+{
-    clock();
+    io_apic_id_t idreg;
-    spinlock_lock(&irq->lock);
+    unsigned int i;
-}
+    exc_register(VECTOR_APIC_SPUR, "apic_spurious", (iroutine) apic_spurious);
-/** Initialize APIC on BSP. */
-void apic_init(void)
+    enable_irqs_function = io_apic_enable_irqs;
-{
+    disable_irqs_function = io_apic_disable_irqs;
-    io_apic_id_t idreg;
+    eoi_function = l_apic_eoi;
-    unsigned int i;
+    /*
-    exc_register(VECTOR_APIC_SPUR, "apic_spurious", (iroutine) apic_spurious);
+     * Configure interrupt routing.
+     * IRQ 0 remains masked as the time signal is generated by l_apic's themselves.
-    enable_irqs_function = io_apic_enable_irqs;
+     * Other interrupts will be forwarded to the lowest priority CPU.
-    disable_irqs_function = io_apic_disable_irqs;
+     */
-    eoi_function = l_apic_eoi;
+    io_apic_disable_irqs(0xffff);
-    /*
+    irq_initialize(&l_apic_timer_irq);
-     * Configure interrupt routing.
+    l_apic_timer_irq.devno = device_assign_devno();
-     * IRQ 0 remains masked as the time signal is generated by l_apic's themselves.
+    l_apic_timer_irq.inr = IRQ_CLK;
-     * Other interrupts will be forwarded to the lowest priority CPU.
+    l_apic_timer_irq.claim = l_apic_timer_claim;
-     */
+    l_apic_timer_irq.handler = l_apic_timer_irq_handler;
-    io_apic_disable_irqs(0xffff);
+    irq_register(&l_apic_timer_irq);
-    irq_initialize(&l_apic_timer_irq);
+    for (i = 0; i < IRQ_COUNT; i++) {
-    l_apic_timer_irq.preack = true;
+        int pin;
-    l_apic_timer_irq.devno = device_assign_devno();
-    l_apic_timer_irq.inr = IRQ_CLK;
+        if ((pin = smp_irq_to_pin(i)) != -1)
-    l_apic_timer_irq.claim = l_apic_timer_claim;
+            io_apic_change_ioredtbl(pin, DEST_ALL, IVT_IRQBASE + i, LOPRI);
-    l_apic_timer_irq.handler = l_apic_timer_irq_handler;
+    }
-    irq_register(&l_apic_timer_irq);
+    /*
-    for (i = 0; i < IRQ_COUNT; i++) {
+     * Ensure that io_apic has unique ID.
-        int pin;
+     */
+    idreg.value = io_apic_read(IOAPICID);
-        if ((pin = smp_irq_to_pin(i)) != -1)
+    if ((1 << idreg.apic_id) & apic_id_mask) {  /* see if IO APIC ID is used already */
-            io_apic_change_ioredtbl(pin, DEST_ALL, IVT_IRQBASE + i, LOPRI);
+        for (i = 0; i < APIC_ID_COUNT; i++) {
-    }
+            if (!((1 << i) & apic_id_mask)) {
+                idreg.apic_id = i;
-    /*
+                io_apic_write(IOAPICID, idreg.value);
-     * Ensure that io_apic has unique ID.
+                break;
-     */
+            }
-    idreg.value = io_apic_read(IOAPICID);
+        }
-    if ((1 << idreg.apic_id) & apic_id_mask) {  /* see if IO APIC ID is used already */
+    }
-        for (i = 0; i < APIC_ID_COUNT; i++) {
-            if (!((1 << i) & apic_id_mask)) {
+    /*
-                idreg.apic_id = i;
+     * Configure the BSP's lapic.
-                io_apic_write(IOAPICID, idreg.value);
+     */
-                break;
+    l_apic_init();
-            }
-        }
+    l_apic_debug();
-    }
+}
-    /*
+/** Poll for APIC errors.
-     * Configure the BSP's lapic.
+ *
-     */
+ * Examine Error Status Register and report all errors found.
-    l_apic_init();
+ *
+ * @return 0 on error, 1 on success.
-    l_apic_debug();
+ */
-}
+int apic_poll_errors(void)
+{
-/** Poll for APIC errors.
+    esr_t esr;
- *
- * Examine Error Status Register and report all errors found.
+    esr.value = l_apic[ESR];
- *
- * @return 0 on error, 1 on success.
+    if (esr.send_checksum_error)
- */
+        printf("Send Checksum Error\n");
-int apic_poll_errors(void)
+    if (esr.receive_checksum_error)
-{
+        printf("Receive Checksum Error\n");
-    esr_t esr;
+    if (esr.send_accept_error)
+        printf("Send Accept Error\n");
-    esr.value = l_apic[ESR];
+    if (esr.receive_accept_error)
+        printf("Receive Accept Error\n");
-    if (esr.send_checksum_error)
+    if (esr.send_illegal_vector)
-        printf("Send Checksum Error\n");
+        printf("Send Illegal Vector\n");
-    if (esr.receive_checksum_error)
+    if (esr.received_illegal_vector)
-        printf("Receive Checksum Error\n");
+        printf("Received Illegal Vector\n");
-    if (esr.send_accept_error)
+    if (esr.illegal_register_address)
-        printf("Send Accept Error\n");
+        printf("Illegal Register Address\n");
-    if (esr.receive_accept_error)
-        printf("Receive Accept Error\n");
+    return !esr.err_bitmap;
-    if (esr.send_illegal_vector)
+}
-        printf("Send Illegal Vector\n");
-    if (esr.received_illegal_vector)
+/** Send all CPUs excluding CPU IPI vector.
-        printf("Received Illegal Vector\n");
+ *
-    if (esr.illegal_register_address)
+ * @param vector Interrupt vector to be sent.
-        printf("Illegal Register Address\n");
+ *
+ * @return 0 on failure, 1 on success.
-    return !esr.err_bitmap;
+ */
-}
+int l_apic_broadcast_custom_ipi(uint8_t vector)
+{
-/** Send all CPUs excluding CPU IPI vector.
+    icr_t icr;
- *
- * @param vector Interrupt vector to be sent.
+    icr.lo = l_apic[ICRlo];
- *
+    icr.delmod = DELMOD_FIXED;
- * @return 0 on failure, 1 on success.
+    icr.destmod = DESTMOD_LOGIC;
- */
+    icr.level = LEVEL_ASSERT;
-int l_apic_broadcast_custom_ipi(uint8_t vector)
+    icr.shorthand = SHORTHAND_ALL_EXCL;
-{
+    icr.trigger_mode = TRIGMOD_LEVEL;
-    icr_t icr;
+    icr.vector = vector;
-    icr.lo = l_apic[ICRlo];
+    l_apic[ICRlo] = icr.lo;
-    icr.delmod = DELMOD_FIXED;
-    icr.destmod = DESTMOD_LOGIC;
+    icr.lo = l_apic[ICRlo];
-    icr.level = LEVEL_ASSERT;
+    if (icr.delivs == DELIVS_PENDING) {
-    icr.shorthand = SHORTHAND_ALL_EXCL;
+#ifdef CONFIG_DEBUG
-    icr.trigger_mode = TRIGMOD_LEVEL;
+        printf("IPI is pending.\n");
-    icr.vector = vector;
+#endif
+    }
-    l_apic[ICRlo] = icr.lo;
+    return apic_poll_errors();
-    icr.lo = l_apic[ICRlo];
+}
-    if (icr.delivs == DELIVS_PENDING) {
-#ifdef CONFIG_DEBUG
+/** Universal Start-up Algorithm for bringing up the AP processors.
-        printf("IPI is pending.\n");
+ *
-#endif
+ * @param apicid APIC ID of the processor to be brought up.
-    }
+ *
+ * @return 0 on failure, 1 on success.
-    return apic_poll_errors();
+ */
-}
+int l_apic_send_init_ipi(uint8_t apicid)
+{
-/** Universal Start-up Algorithm for bringing up the AP processors.
+    icr_t icr;
- *
+    int i;
- * @param apicid APIC ID of the processor to be brought up.
- *
+    /*
- * @return 0 on failure, 1 on success.
+     * Read the ICR register in and zero all non-reserved fields.
- */
+     */
-int l_apic_send_init_ipi(uint8_t apicid)
+    icr.lo = l_apic[ICRlo];
-{
+    icr.hi = l_apic[ICRhi];
-    icr_t icr;
-    int i;
+    icr.delmod = DELMOD_INIT;
+    icr.destmod = DESTMOD_PHYS;
-    /*
+    icr.level = LEVEL_ASSERT;
-     * Read the ICR register in and zero all non-reserved fields.
+    icr.trigger_mode = TRIGMOD_LEVEL;
-     */
+    icr.shorthand = SHORTHAND_NONE;
-    icr.lo = l_apic[ICRlo];
+    icr.vector = 0;
-    icr.hi = l_apic[ICRhi];
+    icr.dest = apicid;
-    icr.delmod = DELMOD_INIT;
+    l_apic[ICRhi] = icr.hi;
-    icr.destmod = DESTMOD_PHYS;
+    l_apic[ICRlo] = icr.lo;
-    icr.level = LEVEL_ASSERT;
-    icr.trigger_mode = TRIGMOD_LEVEL;
+    /*
-    icr.shorthand = SHORTHAND_NONE;
+     * According to MP Specification, 20us should be enough to
-    icr.vector = 0;
+     * deliver the IPI.
-    icr.dest = apicid;
+     */
+    delay(20);
-    l_apic[ICRhi] = icr.hi;
-    l_apic[ICRlo] = icr.lo;
+    if (!apic_poll_errors())
+        return 0;
-    /*
-     * According to MP Specification, 20us should be enough to
+    icr.lo = l_apic[ICRlo];
-     * deliver the IPI.
+    if (icr.delivs == DELIVS_PENDING) {
-     */
+#ifdef CONFIG_DEBUG
-    delay(20);
+        printf("IPI is pending.\n");
+#endif
-    if (!apic_poll_errors())
+    }
-        return 0;
+    icr.delmod = DELMOD_INIT;
-    icr.lo = l_apic[ICRlo];
+    icr.destmod = DESTMOD_PHYS;
-    if (icr.delivs == DELIVS_PENDING) {
+    icr.level = LEVEL_DEASSERT;
-#ifdef CONFIG_DEBUG
+    icr.shorthand = SHORTHAND_NONE;
-        printf("IPI is pending.\n");
+    icr.trigger_mode = TRIGMOD_LEVEL;
-#endif
+    icr.vector = 0;
-    }
+    l_apic[ICRlo] = icr.lo;
-    icr.delmod = DELMOD_INIT;
+    /*
-    icr.destmod = DESTMOD_PHYS;
+     * Wait 10ms as MP Specification specifies.
-    icr.level = LEVEL_DEASSERT;
+     */
-    icr.shorthand = SHORTHAND_NONE;
+    delay(10000);
-    icr.trigger_mode = TRIGMOD_LEVEL;
-    icr.vector = 0;
+    if (!is_82489DX_apic(l_apic[LAVR])) {
-    l_apic[ICRlo] = icr.lo;
+        /*
+         * If this is not 82489DX-based l_apic we must send two STARTUP IPI's.
-    /*
+         */
-     * Wait 10ms as MP Specification specifies.
+        for (i = 0; i<2; i++) {
-     */
+            icr.lo = l_apic[ICRlo];
-    delay(10000);
+            icr.vector = ((uintptr_t) ap_boot) / 4096; /* calculate the reset vector */
+            icr.delmod = DELMOD_STARTUP;
-    if (!is_82489DX_apic(l_apic[LAVR])) {
+            icr.destmod = DESTMOD_PHYS;
-        /*
+            icr.level = LEVEL_ASSERT;
-         * If this is not 82489DX-based l_apic we must send two STARTUP IPI's.
+            icr.shorthand = SHORTHAND_NONE;
-         */
+            icr.trigger_mode = TRIGMOD_LEVEL;
-        for (i = 0; i<2; i++) {
+            l_apic[ICRlo] = icr.lo;
-            icr.lo = l_apic[ICRlo];
+            delay(200);
-            icr.vector = ((uintptr_t) ap_boot) / 4096; /* calculate the reset vector */
+        }
-            icr.delmod = DELMOD_STARTUP;
+    }
-            icr.destmod = DESTMOD_PHYS;
-            icr.level = LEVEL_ASSERT;
+    return apic_poll_errors();
-            icr.shorthand = SHORTHAND_NONE;
+}
-            icr.trigger_mode = TRIGMOD_LEVEL;
-            l_apic[ICRlo] = icr.lo;
+/** Initialize Local APIC. */
-            delay(200);
+void l_apic_init(void)
-        }
+{
-    }
+    lvt_error_t error;
+    lvt_lint_t lint;
-    return apic_poll_errors();
+    tpr_t tpr;
-}
+    svr_t svr;
+    icr_t icr;
-/** Initialize Local APIC. */
+    tdcr_t tdcr;
-void l_apic_init(void)
+    lvt_tm_t tm;
-{
+    ldr_t ldr;
-    lvt_error_t error;
+    dfr_t dfr;
-    lvt_lint_t lint;
+    uint32_t t1, t2;
-    tpr_t tpr;
-    svr_t svr;
+    /* Initialize LVT Error register. */
-    icr_t icr;
+    error.value = l_apic[LVT_Err];
-    tdcr_t tdcr;
+    error.masked = true;
-    lvt_tm_t tm;
+    l_apic[LVT_Err] = error.value;
-    ldr_t ldr;
-    dfr_t dfr;
+    /* Initialize LVT LINT0 register. */
-    uint32_t t1, t2;
+    lint.value = l_apic[LVT_LINT0];
+    lint.masked = true;
-    /* Initialize LVT Error register. */
+    l_apic[LVT_LINT0] = lint.value;
-    error.value = l_apic[LVT_Err];
-    error.masked = true;
+    /* Initialize LVT LINT1 register. */
-    l_apic[LVT_Err] = error.value;
+    lint.value = l_apic[LVT_LINT1];
+    lint.masked = true;
-    /* Initialize LVT LINT0 register. */
+    l_apic[LVT_LINT1] = lint.value;
-    lint.value = l_apic[LVT_LINT0];
-    lint.masked = true;
+    /* Task Priority Register initialization. */
-    l_apic[LVT_LINT0] = lint.value;
+    tpr.value = l_apic[TPR];
+    tpr.pri_sc = 0;
-    /* Initialize LVT LINT1 register. */
+    tpr.pri = 0;
-    lint.value = l_apic[LVT_LINT1];
+    l_apic[TPR] = tpr.value;
-    lint.masked = true;
-    l_apic[LVT_LINT1] = lint.value;
+    /* Spurious-Interrupt Vector Register initialization. */
+    svr.value = l_apic[SVR];
-    /* Task Priority Register initialization. */
+    svr.vector = VECTOR_APIC_SPUR;
-    tpr.value = l_apic[TPR];
+    svr.lapic_enabled = true;
-    tpr.pri_sc = 0;
+    svr.focus_checking = true;
-    tpr.pri = 0;
+    l_apic[SVR] = svr.value;
-    l_apic[TPR] = tpr.value;
+    if (CPU->arch.family >= 6)
-    /* Spurious-Interrupt Vector Register initialization. */
+        enable_l_apic_in_msr();
-    svr.value = l_apic[SVR];
-    svr.vector = VECTOR_APIC_SPUR;
+    /* Interrupt Command Register initialization. */
-    svr.lapic_enabled = true;
+    icr.lo = l_apic[ICRlo];
-    svr.focus_checking = true;
+    icr.delmod = DELMOD_INIT;
-    l_apic[SVR] = svr.value;
+    icr.destmod = DESTMOD_PHYS;
+    icr.level = LEVEL_DEASSERT;
-    if (CPU->arch.family >= 6)
+    icr.shorthand = SHORTHAND_ALL_INCL;
-        enable_l_apic_in_msr();
+    icr.trigger_mode = TRIGMOD_LEVEL;
+    l_apic[ICRlo] = icr.lo;
-    /* Interrupt Command Register initialization. */
-    icr.lo = l_apic[ICRlo];
+    /* Timer Divide Configuration Register initialization. */
-    icr.delmod = DELMOD_INIT;
+    tdcr.value = l_apic[TDCR];
-    icr.destmod = DESTMOD_PHYS;
+    tdcr.div_value = DIVIDE_1;
-    icr.level = LEVEL_DEASSERT;
+    l_apic[TDCR] = tdcr.value;
-    icr.shorthand = SHORTHAND_ALL_INCL;
-    icr.trigger_mode = TRIGMOD_LEVEL;
+    /* Program local timer. */
-    l_apic[ICRlo] = icr.lo;
+    tm.value = l_apic[LVT_Tm];
+    tm.vector = VECTOR_CLK;
-    /* Timer Divide Configuration Register initialization. */
+    tm.mode = TIMER_PERIODIC;
-    tdcr.value = l_apic[TDCR];
+    tm.masked = false;
-    tdcr.div_value = DIVIDE_1;
+    l_apic[LVT_Tm] = tm.value;
-    l_apic[TDCR] = tdcr.value;
+    /*
-    /* Program local timer. */
+     * Measure and configure the timer to generate timer
-    tm.value = l_apic[LVT_Tm];
+     * interrupt with period 1s/HZ seconds.
-    tm.vector = VECTOR_CLK;
+     */
-    tm.mode = TIMER_PERIODIC;
+    t1 = l_apic[CCRT];
-    tm.masked = false;
+    l_apic[ICRT] = 0xffffffff;
-    l_apic[LVT_Tm] = tm.value;
+    while (l_apic[CCRT] == t1)
-    /*
+        ;
-     * Measure and configure the timer to generate timer
-     * interrupt with period 1s/HZ seconds.
+    t1 = l_apic[CCRT];
-     */
+    delay(1000000/HZ);
-    t1 = l_apic[CCRT];
+    t2 = l_apic[CCRT];
-    l_apic[ICRT] = 0xffffffff;
+    l_apic[ICRT] = t1-t2;
-    while (l_apic[CCRT] == t1)
-        ;
+    /* Program Logical Destination Register. */
+    ldr.value = l_apic[LDR];
-    t1 = l_apic[CCRT];
+    if (CPU->id < sizeof(CPU->id)*8)    /* size in bits */
-    delay(1000000/HZ);
+        ldr.id = (1<<CPU->id);
-    t2 = l_apic[CCRT];
+    l_apic[LDR] = ldr.value;
-    l_apic[ICRT] = t1-t2;
+    /* Program Destination Format Register for Flat mode. */
+    dfr.value = l_apic[DFR];
-    /* Program Logical Destination Register. */
+    dfr.model = MODEL_FLAT;
-    ldr.value = l_apic[LDR];
+    l_apic[DFR] = dfr.value;
-    if (CPU->id < sizeof(CPU->id)*8)    /* size in bits */
+}
-        ldr.id = (1<<CPU->id);
-    l_apic[LDR] = ldr.value;
+/** Local APIC End of Interrupt. */
+void l_apic_eoi(void)
-    /* Program Destination Format Register for Flat mode. */
+{
-    dfr.value = l_apic[DFR];
+    l_apic[EOI] = 0;
-    dfr.model = MODEL_FLAT;
+}
-    l_apic[DFR] = dfr.value;
-}
+/** Dump content of Local APIC registers. */
+void l_apic_debug(void)
-/** Local APIC End of Interrupt. */
+{
-void l_apic_eoi(void)
+#ifdef LAPIC_VERBOSE
-{
+    lvt_tm_t tm;
-    l_apic[EOI] = 0;
+    lvt_lint_t lint;
-}
+    lvt_error_t error;
-/** Dump content of Local APIC registers. */
+    printf("LVT on cpu%d, LAPIC ID: %d\n", CPU->id, l_apic_id());
-void l_apic_debug(void)
-{
+    tm.value = l_apic[LVT_Tm];
-#ifdef LAPIC_VERBOSE
+    printf("LVT Tm: vector=%hhd, %s, %s, %s\n", tm.vector, delivs_str[tm.delivs], mask_str[tm.masked], tm_mode_str[tm.mode]);
-    lvt_tm_t tm;
+    lint.value = l_apic[LVT_LINT0];
-    lvt_lint_t lint;
+    printf("LVT LINT0: vector=%hhd, %s, %s, %s, irr=%d, %s, %s\n", tm.vector, delmod_str[lint.delmod], delivs_str[lint.delivs], intpol_str[lint.intpol], lint.irr, trigmod_str[lint.trigger_mode], mask_str[lint.masked]);
-    lvt_error_t error;
+    lint.value = l_apic[LVT_LINT1];
+    printf("LVT LINT1: vector=%hhd, %s, %s, %s, irr=%d, %s, %s\n", tm.vector, delmod_str[lint.delmod], delivs_str[lint.delivs], intpol_str[lint.intpol], lint.irr, trigmod_str[lint.trigger_mode], mask_str[lint.masked]);
-    printf("LVT on cpu%d, LAPIC ID: %d\n", CPU->id, l_apic_id());
+    error.value = l_apic[LVT_Err];
+    printf("LVT Err: vector=%hhd, %s, %s\n", error.vector, delivs_str[error.delivs], mask_str[error.masked]);
-    tm.value = l_apic[LVT_Tm];
+#endif
-    printf("LVT Tm: vector=%hhd, %s, %s, %s\n", tm.vector, delivs_str[tm.delivs], mask_str[tm.masked], tm_mode_str[tm.mode]);
+}
-    lint.value = l_apic[LVT_LINT0];
-    printf("LVT LINT0: vector=%hhd, %s, %s, %s, irr=%d, %s, %s\n", tm.vector, delmod_str[lint.delmod], delivs_str[lint.delivs], intpol_str[lint.intpol], lint.irr, trigmod_str[lint.trigger_mode], mask_str[lint.masked]);
+/** Get Local APIC ID.
-    lint.value = l_apic[LVT_LINT1];
+ *
-    printf("LVT LINT1: vector=%hhd, %s, %s, %s, irr=%d, %s, %s\n", tm.vector, delmod_str[lint.delmod], delivs_str[lint.delivs], intpol_str[lint.intpol], lint.irr, trigmod_str[lint.trigger_mode], mask_str[lint.masked]);
+ * @return Local APIC ID.
-    error.value = l_apic[LVT_Err];
+ */
-    printf("LVT Err: vector=%hhd, %s, %s\n", error.vector, delivs_str[error.delivs], mask_str[error.masked]);
+uint8_t l_apic_id(void)
-#endif
+{
-}
+    l_apic_id_t idreg;
-/** Get Local APIC ID.
+    idreg.value = l_apic[L_APIC_ID];
- *
+    return idreg.apic_id;
- * @return Local APIC ID.
+}
- */
-uint8_t l_apic_id(void)
+/** Read from IO APIC register.
-{
+ *
-    l_apic_id_t idreg;
+ * @param address IO APIC register address.
+ *
-    idreg.value = l_apic[L_APIC_ID];
+ * @return Content of the addressed IO APIC register.
-    return idreg.apic_id;
+ */
-}
+uint32_t io_apic_read(uint8_t address)
+{
-/** Read from IO APIC register.
+    io_regsel_t regsel;
- *
- * @param address IO APIC register address.
+    regsel.value = io_apic[IOREGSEL];
- *
+    regsel.reg_addr = address;
- * @return Content of the addressed IO APIC register.
+    io_apic[IOREGSEL] = regsel.value;
- */
+    return io_apic[IOWIN];
-uint32_t io_apic_read(uint8_t address)
+}
-{
-    io_regsel_t regsel;
+/** Write to IO APIC register.
+ *
-    regsel.value = io_apic[IOREGSEL];
+ * @param address IO APIC register address.
-    regsel.reg_addr = address;
+ * @param x Content to be written to the addressed IO APIC register.
-    io_apic[IOREGSEL] = regsel.value;
+ */
-    return io_apic[IOWIN];
+void io_apic_write(uint8_t address, uint32_t x)
-}
+{
+    io_regsel_t regsel;
-/** Write to IO APIC register.
- *
+    regsel.value = io_apic[IOREGSEL];
- * @param address IO APIC register address.
+    regsel.reg_addr = address;
- * @param x Content to be written to the addressed IO APIC register.
+    io_apic[IOREGSEL] = regsel.value;
- */
+    io_apic[IOWIN] = x;
-void io_apic_write(uint8_t address, uint32_t x)
+}
-{
-    io_regsel_t regsel;
+/** Change some attributes of one item in I/O Redirection Table.
+ *
-    regsel.value = io_apic[IOREGSEL];
+ * @param pin IO APIC pin number.
-    regsel.reg_addr = address;
+ * @param dest Interrupt destination address.
-    io_apic[IOREGSEL] = regsel.value;
+ * @param v Interrupt vector to trigger.
-    io_apic[IOWIN] = x;
+ * @param flags Flags.
-}
+ */
+void io_apic_change_ioredtbl(int pin, int dest, uint8_t v, int flags)
-/** Change some attributes of one item in I/O Redirection Table.
+{
- *
+    io_redirection_reg_t reg;
- * @param pin IO APIC pin number.
+    int dlvr = DELMOD_FIXED;
- * @param dest Interrupt destination address.
- * @param v Interrupt vector to trigger.
+    if (flags & LOPRI)
- * @param flags Flags.
+        dlvr = DELMOD_LOWPRI;
- */
-void io_apic_change_ioredtbl(int pin, int dest, uint8_t v, int flags)
+    reg.lo = io_apic_read(IOREDTBL + pin*2);
-{
+    reg.hi = io_apic_read(IOREDTBL + pin*2 + 1);
-    io_redirection_reg_t reg;
-    int dlvr = DELMOD_FIXED;
+    reg.dest = dest;
+    reg.destmod = DESTMOD_LOGIC;
-    if (flags & LOPRI)
+    reg.trigger_mode = TRIGMOD_EDGE;
-        dlvr = DELMOD_LOWPRI;
+    reg.intpol = POLARITY_HIGH;
+    reg.delmod = dlvr;
-    reg.lo = io_apic_read(IOREDTBL + pin*2);
+    reg.intvec = v;
-    reg.hi = io_apic_read(IOREDTBL + pin*2 + 1);
+    io_apic_write(IOREDTBL + pin*2, reg.lo);
-    reg.dest = dest;
+    io_apic_write(IOREDTBL + pin*2 + 1, reg.hi);
-    reg.destmod = DESTMOD_LOGIC;
+}
-    reg.trigger_mode = TRIGMOD_EDGE;
-    reg.intpol = POLARITY_HIGH;
+/** Mask IRQs in IO APIC.
-    reg.delmod = dlvr;
+ *
-    reg.intvec = v;
+ * @param irqmask Bitmask of IRQs to be masked (0 = do not mask, 1 = mask).
+ */
-    io_apic_write(IOREDTBL + pin*2, reg.lo);
+void io_apic_disable_irqs(uint16_t irqmask)
-    io_apic_write(IOREDTBL + pin*2 + 1, reg.hi);
+{
-}
+    io_redirection_reg_t reg;
+    unsigned int i;
-/** Mask IRQs in IO APIC.
+    int pin;
- *
- * @param irqmask Bitmask of IRQs to be masked (0 = do not mask, 1 = mask).
+    for (i = 0; i < 16; i++) {
- */
+        if (irqmask & (1 << i)) {
-void io_apic_disable_irqs(uint16_t irqmask)
+            /*
-{
+             * Mask the signal input in IO APIC if there is a
-    io_redirection_reg_t reg;
+             * mapping for the respective IRQ number.
-    unsigned int i;
+             */
-    int pin;
+            pin = smp_irq_to_pin(i);
+            if (pin != -1) {
-    for (i = 0; i < 16; i++) {
+                reg.lo = io_apic_read(IOREDTBL + pin * 2);
-        if (irqmask & (1 << i)) {
+                reg.masked = true;
-            /*
+                io_apic_write(IOREDTBL + pin * 2, reg.lo);
-             * Mask the signal input in IO APIC if there is a
+            }
-             * mapping for the respective IRQ number.
-             */
+        }
-            pin = smp_irq_to_pin(i);
+    }
-            if (pin != -1) {
+}
-                reg.lo = io_apic_read(IOREDTBL + pin * 2);
-                reg.masked = true;
+/** Unmask IRQs in IO APIC.
-                io_apic_write(IOREDTBL + pin * 2, reg.lo);
+ *
-            }
+ * @param irqmask Bitmask of IRQs to be unmasked (0 = do not unmask, 1 = unmask).
+ */
-        }
+void io_apic_enable_irqs(uint16_t irqmask)
-    }
+{
-}
+    unsigned int i;
+    int pin;
-/** Unmask IRQs in IO APIC.
+    io_redirection_reg_t reg;
- *
- * @param irqmask Bitmask of IRQs to be unmasked (0 = do not unmask, 1 = unmask).
+    for (i = 0;i < 16; i++) {
- */
+        if (irqmask & (1 << i)) {
-void io_apic_enable_irqs(uint16_t irqmask)
+            /*
-{
+             * Unmask the signal input in IO APIC if there is a
-    unsigned int i;
+             * mapping for the respective IRQ number.
-    int pin;
+             */
-    io_redirection_reg_t reg;
+            pin = smp_irq_to_pin(i);
+            if (pin != -1) {
-    for (i = 0;i < 16; i++) {
+                reg.lo = io_apic_read(IOREDTBL + pin * 2);
-        if (irqmask & (1 << i)) {
+                reg.masked = false;
-            /*
+                io_apic_write(IOREDTBL + pin * 2, reg.lo);
-             * Unmask the signal input in IO APIC if there is a
+            }
-             * mapping for the respective IRQ number.
-             */
+        }
-            pin = smp_irq_to_pin(i);
+    }
-            if (pin != -1) {
+}
-                reg.lo = io_apic_read(IOREDTBL + pin * 2);
-                reg.masked = false;
+#endif /* CONFIG_SMP */
-                io_apic_write(IOREDTBL + pin * 2, reg.lo);
-            }
+/** @}
+ */
-        }
-    }
-}
-#endif /* CONFIG_SMP */
-/** @}
- */

Subversion Repositories HelenOS

(root)/branches/rcu/kernel/arch/ia32/src/smp/apic.c – Rev 2265 → 2292