Subversion Repositories HelenOS

Rev

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

Rev 4422 Rev 4430
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;
-
 
360
        if (cloned_phone < phone) {
358
        if (cloned_phone < phone) {
361
            mutex_lock(&cloned_phone->lock);
359
            mutex_lock(&cloned_phone->lock);
362
            mutex_lock(&phone->lock);
360
            mutex_lock(&phone->lock);
363
        } else {
361
        } else if (cloned_phone > phone) {
364
            mutex_lock(&phone->lock);
362
            mutex_lock(&phone->lock);
365
            mutex_lock(&cloned_phone->lock);
363
            mutex_lock(&cloned_phone->lock);
-
 
364
        } else {
-
 
365
            mutex_lock(&phone->lock);
366
        }
366
        }
367
        if ((cloned_phone->state != IPC_PHONE_CONNECTED) ||
367
        if ((cloned_phone->state != IPC_PHONE_CONNECTED) ||
368
            phone->state != IPC_PHONE_CONNECTED) {
368
            phone->state != IPC_PHONE_CONNECTED) {
-
 
369
            if (cloned_phone != phone)
369
            mutex_unlock(&cloned_phone->lock);
370
                mutex_unlock(&cloned_phone->lock);
370
            mutex_unlock(&phone->lock);
371
            mutex_unlock(&phone->lock);
371
            return EINVAL;
372
            return EINVAL;
372
        }
373
        }
373
        /*
374
        /*
374
         * We can be pretty sure now that both tasks exist and we are
375
         * We can be pretty sure now that both tasks exist and we are
375
         * connected to them. As we continue to hold the phone locks,
376
         * connected to them. As we continue to hold the phone locks,
376
         * we are effectively preventing them from finishing their
377
         * we are effectively preventing them from finishing their
377
         * potential cleanup.
378
         * potential cleanup.
378
         */
379
         */
379
        newphid = phone_alloc(phone->callee->task);
380
        newphid = phone_alloc(phone->callee->task);
380
        if (newphid < 0) {
381
        if (newphid < 0) {
-
 
382
            if (cloned_phone != phone)
381
            mutex_unlock(&cloned_phone->lock);
383
                mutex_unlock(&cloned_phone->lock);
382
            mutex_unlock(&phone->lock);
384
            mutex_unlock(&phone->lock);
383
            return ELIMIT;
385
            return ELIMIT;
384
        }
386
        }
385
        ipc_phone_connect(&phone->callee->task->phones[newphid],
387
        ipc_phone_connect(&phone->callee->task->phones[newphid],
386
            cloned_phone->callee);
388
            cloned_phone->callee);
-
 
389
        if (cloned_phone != phone)
387
        mutex_unlock(&cloned_phone->lock);
390
            mutex_unlock(&cloned_phone->lock);
388
        mutex_unlock(&phone->lock);
391
        mutex_unlock(&phone->lock);
389
        /* Set the new phone for the callee. */
392
        /* Set the new phone for the callee. */
390
        IPC_SET_ARG1(call->data, newphid);
393
        IPC_SET_ARG1(call->data, newphid);
391
        break;
394
        break;
392
    }
395
    }
393
    case IPC_M_CONNECT_ME:
396
    case IPC_M_CONNECT_ME:
394
        IPC_SET_ARG5(call->data, (unative_t) phone);
397
        IPC_SET_ARG5(call->data, (unative_t) phone);
395
        break;
398
        break;
396
    case IPC_M_CONNECT_ME_TO:
399
    case IPC_M_CONNECT_ME_TO:
397
        newphid = phone_alloc(TASK);
400
        newphid = phone_alloc(TASK);
398
        if (newphid < 0)
401
        if (newphid < 0)
399
            return ELIMIT;
402
            return ELIMIT;
400
        /* Set arg5 for server */
403
        /* Set arg5 for server */
401
        IPC_SET_ARG5(call->data, (unative_t) &TASK->phones[newphid]);
404
        IPC_SET_ARG5(call->data, (unative_t) &TASK->phones[newphid]);
402
        call->flags |= IPC_CALL_CONN_ME_TO;
405
        call->flags |= IPC_CALL_CONN_ME_TO;
403
        call->priv = newphid;
406
        call->priv = newphid;
404
        break;
407
        break;
405
    case IPC_M_SHARE_OUT:
408
    case IPC_M_SHARE_OUT:
406
        size = as_area_get_size(IPC_GET_ARG1(call->data));
409
        size = as_area_get_size(IPC_GET_ARG1(call->data));
407
        if (!size)
410
        if (!size)
408
            return EPERM;
411
            return EPERM;
409
        IPC_SET_ARG2(call->data, size);
412
        IPC_SET_ARG2(call->data, size);
410
        break;
413
        break;
411
    case IPC_M_DATA_READ:
414
    case IPC_M_DATA_READ:
412
        size = IPC_GET_ARG2(call->data);
415
        size = IPC_GET_ARG2(call->data);
413
        if ((size <= 0 || (size > DATA_XFER_LIMIT)))
416
        if ((size <= 0 || (size > DATA_XFER_LIMIT)))
414
            return ELIMIT;
417
            return ELIMIT;
415
        break;
418
        break;
416
    case IPC_M_DATA_WRITE:
419
    case IPC_M_DATA_WRITE:
417
        src = IPC_GET_ARG1(call->data);
420
        src = IPC_GET_ARG1(call->data);
418
        size = IPC_GET_ARG2(call->data);
421
        size = IPC_GET_ARG2(call->data);
419
       
422
       
420
        if (size > DATA_XFER_LIMIT)
423
        if (size > DATA_XFER_LIMIT)
421
            return ELIMIT;
424
            return ELIMIT;
422
       
425
       
423
        call->buffer = (uint8_t *) malloc(size, 0);
426
        call->buffer = (uint8_t *) malloc(size, 0);
424
        rc = copy_from_uspace(call->buffer, (void *) src, size);
427
        rc = copy_from_uspace(call->buffer, (void *) src, size);
425
        if (rc != 0) {
428
        if (rc != 0) {
426
            free(call->buffer);
429
            free(call->buffer);
427
            return rc;
430
            return rc;
428
        }
431
        }
429
        break;
432
        break;
430
#ifdef CONFIG_UDEBUG
433
#ifdef CONFIG_UDEBUG
431
    case IPC_M_DEBUG_ALL:
434
    case IPC_M_DEBUG_ALL:
432
        return udebug_request_preprocess(call, phone);
435
        return udebug_request_preprocess(call, phone);
433
#endif
436
#endif
434
    default:
437
    default:
435
        break;
438
        break;
436
    }
439
    }
437
    return 0;
440
    return 0;
438
}
441
}
439
 
442
 
440
/*******************************************************************************
443
/*******************************************************************************
441
 * Functions called to process received call/answer before passing it to uspace.
444
 * Functions called to process received call/answer before passing it to uspace.
442
 *******************************************************************************/
445
 *******************************************************************************/
443
 
446
 
444
/** Do basic kernel processing of received call answer.
447
/** Do basic kernel processing of received call answer.
445
 *
448
 *
446
 * @param call      Call structure with the answer.
449
 * @param call      Call structure with the answer.
447
 */
450
 */
448
static void process_answer(call_t *call)
451
static void process_answer(call_t *call)
449
{
452
{
450
    if (((native_t) IPC_GET_RETVAL(call->data) == EHANGUP) &&
453
    if (((native_t) IPC_GET_RETVAL(call->data) == EHANGUP) &&
451
        (call->flags & IPC_CALL_FORWARDED))
454
        (call->flags & IPC_CALL_FORWARDED))
452
        IPC_SET_RETVAL(call->data, EFORWARD);
455
        IPC_SET_RETVAL(call->data, EFORWARD);
453
 
456
 
454
    if (call->flags & IPC_CALL_CONN_ME_TO) {
457
    if (call->flags & IPC_CALL_CONN_ME_TO) {
455
        if (IPC_GET_RETVAL(call->data))
458
        if (IPC_GET_RETVAL(call->data))
456
            phone_dealloc(call->priv);
459
            phone_dealloc(call->priv);
457
        else
460
        else
458
            IPC_SET_ARG5(call->data, call->priv);
461
            IPC_SET_ARG5(call->data, call->priv);
459
    }
462
    }
460
 
463
 
461
    if (call->buffer) {
464
    if (call->buffer) {
462
        /* This must be an affirmative answer to IPC_M_DATA_READ. */
465
        /* This must be an affirmative answer to IPC_M_DATA_READ. */
463
        /* or IPC_M_DEBUG_ALL/UDEBUG_M_MEM_READ... */
466
        /* or IPC_M_DEBUG_ALL/UDEBUG_M_MEM_READ... */
464
        uintptr_t dst = IPC_GET_ARG1(call->data);
467
        uintptr_t dst = IPC_GET_ARG1(call->data);
465
        size_t size = IPC_GET_ARG2(call->data);
468
        size_t size = IPC_GET_ARG2(call->data);
466
        int rc = copy_to_uspace((void *) dst, call->buffer, size);
469
        int rc = copy_to_uspace((void *) dst, call->buffer, size);
467
        if (rc)
470
        if (rc)
468
            IPC_SET_RETVAL(call->data, rc);
471
            IPC_SET_RETVAL(call->data, rc);
469
        free(call->buffer);
472
        free(call->buffer);
470
        call->buffer = NULL;
473
        call->buffer = NULL;
471
    }
474
    }
472
}
475
}
473
 
476
 
474
/** Do basic kernel processing of received call request.
477
/** Do basic kernel processing of received call request.
475
 *
478
 *
476
 * @param box       Destination answerbox structure.
479
 * @param box       Destination answerbox structure.
477
 * @param call      Call structure with the request.
480
 * @param call      Call structure with the request.
478
 *
481
 *
479
 * @return      Return 0 if the call should be passed to userspace.
482
 * @return      Return 0 if the call should be passed to userspace.
480
 *          Return -1 if the call should be ignored.
483
 *          Return -1 if the call should be ignored.
481
 */
484
 */
482
static int process_request(answerbox_t *box, call_t *call)
485
static int process_request(answerbox_t *box, call_t *call)
483
{
486
{
484
    int phoneid;
487
    int phoneid;
485
 
488
 
486
    if (IPC_GET_METHOD(call->data) == IPC_M_CONNECT_TO_ME) {
489
    if (IPC_GET_METHOD(call->data) == IPC_M_CONNECT_TO_ME) {
487
        phoneid = phone_alloc(TASK);
490
        phoneid = phone_alloc(TASK);
488
        if (phoneid < 0) { /* Failed to allocate phone */
491
        if (phoneid < 0) { /* Failed to allocate phone */
489
            IPC_SET_RETVAL(call->data, ELIMIT);
492
            IPC_SET_RETVAL(call->data, ELIMIT);
490
            ipc_answer(box, call);
493
            ipc_answer(box, call);
491
            return -1;
494
            return -1;
492
        }
495
        }
493
        IPC_SET_ARG5(call->data, phoneid);
496
        IPC_SET_ARG5(call->data, phoneid);
494
    }
497
    }
495
    switch (IPC_GET_METHOD(call->data)) {
498
    switch (IPC_GET_METHOD(call->data)) {
496
    case IPC_M_DEBUG_ALL:
499
    case IPC_M_DEBUG_ALL:
497
        return -1;
500
        return -1;
498
    default:
501
    default:
499
        break;
502
        break;
500
    }
503
    }
501
    return 0;
504
    return 0;
502
}
505
}
503
 
506
 
504
/** Make a fast call over IPC, wait for reply and return to user.
507
/** Make a fast call over IPC, wait for reply and return to user.
505
 *
508
 *
506
 * This function can handle only three arguments of payload, but is faster than
509
 * This function can handle only three arguments of payload, but is faster than
507
 * the generic function (i.e. sys_ipc_call_sync_slow()).
510
 * the generic function (i.e. sys_ipc_call_sync_slow()).
508
 *
511
 *
509
 * @param phoneid   Phone handle for the call.
512
 * @param phoneid   Phone handle for the call.
510
 * @param method    Method of the call.
513
 * @param method    Method of the call.
511
 * @param arg1      Service-defined payload argument.
514
 * @param arg1      Service-defined payload argument.
512
 * @param arg2      Service-defined payload argument.
515
 * @param arg2      Service-defined payload argument.
513
 * @param arg3      Service-defined payload argument.
516
 * @param arg3      Service-defined payload argument.
514
 * @param data      Address of userspace structure where the reply call will
517
 * @param data      Address of userspace structure where the reply call will
515
 *          be stored.
518
 *          be stored.
516
 *
519
 *
517
 * @return      Returns 0 on success.
520
 * @return      Returns 0 on success.
518
 *          Return ENOENT if there is no such phone handle.
521
 *          Return ENOENT if there is no such phone handle.
519
 */
522
 */
520
unative_t sys_ipc_call_sync_fast(unative_t phoneid, unative_t method,
523
unative_t sys_ipc_call_sync_fast(unative_t phoneid, unative_t method,
521
    unative_t arg1, unative_t arg2, unative_t arg3, ipc_data_t *data)
524
    unative_t arg1, unative_t arg2, unative_t arg3, ipc_data_t *data)
522
{
525
{
523
    call_t call;
526
    call_t call;
524
    phone_t *phone;
527
    phone_t *phone;
525
    int res;
528
    int res;
526
    int rc;
529
    int rc;
527
   
530
   
528
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
531
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
529
 
532
 
530
    ipc_call_static_init(&call);
533
    ipc_call_static_init(&call);
531
    IPC_SET_METHOD(call.data, method);
534
    IPC_SET_METHOD(call.data, method);
532
    IPC_SET_ARG1(call.data, arg1);
535
    IPC_SET_ARG1(call.data, arg1);
533
    IPC_SET_ARG2(call.data, arg2);
536
    IPC_SET_ARG2(call.data, arg2);
534
    IPC_SET_ARG3(call.data, arg3);
537
    IPC_SET_ARG3(call.data, arg3);
535
    /*
538
    /*
536
     * To achieve deterministic behavior, zero out arguments that are beyond
539
     * To achieve deterministic behavior, zero out arguments that are beyond
537
     * the limits of the fast version.
540
     * the limits of the fast version.
538
     */
541
     */
539
    IPC_SET_ARG4(call.data, 0);
542
    IPC_SET_ARG4(call.data, 0);
540
    IPC_SET_ARG5(call.data, 0);
543
    IPC_SET_ARG5(call.data, 0);
541
 
544
 
542
    if (!(res = request_preprocess(&call, phone))) {
545
    if (!(res = request_preprocess(&call, phone))) {
543
#ifdef CONFIG_UDEBUG
546
#ifdef CONFIG_UDEBUG
544
        udebug_stoppable_begin();
547
        udebug_stoppable_begin();
545
#endif
548
#endif
546
        rc = ipc_call_sync(phone, &call);
549
        rc = ipc_call_sync(phone, &call);
547
#ifdef CONFIG_UDEBUG
550
#ifdef CONFIG_UDEBUG
548
        udebug_stoppable_end();
551
        udebug_stoppable_end();
549
#endif
552
#endif
550
        if (rc != EOK)
553
        if (rc != EOK)
551
            return rc;
554
            return rc;
552
        process_answer(&call);
555
        process_answer(&call);
553
 
556
 
554
    } else {
557
    } else {
555
        IPC_SET_RETVAL(call.data, res);
558
        IPC_SET_RETVAL(call.data, res);
556
    }
559
    }
557
    rc = STRUCT_TO_USPACE(&data->args, &call.data.args);
560
    rc = STRUCT_TO_USPACE(&data->args, &call.data.args);
558
    if (rc != 0)
561
    if (rc != 0)
559
        return rc;
562
        return rc;
560
 
563
 
561
    return 0;
564
    return 0;
562
}
565
}
563
 
566
 
564
/** Make a synchronous IPC call allowing to transmit the entire payload.
567
/** Make a synchronous IPC call allowing to transmit the entire payload.
565
 *
568
 *
566
 * @param phoneid   Phone handle for the call.
569
 * @param phoneid   Phone handle for the call.
567
 * @param question  Userspace address of call data with the request.
570
 * @param question  Userspace address of call data with the request.
568
 * @param reply     Userspace address of call data where to store the
571
 * @param reply     Userspace address of call data where to store the
569
 *          answer.
572
 *          answer.
570
 *
573
 *
571
 * @return      Zero on success or an error code.
574
 * @return      Zero on success or an error code.
572
 */
575
 */
573
unative_t sys_ipc_call_sync_slow(unative_t phoneid, ipc_data_t *question,
576
unative_t sys_ipc_call_sync_slow(unative_t phoneid, ipc_data_t *question,
574
    ipc_data_t *reply)
577
    ipc_data_t *reply)
575
{
578
{
576
    call_t call;
579
    call_t call;
577
    phone_t *phone;
580
    phone_t *phone;
578
    int res;
581
    int res;
579
    int rc;
582
    int rc;
580
 
583
 
581
    ipc_call_static_init(&call);
584
    ipc_call_static_init(&call);
582
    rc = copy_from_uspace(&call.data.args, &question->args,
585
    rc = copy_from_uspace(&call.data.args, &question->args,
583
        sizeof(call.data.args));
586
        sizeof(call.data.args));
584
    if (rc != 0)
587
    if (rc != 0)
585
        return (unative_t) rc;
588
        return (unative_t) rc;
586
 
589
 
587
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
590
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
588
 
591
 
589
    if (!(res = request_preprocess(&call, phone))) {
592
    if (!(res = request_preprocess(&call, phone))) {
590
#ifdef CONFIG_UDEBUG
593
#ifdef CONFIG_UDEBUG
591
        udebug_stoppable_begin();
594
        udebug_stoppable_begin();
592
#endif
595
#endif
593
        rc = ipc_call_sync(phone, &call);
596
        rc = ipc_call_sync(phone, &call);
594
#ifdef CONFIG_UDEBUG
597
#ifdef CONFIG_UDEBUG
595
        udebug_stoppable_end();
598
        udebug_stoppable_end();
596
#endif
599
#endif
597
        if (rc != EOK)
600
        if (rc != EOK)
598
            return rc;
601
            return rc;
599
        process_answer(&call);
602
        process_answer(&call);
600
    } else
603
    } else
601
        IPC_SET_RETVAL(call.data, res);
604
        IPC_SET_RETVAL(call.data, res);
602
 
605
 
603
    rc = STRUCT_TO_USPACE(&reply->args, &call.data.args);
606
    rc = STRUCT_TO_USPACE(&reply->args, &call.data.args);
604
    if (rc != 0)
607
    if (rc != 0)
605
        return rc;
608
        return rc;
606
 
609
 
607
    return 0;
610
    return 0;
608
}
611
}
609
 
612
 
610
/** Check that the task did not exceed the allowed limit of asynchronous calls.
613
/** Check that the task did not exceed the allowed limit of asynchronous calls.
611
 *
614
 *
612
 * @return      Return 0 if limit not reached or -1 if limit exceeded.
615
 * @return      Return 0 if limit not reached or -1 if limit exceeded.
613
 */
616
 */
614
static int check_call_limit(void)
617
static int check_call_limit(void)
615
{
618
{
616
    if (atomic_preinc(&TASK->active_calls) > IPC_MAX_ASYNC_CALLS) {
619
    if (atomic_preinc(&TASK->active_calls) > IPC_MAX_ASYNC_CALLS) {
617
        atomic_dec(&TASK->active_calls);
620
        atomic_dec(&TASK->active_calls);
618
        return -1;
621
        return -1;
619
    }
622
    }
620
    return 0;
623
    return 0;
621
}
624
}
622
 
625
 
623
/** Make a fast asynchronous call over IPC.
626
/** Make a fast asynchronous call over IPC.
624
 *
627
 *
625
 * This function can only handle four arguments of payload, but is faster than
628
 * This function can only handle four arguments of payload, but is faster than
626
 * the generic function sys_ipc_call_async_slow().
629
 * the generic function sys_ipc_call_async_slow().
627
 *
630
 *
628
 * @param phoneid   Phone handle for the call.
631
 * @param phoneid   Phone handle for the call.
629
 * @param method    Method of the call.
632
 * @param method    Method of the call.
630
 * @param arg1      Service-defined payload argument.
633
 * @param arg1      Service-defined payload argument.
631
 * @param arg2      Service-defined payload argument.
634
 * @param arg2      Service-defined payload argument.
632
 * @param arg3      Service-defined payload argument.
635
 * @param arg3      Service-defined payload argument.
633
 * @param arg4      Service-defined payload argument.
636
 * @param arg4      Service-defined payload argument.
634
 *
637
 *
635
 * @return      Return call hash on success.
638
 * @return      Return call hash on success.
636
 *          Return IPC_CALLRET_FATAL in case of a fatal error and
639
 *          Return IPC_CALLRET_FATAL in case of a fatal error and
637
 *          IPC_CALLRET_TEMPORARY if there are too many pending
640
 *          IPC_CALLRET_TEMPORARY if there are too many pending
638
 *          asynchronous requests; answers should be handled first.
641
 *          asynchronous requests; answers should be handled first.
639
 */
642
 */
640
unative_t sys_ipc_call_async_fast(unative_t phoneid, unative_t method,
643
unative_t sys_ipc_call_async_fast(unative_t phoneid, unative_t method,
641
    unative_t arg1, unative_t arg2, unative_t arg3, unative_t arg4)
644
    unative_t arg1, unative_t arg2, unative_t arg3, unative_t arg4)
642
{
645
{
643
    call_t *call;
646
    call_t *call;
644
    phone_t *phone;
647
    phone_t *phone;
645
    int res;
648
    int res;
646
 
649
 
647
    if (check_call_limit())
650
    if (check_call_limit())
648
        return IPC_CALLRET_TEMPORARY;
651
        return IPC_CALLRET_TEMPORARY;
649
 
652
 
650
    GET_CHECK_PHONE(phone, phoneid, return IPC_CALLRET_FATAL);
653
    GET_CHECK_PHONE(phone, phoneid, return IPC_CALLRET_FATAL);
651
 
654
 
652
    call = ipc_call_alloc(0);
655
    call = ipc_call_alloc(0);
653
    IPC_SET_METHOD(call->data, method);
656
    IPC_SET_METHOD(call->data, method);
654
    IPC_SET_ARG1(call->data, arg1);
657
    IPC_SET_ARG1(call->data, arg1);
655
    IPC_SET_ARG2(call->data, arg2);
658
    IPC_SET_ARG2(call->data, arg2);
656
    IPC_SET_ARG3(call->data, arg3);
659
    IPC_SET_ARG3(call->data, arg3);
657
    IPC_SET_ARG4(call->data, arg4);
660
    IPC_SET_ARG4(call->data, arg4);
658
    /*
661
    /*
659
     * To achieve deterministic behavior, zero out arguments that are beyond
662
     * To achieve deterministic behavior, zero out arguments that are beyond
660
     * the limits of the fast version.
663
     * the limits of the fast version.
661
     */
664
     */
662
    IPC_SET_ARG5(call->data, 0);
665
    IPC_SET_ARG5(call->data, 0);
663
 
666
 
664
    if (!(res = request_preprocess(call, phone)))
667
    if (!(res = request_preprocess(call, phone)))
665
        ipc_call(phone, call);
668
        ipc_call(phone, call);
666
    else
669
    else
667
        ipc_backsend_err(phone, call, res);
670
        ipc_backsend_err(phone, call, res);
668
 
671
 
669
    return (unative_t) call;
672
    return (unative_t) call;
670
}
673
}
671
 
674
 
672
/** Make an asynchronous IPC call allowing to transmit the entire payload.
675
/** Make an asynchronous IPC call allowing to transmit the entire payload.
673
 *
676
 *
674
 * @param phoneid   Phone handle for the call.
677
 * @param phoneid   Phone handle for the call.
675
 * @param data      Userspace address of call data with the request.
678
 * @param data      Userspace address of call data with the request.
676
 *
679
 *
677
 * @return      See sys_ipc_call_async_fast().
680
 * @return      See sys_ipc_call_async_fast().
678
 */
681
 */
679
unative_t sys_ipc_call_async_slow(unative_t phoneid, ipc_data_t *data)
682
unative_t sys_ipc_call_async_slow(unative_t phoneid, ipc_data_t *data)
680
{
683
{
681
    call_t *call;
684
    call_t *call;
682
    phone_t *phone;
685
    phone_t *phone;
683
    int res;
686
    int res;
684
    int rc;
687
    int rc;
685
 
688
 
686
    if (check_call_limit())
689
    if (check_call_limit())
687
        return IPC_CALLRET_TEMPORARY;
690
        return IPC_CALLRET_TEMPORARY;
688
 
691
 
689
    GET_CHECK_PHONE(phone, phoneid, return IPC_CALLRET_FATAL);
692
    GET_CHECK_PHONE(phone, phoneid, return IPC_CALLRET_FATAL);
690
 
693
 
691
    call = ipc_call_alloc(0);
694
    call = ipc_call_alloc(0);
692
    rc = copy_from_uspace(&call->data.args, &data->args,
695
    rc = copy_from_uspace(&call->data.args, &data->args,
693
        sizeof(call->data.args));
696
        sizeof(call->data.args));
694
    if (rc != 0) {
697
    if (rc != 0) {
695
        ipc_call_free(call);
698
        ipc_call_free(call);
696
        return (unative_t) rc;
699
        return (unative_t) rc;
697
    }
700
    }
698
    if (!(res = request_preprocess(call, phone)))
701
    if (!(res = request_preprocess(call, phone)))
699
        ipc_call(phone, call);
702
        ipc_call(phone, call);
700
    else
703
    else
701
        ipc_backsend_err(phone, call, res);
704
        ipc_backsend_err(phone, call, res);
702
 
705
 
703
    return (unative_t) call;
706
    return (unative_t) call;
704
}
707
}
705
 
708
 
706
/** Forward a received call to another destination - common code for both the
709
/** Forward a received call to another destination - common code for both the
707
 * fast and the slow version.
710
 * fast and the slow version.
708
 *
711
 *
709
 * @param callid    Hash of the call to forward.
712
 * @param callid    Hash of the call to forward.
710
 * @param phoneid   Phone handle to use for forwarding.
713
 * @param phoneid   Phone handle to use for forwarding.
711
 * @param method    New method to use for the forwarded call.
714
 * @param method    New method to use for the forwarded call.
712
 * @param arg1      New value of the first argument for the forwarded call.
715
 * @param arg1      New value of the first argument for the forwarded call.
713
 * @param arg2      New value of the second argument for the forwarded call.
716
 * @param arg2      New value of the second argument for the forwarded call.
714
 * @param arg3      New value of the third argument for the forwarded call.
717
 * @param arg3      New value of the third argument for the forwarded call.
715
 * @param arg4      New value of the fourth argument for the forwarded call.
718
 * @param arg4      New value of the fourth argument for the forwarded call.
716
 * @param arg5      New value of the fifth argument for the forwarded call.
719
 * @param arg5      New value of the fifth argument for the forwarded call.
717
 * @param mode      Flags that specify mode of the forward operation.
720
 * @param mode      Flags that specify mode of the forward operation.
718
 * @param slow      If true, arg3, arg4 and arg5 are considered. Otherwise
721
 * @param slow      If true, arg3, arg4 and arg5 are considered. Otherwise
719
 *          the function considers only the fast version arguments:
722
 *          the function considers only the fast version arguments:
720
 *          i.e. arg1 and arg2.
723
 *          i.e. arg1 and arg2.
721
 *
724
 *
722
 * @return      Return 0 on succes, otherwise return an error code.
725
 * @return      Return 0 on succes, otherwise return an error code.
723
 *
726
 *
724
 * Warning: Make sure that ARG5 is not rewritten for certain system IPC
727
 * Warning: Make sure that ARG5 is not rewritten for certain system IPC
725
 */
728
 */
726
static unative_t sys_ipc_forward_common(unative_t callid, unative_t phoneid,
729
static unative_t sys_ipc_forward_common(unative_t callid, unative_t phoneid,
727
    unative_t method, unative_t arg1, unative_t arg2, unative_t arg3,
730
    unative_t method, unative_t arg1, unative_t arg2, unative_t arg3,
728
    unative_t arg4, unative_t arg5, int mode, bool slow)
731
    unative_t arg4, unative_t arg5, int mode, bool slow)
729
{
732
{
730
    call_t *call;
733
    call_t *call;
731
    phone_t *phone;
734
    phone_t *phone;
732
 
735
 
733
    call = get_call(callid);
736
    call = get_call(callid);
734
    if (!call)
737
    if (!call)
735
        return ENOENT;
738
        return ENOENT;
736
   
739
   
737
    call->flags |= IPC_CALL_FORWARDED;
740
    call->flags |= IPC_CALL_FORWARDED;
738
 
741
 
739
    GET_CHECK_PHONE(phone, phoneid, {
742
    GET_CHECK_PHONE(phone, phoneid, {
740
        IPC_SET_RETVAL(call->data, EFORWARD);
743
        IPC_SET_RETVAL(call->data, EFORWARD);
741
        ipc_answer(&TASK->answerbox, call);
744
        ipc_answer(&TASK->answerbox, call);
742
        return ENOENT;
745
        return ENOENT;
743
    });
746
    });
744
 
747
 
745
    if (!method_is_forwardable(IPC_GET_METHOD(call->data))) {
748
    if (!method_is_forwardable(IPC_GET_METHOD(call->data))) {
746
        IPC_SET_RETVAL(call->data, EFORWARD);
749
        IPC_SET_RETVAL(call->data, EFORWARD);
747
        ipc_answer(&TASK->answerbox, call);
750
        ipc_answer(&TASK->answerbox, call);
748
        return EPERM;
751
        return EPERM;
749
    }
752
    }
750
 
753
 
751
    /*
754
    /*
752
     * Userspace is not allowed to change method of system methods on
755
     * Userspace is not allowed to change method of system methods on
753
     * forward, allow changing ARG1, ARG2, ARG3 and ARG4 by means of method,
756
     * forward, allow changing ARG1, ARG2, ARG3 and ARG4 by means of method,
754
     * arg1, arg2 and arg3.
757
     * arg1, arg2 and arg3.
755
     * If the method is immutable, don't change anything.
758
     * If the method is immutable, don't change anything.
756
     */
759
     */
757
    if (!method_is_immutable(IPC_GET_METHOD(call->data))) {
760
    if (!method_is_immutable(IPC_GET_METHOD(call->data))) {
758
        if (method_is_system(IPC_GET_METHOD(call->data))) {
761
        if (method_is_system(IPC_GET_METHOD(call->data))) {
759
            if (IPC_GET_METHOD(call->data) == IPC_M_CONNECT_TO_ME)
762
            if (IPC_GET_METHOD(call->data) == IPC_M_CONNECT_TO_ME)
760
                phone_dealloc(IPC_GET_ARG5(call->data));
763
                phone_dealloc(IPC_GET_ARG5(call->data));
761
 
764
 
762
            IPC_SET_ARG1(call->data, method);
765
            IPC_SET_ARG1(call->data, method);
763
            IPC_SET_ARG2(call->data, arg1);
766
            IPC_SET_ARG2(call->data, arg1);
764
            IPC_SET_ARG3(call->data, arg2);
767
            IPC_SET_ARG3(call->data, arg2);
765
            if (slow) {
768
            if (slow) {
766
                IPC_SET_ARG4(call->data, arg3);
769
                IPC_SET_ARG4(call->data, arg3);
767
                /*
770
                /*
768
                 * For system methods we deliberately don't
771
                 * For system methods we deliberately don't
769
                 * overwrite ARG5.
772
                 * overwrite ARG5.
770
                 */
773
                 */
771
            }
774
            }
772
        } else {
775
        } else {
773
            IPC_SET_METHOD(call->data, method);
776
            IPC_SET_METHOD(call->data, method);
774
            IPC_SET_ARG1(call->data, arg1);
777
            IPC_SET_ARG1(call->data, arg1);
775
            IPC_SET_ARG2(call->data, arg2);
778
            IPC_SET_ARG2(call->data, arg2);
776
            if (slow) {
779
            if (slow) {
777
                IPC_SET_ARG3(call->data, arg3);
780
                IPC_SET_ARG3(call->data, arg3);
778
                IPC_SET_ARG4(call->data, arg4);
781
                IPC_SET_ARG4(call->data, arg4);
779
                IPC_SET_ARG5(call->data, arg5);
782
                IPC_SET_ARG5(call->data, arg5);
780
            }
783
            }
781
        }
784
        }
782
    }
785
    }
783
 
786
 
784
    return ipc_forward(call, phone, &TASK->answerbox, mode);
787
    return ipc_forward(call, phone, &TASK->answerbox, mode);
785
}
788
}
786
 
789
 
787
/** Forward a received call to another destination - fast version.
790
/** Forward a received call to another destination - fast version.
788
 *
791
 *
789
 * @param callid    Hash of the call to forward.
792
 * @param callid    Hash of the call to forward.
790
 * @param phoneid   Phone handle to use for forwarding.
793
 * @param phoneid   Phone handle to use for forwarding.
791
 * @param method    New method to use for the forwarded call.
794
 * @param method    New method to use for the forwarded call.
792
 * @param arg1      New value of the first argument for the forwarded call.
795
 * @param arg1      New value of the first argument for the forwarded call.
793
 * @param arg2      New value of the second argument for the forwarded call.
796
 * @param arg2      New value of the second argument for the forwarded call.
794
 * @param mode      Flags that specify mode of the forward operation.
797
 * @param mode      Flags that specify mode of the forward operation.
795
 *
798
 *
796
 * @return      Return 0 on succes, otherwise return an error code.
799
 * @return      Return 0 on succes, otherwise return an error code.
797
 *
800
 *
798
 * In case the original method is a system method, ARG1, ARG2 and ARG3 are
801
 * In case the original method is a system method, ARG1, ARG2 and ARG3 are
799
 * overwritten in the forwarded message with the new method and the new
802
 * overwritten in the forwarded message with the new method and the new
800
 * arg1 and arg2, respectively. Otherwise the METHOD, ARG1 and ARG2 are
803
 * arg1 and arg2, respectively. Otherwise the METHOD, ARG1 and ARG2 are
801
 * rewritten with the new method, arg1 and arg2, respectively. Also note there
804
 * rewritten with the new method, arg1 and arg2, respectively. Also note there
802
 * is a set of immutable methods, for which the new method and arguments are not
805
 * is a set of immutable methods, for which the new method and arguments are not
803
 * set and these values are ignored.
806
 * set and these values are ignored.
804
 */
807
 */
805
unative_t sys_ipc_forward_fast(unative_t callid, unative_t phoneid,
808
unative_t sys_ipc_forward_fast(unative_t callid, unative_t phoneid,
806
    unative_t method, unative_t arg1, unative_t arg2, int mode)
809
    unative_t method, unative_t arg1, unative_t arg2, int mode)
807
{
810
{
808
    return sys_ipc_forward_common(callid, phoneid, method, arg1, arg2, 0, 0,
811
    return sys_ipc_forward_common(callid, phoneid, method, arg1, arg2, 0, 0,
809
        0, mode, false);
812
        0, mode, false);
810
}
813
}
811
 
814
 
812
/** Forward a received call to another destination - slow version.
815
/** Forward a received call to another destination - slow version.
813
 *
816
 *
814
 * @param callid    Hash of the call to forward.
817
 * @param callid    Hash of the call to forward.
815
 * @param phoneid   Phone handle to use for forwarding.
818
 * @param phoneid   Phone handle to use for forwarding.
816
 * @param data      Userspace address of the new IPC data.
819
 * @param data      Userspace address of the new IPC data.
817
 * @param mode      Flags that specify mode of the forward operation.
820
 * @param mode      Flags that specify mode of the forward operation.
818
 *
821
 *
819
 * @return      Return 0 on succes, otherwise return an error code.
822
 * @return      Return 0 on succes, otherwise return an error code.
820
 *
823
 *
821
 * This function is the slow verision of the sys_ipc_forward_fast interface.
824
 * This function is the slow verision of the sys_ipc_forward_fast interface.
822
 * It can copy all five new arguments and the new method from the userspace.
825
 * It can copy all five new arguments and the new method from the userspace.
823
 * It naturally extends the functionality of the fast version. For system
826
 * It naturally extends the functionality of the fast version. For system
824
 * methods, it additionally stores the new value of arg3 to ARG4. For non-system
827
 * methods, it additionally stores the new value of arg3 to ARG4. For non-system
825
 * methods, it additionally stores the new value of arg3, arg4 and arg5,
828
 * methods, it additionally stores the new value of arg3, arg4 and arg5,
826
 * respectively, to ARG3, ARG4 and ARG5, respectively.
829
 * respectively, to ARG3, ARG4 and ARG5, respectively.
827
 */
830
 */
828
unative_t sys_ipc_forward_slow(unative_t callid, unative_t phoneid,
831
unative_t sys_ipc_forward_slow(unative_t callid, unative_t phoneid,
829
    ipc_data_t *data, int mode)
832
    ipc_data_t *data, int mode)
830
{
833
{
831
    ipc_data_t newdata;
834
    ipc_data_t newdata;
832
    int rc;
835
    int rc;
833
 
836
 
834
    rc = copy_from_uspace(&newdata.args, &data->args,
837
    rc = copy_from_uspace(&newdata.args, &data->args,
835
        sizeof(newdata.args));
838
        sizeof(newdata.args));
836
    if (rc != 0)
839
    if (rc != 0)
837
        return (unative_t) rc;
840
        return (unative_t) rc;
838
 
841
 
839
    return sys_ipc_forward_common(callid, phoneid,
842
    return sys_ipc_forward_common(callid, phoneid,
840
        IPC_GET_METHOD(newdata), IPC_GET_ARG1(newdata),
843
        IPC_GET_METHOD(newdata), IPC_GET_ARG1(newdata),
841
        IPC_GET_ARG2(newdata), IPC_GET_ARG3(newdata),
844
        IPC_GET_ARG2(newdata), IPC_GET_ARG3(newdata),
842
        IPC_GET_ARG4(newdata), IPC_GET_ARG5(newdata), mode, true);
845
        IPC_GET_ARG4(newdata), IPC_GET_ARG5(newdata), mode, true);
843
}
846
}
844
 
847
 
845
/** Answer an IPC call - fast version.
848
/** Answer an IPC call - fast version.
846
 *
849
 *
847
 * This function can handle only two return arguments of payload, but is faster
850
 * This function can handle only two return arguments of payload, but is faster
848
 * than the generic sys_ipc_answer().
851
 * than the generic sys_ipc_answer().
849
 *
852
 *
850
 * @param callid    Hash of the call to be answered.
853
 * @param callid    Hash of the call to be answered.
851
 * @param retval    Return value of the answer.
854
 * @param retval    Return value of the answer.
852
 * @param arg1      Service-defined return value.
855
 * @param arg1      Service-defined return value.
853
 * @param arg2      Service-defined return value.
856
 * @param arg2      Service-defined return value.
854
 * @param arg3      Service-defined return value.
857
 * @param arg3      Service-defined return value.
855
 * @param arg4      Service-defined return value.
858
 * @param arg4      Service-defined return value.
856
 *
859
 *
857
 * @return      Return 0 on success, otherwise return an error code.   
860
 * @return      Return 0 on success, otherwise return an error code.   
858
 */
861
 */
859
unative_t sys_ipc_answer_fast(unative_t callid, unative_t retval,
862
unative_t sys_ipc_answer_fast(unative_t callid, unative_t retval,
860
    unative_t arg1, unative_t arg2, unative_t arg3, unative_t arg4)
863
    unative_t arg1, unative_t arg2, unative_t arg3, unative_t arg4)
861
{
864
{
862
    call_t *call;
865
    call_t *call;
863
    ipc_data_t saved_data;
866
    ipc_data_t saved_data;
864
    int saveddata = 0;
867
    int saveddata = 0;
865
    int rc;
868
    int rc;
866
 
869
 
867
    /* Do not answer notification callids */
870
    /* Do not answer notification callids */
868
    if (callid & IPC_CALLID_NOTIFICATION)
871
    if (callid & IPC_CALLID_NOTIFICATION)
869
        return 0;
872
        return 0;
870
 
873
 
871
    call = get_call(callid);
874
    call = get_call(callid);
872
    if (!call)
875
    if (!call)
873
        return ENOENT;
876
        return ENOENT;
874
 
877
 
875
    if (answer_need_old(call)) {
878
    if (answer_need_old(call)) {
876
        memcpy(&saved_data, &call->data, sizeof(call->data));
879
        memcpy(&saved_data, &call->data, sizeof(call->data));
877
        saveddata = 1;
880
        saveddata = 1;
878
    }
881
    }
879
 
882
 
880
    IPC_SET_RETVAL(call->data, retval);
883
    IPC_SET_RETVAL(call->data, retval);
881
    IPC_SET_ARG1(call->data, arg1);
884
    IPC_SET_ARG1(call->data, arg1);
882
    IPC_SET_ARG2(call->data, arg2);
885
    IPC_SET_ARG2(call->data, arg2);
883
    IPC_SET_ARG3(call->data, arg3);
886
    IPC_SET_ARG3(call->data, arg3);
884
    IPC_SET_ARG4(call->data, arg4);
887
    IPC_SET_ARG4(call->data, arg4);
885
    /*
888
    /*
886
     * To achieve deterministic behavior, zero out arguments that are beyond
889
     * To achieve deterministic behavior, zero out arguments that are beyond
887
     * the limits of the fast version.
890
     * the limits of the fast version.
888
     */
891
     */
889
    IPC_SET_ARG5(call->data, 0);
892
    IPC_SET_ARG5(call->data, 0);
890
    rc = answer_preprocess(call, saveddata ? &saved_data : NULL);
893
    rc = answer_preprocess(call, saveddata ? &saved_data : NULL);
891
 
894
 
892
    ipc_answer(&TASK->answerbox, call);
895
    ipc_answer(&TASK->answerbox, call);
893
    return rc;
896
    return rc;
894
}
897
}
895
 
898
 
896
/** Answer an IPC call.
899
/** Answer an IPC call.
897
 *
900
 *
898
 * @param callid    Hash of the call to be answered.
901
 * @param callid    Hash of the call to be answered.
899
 * @param data      Userspace address of call data with the answer.
902
 * @param data      Userspace address of call data with the answer.
900
 *
903
 *
901
 * @return      Return 0 on success, otherwise return an error code.
904
 * @return      Return 0 on success, otherwise return an error code.
902
 */
905
 */
903
unative_t sys_ipc_answer_slow(unative_t callid, ipc_data_t *data)
906
unative_t sys_ipc_answer_slow(unative_t callid, ipc_data_t *data)
904
{
907
{
905
    call_t *call;
908
    call_t *call;
906
    ipc_data_t saved_data;
909
    ipc_data_t saved_data;
907
    int saveddata = 0;
910
    int saveddata = 0;
908
    int rc;
911
    int rc;
909
 
912
 
910
    /* Do not answer notification callids */
913
    /* Do not answer notification callids */
911
    if (callid & IPC_CALLID_NOTIFICATION)
914
    if (callid & IPC_CALLID_NOTIFICATION)
912
        return 0;
915
        return 0;
913
 
916
 
914
    call = get_call(callid);
917
    call = get_call(callid);
915
    if (!call)
918
    if (!call)
916
        return ENOENT;
919
        return ENOENT;
917
 
920
 
918
    if (answer_need_old(call)) {
921
    if (answer_need_old(call)) {
919
        memcpy(&saved_data, &call->data, sizeof(call->data));
922
        memcpy(&saved_data, &call->data, sizeof(call->data));
920
        saveddata = 1;
923
        saveddata = 1;
921
    }
924
    }
922
    rc = copy_from_uspace(&call->data.args, &data->args,
925
    rc = copy_from_uspace(&call->data.args, &data->args,
923
        sizeof(call->data.args));
926
        sizeof(call->data.args));
924
    if (rc != 0)
927
    if (rc != 0)
925
        return rc;
928
        return rc;
926
 
929
 
927
    rc = answer_preprocess(call, saveddata ? &saved_data : NULL);
930
    rc = answer_preprocess(call, saveddata ? &saved_data : NULL);
928
   
931
   
929
    ipc_answer(&TASK->answerbox, call);
932
    ipc_answer(&TASK->answerbox, call);
930
 
933
 
931
    return rc;
934
    return rc;
932
}
935
}
933
 
936
 
934
/** Hang up a phone.
937
/** Hang up a phone.
935
 *
938
 *
936
 * @param       Phone handle of the phone to be hung up.
939
 * @param       Phone handle of the phone to be hung up.
937
 *
940
 *
938
 * @return      Return 0 on success or an error code.
941
 * @return      Return 0 on success or an error code.
939
 */
942
 */
940
unative_t sys_ipc_hangup(int phoneid)
943
unative_t sys_ipc_hangup(int phoneid)
941
{
944
{
942
    phone_t *phone;
945
    phone_t *phone;
943
 
946
 
944
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
947
    GET_CHECK_PHONE(phone, phoneid, return ENOENT);
945
 
948
 
946
    if (ipc_phone_hangup(phone))
949
    if (ipc_phone_hangup(phone))
947
        return -1;
950
        return -1;
948
 
951
 
949
    return 0;
952
    return 0;
950
}
953
}
951
 
954
 
952
/** Wait for an incoming IPC call or an answer.
955
/** Wait for an incoming IPC call or an answer.
953
 *
956
 *
954
 * @param calldata  Pointer to buffer where the call/answer data is stored.
957
 * @param calldata  Pointer to buffer where the call/answer data is stored.
955
 * @param usec      Timeout. See waitq_sleep_timeout() for explanation.
958
 * @param usec      Timeout. See waitq_sleep_timeout() for explanation.
956
 * @param flags     Select mode of sleep operation. See waitq_sleep_timeout()
959
 * @param flags     Select mode of sleep operation. See waitq_sleep_timeout()
957
 *          for explanation.
960
 *          for explanation.
958
 *
961
 *
959
 * @return      Hash of the call.
962
 * @return      Hash of the call.
960
 *          If IPC_CALLID_NOTIFICATION bit is set in the hash, the
963
 *          If IPC_CALLID_NOTIFICATION bit is set in the hash, the
961
 *          call is a notification. IPC_CALLID_ANSWERED denotes an
964
 *          call is a notification. IPC_CALLID_ANSWERED denotes an
962
 *          answer.
965
 *          answer.
963
 */
966
 */
964
unative_t sys_ipc_wait_for_call(ipc_data_t *calldata, uint32_t usec, int flags)
967
unative_t sys_ipc_wait_for_call(ipc_data_t *calldata, uint32_t usec, int flags)
965
{
968
{
966
    call_t *call;
969
    call_t *call;
967
 
970
 
968
restart:
971
restart:
969
 
972
 
970
#ifdef CONFIG_UDEBUG
973
#ifdef CONFIG_UDEBUG
971
    udebug_stoppable_begin();
974
    udebug_stoppable_begin();
972
#endif  
975
#endif  
973
    call = ipc_wait_for_call(&TASK->answerbox, usec,
976
    call = ipc_wait_for_call(&TASK->answerbox, usec,
974
        flags | SYNCH_FLAGS_INTERRUPTIBLE);
977
        flags | SYNCH_FLAGS_INTERRUPTIBLE);
975
 
978
 
976
#ifdef CONFIG_UDEBUG
979
#ifdef CONFIG_UDEBUG
977
    udebug_stoppable_end();
980
    udebug_stoppable_end();
978
#endif
981
#endif
979
    if (!call)
982
    if (!call)
980
        return 0;
983
        return 0;
981
 
984
 
982
    if (call->flags & IPC_CALL_NOTIF) {
985
    if (call->flags & IPC_CALL_NOTIF) {
983
        ASSERT(! (call->flags & IPC_CALL_STATIC_ALLOC));
986
        ASSERT(! (call->flags & IPC_CALL_STATIC_ALLOC));
984
 
987
 
985
        /* Set in_phone_hash to the interrupt counter */
988
        /* Set in_phone_hash to the interrupt counter */
986
        call->data.phone = (void *) call->priv;
989
        call->data.phone = (void *) call->priv;
987
       
990
       
988
        STRUCT_TO_USPACE(calldata, &call->data);
991
        STRUCT_TO_USPACE(calldata, &call->data);
989
 
992
 
990
        ipc_call_free(call);
993
        ipc_call_free(call);
991
       
994
       
992
        return ((unative_t) call) | IPC_CALLID_NOTIFICATION;
995
        return ((unative_t) call) | IPC_CALLID_NOTIFICATION;
993
    }
996
    }
994
 
997
 
995
    if (call->flags & IPC_CALL_ANSWERED) {
998
    if (call->flags & IPC_CALL_ANSWERED) {
996
        process_answer(call);
999
        process_answer(call);
997
 
1000
 
998
        ASSERT(! (call->flags & IPC_CALL_STATIC_ALLOC));
1001
        ASSERT(! (call->flags & IPC_CALL_STATIC_ALLOC));
999
 
1002
 
1000
        if (call->flags & IPC_CALL_DISCARD_ANSWER) {
1003
        if (call->flags & IPC_CALL_DISCARD_ANSWER) {
1001
            ipc_call_free(call);
1004
            ipc_call_free(call);
1002
            goto restart;
1005
            goto restart;
1003
        } else {
1006
        } else {
1004
            /*
1007
            /*
1005
             * Decrement the counter of active calls only if the
1008
             * Decrement the counter of active calls only if the
1006
             * call is not an answer to IPC_M_PHONE_HUNGUP,
1009
             * call is not an answer to IPC_M_PHONE_HUNGUP,
1007
             * which doesn't contribute to the counter.
1010
             * which doesn't contribute to the counter.
1008
             */
1011
             */
1009
            atomic_dec(&TASK->active_calls);
1012
            atomic_dec(&TASK->active_calls);
1010
        }
1013
        }
1011
 
1014
 
1012
        STRUCT_TO_USPACE(&calldata->args, &call->data.args);
1015
        STRUCT_TO_USPACE(&calldata->args, &call->data.args);
1013
        ipc_call_free(call);
1016
        ipc_call_free(call);
1014
 
1017
 
1015
        return ((unative_t) call) | IPC_CALLID_ANSWERED;
1018
        return ((unative_t) call) | IPC_CALLID_ANSWERED;
1016
    }
1019
    }
1017
 
1020
 
1018
    if (process_request(&TASK->answerbox, call))
1021
    if (process_request(&TASK->answerbox, call))
1019
        goto restart;
1022
        goto restart;
1020
 
1023
 
1021
    /* Include phone address('id') of the caller in the request,
1024
    /* Include phone address('id') of the caller in the request,
1022
     * copy whole call->data, not only call->data.args */
1025
     * copy whole call->data, not only call->data.args */
1023
    if (STRUCT_TO_USPACE(calldata, &call->data)) {
1026
    if (STRUCT_TO_USPACE(calldata, &call->data)) {
1024
        /*
1027
        /*
1025
         * The callee will not receive this call and no one else has
1028
         * The callee will not receive this call and no one else has
1026
         * a chance to answer it. Reply with the EPARTY error code.
1029
         * a chance to answer it. Reply with the EPARTY error code.
1027
         */
1030
         */
1028
        ipc_data_t saved_data;
1031
        ipc_data_t saved_data;
1029
        int saveddata = 0;
1032
        int saveddata = 0;
1030
 
1033
 
1031
        if (answer_need_old(call)) {
1034
        if (answer_need_old(call)) {
1032
            memcpy(&saved_data, &call->data, sizeof(call->data));
1035
            memcpy(&saved_data, &call->data, sizeof(call->data));
1033
            saveddata = 1;
1036
            saveddata = 1;
1034
        }
1037
        }
1035
       
1038
       
1036
        IPC_SET_RETVAL(call->data, EPARTY);
1039
        IPC_SET_RETVAL(call->data, EPARTY);
1037
        (void) answer_preprocess(call, saveddata ? &saved_data : NULL);
1040
        (void) answer_preprocess(call, saveddata ? &saved_data : NULL);
1038
        ipc_answer(&TASK->answerbox, call);
1041
        ipc_answer(&TASK->answerbox, call);
1039
        return 0;
1042
        return 0;
1040
    }
1043
    }
1041
    return (unative_t)call;
1044
    return (unative_t)call;
1042
}
1045
}
1043
 
1046
 
1044
/** Connect an IRQ handler to a task.
1047
/** Connect an IRQ handler to a task.
1045
 *
1048
 *
1046
 * @param inr       IRQ number.
1049
 * @param inr       IRQ number.
1047
 * @param devno     Device number.
1050
 * @param devno     Device number.
1048
 * @param method    Method to be associated with the notification.
1051
 * @param method    Method to be associated with the notification.
1049
 * @param ucode     Uspace pointer to the top-half pseudocode.
1052
 * @param ucode     Uspace pointer to the top-half pseudocode.
1050
 *
1053
 *
1051
 * @return      EPERM or a return code returned by ipc_irq_register().
1054
 * @return      EPERM or a return code returned by ipc_irq_register().
1052
 */
1055
 */
1053
unative_t sys_ipc_register_irq(inr_t inr, devno_t devno, unative_t method,
1056
unative_t sys_ipc_register_irq(inr_t inr, devno_t devno, unative_t method,
1054
    irq_code_t *ucode)
1057
    irq_code_t *ucode)
1055
{
1058
{
1056
    if (!(cap_get(TASK) & CAP_IRQ_REG))
1059
    if (!(cap_get(TASK) & CAP_IRQ_REG))
1057
        return EPERM;
1060
        return EPERM;
1058
 
1061
 
1059
    return ipc_irq_register(&TASK->answerbox, inr, devno, method, ucode);
1062
    return ipc_irq_register(&TASK->answerbox, inr, devno, method, ucode);
1060
}
1063
}
1061
 
1064
 
1062
/** Disconnect an IRQ handler from a task.
1065
/** Disconnect an IRQ handler from a task.
1063
 *
1066
 *
1064
 * @param inr       IRQ number.
1067
 * @param inr       IRQ number.
1065
 * @param devno     Device number.
1068
 * @param devno     Device number.
1066
 *
1069
 *
1067
 * @return      Zero on success or EPERM on error..
1070
 * @return      Zero on success or EPERM on error..
1068
 */
1071
 */
1069
unative_t sys_ipc_unregister_irq(inr_t inr, devno_t devno)
1072
unative_t sys_ipc_unregister_irq(inr_t inr, devno_t devno)
1070
{
1073
{
1071
    if (!(cap_get(TASK) & CAP_IRQ_REG))
1074
    if (!(cap_get(TASK) & CAP_IRQ_REG))
1072
        return EPERM;
1075
        return EPERM;
1073
 
1076
 
1074
    ipc_irq_unregister(&TASK->answerbox, inr, devno);
1077
    ipc_irq_unregister(&TASK->answerbox, inr, devno);
1075
 
1078
 
1076
    return 0;
1079
    return 0;
1077
}
1080
}
1078
 
1081
 
1079
#include <console/console.h>
1082
#include <console/console.h>
1080
 
1083
 
1081
/**
1084
/**
1082
 * Syscall connect to a task by id.
1085
 * Syscall connect to a task by id.
1083
 *
1086
 *
1084
 * @return      Phone id on success, or negative error code.
1087
 * @return      Phone id on success, or negative error code.
1085
 */
1088
 */
1086
unative_t sys_ipc_connect_kbox(sysarg64_t *uspace_taskid_arg)
1089
unative_t sys_ipc_connect_kbox(sysarg64_t *uspace_taskid_arg)
1087
{
1090
{
1088
#ifdef CONFIG_UDEBUG
1091
#ifdef CONFIG_UDEBUG
1089
    sysarg64_t taskid_arg;
1092
    sysarg64_t taskid_arg;
1090
    int rc;
1093
    int rc;
1091
   
1094
   
1092
    rc = copy_from_uspace(&taskid_arg, uspace_taskid_arg, sizeof(sysarg64_t));
1095
    rc = copy_from_uspace(&taskid_arg, uspace_taskid_arg, sizeof(sysarg64_t));
1093
    if (rc != 0)
1096
    if (rc != 0)
1094
        return (unative_t) rc;
1097
        return (unative_t) rc;
1095
 
1098
 
1096
    LOG("sys_ipc_connect_kbox(%" PRIu64 ")\n", taskid_arg.value);
1099
    LOG("sys_ipc_connect_kbox(%" PRIu64 ")\n", taskid_arg.value);
1097
 
1100
 
1098
    return ipc_connect_kbox(taskid_arg.value);
1101
    return ipc_connect_kbox(taskid_arg.value);
1099
#else
1102
#else
1100
    return (unative_t) ENOTSUP;
1103
    return (unative_t) ENOTSUP;
1101
#endif
1104
#endif
1102
}
1105
}
1103
 
1106
 
1104
/** @}
1107
/** @}
1105
 */
1108
 */
1106
 
1109