WebSVN – HelenOS – Diff – /branches/dynload/kernel/generic/src/ipc/irq.c


/*
 * Copyright (c) 2006 Ondrej Palkovsky
 * Copyright (c) 2006 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 genericipc
 * @{
 */
/**
 * @file
 * @brief IRQ notification framework.
 *
 * This framework allows applications to register to receive a notification
 * when interrupt is detected. The application may provide a simple 'top-half'
 * handler as part of its registration, which can perform simple operations
 * (read/write port/memory, add information to notification ipc message).
 *
 * The structure of a notification message is as follows:
 * - METHOD: method as registered by the SYS_IPC_REGISTER_IRQ syscall
 * - ARG1: payload modified by a 'top-half' handler
 * - ARG2: payload modified by a 'top-half' handler
 * - ARG3: payload modified by a 'top-half' handler
 * - in_phone_hash: interrupt counter (may be needed to assure correct order
 *         in multithreaded drivers)
 */
 
#include <arch.h>
#include <mm/slab.h>
#include <errno.h>
#include <ddi/irq.h>
#include <ipc/ipc.h>
#include <ipc/irq.h>
#include <syscall/copy.h>
#include <console/console.h>
#include <print.h>
 
/** Execute code associated with IRQ notification.
 *
 * @param call      Notification call.
 * @param code      Top-half pseudocode.
 */
static void code_execute(call_t *call, irq_code_t *code)
{
    unsigned int i;
    unative_t dstval = 0;
   
    if (!code)
        return;
   
    for (i = 0; i < code->cmdcount; i++) {
        switch (code->cmds[i].cmd) {
        case CMD_MEM_READ_1:
            dstval = *((uint8_t *) code->cmds[i].addr);
            break;
        case CMD_MEM_READ_2:
            dstval = *((uint16_t *) code->cmds[i].addr);
            break;
        case CMD_MEM_READ_4:
            dstval = *((uint32_t *) code->cmds[i].addr);
            break;
        case CMD_MEM_READ_8:
            dstval = *((uint64_t *) code->cmds[i].addr);
            break;
        case CMD_MEM_WRITE_1:
            *((uint8_t *) code->cmds[i].addr) = code->cmds[i].value;
            break;
        case CMD_MEM_WRITE_2:
            *((uint16_t *) code->cmds[i].addr) =
                code->cmds[i].value;
            break;
        case CMD_MEM_WRITE_4:
            *((uint32_t *) code->cmds[i].addr) =
                code->cmds[i].value;
            break;
        case CMD_MEM_WRITE_8:
            *((uint64_t *) code->cmds[i].addr) =
                code->cmds[i].value;
            break;
 
        case CMD_PORT_READ_1:
            dstval = inb((long) code->cmds[i].addr);
            break;
        case CMD_PORT_WRITE_1:
            outb((long) code->cmds[i].addr, code->cmds[i].value);
            break;
 
 
 
 
 
 
 
 
 
 
 
        default:
            break;
        }
        if (code->cmds[i].dstarg && code->cmds[i].dstarg <
            IPC_CALL_LEN) {
            call->data.args[code->cmds[i].dstarg] = dstval;
        }
    }
}
 
/** Free top-half pseudocode.
 *
 * @param code      Pointer to the top-half pseudocode.
 */
static void code_free(irq_code_t *code)
{
    if (code) {
        free(code->cmds);
        free(code);
    }
}
 
/** Copy top-half pseudocode from userspace into the kernel.
 *
 * @param ucode     Userspace address of the top-half pseudocode.
 *
 * @return      Kernel address of the copied pseudocode.
 */
static irq_code_t *code_from_uspace(irq_code_t *ucode)
{
    irq_code_t *code;
    irq_cmd_t *ucmds;
    int rc;
 
    code = malloc(sizeof(*code), 0);
    rc = copy_from_uspace(code, ucode, sizeof(*code));
    if (rc != 0) {
        free(code);
        return NULL;
    }
   
    if (code->cmdcount > IRQ_MAX_PROG_SIZE) {
        free(code);
        return NULL;
    }
    ucmds = code->cmds;
    code->cmds = malloc(sizeof(code->cmds[0]) * code->cmdcount, 0);
    rc = copy_from_uspace(code->cmds, ucmds,
        sizeof(code->cmds[0]) * code->cmdcount);
    if (rc != 0) {
        free(code->cmds);
        free(code);
        return NULL;
    }
 
    return code;
}
 
/** Unregister task from IRQ notification.
 *
 * @param box       Answerbox associated with the notification.
 * @param inr       IRQ number.
 * @param devno     Device number.
 */
void ipc_irq_unregister(answerbox_t *box, inr_t inr, devno_t devno)
{
    ipl_t ipl;
    irq_t *irq;
 
    ipl = interrupts_disable();
    irq = irq_find_and_lock(inr, devno);
    if (irq) {
        if (irq->notif_cfg.answerbox == box) {
            code_free(irq->notif_cfg.code);
            irq->notif_cfg.notify = false;
            irq->notif_cfg.answerbox = NULL;
            irq->notif_cfg.code = NULL;
            irq->notif_cfg.method = 0;
            irq->notif_cfg.counter = 0;
 
            spinlock_lock(&box->irq_lock);
            list_remove(&irq->notif_cfg.link);
            spinlock_unlock(&box->irq_lock);
           
            spinlock_unlock(&irq->lock);
        }
    }
    interrupts_restore(ipl);
}
 
/** Register an answerbox as a receiving end for IRQ notifications.
 *
 * @param box       Receiving answerbox.
 * @param inr       IRQ number.
 * @param devno     Device number.
 * @param method    Method to be associated with the notification.
 * @param ucode     Uspace pointer to top-half pseudocode.
 *
 * @return      EBADMEM, ENOENT or EEXISTS on failure or 0 on success.
 */
int ipc_irq_register(answerbox_t *box, inr_t inr, devno_t devno,
    unative_t method, irq_code_t *ucode)
{
    ipl_t ipl;
    irq_code_t *code;
    irq_t *irq;
 
    if (ucode) {
        code = code_from_uspace(ucode);
        if (!code)
            return EBADMEM;
    } else {
        code = NULL;
    }
 
    ipl = interrupts_disable();
    irq = irq_find_and_lock(inr, devno);
    if (!irq) {
        interrupts_restore(ipl);
        code_free(code);
        return ENOENT;
    }
   
    if (irq->notif_cfg.answerbox) {
        spinlock_unlock(&irq->lock);
        interrupts_restore(ipl);
        code_free(code);
        return EEXISTS;
    }
   
    irq->notif_cfg.notify = true;
    irq->notif_cfg.answerbox = box;
    irq->notif_cfg.method = method;
    irq->notif_cfg.code = code;
    irq->notif_cfg.counter = 0;
 
    spinlock_lock(&box->irq_lock);
    list_append(&irq->notif_cfg.link, &box->irq_head);
    spinlock_unlock(&box->irq_lock);
 
    spinlock_unlock(&irq->lock);
    interrupts_restore(ipl);
 
    return 0;
}
 
/** Add a call to the proper answerbox queue.
 *
 * Assume irq->lock is locked.
 *
 * @param irq       IRQ structure referencing the target answerbox.
 * @param call      IRQ notification call.
 */
static void send_call(irq_t *irq, call_t *call)
{
    spinlock_lock(&irq->notif_cfg.answerbox->irq_lock);
    list_append(&call->link, &irq->notif_cfg.answerbox->irq_notifs);
    spinlock_unlock(&irq->notif_cfg.answerbox->irq_lock);
       
    waitq_wakeup(&irq->notif_cfg.answerbox->wq, WAKEUP_FIRST);
}
 
/** Send notification message.
 *
 * @param irq       IRQ structure.
 * @param a1        Driver-specific payload argument.
 * @param a2        Driver-specific payload argument.
 * @param a3        Driver-specific payload argument.
 * @param a4        Driver-specific payload argument.
 * @param a5        Driver-specific payload argument.
 */
void ipc_irq_send_msg(irq_t *irq, unative_t a1, unative_t a2, unative_t a3,
    unative_t a4, unative_t a5)
{
    call_t *call;
 
    spinlock_lock(&irq->lock);
 
    if (irq->notif_cfg.answerbox) {
        call = ipc_call_alloc(FRAME_ATOMIC);
        if (!call) {
            spinlock_unlock(&irq->lock);
            return;
        }
        call->flags |= IPC_CALL_NOTIF;
        IPC_SET_METHOD(call->data, irq->notif_cfg.method);
        IPC_SET_ARG1(call->data, a1);
        IPC_SET_ARG2(call->data, a2);
        IPC_SET_ARG3(call->data, a3);
        IPC_SET_ARG4(call->data, a4);
        IPC_SET_ARG5(call->data, a5);
        /* Put a counter to the message */
        call->priv = ++irq->notif_cfg.counter;
       
        send_call(irq, call);
    }
    spinlock_unlock(&irq->lock);
}
 
/** Notify a task that an IRQ had occurred.
 *
 * We expect interrupts to be disabled and the irq->lock already held.
 *
 * @param irq       IRQ structure.
 */
void ipc_irq_send_notif(irq_t *irq)
{
    call_t *call;
 
    ASSERT(irq);
 
    if (irq->notif_cfg.answerbox) {
        call = ipc_call_alloc(FRAME_ATOMIC);
        if (!call) {
            return;
        }
        call->flags |= IPC_CALL_NOTIF;
        /* Put a counter to the message */
        call->priv = ++irq->notif_cfg.counter;
        /* Set up args */
        IPC_SET_METHOD(call->data, irq->notif_cfg.method);
 
        /* Execute code to handle irq */
        code_execute(call, irq->notif_cfg.code);
       
        send_call(irq, call);
    }
}
 
/** Disconnect all IRQ notifications from an answerbox.
 *
 * This function is effective because the answerbox contains
 * list of all irq_t structures that are registered to
 * send notifications to it.
 *
 * @param box       Answerbox for which we want to carry out the cleanup.
 */
void ipc_irq_cleanup(answerbox_t *box)
{
    ipl_t ipl;
   
loop:
    ipl = interrupts_disable();
    spinlock_lock(&box->irq_lock);
   
    while (box->irq_head.next != &box->irq_head) {
        link_t *cur = box->irq_head.next;
        irq_t *irq;
        DEADLOCK_PROBE_INIT(p_irqlock);
       
        irq = list_get_instance(cur, irq_t, notif_cfg.link);
        if (!spinlock_trylock(&irq->lock)) {
            /*
             * Avoid deadlock by trying again.
             */
            spinlock_unlock(&box->irq_lock);
            interrupts_restore(ipl);
            DEADLOCK_PROBE(p_irqlock, DEADLOCK_THRESHOLD);
            goto loop;
        }
       
        ASSERT(irq->notif_cfg.answerbox == box);
       
        list_remove(&irq->notif_cfg.link);
       
        /*
         * Don't forget to free any top-half pseudocode.
         */
        code_free(irq->notif_cfg.code);
       
        irq->notif_cfg.notify = false;
        irq->notif_cfg.answerbox = NULL;
        irq->notif_cfg.code = NULL;
        irq->notif_cfg.method = 0;
        irq->notif_cfg.counter = 0;
 
        spinlock_unlock(&irq->lock);
    }
   
    spinlock_unlock(&box->irq_lock);
    interrupts_restore(ipl);
}
 
/** @}
 */
 

Rev 3674	Rev 4342
1	/*	1	/*
2	* Copyright (c) 2006 Ondrej Palkovsky	2	* Copyright (c) 2006 Ondrej Palkovsky
3	* Copyright (c) 2006 Jakub Jermar	3	* Copyright (c) 2006 Jakub Jermar
4	* All rights reserved.	4	* All rights reserved.
5	*	5	*
6	* Redistribution and use in source and binary forms, with or without	6	* Redistribution and use in source and binary forms, with or without
7	* modification, are permitted provided that the following conditions	7	* modification, are permitted provided that the following conditions
8	* are met:	8	* are met:
9	*	9	*
10	* - Redistributions of source code must retain the above copyright	10	* - Redistributions of source code must retain the above copyright
11	* notice, this list of conditions and the following disclaimer.	11	* notice, this list of conditions and the following disclaimer.
12	* - Redistributions in binary form must reproduce the above copyright	12	* - Redistributions in binary form must reproduce the above copyright
13	* notice, this list of conditions and the following disclaimer in the	13	* notice, this list of conditions and the following disclaimer in the
14	* documentation and/or other materials provided with the distribution.	14	* documentation and/or other materials provided with the distribution.
15	* - The name of the author may not be used to endorse or promote products	15	* - The name of the author may not be used to endorse or promote products
16	* derived from this software without specific prior written permission.	16	* derived from this software without specific prior written permission.
17	*	17	*
18	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	18	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	19	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	20	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	21	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	22	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	23	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	24	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	25	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	26	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	27	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28	*/	28	*/
29		29
30	/** @addtogroup genericipc	30	/** @addtogroup genericipc
31	* @{	31	* @{
32	*/	32	*/
33	/**	33	/**
34	* @file	34	* @file
35	* @brief IRQ notification framework.	35	* @brief IRQ notification framework.
36	*	36	*
37	* This framework allows applications to register to receive a notification	37	* This framework allows applications to register to receive a notification
38	* when interrupt is detected. The application may provide a simple 'top-half'	38	* when interrupt is detected. The application may provide a simple 'top-half'
39	* handler as part of its registration, which can perform simple operations	39	* handler as part of its registration, which can perform simple operations
40	* (read/write port/memory, add information to notification ipc message).	40	* (read/write port/memory, add information to notification ipc message).
41	*	41	*
42	* The structure of a notification message is as follows:	42	* The structure of a notification message is as follows:
43	* - METHOD: method as registered by the SYS_IPC_REGISTER_IRQ syscall	43	* - METHOD: method as registered by the SYS_IPC_REGISTER_IRQ syscall
44	* - ARG1: payload modified by a 'top-half' handler	44	* - ARG1: payload modified by a 'top-half' handler
45	* - ARG2: payload modified by a 'top-half' handler	45	* - ARG2: payload modified by a 'top-half' handler
46	* - ARG3: payload modified by a 'top-half' handler	46	* - ARG3: payload modified by a 'top-half' handler
47	* - in_phone_hash: interrupt counter (may be needed to assure correct order	47	* - in_phone_hash: interrupt counter (may be needed to assure correct order
48	* in multithreaded drivers)	48	* in multithreaded drivers)
49	*/	49	*/
50		50
51	#include <arch.h>	51	#include <arch.h>
52	#include <mm/slab.h>	52	#include <mm/slab.h>
53	#include <errno.h>	53	#include <errno.h>
54	#include <ddi/irq.h>	54	#include <ddi/irq.h>
55	#include <ipc/ipc.h>	55	#include <ipc/ipc.h>
56	#include <ipc/irq.h>	56	#include <ipc/irq.h>
57	#include <syscall/copy.h>	57	#include <syscall/copy.h>
58	#include <console/console.h>	58	#include <console/console.h>
59	#include <print.h>	59	#include <print.h>
60		60
61	/** Execute code associated with IRQ notification.	61	/** Execute code associated with IRQ notification.
62	*	62	*
63	* @param call Notification call.	63	* @param call Notification call.
64	* @param code Top-half pseudocode.	64	* @param code Top-half pseudocode.
65	*/	65	*/
66	static void code_execute(call_t call, irq_code_t code)	66	static void code_execute(call_t call, irq_code_t code)
67	{	67	{
68	unsigned int i;	68	unsigned int i;
69	unative_t dstval = 0;	69	unative_t dstval = 0;
70		70
71	if (!code)	71	if (!code)
72	return;	72	return;
73		73
74	for (i = 0; i < code->cmdcount; i++) {	74	for (i = 0; i < code->cmdcount; i++) {
75	switch (code->cmds[i].cmd) {	75	switch (code->cmds[i].cmd) {
76	case CMD_MEM_READ_1:	76	case CMD_MEM_READ_1:
77	dstval = ((uint8_t ) code->cmds[i].addr);	77	dstval = ((uint8_t ) code->cmds[i].addr);
78	break;	78	break;
79	case CMD_MEM_READ_2:	79	case CMD_MEM_READ_2:
80	dstval = ((uint16_t ) code->cmds[i].addr);	80	dstval = ((uint16_t ) code->cmds[i].addr);
81	break;	81	break;
82	case CMD_MEM_READ_4:	82	case CMD_MEM_READ_4:
83	dstval = ((uint32_t ) code->cmds[i].addr);	83	dstval = ((uint32_t ) code->cmds[i].addr);
84	break;	84	break;
85	case CMD_MEM_READ_8:	85	case CMD_MEM_READ_8:
86	dstval = ((uint64_t ) code->cmds[i].addr);	86	dstval = ((uint64_t ) code->cmds[i].addr);
87	break;	87	break;
88	case CMD_MEM_WRITE_1:	88	case CMD_MEM_WRITE_1:
89	((uint8_t ) code->cmds[i].addr) = code->cmds[i].value;	89	((uint8_t ) code->cmds[i].addr) = code->cmds[i].value;
90	break;	90	break;
91	case CMD_MEM_WRITE_2:	91	case CMD_MEM_WRITE_2:
92	((uint16_t ) code->cmds[i].addr) =	92	((uint16_t ) code->cmds[i].addr) =
93	code->cmds[i].value;	93	code->cmds[i].value;
94	break;	94	break;
95	case CMD_MEM_WRITE_4:	95	case CMD_MEM_WRITE_4:
96	((uint32_t ) code->cmds[i].addr) =	96	((uint32_t ) code->cmds[i].addr) =
97	code->cmds[i].value;	97	code->cmds[i].value;
98	break;	98	break;
99	case CMD_MEM_WRITE_8:	99	case CMD_MEM_WRITE_8:
100	((uint64_t ) code->cmds[i].addr) =	100	((uint64_t ) code->cmds[i].addr) =
101	code->cmds[i].value;	101	code->cmds[i].value;
102	break;	102	break;
103	#if defined(ia32) \|\| defined(amd64) \|\| defined(ia64)	-
104	case CMD_PORT_READ_1:	103	case CMD_PORT_READ_1:
105	dstval = inb((long) code->cmds[i].addr);	104	dstval = inb((long) code->cmds[i].addr);
106	break;	105	break;
107	case CMD_PORT_WRITE_1:	106	case CMD_PORT_WRITE_1:
108	outb((long) code->cmds[i].addr, code->cmds[i].value);	107	outb((long) code->cmds[i].addr, code->cmds[i].value);
109	break;	108	break;
110	#endif	-
111	#if defined(ia64) && defined(SKI)	-
112	case CMD_IA64_GETCHAR:	-
113	dstval = _getc(&ski_uconsole);	-
114	break;	-
115	#endif	-
116	#if defined(ppc32)	-
117	case CMD_PPC32_GETCHAR:	-
118	dstval = cuda_get_scancode();	-
119	break;	-
120	#endif	-
121	default:	109	default:
122	break;	110	break;
123	}	111	}
124	if (code->cmds[i].dstarg && code->cmds[i].dstarg <	112	if (code->cmds[i].dstarg && code->cmds[i].dstarg <
125	IPC_CALL_LEN) {	113	IPC_CALL_LEN) {
126	call->data.args[code->cmds[i].dstarg] = dstval;	114	call->data.args[code->cmds[i].dstarg] = dstval;
127	}	115	}
128	}	116	}
129	}	117	}
130		118
131	/** Free top-half pseudocode.	119	/** Free top-half pseudocode.
132	*	120	*
133	* @param code Pointer to the top-half pseudocode.	121	* @param code Pointer to the top-half pseudocode.
134	*/	122	*/
135	static void code_free(irq_code_t *code)	123	static void code_free(irq_code_t *code)
136	{	124	{
137	if (code) {	125	if (code) {
138	free(code->cmds);	126	free(code->cmds);
139	free(code);	127	free(code);
140	}	128	}
141	}	129	}
142		130
143	/** Copy top-half pseudocode from userspace into the kernel.	131	/** Copy top-half pseudocode from userspace into the kernel.
144	*	132	*
145	* @param ucode Userspace address of the top-half pseudocode.	133	* @param ucode Userspace address of the top-half pseudocode.
146	*	134	*
147	* @return Kernel address of the copied pseudocode.	135	* @return Kernel address of the copied pseudocode.
148	*/	136	*/
149	static irq_code_t code_from_uspace(irq_code_t ucode)	137	static irq_code_t code_from_uspace(irq_code_t ucode)
150	{	138	{
151	irq_code_t *code;	139	irq_code_t *code;
152	irq_cmd_t *ucmds;	140	irq_cmd_t *ucmds;
153	int rc;	141	int rc;
154		142
155	code = malloc(sizeof(*code), 0);	143	code = malloc(sizeof(*code), 0);
156	rc = copy_from_uspace(code, ucode, sizeof(*code));	144	rc = copy_from_uspace(code, ucode, sizeof(*code));
157	if (rc != 0) {	145	if (rc != 0) {
158	free(code);	146	free(code);
159	return NULL;	147	return NULL;
160	}	148	}
161		149
162	if (code->cmdcount > IRQ_MAX_PROG_SIZE) {	150	if (code->cmdcount > IRQ_MAX_PROG_SIZE) {
163	free(code);	151	free(code);
164	return NULL;	152	return NULL;
165	}	153	}
166	ucmds = code->cmds;	154	ucmds = code->cmds;
167	code->cmds = malloc(sizeof(code->cmds[0]) * code->cmdcount, 0);	155	code->cmds = malloc(sizeof(code->cmds[0]) * code->cmdcount, 0);
168	rc = copy_from_uspace(code->cmds, ucmds,	156	rc = copy_from_uspace(code->cmds, ucmds,
169	sizeof(code->cmds[0]) * code->cmdcount);	157	sizeof(code->cmds[0]) * code->cmdcount);
170	if (rc != 0) {	158	if (rc != 0) {
171	free(code->cmds);	159	free(code->cmds);
172	free(code);	160	free(code);
173	return NULL;	161	return NULL;
174	}	162	}
175		163
176	return code;	164	return code;
177	}	165	}
178		166
179	/** Unregister task from IRQ notification.	167	/** Unregister task from IRQ notification.
180	*	168	*
181	* @param box Answerbox associated with the notification.	169	* @param box Answerbox associated with the notification.
182	* @param inr IRQ number.	170	* @param inr IRQ number.
183	* @param devno Device number.	171	* @param devno Device number.
184	*/	172	*/
185	void ipc_irq_unregister(answerbox_t *box, inr_t inr, devno_t devno)	173	void ipc_irq_unregister(answerbox_t *box, inr_t inr, devno_t devno)
186	{	174	{
187	ipl_t ipl;	175	ipl_t ipl;
188	irq_t *irq;	176	irq_t *irq;
189		177
190	ipl = interrupts_disable();	178	ipl = interrupts_disable();
191	irq = irq_find_and_lock(inr, devno);	179	irq = irq_find_and_lock(inr, devno);
192	if (irq) {	180	if (irq) {
193	if (irq->notif_cfg.answerbox == box) {	181	if (irq->notif_cfg.answerbox == box) {
194	code_free(irq->notif_cfg.code);	182	code_free(irq->notif_cfg.code);
195	irq->notif_cfg.notify = false;	183	irq->notif_cfg.notify = false;
196	irq->notif_cfg.answerbox = NULL;	184	irq->notif_cfg.answerbox = NULL;
197	irq->notif_cfg.code = NULL;	185	irq->notif_cfg.code = NULL;
198	irq->notif_cfg.method = 0;	186	irq->notif_cfg.method = 0;
199	irq->notif_cfg.counter = 0;	187	irq->notif_cfg.counter = 0;
200		188
201	spinlock_lock(&box->irq_lock);	189	spinlock_lock(&box->irq_lock);
202	list_remove(&irq->notif_cfg.link);	190	list_remove(&irq->notif_cfg.link);
203	spinlock_unlock(&box->irq_lock);	191	spinlock_unlock(&box->irq_lock);
204		192
205	spinlock_unlock(&irq->lock);	193	spinlock_unlock(&irq->lock);
206	}	194	}
207	}	195	}
208	interrupts_restore(ipl);	196	interrupts_restore(ipl);
209	}	197	}
210		198
211	/** Register an answerbox as a receiving end for IRQ notifications.	199	/** Register an answerbox as a receiving end for IRQ notifications.
212	*	200	*
213	* @param box Receiving answerbox.	201	* @param box Receiving answerbox.
214	* @param inr IRQ number.	202	* @param inr IRQ number.
215	* @param devno Device number.	203	* @param devno Device number.
216	* @param method Method to be associated with the notification.	204	* @param method Method to be associated with the notification.
217	* @param ucode Uspace pointer to top-half pseudocode.	205	* @param ucode Uspace pointer to top-half pseudocode.
218	*	206	*
219	* @return EBADMEM, ENOENT or EEXISTS on failure or 0 on success.	207	* @return EBADMEM, ENOENT or EEXISTS on failure or 0 on success.
220	*/	208	*/
221	int ipc_irq_register(answerbox_t *box, inr_t inr, devno_t devno,	209	int ipc_irq_register(answerbox_t *box, inr_t inr, devno_t devno,
222	unative_t method, irq_code_t *ucode)	210	unative_t method, irq_code_t *ucode)
223	{	211	{
224	ipl_t ipl;	212	ipl_t ipl;
225	irq_code_t *code;	213	irq_code_t *code;
226	irq_t *irq;	214	irq_t *irq;
227		215
228	if (ucode) {	216	if (ucode) {
229	code = code_from_uspace(ucode);	217	code = code_from_uspace(ucode);
230	if (!code)	218	if (!code)
231	return EBADMEM;	219	return EBADMEM;
232	} else {	220	} else {
233	code = NULL;	221	code = NULL;
234	}	222	}
235		223
236	ipl = interrupts_disable();	224	ipl = interrupts_disable();
237	irq = irq_find_and_lock(inr, devno);	225	irq = irq_find_and_lock(inr, devno);
238	if (!irq) {	226	if (!irq) {
239	interrupts_restore(ipl);	227	interrupts_restore(ipl);
240	code_free(code);	228	code_free(code);
241	return ENOENT;	229	return ENOENT;
242	}	230	}
243		231
244	if (irq->notif_cfg.answerbox) {	232	if (irq->notif_cfg.answerbox) {
245	spinlock_unlock(&irq->lock);	233	spinlock_unlock(&irq->lock);
246	interrupts_restore(ipl);	234	interrupts_restore(ipl);
247	code_free(code);	235	code_free(code);
248	return EEXISTS;	236	return EEXISTS;
249	}	237	}
250		238
251	irq->notif_cfg.notify = true;	239	irq->notif_cfg.notify = true;
252	irq->notif_cfg.answerbox = box;	240	irq->notif_cfg.answerbox = box;
253	irq->notif_cfg.method = method;	241	irq->notif_cfg.method = method;
254	irq->notif_cfg.code = code;	242	irq->notif_cfg.code = code;
255	irq->notif_cfg.counter = 0;	243	irq->notif_cfg.counter = 0;
256		244
257	spinlock_lock(&box->irq_lock);	245	spinlock_lock(&box->irq_lock);
258	list_append(&irq->notif_cfg.link, &box->irq_head);	246	list_append(&irq->notif_cfg.link, &box->irq_head);
259	spinlock_unlock(&box->irq_lock);	247	spinlock_unlock(&box->irq_lock);
260		248
261	spinlock_unlock(&irq->lock);	249	spinlock_unlock(&irq->lock);
262	interrupts_restore(ipl);	250	interrupts_restore(ipl);
263		251
264	return 0;	252	return 0;
265	}	253	}
266		254
267	/** Add a call to the proper answerbox queue.	255	/** Add a call to the proper answerbox queue.
268	*	256	*
269	* Assume irq->lock is locked.	257	* Assume irq->lock is locked.
270	*	258	*
271	* @param irq IRQ structure referencing the target answerbox.	259	* @param irq IRQ structure referencing the target answerbox.
272	* @param call IRQ notification call.	260	* @param call IRQ notification call.
273	*/	261	*/
274	static void send_call(irq_t irq, call_t call)	262	static void send_call(irq_t irq, call_t call)
275	{	263	{
276	spinlock_lock(&irq->notif_cfg.answerbox->irq_lock);	264	spinlock_lock(&irq->notif_cfg.answerbox->irq_lock);
277	list_append(&call->link, &irq->notif_cfg.answerbox->irq_notifs);	265	list_append(&call->link, &irq->notif_cfg.answerbox->irq_notifs);
278	spinlock_unlock(&irq->notif_cfg.answerbox->irq_lock);	266	spinlock_unlock(&irq->notif_cfg.answerbox->irq_lock);
279		267
280	waitq_wakeup(&irq->notif_cfg.answerbox->wq, WAKEUP_FIRST);	268	waitq_wakeup(&irq->notif_cfg.answerbox->wq, WAKEUP_FIRST);
281	}	269	}
282		270
283	/** Send notification message.	271	/** Send notification message.
284	*	272	*
285	* @param irq IRQ structure.	273	* @param irq IRQ structure.
286	* @param a1 Driver-specific payload argument.	274	* @param a1 Driver-specific payload argument.
287	* @param a2 Driver-specific payload argument.	275	* @param a2 Driver-specific payload argument.
288	* @param a3 Driver-specific payload argument.	276	* @param a3 Driver-specific payload argument.
289	* @param a4 Driver-specific payload argument.	277	* @param a4 Driver-specific payload argument.
290	* @param a5 Driver-specific payload argument.	278	* @param a5 Driver-specific payload argument.
291	*/	279	*/
292	void ipc_irq_send_msg(irq_t *irq, unative_t a1, unative_t a2, unative_t a3,	280	void ipc_irq_send_msg(irq_t *irq, unative_t a1, unative_t a2, unative_t a3,
293	unative_t a4, unative_t a5)	281	unative_t a4, unative_t a5)
294	{	282	{
295	call_t *call;	283	call_t *call;
296		284
297	spinlock_lock(&irq->lock);	285	spinlock_lock(&irq->lock);
298		286
299	if (irq->notif_cfg.answerbox) {	287	if (irq->notif_cfg.answerbox) {
300	call = ipc_call_alloc(FRAME_ATOMIC);	288	call = ipc_call_alloc(FRAME_ATOMIC);
301	if (!call) {	289	if (!call) {
302	spinlock_unlock(&irq->lock);	290	spinlock_unlock(&irq->lock);
303	return;	291	return;
304	}	292	}
305	call->flags \|= IPC_CALL_NOTIF;	293	call->flags \|= IPC_CALL_NOTIF;
306	IPC_SET_METHOD(call->data, irq->notif_cfg.method);	294	IPC_SET_METHOD(call->data, irq->notif_cfg.method);
307	IPC_SET_ARG1(call->data, a1);	295	IPC_SET_ARG1(call->data, a1);
308	IPC_SET_ARG2(call->data, a2);	296	IPC_SET_ARG2(call->data, a2);
309	IPC_SET_ARG3(call->data, a3);	297	IPC_SET_ARG3(call->data, a3);
310	IPC_SET_ARG4(call->data, a4);	298	IPC_SET_ARG4(call->data, a4);
311	IPC_SET_ARG5(call->data, a5);	299	IPC_SET_ARG5(call->data, a5);
312	/* Put a counter to the message */	300	/* Put a counter to the message */
313	call->priv = ++irq->notif_cfg.counter;	301	call->priv = ++irq->notif_cfg.counter;
314		302
315	send_call(irq, call);	303	send_call(irq, call);
316	}	304	}
317	spinlock_unlock(&irq->lock);	305	spinlock_unlock(&irq->lock);
318	}	306	}
319		307
320	/** Notify a task that an IRQ had occurred.	308	/** Notify a task that an IRQ had occurred.
321	*	309	*
322	* We expect interrupts to be disabled and the irq->lock already held.	310	* We expect interrupts to be disabled and the irq->lock already held.
323	*	311	*
324	* @param irq IRQ structure.	312	* @param irq IRQ structure.
325	*/	313	*/
326	void ipc_irq_send_notif(irq_t *irq)	314	void ipc_irq_send_notif(irq_t *irq)
327	{	315	{
328	call_t *call;	316	call_t *call;
329		317
330	ASSERT(irq);	318	ASSERT(irq);
331		319
332	if (irq->notif_cfg.answerbox) {	320	if (irq->notif_cfg.answerbox) {
333	call = ipc_call_alloc(FRAME_ATOMIC);	321	call = ipc_call_alloc(FRAME_ATOMIC);
334	if (!call) {	322	if (!call) {
335	return;	323	return;
336	}	324	}
337	call->flags \|= IPC_CALL_NOTIF;	325	call->flags \|= IPC_CALL_NOTIF;
338	/* Put a counter to the message */	326	/* Put a counter to the message */
339	call->priv = ++irq->notif_cfg.counter;	327	call->priv = ++irq->notif_cfg.counter;
340	/* Set up args */	328	/* Set up args */
341	IPC_SET_METHOD(call->data, irq->notif_cfg.method);	329	IPC_SET_METHOD(call->data, irq->notif_cfg.method);
342		330
343	/* Execute code to handle irq */	331	/* Execute code to handle irq */
344	code_execute(call, irq->notif_cfg.code);	332	code_execute(call, irq->notif_cfg.code);
345		333
346	send_call(irq, call);	334	send_call(irq, call);
347	}	335	}
348	}	336	}
349		337
350	/** Disconnect all IRQ notifications from an answerbox.	338	/** Disconnect all IRQ notifications from an answerbox.
351	*	339	*
352	* This function is effective because the answerbox contains	340	* This function is effective because the answerbox contains
353	* list of all irq_t structures that are registered to	341	* list of all irq_t structures that are registered to
354	* send notifications to it.	342	* send notifications to it.
355	*	343	*
356	* @param box Answerbox for which we want to carry out the cleanup.	344	* @param box Answerbox for which we want to carry out the cleanup.
357	*/	345	*/
358	void ipc_irq_cleanup(answerbox_t *box)	346	void ipc_irq_cleanup(answerbox_t *box)
359	{	347	{
360	ipl_t ipl;	348	ipl_t ipl;
361		349
362	loop:	350	loop:
363	ipl = interrupts_disable();	351	ipl = interrupts_disable();
364	spinlock_lock(&box->irq_lock);	352	spinlock_lock(&box->irq_lock);
365		353
366	while (box->irq_head.next != &box->irq_head) {	354	while (box->irq_head.next != &box->irq_head) {
367	link_t *cur = box->irq_head.next;	355	link_t *cur = box->irq_head.next;
368	irq_t *irq;	356	irq_t *irq;
369	DEADLOCK_PROBE_INIT(p_irqlock);	357	DEADLOCK_PROBE_INIT(p_irqlock);
370		358
371	irq = list_get_instance(cur, irq_t, notif_cfg.link);	359	irq = list_get_instance(cur, irq_t, notif_cfg.link);
372	if (!spinlock_trylock(&irq->lock)) {	360	if (!spinlock_trylock(&irq->lock)) {
373	/*	361	/*
374	* Avoid deadlock by trying again.	362	* Avoid deadlock by trying again.
375	*/	363	*/
376	spinlock_unlock(&box->irq_lock);	364	spinlock_unlock(&box->irq_lock);
377	interrupts_restore(ipl);	365	interrupts_restore(ipl);
378	DEADLOCK_PROBE(p_irqlock, DEADLOCK_THRESHOLD);	366	DEADLOCK_PROBE(p_irqlock, DEADLOCK_THRESHOLD);
379	goto loop;	367	goto loop;
380	}	368	}
381		369
382	ASSERT(irq->notif_cfg.answerbox == box);	370	ASSERT(irq->notif_cfg.answerbox == box);
383		371
384	list_remove(&irq->notif_cfg.link);	372	list_remove(&irq->notif_cfg.link);
385		373
386	/*	374	/*
387	* Don't forget to free any top-half pseudocode.	375	* Don't forget to free any top-half pseudocode.
388	*/	376	*/
389	code_free(irq->notif_cfg.code);	377	code_free(irq->notif_cfg.code);
390		378
391	irq->notif_cfg.notify = false;	379	irq->notif_cfg.notify = false;
392	irq->notif_cfg.answerbox = NULL;	380	irq->notif_cfg.answerbox = NULL;
393	irq->notif_cfg.code = NULL;	381	irq->notif_cfg.code = NULL;
394	irq->notif_cfg.method = 0;	382	irq->notif_cfg.method = 0;
395	irq->notif_cfg.counter = 0;	383	irq->notif_cfg.counter = 0;
396		384
397	spinlock_unlock(&irq->lock);	385	spinlock_unlock(&irq->lock);
398	}	386	}
399		387
400	spinlock_unlock(&box->irq_lock);	388	spinlock_unlock(&box->irq_lock);
401	interrupts_restore(ipl);	389	interrupts_restore(ipl);
402	}	390	}
403		391
404	/** @}	392	/** @}
405	*/	393	*/
406		394

Subversion Repositories HelenOS

(root)/branches/dynload/kernel/generic/src/ipc/irq.c @ 3674 – Rev 3674 → 4342