Subversion Repositories HelenOS

Rev

Rev 4407 | Rev 4430 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4407 Rev 4422
1
/*
1
/*
2
 * Copyright (c) 2006 Ondrej Palkovsky
2
 * Copyright (c) 2006 Ondrej Palkovsky
3
 * All rights reserved.
3
 * All rights reserved.
4
 *
4
 *
5
 * Redistribution and use in source and binary forms, with or without
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
6
 * modification, are permitted provided that the following conditions
7
 * are met:
7
 * are met:
8
 *
8
 *
9
 * - Redistributions of source code must retain the above copyright
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
12
 *   notice, this list of conditions and the following disclaimer in the
13
 *   documentation and/or other materials provided with the distribution.
13
 *   documentation and/or other materials provided with the distribution.
14
 * - The name of the author may not be used to endorse or promote products
14
 * - The name of the author may not be used to endorse or promote products
15
 *   derived from this software without specific prior written permission.
15
 *   derived from this software without specific prior written permission.
16
 *
16
 *
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
27
 */
28
 
28
 
29
/** @addtogroup genericipc
29
/** @addtogroup genericipc
30
 * @{
30
 * @{
31
 */
31
 */
32
/** @file
32
/** @file
33
 */
33
 */
34
 
34
 
35
#include <arch.h>
35
#include <arch.h>
36
#include <proc/task.h>
36
#include <proc/task.h>
37
#include <proc/thread.h>
37
#include <proc/thread.h>
38
#include <errno.h>
38
#include <errno.h>
39
#include <memstr.h>
39
#include <memstr.h>
40
#include <debug.h>
40
#include <debug.h>
41
#include <ipc/ipc.h>
41
#include <ipc/ipc.h>
42
#include <ipc/sysipc.h>
42
#include <ipc/sysipc.h>
43
#include <ipc/irq.h>
43
#include <ipc/irq.h>
44
#include <ipc/ipcrsc.h>
44
#include <ipc/ipcrsc.h>
45
#include <ipc/kbox.h>
45
#include <ipc/kbox.h>
46
#include <udebug/udebug_ipc.h>
46
#include <udebug/udebug_ipc.h>
47
#include <arch/interrupt.h>
47
#include <arch/interrupt.h>
48
#include <syscall/copy.h>
48
#include <syscall/copy.h>
49
#include <security/cap.h>
49
#include <security/cap.h>
50
#include <mm/as.h>
50
#include <mm/as.h>
51
#include <print.h>
51
#include <print.h>
52
 
52
 
53
/**
53
/**
54
 * Maximum buffer size allowed for IPC_M_DATA_WRITE and IPC_M_DATA_READ
54
 * Maximum buffer size allowed for IPC_M_DATA_WRITE and IPC_M_DATA_READ
55
 * requests.
55
 * requests.
56
 */
56
 */
57
#define DATA_XFER_LIMIT     (64 * 1024)
57
#define DATA_XFER_LIMIT     (64 * 1024)
58
 
58
 
59
#define GET_CHECK_PHONE(phone, phoneid, err) \
59
#define GET_CHECK_PHONE(phone, phoneid, err) \
60
{ \
60
{ \
61
    if (phoneid > IPC_MAX_PHONES) { \
61
    if (phoneid > IPC_MAX_PHONES) { \
62
        err; \
62
        err; \
63
    } \
63
    } \
64
    phone = &TASK->phones[phoneid]; \
64
    phone = &TASK->phones[phoneid]; \
65
}
65
}
66
 
66
 
67
#define STRUCT_TO_USPACE(dst, src)  copy_to_uspace(dst, src, sizeof(*(src)))
67
#define STRUCT_TO_USPACE(dst, src)  copy_to_uspace(dst, src, sizeof(*(src)))
68
 
68
 
69
/** Decide if the method is a system method.
69
/** Decide if the method is a system method.
70
 *
70
 *
71
 * @param method    Method to be decided.
71
 * @param method    Method to be decided.
72
 *
72
 *
73
 * @return      Return 1 if the method is a system method.
73
 * @return      Return 1 if the method is a system method.
74
 *          Otherwise return 0.
74
 *          Otherwise return 0.
75
 */
75
 */
76
static inline int method_is_system(unative_t method)
76
static inline int method_is_system(unative_t method)
77
{
77
{
78
    if (method <= IPC_M_LAST_SYSTEM)
78
    if (method <= IPC_M_LAST_SYSTEM)
79
        return 1;
79
        return 1;
80
    return 0;
80
    return 0;
81
}
81
}
82
 
82
 
83
/** Decide if the message with this method is forwardable.
83
/** Decide if the message with this method is forwardable.
84
 *
84
 *
85
 * - some system messages may be forwarded, for some of them
85
 * - some system messages may be forwarded, for some of them
86
 *   it is useless
86
 *   it is useless
87
 *
87
 *
88
 * @param method    Method to be decided.
88
 * @param method    Method to be decided.
89
 *
89
 *
90
 * @return      Return 1 if the method is forwardable.
90
 * @return      Return 1 if the method is forwardable.
91
 *          Otherwise return 0.
91
 *          Otherwise return 0.
92
 */
92
 */
93
static inline int method_is_forwardable(unative_t method)
93
static inline int method_is_forwardable(unative_t method)
94
{
94
{
95
    switch (method) {
95
    switch (method) {
96
    case IPC_M_CONNECTION_CLONE:
96
    case IPC_M_CONNECTION_CLONE:
97
    case IPC_M_CONNECT_ME:
97
    case IPC_M_CONNECT_ME:
98
    case IPC_M_PHONE_HUNGUP:
98
    case IPC_M_PHONE_HUNGUP:
99
        /* This message is meant only for the original recipient. */
99
        /* This message is meant only for the original recipient. */
100
        return 0;
100
        return 0;
101
    default:
101
    default:
102
        return 1;
102
        return 1;
103
    }
103
    }
104
}
104
}
105
 
105
 
106
/** Decide if the message with this method is immutable on forward.
106
/** Decide if the message with this method is immutable on forward.
107
 *
107
 *
108
 * - some system messages may be forwarded but their content cannot be altered
108
 * - some system messages may be forwarded but their content cannot be altered
109
 *
109
 *
110
 * @param method    Method to be decided.
110
 * @param method    Method to be decided.
111
 *
111
 *
112
 * @return      Return 1 if the method is immutable on forward.
112
 * @return      Return 1 if the method is immutable on forward.
113
 *          Otherwise return 0.
113
 *          Otherwise return 0.
114
 */
114
 */
115
static inline int method_is_immutable(unative_t method)
115
static inline int method_is_immutable(unative_t method)
116
{
116
{
117
    switch (method) {
117
    switch (method) {
118
    case IPC_M_SHARE_OUT:
118
    case IPC_M_SHARE_OUT:
119
    case IPC_M_SHARE_IN:
119
    case IPC_M_SHARE_IN:
120
    case IPC_M_DATA_WRITE:
120
    case IPC_M_DATA_WRITE:
121
    case IPC_M_DATA_READ:
121
    case IPC_M_DATA_READ:
122
        return 1;
122
        return 1;
123
        break;
123
        break;
124
    default:
124
    default:
125
        return 0;
125
        return 0;
126
    }
126
    }
127
}
127
}
128
 
128
 
129
 
129
 
130
/***********************************************************************
130
/***********************************************************************
131
 * Functions that preprocess answer before sending it to the recepient.
131
 * Functions that preprocess answer before sending it to the recepient.
132
 ***********************************************************************/
132
 ***********************************************************************/
133
 
133
 
134
/** Decide if the caller (e.g. ipc_answer()) should save the old call contents
134
/** Decide if the caller (e.g. ipc_answer()) should save the old call contents
135
 * for answer_preprocess().
135
 * for answer_preprocess().
136
 *
136
 *
137
 * @param call      Call structure to be decided.
137
 * @param call      Call structure to be decided.
138
 *
138
 *
139
 * @return      Return 1 if the old call contents should be saved.
139
 * @return      Return 1 if the old call contents should be saved.
140
 *          Return 0 otherwise.
140
 *          Return 0 otherwise.
141
 */
141
 */
142
static inline int answer_need_old(call_t *call)
142
static inline int answer_need_old(call_t *call)
143
{
143
{
144
    switch (IPC_GET_METHOD(call->data)) {
144
    switch (IPC_GET_METHOD(call->data)) {
145
    case IPC_M_CONNECTION_CLONE:
145
    case IPC_M_CONNECTION_CLONE:
146
    case IPC_M_CONNECT_ME:
146
    case IPC_M_CONNECT_ME:
147
    case IPC_M_CONNECT_TO_ME:
147
    case IPC_M_CONNECT_TO_ME:
148
    case IPC_M_CONNECT_ME_TO:
148
    case IPC_M_CONNECT_ME_TO:
149
    case IPC_M_SHARE_OUT:
149
    case IPC_M_SHARE_OUT:
150
    case IPC_M_SHARE_IN:
150
    case IPC_M_SHARE_IN:
151
    case IPC_M_DATA_WRITE:
151
    case IPC_M_DATA_WRITE:
152
    case IPC_M_DATA_READ:
152
    case IPC_M_DATA_READ:
153
        return 1;
153
        return 1;
154
    default:
154
    default:
155
        return 0;
155
        return 0;
156
    }
156
    }
157
}
157
}
158
 
158
 
159
/** Interpret process answer as control information.
159
/** Interpret process answer as control information.
160
 *
160
 *
161
 * This function is called directly after sys_ipc_answer().
161
 * This function is called directly after sys_ipc_answer().
162
 *
162
 *
163
 * @param answer    Call structure with the answer.
163
 * @param answer    Call structure with the answer.
164
 * @param olddata   Saved data of the request.
164
 * @param olddata   Saved data of the request.
165
 *
165
 *
166
 * @return      Return 0 on success or an error code.
166
 * @return      Return 0 on success or an error code.
167
 */
167
 */
168
static inline int answer_preprocess(call_t *answer, ipc_data_t *olddata)
168
static inline int answer_preprocess(call_t *answer, ipc_data_t *olddata)
169
{
169
{
170
    int phoneid;
170
    int phoneid;
171
 
171
 
172
    if ((native_t) IPC_GET_RETVAL(answer->data) == EHANGUP) {
172
    if ((native_t) IPC_GET_RETVAL(answer->data) == EHANGUP) {
173
        /* In case of forward, hangup the forwared phone,
173
        /* In case of forward, hangup the forwared phone,
174
         * not the originator
174
         * not the originator
175
         */
175
         */
176
        mutex_lock(&answer->data.phone->lock);
176
        mutex_lock(&answer->data.phone->lock);
177
        spinlock_lock(&TASK->answerbox.lock);
177
        spinlock_lock(&TASK->answerbox.lock);
178
        if (answer->data.phone->state == IPC_PHONE_CONNECTED) {
178
        if (answer->data.phone->state == IPC_PHONE_CONNECTED) {
179
            list_remove(&answer->data.phone->link);
179
            list_remove(&answer->data.phone->link);
180
            answer->data.phone->state = IPC_PHONE_SLAMMED;
180
            answer->data.phone->state = IPC_PHONE_SLAMMED;
181
        }
181
        }
182
        spinlock_unlock(&TASK->answerbox.lock);
182
        spinlock_unlock(&TASK->answerbox.lock);
183
        mutex_unlock(&answer->data.phone->lock);
183
        mutex_unlock(&answer->data.phone->lock);
184
    }
184
    }
185
 
185
 
186
    if (!olddata)
186
    if (!olddata)
187
        return 0;
187
        return 0;
188
 
188
 
189
    if (IPC_GET_METHOD(*olddata) == IPC_M_CONNECTION_CLONE) {
189
    if (IPC_GET_METHOD(*olddata) == IPC_M_CONNECTION_CLONE) {
190
        phoneid = IPC_GET_ARG1(*olddata);
190
        phoneid = IPC_GET_ARG1(*olddata);
191
        phone_t *phone = &TASK->phones[phoneid];
191
        phone_t *phone = &TASK->phones[phoneid];
192
        if (IPC_GET_RETVAL(answer->data) != EOK) {
192
        if (IPC_GET_RETVAL(answer->data) != EOK) {
193
            /*
193
            /*
194
             * The recipient of the cloned phone rejected the offer.
194
             * The recipient of the cloned phone rejected the offer.
195
             * In this case, the connection was established at the
195
             * In this case, the connection was established at the
196
             * request time and therefore we need to slam the phone.
196
             * request time and therefore we need to slam the phone.
197
             * We don't merely hangup as that would result in
197
             * We don't merely hangup as that would result in
198
             * sending IPC_M_HUNGUP to the third party on the
198
             * sending IPC_M_HUNGUP to the third party on the
199
             * other side of the cloned phone.
199
             * other side of the cloned phone.
200
             */
200
             */
201
            mutex_lock(&phone->lock);
201
            mutex_lock(&phone->lock);
202
            if (phone->state == IPC_PHONE_CONNECTED) {
202
            if (phone->state == IPC_PHONE_CONNECTED) {
203
                spinlock_lock(&phone->callee->lock);
203
                spinlock_lock(&phone->callee->lock);
204
                list_remove(&phone->link);
204
                list_remove(&phone->link);
205
                phone->state = IPC_PHONE_SLAMMED;
205
                phone->state = IPC_PHONE_SLAMMED;
206
                spinlock_unlock(&phone->callee->lock);
206
                spinlock_unlock(&phone->callee->lock);
207
            }
207
            }
208
            mutex_unlock(&phone->lock);
208
            mutex_unlock(&phone->lock);
209
        }
209
        }
210
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_CONNECT_ME) {
210
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_CONNECT_ME) {
211
        phone_t *phone = (phone_t *)IPC_GET_ARG5(*olddata);
211
        phone_t *phone = (phone_t *)IPC_GET_ARG5(*olddata);
212
        if (IPC_GET_RETVAL(answer->data) != EOK) {
212
        if (IPC_GET_RETVAL(answer->data) != EOK) {
213
            /*
213
            /*
214
             * The other party on the cloned phoned rejected our
214
             * The other party on the cloned phoned rejected our
215
             * request for connection on the protocol level.
215
             * request for connection on the protocol level.
216
             * We need to break the connection without sending
216
             * We need to break the connection without sending
217
             * IPC_M_HUNGUP back.
217
             * IPC_M_HUNGUP back.
218
             */
218
             */
219
            mutex_lock(&phone->lock);
219
            mutex_lock(&phone->lock);
220
            if (phone->state == IPC_PHONE_CONNECTED) {
220
            if (phone->state == IPC_PHONE_CONNECTED) {
221
                spinlock_lock(&phone->callee->lock);
221
                spinlock_lock(&phone->callee->lock);
222
                list_remove(&phone->link);
222
                list_remove(&phone->link);
223
                phone->state = IPC_PHONE_SLAMMED;
223
                phone->state = IPC_PHONE_SLAMMED;
224
                spinlock_unlock(&phone->callee->lock);
224
                spinlock_unlock(&phone->callee->lock);
225
            }
225
            }
226
            mutex_unlock(&phone->lock);
226
            mutex_unlock(&phone->lock);
227
        }
227
        }
228
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_CONNECT_TO_ME) {
228
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_CONNECT_TO_ME) {
229
        phoneid = IPC_GET_ARG5(*olddata);
229
        phoneid = IPC_GET_ARG5(*olddata);
230
        if (IPC_GET_RETVAL(answer->data) != EOK) {
230
        if (IPC_GET_RETVAL(answer->data) != EOK) {
231
            /* The connection was not accepted */
231
            /* The connection was not accepted */
232
            phone_dealloc(phoneid);
232
            phone_dealloc(phoneid);
233
        } else {
233
        } else {
234
            /* The connection was accepted */
234
            /* The connection was accepted */
235
            phone_connect(phoneid, &answer->sender->answerbox);
235
            phone_connect(phoneid, &answer->sender->answerbox);
236
            /* Set 'phone hash' as arg5 of response */
236
            /* Set 'phone hash' as arg5 of response */
237
            IPC_SET_ARG5(answer->data,
237
            IPC_SET_ARG5(answer->data,
238
                (unative_t) &TASK->phones[phoneid]);
238
                (unative_t) &TASK->phones[phoneid]);
239
        }
239
        }
240
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_CONNECT_ME_TO) {
240
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_CONNECT_ME_TO) {
241
        /* If the users accepted call, connect */
241
        /* If the users accepted call, connect */
242
        if (IPC_GET_RETVAL(answer->data) == EOK) {
242
        if (IPC_GET_RETVAL(answer->data) == EOK) {
243
            ipc_phone_connect((phone_t *) IPC_GET_ARG5(*olddata),
243
            ipc_phone_connect((phone_t *) IPC_GET_ARG5(*olddata),
244
                &TASK->answerbox);
244
                &TASK->answerbox);
245
        }
245
        }
246
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_SHARE_OUT) {
246
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_SHARE_OUT) {
247
        if (!IPC_GET_RETVAL(answer->data)) {
247
        if (!IPC_GET_RETVAL(answer->data)) {
248
            /* Accepted, handle as_area receipt */
248
            /* Accepted, handle as_area receipt */
249
            ipl_t ipl;
249
            ipl_t ipl;
250
            int rc;
250
            int rc;
251
            as_t *as;
251
            as_t *as;
252
           
252
           
253
            ipl = interrupts_disable();
253
            ipl = interrupts_disable();
254
            spinlock_lock(&answer->sender->lock);
254
            spinlock_lock(&answer->sender->lock);
255
            as = answer->sender->as;
255
            as = answer->sender->as;
256
            spinlock_unlock(&answer->sender->lock);
256
            spinlock_unlock(&answer->sender->lock);
257
            interrupts_restore(ipl);
257
            interrupts_restore(ipl);
258
           
258
           
259
            rc = as_area_share(as, IPC_GET_ARG1(*olddata),
259
            rc = as_area_share(as, IPC_GET_ARG1(*olddata),
260
                IPC_GET_ARG2(*olddata), AS,
260
                IPC_GET_ARG2(*olddata), AS,
261
                IPC_GET_ARG1(answer->data), IPC_GET_ARG3(*olddata));
261
                IPC_GET_ARG1(answer->data), IPC_GET_ARG3(*olddata));
262
            IPC_SET_RETVAL(answer->data, rc);
262
            IPC_SET_RETVAL(answer->data, rc);
263
            return rc;
263
            return rc;
264
        }
264
        }
265
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_SHARE_IN) {
265
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_SHARE_IN) {
266
        if (!IPC_GET_RETVAL(answer->data)) {
266
        if (!IPC_GET_RETVAL(answer->data)) {
267
            ipl_t ipl;
267
            ipl_t ipl;
268
            as_t *as;
268
            as_t *as;
269
            int rc;
269
            int rc;
270
           
270
           
271
            ipl = interrupts_disable();
271
            ipl = interrupts_disable();
272
            spinlock_lock(&answer->sender->lock);
272
            spinlock_lock(&answer->sender->lock);
273
            as = answer->sender->as;
273
            as = answer->sender->as;
274
            spinlock_unlock(&answer->sender->lock);
274
            spinlock_unlock(&answer->sender->lock);
275
            interrupts_restore(ipl);
275
            interrupts_restore(ipl);
276
           
276
           
277
            rc = as_area_share(AS, IPC_GET_ARG1(answer->data),
277
            rc = as_area_share(AS, IPC_GET_ARG1(answer->data),
278
                IPC_GET_ARG2(*olddata), as, IPC_GET_ARG1(*olddata),
278
                IPC_GET_ARG2(*olddata), as, IPC_GET_ARG1(*olddata),
279
                IPC_GET_ARG2(answer->data));
279
                IPC_GET_ARG2(answer->data));
280
            IPC_SET_RETVAL(answer->data, rc);
280
            IPC_SET_RETVAL(answer->data, rc);
281
        }
281
        }
282
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_DATA_READ) {
282
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_DATA_READ) {
283
        ASSERT(!answer->buffer);
283
        ASSERT(!answer->buffer);
284
        if (!IPC_GET_RETVAL(answer->data)) {
284
        if (!IPC_GET_RETVAL(answer->data)) {
285
            /* The recipient agreed to send data. */
285
            /* The recipient agreed to send data. */
286
            uintptr_t src = IPC_GET_ARG1(answer->data);
286
            uintptr_t src = IPC_GET_ARG1(answer->data);
287
            uintptr_t dst = IPC_GET_ARG1(*olddata);
287
            uintptr_t dst = IPC_GET_ARG1(*olddata);
288
            size_t max_size = IPC_GET_ARG2(*olddata);
288
            size_t max_size = IPC_GET_ARG2(*olddata);
289
            size_t size = IPC_GET_ARG2(answer->data);
289
            size_t size = IPC_GET_ARG2(answer->data);
290
            if (size && size <= max_size) {
290
            if (size && size <= max_size) {
291
                /*
291
                /*
292
                 * Copy the destination VA so that this piece of
292
                 * Copy the destination VA so that this piece of
293
                 * information is not lost.
293
                 * information is not lost.
294
                 */
294
                 */
295
                IPC_SET_ARG1(answer->data, dst);
295
                IPC_SET_ARG1(answer->data, dst);
296
 
296
 
297
                answer->buffer = malloc(size, 0);
297
                answer->buffer = malloc(size, 0);
298
                int rc = copy_from_uspace(answer->buffer,
298
                int rc = copy_from_uspace(answer->buffer,
299
                    (void *) src, size);
299
                    (void *) src, size);
300
                if (rc) {
300
                if (rc) {
301
                    IPC_SET_RETVAL(answer->data, rc);
301
                    IPC_SET_RETVAL(answer->data, rc);
302
                    free(answer->buffer);
302
                    free(answer->buffer);
303
                    answer->buffer = NULL;
303
                    answer->buffer = NULL;
304
                }
304
                }
305
            } else if (!size) {
305
            } else if (!size) {
306
                IPC_SET_RETVAL(answer->data, EOK);
306
                IPC_SET_RETVAL(answer->data, EOK);
307
            } else {
307
            } else {
308
                IPC_SET_RETVAL(answer->data, ELIMIT);
308
                IPC_SET_RETVAL(answer->data, ELIMIT);
309
            }
309
            }
310
        }
310
        }
311
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_DATA_WRITE) {
311
    } else if (IPC_GET_METHOD(*olddata) == IPC_M_DATA_WRITE) {
312
        ASSERT(answer->buffer);
312
        ASSERT(answer->buffer);
313
        if (!IPC_GET_RETVAL(answer->data)) {
313
        if (!IPC_GET_RETVAL(answer->data)) {
314
            /* The recipient agreed to receive data. */
314
            /* The recipient agreed to receive data. */
315
            int rc;
315
            int rc;
316
            uintptr_t dst;
316
            uintptr_t dst;
317
            size_t size;
317
            size_t size;
318
            size_t max_size;
318
            size_t max_size;
319
 
319
 
320
            dst = (uintptr_t)IPC_GET_ARG1(answer->data);
320
            dst = (uintptr_t)IPC_GET_ARG1(answer->data);
321
            size = (size_t)IPC_GET_ARG2(answer->data);
321
            size = (size_t)IPC_GET_ARG2(answer->data);
322
            max_size = (size_t)IPC_GET_ARG2(*olddata);
322
            max_size = (size_t)IPC_GET_ARG2(*olddata);
323
 
323
 
324
            if (size <= max_size) {
324
            if (size <= max_size) {
325
                rc = copy_to_uspace((void *) dst,
325
                rc = copy_to_uspace((void *) dst,
326
                    answer->buffer, size);
326
                    answer->buffer, size);
327
                if (rc)
327
                if (rc)
328
                    IPC_SET_RETVAL(answer->data, rc);
328
                    IPC_SET_RETVAL(answer->data, rc);
329
            } else {
329
            } else {
330
                IPC_SET_RETVAL(answer->data, ELIMIT);
330
                IPC_SET_RETVAL(answer->data, ELIMIT);
331
            }
331
            }
332
        }
332
        }
333
        free(answer->buffer);
333
        free(answer->buffer);
334
        answer->buffer = NULL;
334
        answer->buffer = NULL;
335
    }
335
    }
336
    return 0;
336
    return 0;
337
}
337
}
338
 
338
 
339
/** Called before the request is sent.
339
/** Called before the request is sent.
340
 *
340
 *
341
 * @param call      Call structure with the request.
341
 * @param call      Call structure with the request.
342
 * @param phone     Phone that the call will be sent through.
342
 * @param phone     Phone that the call will be sent through.
343
 *
343
 *
344
 * @return      Return 0 on success, ELIMIT or EPERM on error.
344
 * @return      Return 0 on success, ELIMIT or EPERM on error.
345
 */
345
 */
346
static int request_preprocess(call_t *call, phone_t *phone)
346
static int request_preprocess(call_t *call, phone_t *phone)
347
{
347
{
348
    int newphid;
348
    int newphid;
349
    size_t size;
349
    size_t size;
350
    uintptr_t src;
350
    uintptr_t src;
351
    int rc;
351
    int rc;
352
 
352
 
353
    switch (IPC_GET_METHOD(call->data)) {
353
    switch (IPC_GET_METHOD(call->data)) {
354
    case IPC_M_CONNECTION_CLONE: {
354
    case IPC_M_CONNECTION_CLONE: {
355
        phone_t *cloned_phone;
355
        phone_t *cloned_phone;
356
        GET_CHECK_PHONE(cloned_phone, IPC_GET_ARG1(call->data),
356
        GET_CHECK_PHONE(cloned_phone, IPC_GET_ARG1(call->data),
357
            return ENOENT);
357
            return ENOENT);
-
 
358
        if (phone  == cloned_phone)
-
 
359
            return EEXISTS;
358
        if (cloned_phone < phone) {
360
        if (cloned_phone < phone) {
359
            mutex_lock(&cloned_phone->lock);
361
            mutex_lock(&cloned_phone->lock);
360
            mutex_lock(&phone->lock);
362
            mutex_lock(&phone->lock);
361
        } else {
363
        } else {
362
            mutex_lock(&phone->lock);
364
            mutex_lock(&phone->lock);
363
            mutex_lock(&cloned_phone->lock);
365
            mutex_lock(&cloned_phone->lock);
364
        }
366
        }
365
        if ((cloned_phone->state != IPC_PHONE_CONNECTED) ||
367
        if ((cloned_phone->state != IPC_PHONE_CONNECTED) ||
366
            phone->state != IPC_PHONE_CONNECTED) {
368
            phone->state != IPC_PHONE_CONNECTED) {
367
            mutex_unlock(&cloned_phone->lock);
369
            mutex_unlock(&cloned_phone->lock);
368
            mutex_unlock(&phone->lock);
370
            mutex_unlock(&phone->lock);
369
            return EINVAL;
371
            return EINVAL;
370
        }
372
        }
371
        /*
373
        /*
372
         * We can be pretty sure now that both tasks exist and we are
374
         * We can be pretty sure now that both tasks exist and we are
373
         * connected to them. As we continue to hold the phone locks,
375
         * connected to them. As we continue to hold the phone locks,
374
         * we are effectively preventing them from finishing their
376
         * we are effectively preventing them from finishing their
375
         * potential cleanup.
377
         * potential cleanup.
376
         */
378
         */
377
        newphid = phone_alloc(phone->callee->task);
379
        newphid = phone_alloc(phone->callee->task);
378
        if (newphid < 0) {
380
        if (newphid < 0) {
379
            mutex_unlock(&cloned_phone->lock);
381
            mutex_unlock(&cloned_phone->lock);
380
            mutex_unlock(&phone->lock);
382
            mutex_unlock(&phone->lock);
381
            return ELIMIT;
383
            return ELIMIT;
382
        }
384
        }
383
        ipc_phone_connect(&phone->callee->task->phones[newphid],
385
        ipc_phone_connect(&phone->callee->task->phones[newphid],
384
            cloned_phone->callee);
386
            cloned_phone->callee);
385
        mutex_unlock(&cloned_phone->lock);
387
        mutex_unlock(&cloned_phone->lock);
386
        mutex_unlock(&phone->lock);
388
        mutex_unlock(&phone->lock);
387
        /* Set the new phone for the callee. */
389
        /* Set the new phone for the callee. */
388
        IPC_SET_ARG1(call->data, newphid);
390
        IPC_SET_ARG1(call->data, newphid);
389
        break;
391
        break;
390
    }
392
    }
391
    case IPC_M_CONNECT_ME:
393
    case IPC_M_CONNECT_ME:
392
        IPC_SET_ARG5(call->data, (unative_t) phone);
394
        IPC_SET_ARG5(call->data, (unative_t) phone);
393
        break;
395
        break;
394
    case IPC_M_CONNECT_ME_TO:
396
    case IPC_M_CONNECT_ME_TO:
395
        newphid = phone_alloc(TASK);
397
        newphid = phone_alloc(TASK);
396
        if (newphid < 0)
398
        if (newphid < 0)
397
            return ELIMIT;
399
            return ELIMIT;
398
        /* Set arg5 for server */
400
        /* Set arg5 for server */
399
        IPC_SET_ARG5(call->data, (unative_t) &TASK->phones[newphid]);
401
        IPC_SET_ARG5(call->data, (unative_t) &TASK->phones[newphid]);
400
        call->flags |= IPC_CALL_CONN_ME_TO;
402
        call->flags |= IPC_CALL_CONN_ME_TO;
401
        call->priv = newphid;
403
        call->priv = newphid;
402
        break;
404
        break;
403
    case IPC_M_SHARE_OUT:
405
    case IPC_M_SHARE_OUT:
404
        size = as_area_get_size(IPC_GET_ARG1(call->data));
406
        size = as_area_get_size(IPC_GET_ARG1(call->data));
405
        if (!size)
407
        if (!size)
406
            return EPERM;
408
            return EPERM;
407
        IPC_SET_ARG2(call->data, size);
409
        IPC_SET_ARG2(call->data, size);
408
        break;
410
        break;
409
    case IPC_M_DATA_READ:
411
    case IPC_M_DATA_READ:
410
        size = IPC_GET_ARG2(call->data);
412
        size = IPC_GET_ARG2(call->data);
411
        if ((size <= 0 || (size > DATA_XFER_LIMIT)))
413
        if ((size <= 0 || (size > DATA_XFER_LIMIT)))
412
            return ELIMIT;
414
            return ELIMIT;
413
        break;
415
        break;
414
    case IPC_M_DATA_WRITE:
416
    case IPC_M_DATA_WRITE:
415
        src = IPC_GET_ARG1(call->data);
417
        src = IPC_GET_ARG1(call->data);
416
        size = IPC_GET_ARG2(call->data);
418
        size = IPC_GET_ARG2(call->data);
417
       
419
       
418
        if (size > DATA_XFER_LIMIT)
420
        if (size > DATA_XFER_LIMIT)
419
            return ELIMIT;
421
            return ELIMIT;
420
       
422
       
421
        call->buffer = (uint8_t *) malloc(size, 0);
423
        call->buffer = (uint8_t *) malloc(size, 0);
422
        rc = copy_from_uspace(call->buffer, (void *) src, size);
424
        rc = copy_from_uspace(call->buffer, (void *) src, size);
423
        if (rc != 0) {
425
        if (rc != 0) {
424
            free(call->buffer);
426
            free(call->buffer);
425
            return rc;
427
            return rc;
426
        }
428
        }
427
        break;
429
        break;
428
#ifdef CONFIG_UDEBUG
430
#ifdef CONFIG_UDEBUG
429
    case IPC_M_DEBUG_ALL:
431
    case IPC_M_DEBUG_ALL:
430
        return udebug_request_preprocess(call, phone);
432
        return udebug_request_preprocess(call, phone);
431
#endif
433
#endif
432
    default:
434
    default:
433
        break;
435
        break;
434
    }
436
    }
435
    return 0;
437
    return 0;
436
}
438
}
437
 
439
 
438
/*******************************************************************************
440
/*******************************************************************************
439
 * Functions called to process received call/answer before passing it to uspace.
441
 * Functions called to process received call/answer before passing it to uspace.
440
 *******************************************************************************/
442
 *******************************************************************************/
441
 
443
 
442
/** Do basic kernel processing of received call answer.
444
/** Do basic kernel processing of received call answer.
443
 *
445
 *
444
 * @param call      Call structure with the answer.
446
 * @param call      Call structure with the answer.
445
 */
447
 */
446
static void process_answer(call_t *call)
448
static void process_answer(call_t *call)
447
{
449
{
448
    if (((native_t) IPC_GET_RETVAL(call->data) == EHANGUP) &&
450
    if (((native_t) IPC_GET_RETVAL(call->data) == EHANGUP) &&
449
        (call->flags & IPC_CALL_FORWARDED))
451
        (call->flags & IPC_CALL_FORWARDED))
450
        IPC_SET_RETVAL(call->data, EFORWARD);
452
        IPC_SET_RETVAL(call->data, EFORWARD);
451
 
453
 
452
    if (call->flags & IPC_CALL_CONN_ME_TO) {
454
    if (call->flags & IPC_CALL_CONN_ME_TO) {
453
        if (IPC_GET_RETVAL(call->data))
455
        if (IPC_GET_RETVAL(call->data))
454
            phone_dealloc(call->priv);
456
            phone_dealloc(call->priv);
455
        else
457
        else
456
            IPC_SET_ARG5(call->data, call->priv);
458
            IPC_SET_ARG5(call->data, call->priv);
457
    }
459
    }
458
 
460
 
459
    if (call->buffer) {
461
    if (call->buffer) {
460
        /* This must be an affirmative answer to IPC_M_DATA_READ. */
462
        /* This must be an affirmative answer to IPC_M_DATA_READ. */
461
        /* or IPC_M_DEBUG_ALL/UDEBUG_M_MEM_READ... */
463
        /* or IPC_M_DEBUG_ALL/UDEBUG_M_MEM_READ... */
462
        uintptr_t dst = IPC_GET_ARG1(call->data);
464
        uintptr_t dst = IPC_GET_ARG1(call->data);
463
        size_t size = IPC_GET_ARG2(call->data);
465
        size_t size = IPC_GET_ARG2(call->data);
464
        int rc = copy_to_uspace((void *) dst, call->buffer, size);
466
        int rc = copy_to_uspace((void *) dst, call->buffer, size);
465
        if (rc)
467
        if (rc)
466
            IPC_SET_RETVAL(call->data, rc);
468
            IPC_SET_RETVAL(call->data, rc);
467
        free(call->buffer);
469
        free(call->buffer);
468
        call->buffer = NULL;
470
        call->buffer = NULL;
469
    }
471
    }
470
}
472
}
471
 
473
 
472
/** Do basic kernel processing of received call request.
474
/** Do basic kernel processing of received call request.
473
 *
475
 *
474
 * @param box       Destination answerbox structure.
476
 * @param box       Destination answerbox structure.
475
 * @param call      Call structure with the request.
477
 * @param call      Call structure with the request.
476
 *
478
 *
477
 * @return      Return 0 if the call should be passed to userspace.
479
 * @return      Return 0 if the call should be passed to userspace.
478
 *          Return -1 if the call should be ignored.
480
 *          Return -1 if the call should be ignored.
479
 */
481
 */
480
static int process_request(answerbox_t *box, call_t *call)
482
static int process_request(answerbox_t *box, call_t *call)
481
{
483
{
482
    int phoneid;
484
    int phoneid;
483
 
485
 
484
    if (IPC_GET_METHOD(call->data) == IPC_M_CONNECT_TO_ME) {
486
    if (IPC_GET_METHOD(call->data) == IPC_M_CONNECT_TO_ME) {
485
        phoneid = phone_alloc(TASK);
487
        phoneid = phone_alloc(TASK);
486
        if (phoneid < 0) { /* Failed to allocate phone */
488
        if (phoneid < 0) { /* Failed to allocate phone */
487
            IPC_SET_RETVAL(call->data, ELIMIT);
489
            IPC_SET_RETVAL(call->data, ELIMIT);
488
            ipc_answer(box, call);
490
            ipc_answer(box, call);
489
            return -1;
491
            return -1;
490
        }
492
        }
491
        IPC_SET_ARG5(call->data, phoneid);
493
        IPC_SET_ARG5(call->data, phoneid);
492
    }
494
    }
493
    switch (IPC_GET_METHOD(call->data)) {
495
    switch (IPC_GET_METHOD(call->data)) {
494
    case IPC_M_DEBUG_ALL:
496
    case IPC_M_DEBUG_ALL:
495
        return -1;
497
        return -1;
496
    default:
498
    default:
497
        break;
499
        break;
498
    }
500
    }
499
    return 0;
501
    return 0;
500
}
502
}
501
 
503
 
502
/** Make a fast call over IPC, wait for reply and return to user.
504
/** Make a fast call over IPC, wait for reply and return to user.
503
 *
505
 *
504
 * This function can handle only three arguments of payload, but is faster than
506
 * This function can handle only three arguments of payload, but is faster than
505
 * the generic function (i.e. sys_ipc_call_sync_slow()).
507
 * the generic function (i.e. sys_ipc_call_sync_slow()).
506
 *
508
 *
507
 * @param phoneid   Phone handle for the call.
509
 * @param phoneid   Phone handle for the call.
508
 * @param method    Method of the call.
510
 * @param method    Method of the call.
509
 * @param arg1      Service-defined payload argument.
511
 * @param arg1      Service-defined payload argument.
510
 * @param arg2      Service-defined payload argument.
512
 * @param arg2      Service-defined payload argument.
511
 * @param arg3      Service-defined payload argument.
513
 * @param arg3      Service-defined payload argument.
512
 * @param data      Address of userspace structure where the reply call will
514
 * @param data      Address of userspace structure where the reply call will
513
 *          be stored.
515
 *          be stored.
514
 *
516
 *
515
 * @return      Returns 0 on success.
517
 * @return      Returns 0 on success.
516
 *          Return ENOENT if there is no such phone handle.
518
 *          Return ENOENT if there is no such phone handle.
517
 */
519
 */
518
unative_t sys_ipc_call_sync_fast(unative_t phoneid, unative_t method,
520
unative_t sys_ipc_call_sync_fast(unative_t phoneid, unative_t method,
519
    unative_t arg1, unative_t arg2, unative_t arg3, ipc_data_t *data)
521
    unative_t arg1, unative_t arg2, unative_t arg3, ipc_data_t *data)
520
{
522
{
521
    call_t call;
523
    call_t call;
522
    phone_t *phone;
524
    phone_t *phone;
523
    int res;
525
    int res;
524
    int rc;
526
    int rc;
525
   
527
   
526
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
528
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
527
 
529
 
528
    ipc_call_static_init(&call);
530
    ipc_call_static_init(&call);
529
    IPC_SET_METHOD(call.data, method);
531
    IPC_SET_METHOD(call.data, method);
530
    IPC_SET_ARG1(call.data, arg1);
532
    IPC_SET_ARG1(call.data, arg1);
531
    IPC_SET_ARG2(call.data, arg2);
533
    IPC_SET_ARG2(call.data, arg2);
532
    IPC_SET_ARG3(call.data, arg3);
534
    IPC_SET_ARG3(call.data, arg3);
533
    /*
535
    /*
534
     * To achieve deterministic behavior, zero out arguments that are beyond
536
     * To achieve deterministic behavior, zero out arguments that are beyond
535
     * the limits of the fast version.
537
     * the limits of the fast version.
536
     */
538
     */
537
    IPC_SET_ARG4(call.data, 0);
539
    IPC_SET_ARG4(call.data, 0);
538
    IPC_SET_ARG5(call.data, 0);
540
    IPC_SET_ARG5(call.data, 0);
539
 
541
 
540
    if (!(res = request_preprocess(&call, phone))) {
542
    if (!(res = request_preprocess(&call, phone))) {
541
#ifdef CONFIG_UDEBUG
543
#ifdef CONFIG_UDEBUG
542
        udebug_stoppable_begin();
544
        udebug_stoppable_begin();
543
#endif
545
#endif
544
        rc = ipc_call_sync(phone, &call);
546
        rc = ipc_call_sync(phone, &call);
545
#ifdef CONFIG_UDEBUG
547
#ifdef CONFIG_UDEBUG
546
        udebug_stoppable_end();
548
        udebug_stoppable_end();
547
#endif
549
#endif
548
        if (rc != EOK)
550
        if (rc != EOK)
549
            return rc;
551
            return rc;
550
        process_answer(&call);
552
        process_answer(&call);
551
 
553
 
552
    } else {
554
    } else {
553
        IPC_SET_RETVAL(call.data, res);
555
        IPC_SET_RETVAL(call.data, res);
554
    }
556
    }
555
    rc = STRUCT_TO_USPACE(&data->args, &call.data.args);
557
    rc = STRUCT_TO_USPACE(&data->args, &call.data.args);
556
    if (rc != 0)
558
    if (rc != 0)
557
        return rc;
559
        return rc;
558
 
560
 
559
    return 0;
561
    return 0;
560
}
562
}
561
 
563
 
562
/** Make a synchronous IPC call allowing to transmit the entire payload.
564
/** Make a synchronous IPC call allowing to transmit the entire payload.
563
 *
565
 *
564
 * @param phoneid   Phone handle for the call.
566
 * @param phoneid   Phone handle for the call.
565
 * @param question  Userspace address of call data with the request.
567
 * @param question  Userspace address of call data with the request.
566
 * @param reply     Userspace address of call data where to store the
568
 * @param reply     Userspace address of call data where to store the
567
 *          answer.
569
 *          answer.
568
 *
570
 *
569
 * @return      Zero on success or an error code.
571
 * @return      Zero on success or an error code.
570
 */
572
 */
571
unative_t sys_ipc_call_sync_slow(unative_t phoneid, ipc_data_t *question,
573
unative_t sys_ipc_call_sync_slow(unative_t phoneid, ipc_data_t *question,
572
    ipc_data_t *reply)
574
    ipc_data_t *reply)
573
{
575
{
574
    call_t call;
576
    call_t call;
575
    phone_t *phone;
577
    phone_t *phone;
576
    int res;
578
    int res;
577
    int rc;
579
    int rc;
578
 
580
 
579
    ipc_call_static_init(&call);
581
    ipc_call_static_init(&call);
580
    rc = copy_from_uspace(&call.data.args, &question->args,
582
    rc = copy_from_uspace(&call.data.args, &question->args,
581
        sizeof(call.data.args));
583
        sizeof(call.data.args));
582
    if (rc != 0)
584
    if (rc != 0)
583
        return (unative_t) rc;
585
        return (unative_t) rc;
584
 
586
 
585
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
587
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
586
 
588
 
587
    if (!(res = request_preprocess(&call, phone))) {
589
    if (!(res = request_preprocess(&call, phone))) {
588
#ifdef CONFIG_UDEBUG
590
#ifdef CONFIG_UDEBUG
589
        udebug_stoppable_begin();
591
        udebug_stoppable_begin();
590
#endif
592
#endif
591
        rc = ipc_call_sync(phone, &call);
593
        rc = ipc_call_sync(phone, &call);
592
#ifdef CONFIG_UDEBUG
594
#ifdef CONFIG_UDEBUG
593
        udebug_stoppable_end();
595
        udebug_stoppable_end();
594
#endif
596
#endif
595
        if (rc != EOK)
597
        if (rc != EOK)
596
            return rc;
598
            return rc;
597
        process_answer(&call);
599
        process_answer(&call);
598
    } else
600
    } else
599
        IPC_SET_RETVAL(call.data, res);
601
        IPC_SET_RETVAL(call.data, res);
600
 
602
 
601
    rc = STRUCT_TO_USPACE(&reply->args, &call.data.args);
603
    rc = STRUCT_TO_USPACE(&reply->args, &call.data.args);
602
    if (rc != 0)
604
    if (rc != 0)
603
        return rc;
605
        return rc;
604
 
606
 
605
    return 0;
607
    return 0;
606
}
608
}
607
 
609
 
608
/** Check that the task did not exceed the allowed limit of asynchronous calls.
610
/** Check that the task did not exceed the allowed limit of asynchronous calls.
609
 *
611
 *
610
 * @return      Return 0 if limit not reached or -1 if limit exceeded.
612
 * @return      Return 0 if limit not reached or -1 if limit exceeded.
611
 */
613
 */
612
static int check_call_limit(void)
614
static int check_call_limit(void)
613
{
615
{
614
    if (atomic_preinc(&TASK->active_calls) > IPC_MAX_ASYNC_CALLS) {
616
    if (atomic_preinc(&TASK->active_calls) > IPC_MAX_ASYNC_CALLS) {
615
        atomic_dec(&TASK->active_calls);
617
        atomic_dec(&TASK->active_calls);
616
        return -1;
618
        return -1;
617
    }
619
    }
618
    return 0;
620
    return 0;
619
}
621
}
620
 
622
 
621
/** Make a fast asynchronous call over IPC.
623
/** Make a fast asynchronous call over IPC.
622
 *
624
 *
623
 * This function can only handle four arguments of payload, but is faster than
625
 * This function can only handle four arguments of payload, but is faster than
624
 * the generic function sys_ipc_call_async_slow().
626
 * the generic function sys_ipc_call_async_slow().
625
 *
627
 *
626
 * @param phoneid   Phone handle for the call.
628
 * @param phoneid   Phone handle for the call.
627
 * @param method    Method of the call.
629
 * @param method    Method of the call.
628
 * @param arg1      Service-defined payload argument.
630
 * @param arg1      Service-defined payload argument.
629
 * @param arg2      Service-defined payload argument.
631
 * @param arg2      Service-defined payload argument.
630
 * @param arg3      Service-defined payload argument.
632
 * @param arg3      Service-defined payload argument.
631
 * @param arg4      Service-defined payload argument.
633
 * @param arg4      Service-defined payload argument.
632
 *
634
 *
633
 * @return      Return call hash on success.
635
 * @return      Return call hash on success.
634
 *          Return IPC_CALLRET_FATAL in case of a fatal error and
636
 *          Return IPC_CALLRET_FATAL in case of a fatal error and
635
 *          IPC_CALLRET_TEMPORARY if there are too many pending
637
 *          IPC_CALLRET_TEMPORARY if there are too many pending
636
 *          asynchronous requests; answers should be handled first.
638
 *          asynchronous requests; answers should be handled first.
637
 */
639
 */
638
unative_t sys_ipc_call_async_fast(unative_t phoneid, unative_t method,
640
unative_t sys_ipc_call_async_fast(unative_t phoneid, unative_t method,
639
    unative_t arg1, unative_t arg2, unative_t arg3, unative_t arg4)
641
    unative_t arg1, unative_t arg2, unative_t arg3, unative_t arg4)
640
{
642
{
641
    call_t *call;
643
    call_t *call;
642
    phone_t *phone;
644
    phone_t *phone;
643
    int res;
645
    int res;
644
 
646
 
645
    if (check_call_limit())
647
    if (check_call_limit())
646
        return IPC_CALLRET_TEMPORARY;
648
        return IPC_CALLRET_TEMPORARY;
647
 
649
 
648
    GET_CHECK_PHONE(phone, phoneid, return IPC_CALLRET_FATAL);
650
    GET_CHECK_PHONE(phone, phoneid, return IPC_CALLRET_FATAL);
649
 
651
 
650
    call = ipc_call_alloc(0);
652
    call = ipc_call_alloc(0);
651
    IPC_SET_METHOD(call->data, method);
653
    IPC_SET_METHOD(call->data, method);
652
    IPC_SET_ARG1(call->data, arg1);
654
    IPC_SET_ARG1(call->data, arg1);
653
    IPC_SET_ARG2(call->data, arg2);
655
    IPC_SET_ARG2(call->data, arg2);
654
    IPC_SET_ARG3(call->data, arg3);
656
    IPC_SET_ARG3(call->data, arg3);
655
    IPC_SET_ARG4(call->data, arg4);
657
    IPC_SET_ARG4(call->data, arg4);
656
    /*
658
    /*
657
     * To achieve deterministic behavior, zero out arguments that are beyond
659
     * To achieve deterministic behavior, zero out arguments that are beyond
658
     * the limits of the fast version.
660
     * the limits of the fast version.
659
     */
661
     */
660
    IPC_SET_ARG5(call->data, 0);
662
    IPC_SET_ARG5(call->data, 0);
661
 
663
 
662
    if (!(res = request_preprocess(call, phone)))
664
    if (!(res = request_preprocess(call, phone)))
663
        ipc_call(phone, call);
665
        ipc_call(phone, call);
664
    else
666
    else
665
        ipc_backsend_err(phone, call, res);
667
        ipc_backsend_err(phone, call, res);
666
 
668
 
667
    return (unative_t) call;
669
    return (unative_t) call;
668
}
670
}
669
 
671
 
670
/** Make an asynchronous IPC call allowing to transmit the entire payload.
672
/** Make an asynchronous IPC call allowing to transmit the entire payload.
671
 *
673
 *
672
 * @param phoneid   Phone handle for the call.
674
 * @param phoneid   Phone handle for the call.
673
 * @param data      Userspace address of call data with the request.
675
 * @param data      Userspace address of call data with the request.
674
 *
676
 *
675
 * @return      See sys_ipc_call_async_fast().
677
 * @return      See sys_ipc_call_async_fast().
676
 */
678
 */
677
unative_t sys_ipc_call_async_slow(unative_t phoneid, ipc_data_t *data)
679
unative_t sys_ipc_call_async_slow(unative_t phoneid, ipc_data_t *data)
678
{
680
{
679
    call_t *call;
681
    call_t *call;
680
    phone_t *phone;
682
    phone_t *phone;
681
    int res;
683
    int res;
682
    int rc;
684
    int rc;
683
 
685
 
684
    if (check_call_limit())
686
    if (check_call_limit())
685
        return IPC_CALLRET_TEMPORARY;
687
        return IPC_CALLRET_TEMPORARY;
686
 
688
 
687
    GET_CHECK_PHONE(phone, phoneid, return IPC_CALLRET_FATAL);
689
    GET_CHECK_PHONE(phone, phoneid, return IPC_CALLRET_FATAL);
688
 
690
 
689
    call = ipc_call_alloc(0);
691
    call = ipc_call_alloc(0);
690
    rc = copy_from_uspace(&call->data.args, &data->args,
692
    rc = copy_from_uspace(&call->data.args, &data->args,
691
        sizeof(call->data.args));
693
        sizeof(call->data.args));
692
    if (rc != 0) {
694
    if (rc != 0) {
693
        ipc_call_free(call);
695
        ipc_call_free(call);
694
        return (unative_t) rc;
696
        return (unative_t) rc;
695
    }
697
    }
696
    if (!(res = request_preprocess(call, phone)))
698
    if (!(res = request_preprocess(call, phone)))
697
        ipc_call(phone, call);
699
        ipc_call(phone, call);
698
    else
700
    else
699
        ipc_backsend_err(phone, call, res);
701
        ipc_backsend_err(phone, call, res);
700
 
702
 
701
    return (unative_t) call;
703
    return (unative_t) call;
702
}
704
}
703
 
705
 
704
/** Forward a received call to another destination - common code for both the
706
/** Forward a received call to another destination - common code for both the
705
 * fast and the slow version.
707
 * fast and the slow version.
706
 *
708
 *
707
 * @param callid    Hash of the call to forward.
709
 * @param callid    Hash of the call to forward.
708
 * @param phoneid   Phone handle to use for forwarding.
710
 * @param phoneid   Phone handle to use for forwarding.
709
 * @param method    New method to use for the forwarded call.
711
 * @param method    New method to use for the forwarded call.
710
 * @param arg1      New value of the first argument for the forwarded call.
712
 * @param arg1      New value of the first argument for the forwarded call.
711
 * @param arg2      New value of the second argument for the forwarded call.
713
 * @param arg2      New value of the second argument for the forwarded call.
712
 * @param arg3      New value of the third argument for the forwarded call.
714
 * @param arg3      New value of the third argument for the forwarded call.
713
 * @param arg4      New value of the fourth argument for the forwarded call.
715
 * @param arg4      New value of the fourth argument for the forwarded call.
714
 * @param arg5      New value of the fifth argument for the forwarded call.
716
 * @param arg5      New value of the fifth argument for the forwarded call.
715
 * @param mode      Flags that specify mode of the forward operation.
717
 * @param mode      Flags that specify mode of the forward operation.
716
 * @param slow      If true, arg3, arg4 and arg5 are considered. Otherwise
718
 * @param slow      If true, arg3, arg4 and arg5 are considered. Otherwise
717
 *          the function considers only the fast version arguments:
719
 *          the function considers only the fast version arguments:
718
 *          i.e. arg1 and arg2.
720
 *          i.e. arg1 and arg2.
719
 *
721
 *
720
 * @return      Return 0 on succes, otherwise return an error code.
722
 * @return      Return 0 on succes, otherwise return an error code.
721
 *
723
 *
722
 * Warning: Make sure that ARG5 is not rewritten for certain system IPC
724
 * Warning: Make sure that ARG5 is not rewritten for certain system IPC
723
 */
725
 */
724
static unative_t sys_ipc_forward_common(unative_t callid, unative_t phoneid,
726
static unative_t sys_ipc_forward_common(unative_t callid, unative_t phoneid,
725
    unative_t method, unative_t arg1, unative_t arg2, unative_t arg3,
727
    unative_t method, unative_t arg1, unative_t arg2, unative_t arg3,
726
    unative_t arg4, unative_t arg5, int mode, bool slow)
728
    unative_t arg4, unative_t arg5, int mode, bool slow)
727
{
729
{
728
    call_t *call;
730
    call_t *call;
729
    phone_t *phone;
731
    phone_t *phone;
730
 
732
 
731
    call = get_call(callid);
733
    call = get_call(callid);
732
    if (!call)
734
    if (!call)
733
        return ENOENT;
735
        return ENOENT;
734
   
736
   
735
    call->flags |= IPC_CALL_FORWARDED;
737
    call->flags |= IPC_CALL_FORWARDED;
736
 
738
 
737
    GET_CHECK_PHONE(phone, phoneid, {
739
    GET_CHECK_PHONE(phone, phoneid, {
738
        IPC_SET_RETVAL(call->data, EFORWARD);
740
        IPC_SET_RETVAL(call->data, EFORWARD);
739
        ipc_answer(&TASK->answerbox, call);
741
        ipc_answer(&TASK->answerbox, call);
740
        return ENOENT;
742
        return ENOENT;
741
    });
743
    });
742
 
744
 
743
    if (!method_is_forwardable(IPC_GET_METHOD(call->data))) {
745
    if (!method_is_forwardable(IPC_GET_METHOD(call->data))) {
744
        IPC_SET_RETVAL(call->data, EFORWARD);
746
        IPC_SET_RETVAL(call->data, EFORWARD);
745
        ipc_answer(&TASK->answerbox, call);
747
        ipc_answer(&TASK->answerbox, call);
746
        return EPERM;
748
        return EPERM;
747
    }
749
    }
748
 
750
 
749
    /*
751
    /*
750
     * Userspace is not allowed to change method of system methods on
752
     * Userspace is not allowed to change method of system methods on
751
     * forward, allow changing ARG1, ARG2, ARG3 and ARG4 by means of method,
753
     * forward, allow changing ARG1, ARG2, ARG3 and ARG4 by means of method,
752
     * arg1, arg2 and arg3.
754
     * arg1, arg2 and arg3.
753
     * If the method is immutable, don't change anything.
755
     * If the method is immutable, don't change anything.
754
     */
756
     */
755
    if (!method_is_immutable(IPC_GET_METHOD(call->data))) {
757
    if (!method_is_immutable(IPC_GET_METHOD(call->data))) {
756
        if (method_is_system(IPC_GET_METHOD(call->data))) {
758
        if (method_is_system(IPC_GET_METHOD(call->data))) {
757
            if (IPC_GET_METHOD(call->data) == IPC_M_CONNECT_TO_ME)
759
            if (IPC_GET_METHOD(call->data) == IPC_M_CONNECT_TO_ME)
758
                phone_dealloc(IPC_GET_ARG5(call->data));
760
                phone_dealloc(IPC_GET_ARG5(call->data));
759
 
761
 
760
            IPC_SET_ARG1(call->data, method);
762
            IPC_SET_ARG1(call->data, method);
761
            IPC_SET_ARG2(call->data, arg1);
763
            IPC_SET_ARG2(call->data, arg1);
762
            IPC_SET_ARG3(call->data, arg2);
764
            IPC_SET_ARG3(call->data, arg2);
763
            if (slow) {
765
            if (slow) {
764
                IPC_SET_ARG4(call->data, arg3);
766
                IPC_SET_ARG4(call->data, arg3);
765
                /*
767
                /*
766
                 * For system methods we deliberately don't
768
                 * For system methods we deliberately don't
767
                 * overwrite ARG5.
769
                 * overwrite ARG5.
768
                 */
770
                 */
769
            }
771
            }
770
        } else {
772
        } else {
771
            IPC_SET_METHOD(call->data, method);
773
            IPC_SET_METHOD(call->data, method);
772
            IPC_SET_ARG1(call->data, arg1);
774
            IPC_SET_ARG1(call->data, arg1);
773
            IPC_SET_ARG2(call->data, arg2);
775
            IPC_SET_ARG2(call->data, arg2);
774
            if (slow) {
776
            if (slow) {
775
                IPC_SET_ARG3(call->data, arg3);
777
                IPC_SET_ARG3(call->data, arg3);
776
                IPC_SET_ARG4(call->data, arg4);
778
                IPC_SET_ARG4(call->data, arg4);
777
                IPC_SET_ARG5(call->data, arg5);
779
                IPC_SET_ARG5(call->data, arg5);
778
            }
780
            }
779
        }
781
        }
780
    }
782
    }
781
 
783
 
782
    return ipc_forward(call, phone, &TASK->answerbox, mode);
784
    return ipc_forward(call, phone, &TASK->answerbox, mode);
783
}
785
}
784
 
786
 
785
/** Forward a received call to another destination - fast version.
787
/** Forward a received call to another destination - fast version.
786
 *
788
 *
787
 * @param callid    Hash of the call to forward.
789
 * @param callid    Hash of the call to forward.
788
 * @param phoneid   Phone handle to use for forwarding.
790
 * @param phoneid   Phone handle to use for forwarding.
789
 * @param method    New method to use for the forwarded call.
791
 * @param method    New method to use for the forwarded call.
790
 * @param arg1      New value of the first argument for the forwarded call.
792
 * @param arg1      New value of the first argument for the forwarded call.
791
 * @param arg2      New value of the second argument for the forwarded call.
793
 * @param arg2      New value of the second argument for the forwarded call.
792
 * @param mode      Flags that specify mode of the forward operation.
794
 * @param mode      Flags that specify mode of the forward operation.
793
 *
795
 *
794
 * @return      Return 0 on succes, otherwise return an error code.
796
 * @return      Return 0 on succes, otherwise return an error code.
795
 *
797
 *
796
 * In case the original method is a system method, ARG1, ARG2 and ARG3 are
798
 * In case the original method is a system method, ARG1, ARG2 and ARG3 are
797
 * overwritten in the forwarded message with the new method and the new
799
 * overwritten in the forwarded message with the new method and the new
798
 * arg1 and arg2, respectively. Otherwise the METHOD, ARG1 and ARG2 are
800
 * arg1 and arg2, respectively. Otherwise the METHOD, ARG1 and ARG2 are
799
 * rewritten with the new method, arg1 and arg2, respectively. Also note there
801
 * rewritten with the new method, arg1 and arg2, respectively. Also note there
800
 * is a set of immutable methods, for which the new method and arguments are not
802
 * is a set of immutable methods, for which the new method and arguments are not
801
 * set and these values are ignored.
803
 * set and these values are ignored.
802
 */
804
 */
803
unative_t sys_ipc_forward_fast(unative_t callid, unative_t phoneid,
805
unative_t sys_ipc_forward_fast(unative_t callid, unative_t phoneid,
804
    unative_t method, unative_t arg1, unative_t arg2, int mode)
806
    unative_t method, unative_t arg1, unative_t arg2, int mode)
805
{
807
{
806
    return sys_ipc_forward_common(callid, phoneid, method, arg1, arg2, 0, 0,
808
    return sys_ipc_forward_common(callid, phoneid, method, arg1, arg2, 0, 0,
807
        0, mode, false);
809
        0, mode, false);
808
}
810
}
809
 
811
 
810
/** Forward a received call to another destination - slow version.
812
/** Forward a received call to another destination - slow version.
811
 *
813
 *
812
 * @param callid    Hash of the call to forward.
814
 * @param callid    Hash of the call to forward.
813
 * @param phoneid   Phone handle to use for forwarding.
815
 * @param phoneid   Phone handle to use for forwarding.
814
 * @param data      Userspace address of the new IPC data.
816
 * @param data      Userspace address of the new IPC data.
815
 * @param mode      Flags that specify mode of the forward operation.
817
 * @param mode      Flags that specify mode of the forward operation.
816
 *
818
 *
817
 * @return      Return 0 on succes, otherwise return an error code.
819
 * @return      Return 0 on succes, otherwise return an error code.
818
 *
820
 *
819
 * This function is the slow verision of the sys_ipc_forward_fast interface.
821
 * This function is the slow verision of the sys_ipc_forward_fast interface.
820
 * It can copy all five new arguments and the new method from the userspace.
822
 * It can copy all five new arguments and the new method from the userspace.
821
 * It naturally extends the functionality of the fast version. For system
823
 * It naturally extends the functionality of the fast version. For system
822
 * methods, it additionally stores the new value of arg3 to ARG4. For non-system
824
 * methods, it additionally stores the new value of arg3 to ARG4. For non-system
823
 * methods, it additionally stores the new value of arg3, arg4 and arg5,
825
 * methods, it additionally stores the new value of arg3, arg4 and arg5,
824
 * respectively, to ARG3, ARG4 and ARG5, respectively.
826
 * respectively, to ARG3, ARG4 and ARG5, respectively.
825
 */
827
 */
826
unative_t sys_ipc_forward_slow(unative_t callid, unative_t phoneid,
828
unative_t sys_ipc_forward_slow(unative_t callid, unative_t phoneid,
827
    ipc_data_t *data, int mode)
829
    ipc_data_t *data, int mode)
828
{
830
{
829
    ipc_data_t newdata;
831
    ipc_data_t newdata;
830
    int rc;
832
    int rc;
831
 
833
 
832
    rc = copy_from_uspace(&newdata.args, &data->args,
834
    rc = copy_from_uspace(&newdata.args, &data->args,
833
        sizeof(newdata.args));
835
        sizeof(newdata.args));
834
    if (rc != 0)
836
    if (rc != 0)
835
        return (unative_t) rc;
837
        return (unative_t) rc;
836
 
838
 
837
    return sys_ipc_forward_common(callid, phoneid,
839
    return sys_ipc_forward_common(callid, phoneid,
838
        IPC_GET_METHOD(newdata), IPC_GET_ARG1(newdata),
840
        IPC_GET_METHOD(newdata), IPC_GET_ARG1(newdata),
839
        IPC_GET_ARG2(newdata), IPC_GET_ARG3(newdata),
841
        IPC_GET_ARG2(newdata), IPC_GET_ARG3(newdata),
840
        IPC_GET_ARG4(newdata), IPC_GET_ARG5(newdata), mode, true);
842
        IPC_GET_ARG4(newdata), IPC_GET_ARG5(newdata), mode, true);
841
}
843
}
842
 
844
 
843
/** Answer an IPC call - fast version.
845
/** Answer an IPC call - fast version.
844
 *
846
 *
845
 * This function can handle only two return arguments of payload, but is faster
847
 * This function can handle only two return arguments of payload, but is faster
846
 * than the generic sys_ipc_answer().
848
 * than the generic sys_ipc_answer().
847
 *
849
 *
848
 * @param callid    Hash of the call to be answered.
850
 * @param callid    Hash of the call to be answered.
849
 * @param retval    Return value of the answer.
851
 * @param retval    Return value of the answer.
850
 * @param arg1      Service-defined return value.
852
 * @param arg1      Service-defined return value.
851
 * @param arg2      Service-defined return value.
853
 * @param arg2      Service-defined return value.
852
 * @param arg3      Service-defined return value.
854
 * @param arg3      Service-defined return value.
853
 * @param arg4      Service-defined return value.
855
 * @param arg4      Service-defined return value.
854
 *
856
 *
855
 * @return      Return 0 on success, otherwise return an error code.   
857
 * @return      Return 0 on success, otherwise return an error code.   
856
 */
858
 */
857
unative_t sys_ipc_answer_fast(unative_t callid, unative_t retval,
859
unative_t sys_ipc_answer_fast(unative_t callid, unative_t retval,
858
    unative_t arg1, unative_t arg2, unative_t arg3, unative_t arg4)
860
    unative_t arg1, unative_t arg2, unative_t arg3, unative_t arg4)
859
{
861
{
860
    call_t *call;
862
    call_t *call;
861
    ipc_data_t saved_data;
863
    ipc_data_t saved_data;
862
    int saveddata = 0;
864
    int saveddata = 0;
863
    int rc;
865
    int rc;
864
 
866
 
865
    /* Do not answer notification callids */
867
    /* Do not answer notification callids */
866
    if (callid & IPC_CALLID_NOTIFICATION)
868
    if (callid & IPC_CALLID_NOTIFICATION)
867
        return 0;
869
        return 0;
868
 
870
 
869
    call = get_call(callid);
871
    call = get_call(callid);
870
    if (!call)
872
    if (!call)
871
        return ENOENT;
873
        return ENOENT;
872
 
874
 
873
    if (answer_need_old(call)) {
875
    if (answer_need_old(call)) {
874
        memcpy(&saved_data, &call->data, sizeof(call->data));
876
        memcpy(&saved_data, &call->data, sizeof(call->data));
875
        saveddata = 1;
877
        saveddata = 1;
876
    }
878
    }
877
 
879
 
878
    IPC_SET_RETVAL(call->data, retval);
880
    IPC_SET_RETVAL(call->data, retval);
879
    IPC_SET_ARG1(call->data, arg1);
881
    IPC_SET_ARG1(call->data, arg1);
880
    IPC_SET_ARG2(call->data, arg2);
882
    IPC_SET_ARG2(call->data, arg2);
881
    IPC_SET_ARG3(call->data, arg3);
883
    IPC_SET_ARG3(call->data, arg3);
882
    IPC_SET_ARG4(call->data, arg4);
884
    IPC_SET_ARG4(call->data, arg4);
883
    /*
885
    /*
884
     * To achieve deterministic behavior, zero out arguments that are beyond
886
     * To achieve deterministic behavior, zero out arguments that are beyond
885
     * the limits of the fast version.
887
     * the limits of the fast version.
886
     */
888
     */
887
    IPC_SET_ARG5(call->data, 0);
889
    IPC_SET_ARG5(call->data, 0);
888
    rc = answer_preprocess(call, saveddata ? &saved_data : NULL);
890
    rc = answer_preprocess(call, saveddata ? &saved_data : NULL);
889
 
891
 
890
    ipc_answer(&TASK->answerbox, call);
892
    ipc_answer(&TASK->answerbox, call);
891
    return rc;
893
    return rc;
892
}
894
}
893
 
895
 
894
/** Answer an IPC call.
896
/** Answer an IPC call.
895
 *
897
 *
896
 * @param callid    Hash of the call to be answered.
898
 * @param callid    Hash of the call to be answered.
897
 * @param data      Userspace address of call data with the answer.
899
 * @param data      Userspace address of call data with the answer.
898
 *
900
 *
899
 * @return      Return 0 on success, otherwise return an error code.
901
 * @return      Return 0 on success, otherwise return an error code.
900
 */
902
 */
901
unative_t sys_ipc_answer_slow(unative_t callid, ipc_data_t *data)
903
unative_t sys_ipc_answer_slow(unative_t callid, ipc_data_t *data)
902
{
904
{
903
    call_t *call;
905
    call_t *call;
904
    ipc_data_t saved_data;
906
    ipc_data_t saved_data;
905
    int saveddata = 0;
907
    int saveddata = 0;
906
    int rc;
908
    int rc;
907
 
909
 
908
    /* Do not answer notification callids */
910
    /* Do not answer notification callids */
909
    if (callid & IPC_CALLID_NOTIFICATION)
911
    if (callid & IPC_CALLID_NOTIFICATION)
910
        return 0;
912
        return 0;
911
 
913
 
912
    call = get_call(callid);
914
    call = get_call(callid);
913
    if (!call)
915
    if (!call)
914
        return ENOENT;
916
        return ENOENT;
915
 
917
 
916
    if (answer_need_old(call)) {
918
    if (answer_need_old(call)) {
917
        memcpy(&saved_data, &call->data, sizeof(call->data));
919
        memcpy(&saved_data, &call->data, sizeof(call->data));
918
        saveddata = 1;
920
        saveddata = 1;
919
    }
921
    }
920
    rc = copy_from_uspace(&call->data.args, &data->args,
922
    rc = copy_from_uspace(&call->data.args, &data->args,
921
        sizeof(call->data.args));
923
        sizeof(call->data.args));
922
    if (rc != 0)
924
    if (rc != 0)
923
        return rc;
925
        return rc;
924
 
926
 
925
    rc = answer_preprocess(call, saveddata ? &saved_data : NULL);
927
    rc = answer_preprocess(call, saveddata ? &saved_data : NULL);
926
   
928
   
927
    ipc_answer(&TASK->answerbox, call);
929
    ipc_answer(&TASK->answerbox, call);
928
 
930
 
929
    return rc;
931
    return rc;
930
}
932
}
931
 
933
 
932
/** Hang up a phone.
934
/** Hang up a phone.
933
 *
935
 *
934
 * @param       Phone handle of the phone to be hung up.
936
 * @param       Phone handle of the phone to be hung up.
935
 *
937
 *
936
 * @return      Return 0 on success or an error code.
938
 * @return      Return 0 on success or an error code.
937
 */
939
 */
938
unative_t sys_ipc_hangup(int phoneid)
940
unative_t sys_ipc_hangup(int phoneid)
939
{
941
{
940
    phone_t *phone;
942
    phone_t *phone;
941
 
943
 
942
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
944
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
943
 
945
 
944
    if (ipc_phone_hangup(phone))
946
    if (ipc_phone_hangup(phone))
945
        return -1;
947
        return -1;
946
 
948
 
947
    return 0;
949
    return 0;
948
}
950
}
949
 
951
 
950
/** Wait for an incoming IPC call or an answer.
952
/** Wait for an incoming IPC call or an answer.
951
 *
953
 *
952
 * @param calldata  Pointer to buffer where the call/answer data is stored.
954
 * @param calldata  Pointer to buffer where the call/answer data is stored.
953
 * @param usec      Timeout. See waitq_sleep_timeout() for explanation.
955
 * @param usec      Timeout. See waitq_sleep_timeout() for explanation.
954
 * @param flags     Select mode of sleep operation. See waitq_sleep_timeout()
956
 * @param flags     Select mode of sleep operation. See waitq_sleep_timeout()
955
 *          for explanation.
957
 *          for explanation.
956
 *
958
 *
957
 * @return      Hash of the call.
959
 * @return      Hash of the call.
958
 *          If IPC_CALLID_NOTIFICATION bit is set in the hash, the
960
 *          If IPC_CALLID_NOTIFICATION bit is set in the hash, the
959
 *          call is a notification. IPC_CALLID_ANSWERED denotes an
961
 *          call is a notification. IPC_CALLID_ANSWERED denotes an
960
 *          answer.
962
 *          answer.
961
 */
963
 */
962
unative_t sys_ipc_wait_for_call(ipc_data_t *calldata, uint32_t usec, int flags)
964
unative_t sys_ipc_wait_for_call(ipc_data_t *calldata, uint32_t usec, int flags)
963
{
965
{
964
    call_t *call;
966
    call_t *call;
965
 
967
 
966
restart:
968
restart:
967
 
969
 
968
#ifdef CONFIG_UDEBUG
970
#ifdef CONFIG_UDEBUG
969
    udebug_stoppable_begin();
971
    udebug_stoppable_begin();
970
#endif  
972
#endif  
971
    call = ipc_wait_for_call(&TASK->answerbox, usec,
973
    call = ipc_wait_for_call(&TASK->answerbox, usec,
972
        flags | SYNCH_FLAGS_INTERRUPTIBLE);
974
        flags | SYNCH_FLAGS_INTERRUPTIBLE);
973
 
975
 
974
#ifdef CONFIG_UDEBUG
976
#ifdef CONFIG_UDEBUG
975
    udebug_stoppable_end();
977
    udebug_stoppable_end();
976
#endif
978
#endif
977
    if (!call)
979
    if (!call)
978
        return 0;
980
        return 0;
979
 
981
 
980
    if (call->flags & IPC_CALL_NOTIF) {
982
    if (call->flags & IPC_CALL_NOTIF) {
981
        ASSERT(! (call->flags & IPC_CALL_STATIC_ALLOC));
983
        ASSERT(! (call->flags & IPC_CALL_STATIC_ALLOC));
982
 
984
 
983
        /* Set in_phone_hash to the interrupt counter */
985
        /* Set in_phone_hash to the interrupt counter */
984
        call->data.phone = (void *) call->priv;
986
        call->data.phone = (void *) call->priv;
985
       
987
       
986
        STRUCT_TO_USPACE(calldata, &call->data);
988
        STRUCT_TO_USPACE(calldata, &call->data);
987
 
989
 
988
        ipc_call_free(call);
990
        ipc_call_free(call);
989
       
991
       
990
        return ((unative_t) call) | IPC_CALLID_NOTIFICATION;
992
        return ((unative_t) call) | IPC_CALLID_NOTIFICATION;
991
    }
993
    }
992
 
994
 
993
    if (call->flags & IPC_CALL_ANSWERED) {
995
    if (call->flags & IPC_CALL_ANSWERED) {
994
        process_answer(call);
996
        process_answer(call);
995
 
997
 
996
        ASSERT(! (call->flags & IPC_CALL_STATIC_ALLOC));
998
        ASSERT(! (call->flags & IPC_CALL_STATIC_ALLOC));
997
 
999
 
998
        if (call->flags & IPC_CALL_DISCARD_ANSWER) {
1000
        if (call->flags & IPC_CALL_DISCARD_ANSWER) {
999
            ipc_call_free(call);
1001
            ipc_call_free(call);
1000
            goto restart;
1002
            goto restart;
1001
        } else {
1003
        } else {
1002
            /*
1004
            /*
1003
             * Decrement the counter of active calls only if the
1005
             * Decrement the counter of active calls only if the
1004
             * call is not an answer to IPC_M_PHONE_HUNGUP,
1006
             * call is not an answer to IPC_M_PHONE_HUNGUP,
1005
             * which doesn't contribute to the counter.
1007
             * which doesn't contribute to the counter.
1006
             */
1008
             */
1007
            atomic_dec(&TASK->active_calls);
1009
            atomic_dec(&TASK->active_calls);
1008
        }
1010
        }
1009
 
1011
 
1010
        STRUCT_TO_USPACE(&calldata->args, &call->data.args);
1012
        STRUCT_TO_USPACE(&calldata->args, &call->data.args);
1011
        ipc_call_free(call);
1013
        ipc_call_free(call);
1012
 
1014
 
1013
        return ((unative_t) call) | IPC_CALLID_ANSWERED;
1015
        return ((unative_t) call) | IPC_CALLID_ANSWERED;
1014
    }
1016
    }
1015
 
1017
 
1016
    if (process_request(&TASK->answerbox, call))
1018
    if (process_request(&TASK->answerbox, call))
1017
        goto restart;
1019
        goto restart;
1018
 
1020
 
1019
    /* Include phone address('id') of the caller in the request,
1021
    /* Include phone address('id') of the caller in the request,
1020
     * copy whole call->data, not only call->data.args */
1022
     * copy whole call->data, not only call->data.args */
1021
    if (STRUCT_TO_USPACE(calldata, &call->data)) {
1023
    if (STRUCT_TO_USPACE(calldata, &call->data)) {
1022
        /*
1024
        /*
1023
         * The callee will not receive this call and no one else has
1025
         * The callee will not receive this call and no one else has
1024
         * a chance to answer it. Reply with the EPARTY error code.
1026
         * a chance to answer it. Reply with the EPARTY error code.
1025
         */
1027
         */
1026
        ipc_data_t saved_data;
1028
        ipc_data_t saved_data;
1027
        int saveddata = 0;
1029
        int saveddata = 0;
1028
 
1030
 
1029
        if (answer_need_old(call)) {
1031
        if (answer_need_old(call)) {
1030
            memcpy(&saved_data, &call->data, sizeof(call->data));
1032
            memcpy(&saved_data, &call->data, sizeof(call->data));
1031
            saveddata = 1;
1033
            saveddata = 1;
1032
        }
1034
        }
1033
       
1035
       
1034
        IPC_SET_RETVAL(call->data, EPARTY);
1036
        IPC_SET_RETVAL(call->data, EPARTY);
1035
        (void) answer_preprocess(call, saveddata ? &saved_data : NULL);
1037
        (void) answer_preprocess(call, saveddata ? &saved_data : NULL);
1036
        ipc_answer(&TASK->answerbox, call);
1038
        ipc_answer(&TASK->answerbox, call);
1037
        return 0;
1039
        return 0;
1038
    }
1040
    }
1039
    return (unative_t)call;
1041
    return (unative_t)call;
1040
}
1042
}
1041
 
1043
 
1042
/** Connect an IRQ handler to a task.
1044
/** Connect an IRQ handler to a task.
1043
 *
1045
 *
1044
 * @param inr       IRQ number.
1046
 * @param inr       IRQ number.
1045
 * @param devno     Device number.
1047
 * @param devno     Device number.
1046
 * @param method    Method to be associated with the notification.
1048
 * @param method    Method to be associated with the notification.
1047
 * @param ucode     Uspace pointer to the top-half pseudocode.
1049
 * @param ucode     Uspace pointer to the top-half pseudocode.
1048
 *
1050
 *
1049
 * @return      EPERM or a return code returned by ipc_irq_register().
1051
 * @return      EPERM or a return code returned by ipc_irq_register().
1050
 */
1052
 */
1051
unative_t sys_ipc_register_irq(inr_t inr, devno_t devno, unative_t method,
1053
unative_t sys_ipc_register_irq(inr_t inr, devno_t devno, unative_t method,
1052
    irq_code_t *ucode)
1054
    irq_code_t *ucode)
1053
{
1055
{
1054
    if (!(cap_get(TASK) & CAP_IRQ_REG))
1056
    if (!(cap_get(TASK) & CAP_IRQ_REG))
1055
        return EPERM;
1057
        return EPERM;
1056
 
1058
 
1057
    return ipc_irq_register(&TASK->answerbox, inr, devno, method, ucode);
1059
    return ipc_irq_register(&TASK->answerbox, inr, devno, method, ucode);
1058
}
1060
}
1059
 
1061
 
1060
/** Disconnect an IRQ handler from a task.
1062
/** Disconnect an IRQ handler from a task.
1061
 *
1063
 *
1062
 * @param inr       IRQ number.
1064
 * @param inr       IRQ number.
1063
 * @param devno     Device number.
1065
 * @param devno     Device number.
1064
 *
1066
 *
1065
 * @return      Zero on success or EPERM on error..
1067
 * @return      Zero on success or EPERM on error..
1066
 */
1068
 */
1067
unative_t sys_ipc_unregister_irq(inr_t inr, devno_t devno)
1069
unative_t sys_ipc_unregister_irq(inr_t inr, devno_t devno)
1068
{
1070
{
1069
    if (!(cap_get(TASK) & CAP_IRQ_REG))
1071
    if (!(cap_get(TASK) & CAP_IRQ_REG))
1070
        return EPERM;
1072
        return EPERM;
1071
 
1073
 
1072
    ipc_irq_unregister(&TASK->answerbox, inr, devno);
1074
    ipc_irq_unregister(&TASK->answerbox, inr, devno);
1073
 
1075
 
1074
    return 0;
1076
    return 0;
1075
}
1077
}
1076
 
1078
 
1077
#include <console/console.h>
1079
#include <console/console.h>
1078
 
1080
 
1079
/**
1081
/**
1080
 * Syscall connect to a task by id.
1082
 * Syscall connect to a task by id.
1081
 *
1083
 *
1082
 * @return      Phone id on success, or negative error code.
1084
 * @return      Phone id on success, or negative error code.
1083
 */
1085
 */
1084
unative_t sys_ipc_connect_kbox(sysarg64_t *uspace_taskid_arg)
1086
unative_t sys_ipc_connect_kbox(sysarg64_t *uspace_taskid_arg)
1085
{
1087
{
1086
#ifdef CONFIG_UDEBUG
1088
#ifdef CONFIG_UDEBUG
1087
    sysarg64_t taskid_arg;
1089
    sysarg64_t taskid_arg;
1088
    int rc;
1090
    int rc;
1089
   
1091
   
1090
    rc = copy_from_uspace(&taskid_arg, uspace_taskid_arg, sizeof(sysarg64_t));
1092
    rc = copy_from_uspace(&taskid_arg, uspace_taskid_arg, sizeof(sysarg64_t));
1091
    if (rc != 0)
1093
    if (rc != 0)
1092
        return (unative_t) rc;
1094
        return (unative_t) rc;
1093
 
1095
 
1094
    LOG("sys_ipc_connect_kbox(%" PRIu64 ")\n", taskid_arg.value);
1096
    LOG("sys_ipc_connect_kbox(%" PRIu64 ")\n", taskid_arg.value);
1095
 
1097
 
1096
    return ipc_connect_kbox(taskid_arg.value);
1098
    return ipc_connect_kbox(taskid_arg.value);
1097
#else
1099
#else
1098
    return (unative_t) ENOTSUP;
1100
    return (unative_t) ENOTSUP;
1099
#endif
1101
#endif
1100
}
1102
}
1101
 
1103
 
1102
/** @}
1104
/** @}
1103
 */
1105
 */
1104
 
1106