1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
|
/* task-class.c - Task class for the task server.
Copyright (C) 2003, 2004 Free Software Foundation, Inc.
Written by Marcus Brinkmann.
This file is part of the GNU Hurd.
The GNU Hurd is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
The GNU Hurd is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with the GNU C Library; if not, write to the Free
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
02111-1307 USA. */
#if HAVE_CONFIG_H
#include <config.h>
#endif
#include <stdlib.h>
#include <l4.h>
#include <hurd/cap-server.h>
#include <hurd/wortel.h>
#include "task.h"
static void
task_reinit (hurd_cap_class_t cap_class, hurd_cap_obj_t obj)
{
task_t task = hurd_cap_obj_to_user (task_t, obj);
thread_t thread;
thread = task->threads;
/* Destroy all threads. */
while (thread)
{
/* FIXME: We are ignoring an error here. */
wortel_thread_control (thread->thread_id, l4_nilthread, l4_nilthread,
l4_nilthread, (void *) -1);
thread_dealloc (thread);
thread = thread->next;
}
/* FIXME: Return the task ID to the list of free task IDs for future
allocation. */
}
error_t
task_thread_alloc (hurd_cap_rpc_context_t ctx)
{
task_t task = hurd_cap_obj_to_user (task_t, ctx->obj);
error_t err;
thread_t thread;
void *utcb;
l4_word_t result;
/* Does not need to be checked. */
utcb = (void *) l4_msg_word (ctx->msg, 1);
err = thread_alloc (&thread);
if (err)
return err;
thread->thread_id = l4_global_id (l4_thread_no (thread->thread_id),
task->task_id);
/* Put the thread into the task as an active thread. FIXME:
Scheduler. */
result = wortel_thread_control (thread->thread_id, task->threads->thread_id,
l4_myself (), thread->thread_id, utcb);
if (result)
{
/* FIXME: Convert error codes in wortel.h. */
thread_dealloc (thread);
return EINVAL;
}
thread->next = task->threads;
task->threads = thread;
task->nr_threads++;
/* Prepare reply message. */
l4_msg_clear (ctx->msg);
l4_msg_append_word (ctx->msg, thread->thread_id);
return 0;
}
error_t
task_demuxer (hurd_cap_rpc_context_t ctx)
{
error_t err = 0;
switch (l4_msg_label (ctx->msg))
{
/* TASK_THREAD_ALLOC */
case 512:
err = task_thread_alloc (ctx);
break;
default:
err = EOPNOTSUPP;
}
return err;
}
static struct hurd_cap_class task_class;
/* Initialize the task class subsystem. */
error_t
task_class_init ()
{
return hurd_cap_class_init (&task_class, task_t,
NULL, NULL, task_reinit, NULL,
task_demuxer);
}
/* Allocate a new task object with the task ID TASK_ID and the
NR_THREADS threads listed in THREADS (which are already allocated
for that task. The object returned is locked and has one
reference. */
error_t
task_alloc (l4_word_t task_id, unsigned int nr_threads,
l4_thread_id_t *threads, task_t *r_task)
{
error_t err;
hurd_cap_obj_t obj;
task_t task;
err = hurd_cap_class_alloc (&task_class, &obj);
if (err)
return err;
task = hurd_cap_obj_to_user (task_t, obj);
task->task_id = task_id;
/* Add the threads from back to front. */
task->threads = NULL;
while (nr_threads--)
{
thread_t thread;
err = thread_alloc_with_id (threads[nr_threads], &thread);
if (err)
{
/* Roll back the thread creation manually to defeat the
automatic deallocation routines, which will actually go
and kill those wortel-provided threads. */
thread = task->threads;
while (thread)
{
thread->thread_id = l4_nilthread;
thread_dealloc (thread);
thread = thread->next;
}
task->threads = NULL;
task->nr_threads = 0;
hurd_cap_obj_drop (obj);
return err;
}
thread->next = task->threads;
task->threads = thread;
}
task->nr_threads = nr_threads;
*r_task = task;
return 0;
}
|
