Rev 3155 | Rev 3160 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
2928 | svoboda | 1 | /* |
2 | * Copyright (c) 2008 Jiri Svoboda |
||
3 | * All rights reserved. |
||
4 | * |
||
5 | * Redistribution and use in source and binary forms, with or without |
||
6 | * modification, are permitted provided that the following conditions |
||
7 | * are met: |
||
8 | * |
||
9 | * - Redistributions of source code must retain the above copyright |
||
10 | * notice, this list of conditions and the following disclaimer. |
||
11 | * - Redistributions in binary form must reproduce the above copyright |
||
12 | * notice, this list of conditions and the following disclaimer in the |
||
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 |
||
15 | * derived from this software without specific prior written permission. |
||
16 | * |
||
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 |
||
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
||
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
||
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
||
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 |
||
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 |
||
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
||
27 | */ |
||
28 | |||
29 | /** @addtogroup loader |
||
30 | * @brief Loads and runs programs from VFS. |
||
31 | * @{ |
||
32 | */ |
||
33 | /** |
||
34 | * @file |
||
3101 | svoboda | 35 | * @brief Loads and runs programs from VFS. |
36 | * |
||
37 | * The program loader is a special init binary. Its image is used |
||
38 | * to create a new task upon a @c task_spawn syscall. The syscall |
||
39 | * returns the id of a phone connected to the newly created task. |
||
40 | * |
||
41 | * The caller uses this phone to send the pathname and various other |
||
42 | * information to the loader. This is normally done by the C library |
||
43 | * and completely hidden from applications. |
||
2928 | svoboda | 44 | */ |
45 | |||
46 | #include <stdio.h> |
||
3004 | svoboda | 47 | #include <stdlib.h> |
2928 | svoboda | 48 | #include <unistd.h> |
49 | #include <fcntl.h> |
||
50 | #include <sys/types.h> |
||
3004 | svoboda | 51 | #include <ipc/ipc.h> |
3148 | svoboda | 52 | #include <ipc/loader.h> |
3004 | svoboda | 53 | #include <errno.h> |
3148 | svoboda | 54 | #include <async.h> |
2959 | svoboda | 55 | #include <as.h> |
2928 | svoboda | 56 | |
2969 | svoboda | 57 | #include <elf.h> |
58 | #include <elf_load.h> |
||
2989 | svoboda | 59 | #include <pcb.h> |
2928 | svoboda | 60 | |
3101 | svoboda | 61 | /** |
62 | * Bias used for loading the dynamic linker. This will be soon replaced |
||
63 | * by automatic placement. |
||
64 | */ |
||
2972 | svoboda | 65 | #define RTLD_BIAS 0x80000 |
66 | |||
3101 | svoboda | 67 | /** Pathname of the file that will be loaded */ |
3004 | svoboda | 68 | static char *pathname = NULL; |
69 | |||
3101 | svoboda | 70 | /** Receive a call setting pathname of the program to execute. |
71 | * |
||
72 | * @param rid |
||
73 | * @param request |
||
74 | */ |
||
3148 | svoboda | 75 | static void iloader_set_pathname(ipc_callid_t rid, ipc_call_t *request) |
2928 | svoboda | 76 | { |
3148 | svoboda | 77 | ipc_callid_t callid; |
3004 | svoboda | 78 | size_t len; |
79 | char *name_buf; |
||
80 | |||
81 | if (!ipc_data_write_receive(&callid, &len)) { |
||
82 | ipc_answer_0(callid, EINVAL); |
||
83 | ipc_answer_0(rid, EINVAL); |
||
84 | return; |
||
85 | } |
||
3148 | svoboda | 86 | |
3004 | svoboda | 87 | name_buf = malloc(len + 1); |
88 | if (!name_buf) { |
||
3148 | svoboda | 89 | ipc_answer_0(callid, ENOMEM); |
3004 | svoboda | 90 | ipc_answer_0(rid, ENOMEM); |
91 | return; |
||
92 | } |
||
93 | |||
3148 | svoboda | 94 | ipc_data_write_finalize(callid, name_buf, len); |
95 | ipc_answer_0(rid, EOK); |
||
3004 | svoboda | 96 | |
97 | if (pathname != NULL) { |
||
98 | free(pathname); |
||
99 | pathname = NULL; |
||
100 | } |
||
101 | |||
3148 | svoboda | 102 | name_buf[len] = '\0'; |
3004 | svoboda | 103 | pathname = name_buf; |
104 | } |
||
105 | |||
3101 | svoboda | 106 | /** Load and run the previously selected program. |
107 | * |
||
108 | * @param rid |
||
109 | * @param request |
||
110 | * @return 0 on success, !0 on error. |
||
111 | */ |
||
3148 | svoboda | 112 | static int iloader_run(ipc_callid_t rid, ipc_call_t *request) |
3004 | svoboda | 113 | { |
114 | int rc; |
||
115 | pcb_t *pcb; |
||
116 | |||
2964 | svoboda | 117 | elf_info_t prog_info; |
118 | elf_info_t interp_info; |
||
2928 | svoboda | 119 | |
3155 | svoboda | 120 | // printf("Load program '%s'\n", pathname); |
2928 | svoboda | 121 | |
3004 | svoboda | 122 | rc = elf_load_file(pathname, 0, &prog_info); |
2928 | svoboda | 123 | if (rc < 0) { |
124 | printf("failed to load program\n"); |
||
3155 | svoboda | 125 | ipc_answer_0(rid, EINVAL); |
2928 | svoboda | 126 | return 1; |
127 | } |
||
128 | |||
3155 | svoboda | 129 | // printf("Create PCB\n"); |
130 | if (elf_create_pcb(&prog_info) < 0) { |
||
131 | ipc_answer_0(rid, ENOMEM); |
||
132 | return 1; |
||
133 | } |
||
2928 | svoboda | 134 | |
3004 | svoboda | 135 | if (prog_info.interp == NULL) { |
136 | /* Statically linked program */ |
||
3155 | svoboda | 137 | // printf("Run statically linked program\n"); |
138 | // printf("entry point: 0x%llx\n", prog_info.entry); |
||
139 | ipc_answer_0(rid, EOK); |
||
140 | close_console(); |
||
3004 | svoboda | 141 | elf_run(&prog_info); |
142 | return 0; |
||
143 | } |
||
2988 | svoboda | 144 | |
3004 | svoboda | 145 | printf("Load dynamic linker '%s'\n", prog_info.interp); |
146 | rc = elf_load_file("/rtld.so", RTLD_BIAS, &interp_info); |
||
2959 | svoboda | 147 | if (rc < 0) { |
148 | printf("failed to load dynamic linker\n"); |
||
3155 | svoboda | 149 | ipc_answer_0(rid, EINVAL); |
2959 | svoboda | 150 | return 1; |
151 | } |
||
152 | |||
2989 | svoboda | 153 | /* |
3004 | svoboda | 154 | * Provide dynamic linker with some useful data |
2989 | svoboda | 155 | */ |
156 | pcb = (pcb_t *)PCB_ADDRESS; |
||
157 | pcb->rtld_dynamic = interp_info.dynamic; |
||
158 | pcb->rtld_bias = RTLD_BIAS; |
||
159 | |||
2959 | svoboda | 160 | printf("run dynamic linker\n"); |
3155 | svoboda | 161 | printf("entry point: 0x%llx\n", interp_info.entry); |
162 | close_console(); |
||
163 | |||
164 | ipc_answer_0(rid, EOK); |
||
2964 | svoboda | 165 | elf_run(&interp_info); |
2989 | svoboda | 166 | |
3155 | svoboda | 167 | /* Not reached(?) */ |
3004 | svoboda | 168 | return 0; |
169 | } |
||
170 | |||
3148 | svoboda | 171 | /** Handle loader connection. |
3101 | svoboda | 172 | * |
173 | * Receive and carry out commands (of which the last one should be |
||
174 | * to execute the loaded program). |
||
175 | */ |
||
3148 | svoboda | 176 | static void loader_connection(ipc_callid_t iid, ipc_call_t *icall) |
3004 | svoboda | 177 | { |
178 | ipc_callid_t callid; |
||
179 | ipc_call_t call; |
||
180 | int retval; |
||
181 | |||
3148 | svoboda | 182 | /* Ignore parameters, the connection is already open */ |
183 | (void)iid; (void)icall; |
||
184 | |||
3004 | svoboda | 185 | while (1) { |
3148 | svoboda | 186 | callid = async_get_call(&call); |
3155 | svoboda | 187 | // printf("received call from phone %d, method=%d\n", |
188 | // call.in_phone_hash, IPC_GET_METHOD(call)); |
||
3004 | svoboda | 189 | switch (IPC_GET_METHOD(call)) { |
3148 | svoboda | 190 | case LOADER_SET_PATHNAME: |
3004 | svoboda | 191 | iloader_set_pathname(callid, &call); |
3148 | svoboda | 192 | continue; |
193 | case LOADER_RUN: |
||
3004 | svoboda | 194 | iloader_run(callid, &call); |
195 | exit(0); |
||
196 | continue; |
||
197 | default: |
||
198 | retval = ENOENT; |
||
199 | break; |
||
200 | } |
||
201 | if ((callid & IPC_CALLID_NOTIFICATION) == 0) { |
||
202 | printf("responding EINVAL to method %d\n", IPC_GET_METHOD(call)); |
||
203 | ipc_answer_0(callid, EINVAL); |
||
204 | } |
||
205 | } |
||
3148 | svoboda | 206 | } |
3004 | svoboda | 207 | |
3148 | svoboda | 208 | /** Program loader main function. |
209 | */ |
||
210 | int main(int argc, char *argv[]) |
||
211 | { |
||
212 | ipc_callid_t callid; |
||
213 | ipc_call_t call; |
||
214 | ipcarg_t phone_hash; |
||
215 | |||
216 | /* The first call only communicates the incoming phone hash */ |
||
217 | callid = ipc_wait_for_call(&call); |
||
218 | |||
219 | if (IPC_GET_METHOD(call) != LOADER_HELLO) { |
||
220 | if (IPC_GET_METHOD(call) != IPC_M_PHONE_HUNGUP) |
||
221 | ipc_answer_0(callid, EINVAL); |
||
222 | return 1; |
||
223 | } |
||
224 | |||
225 | ipc_answer_0(callid, EOK); |
||
226 | phone_hash = call.in_phone_hash; |
||
227 | |||
228 | /* |
||
229 | * FIXME: up until now no async calls can be used!!! |
||
230 | * (Which means e.g. printf() cannot be used) |
||
231 | */ |
||
232 | async_new_connection(phone_hash, 0, NULL, loader_connection); |
||
233 | async_manager(); |
||
234 | |||
2928 | svoboda | 235 | /* not reached */ |
236 | return 0; |
||
237 | } |
||
238 | |||
239 | /** @} |
||
240 | */ |