1 | /*
|
---|
2 | * Copyright (c) 2009 Jakub Jermar
|
---|
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 libfs
|
---|
30 | * @{
|
---|
31 | */
|
---|
32 | /**
|
---|
33 | * @file
|
---|
34 | * Glue code which is common to all FS implementations.
|
---|
35 | */
|
---|
36 |
|
---|
37 | #include "libfs.h"
|
---|
38 | #include "../../srv/vfs/vfs.h"
|
---|
39 | #include <macros.h>
|
---|
40 | #include <errno.h>
|
---|
41 | #include <async.h>
|
---|
42 | #include <as.h>
|
---|
43 | #include <assert.h>
|
---|
44 | #include <dirent.h>
|
---|
45 | #include <mem.h>
|
---|
46 | #include <sys/stat.h>
|
---|
47 | #include <stdlib.h>
|
---|
48 |
|
---|
49 | #define on_error(rc, action) \
|
---|
50 | do { \
|
---|
51 | if ((rc) != EOK) \
|
---|
52 | action; \
|
---|
53 | } while (0)
|
---|
54 |
|
---|
55 | #define combine_rc(rc1, rc2) \
|
---|
56 | ((rc1) == EOK ? (rc2) : (rc1))
|
---|
57 |
|
---|
58 | #define answer_and_return(rid, rc) \
|
---|
59 | do { \
|
---|
60 | async_answer_0((rid), (rc)); \
|
---|
61 | return; \
|
---|
62 | } while (0)
|
---|
63 |
|
---|
64 | static fs_reg_t reg;
|
---|
65 |
|
---|
66 | static vfs_out_ops_t *vfs_out_ops = NULL;
|
---|
67 | static libfs_ops_t *libfs_ops = NULL;
|
---|
68 |
|
---|
69 | static void libfs_mount(libfs_ops_t *, fs_handle_t, ipc_callid_t, ipc_call_t *);
|
---|
70 | static void libfs_unmount(libfs_ops_t *, ipc_callid_t, ipc_call_t *);
|
---|
71 | static void libfs_lookup(libfs_ops_t *, fs_handle_t, ipc_callid_t,
|
---|
72 | ipc_call_t *);
|
---|
73 | static void libfs_stat(libfs_ops_t *, fs_handle_t, ipc_callid_t, ipc_call_t *);
|
---|
74 | static void libfs_open_node(libfs_ops_t *, fs_handle_t, ipc_callid_t,
|
---|
75 | ipc_call_t *);
|
---|
76 |
|
---|
77 | static void vfs_out_mounted(ipc_callid_t rid, ipc_call_t *req)
|
---|
78 | {
|
---|
79 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
80 | char *opts;
|
---|
81 | int rc;
|
---|
82 |
|
---|
83 | /* Accept the mount options. */
|
---|
84 | rc = async_data_write_accept((void **) &opts, true, 0, 0, 0, NULL);
|
---|
85 | if (rc != EOK) {
|
---|
86 | async_answer_0(rid, rc);
|
---|
87 | return;
|
---|
88 | }
|
---|
89 |
|
---|
90 | fs_index_t index;
|
---|
91 | aoff64_t size;
|
---|
92 | unsigned lnkcnt;
|
---|
93 | rc = vfs_out_ops->mounted(service_id, opts, &index, &size, &lnkcnt);
|
---|
94 |
|
---|
95 | if (rc == EOK)
|
---|
96 | async_answer_4(rid, EOK, index, LOWER32(size), UPPER32(size),
|
---|
97 | lnkcnt);
|
---|
98 | else
|
---|
99 | async_answer_0(rid, rc);
|
---|
100 |
|
---|
101 | free(opts);
|
---|
102 | }
|
---|
103 |
|
---|
104 | static void vfs_out_mount(ipc_callid_t rid, ipc_call_t *req)
|
---|
105 | {
|
---|
106 | libfs_mount(libfs_ops, reg.fs_handle, rid, req);
|
---|
107 | }
|
---|
108 |
|
---|
109 | static void vfs_out_unmounted(ipc_callid_t rid, ipc_call_t *req)
|
---|
110 | {
|
---|
111 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
112 | int rc;
|
---|
113 |
|
---|
114 | rc = vfs_out_ops->unmounted(service_id);
|
---|
115 |
|
---|
116 | async_answer_0(rid, rc);
|
---|
117 | }
|
---|
118 |
|
---|
119 | static void vfs_out_unmount(ipc_callid_t rid, ipc_call_t *req)
|
---|
120 | {
|
---|
121 |
|
---|
122 | libfs_unmount(libfs_ops, rid, req);
|
---|
123 | }
|
---|
124 |
|
---|
125 | static void vfs_out_lookup(ipc_callid_t rid, ipc_call_t *req)
|
---|
126 | {
|
---|
127 | libfs_lookup(libfs_ops, reg.fs_handle, rid, req);
|
---|
128 | }
|
---|
129 |
|
---|
130 | static void vfs_out_read(ipc_callid_t rid, ipc_call_t *req)
|
---|
131 | {
|
---|
132 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
133 | fs_index_t index = (fs_index_t) IPC_GET_ARG2(*req);
|
---|
134 | aoff64_t pos = (aoff64_t) MERGE_LOUP32(IPC_GET_ARG3(*req),
|
---|
135 | IPC_GET_ARG4(*req));
|
---|
136 | size_t rbytes;
|
---|
137 | int rc;
|
---|
138 |
|
---|
139 | rc = vfs_out_ops->read(service_id, index, pos, &rbytes);
|
---|
140 |
|
---|
141 | if (rc == EOK)
|
---|
142 | async_answer_1(rid, EOK, rbytes);
|
---|
143 | else
|
---|
144 | async_answer_0(rid, rc);
|
---|
145 | }
|
---|
146 |
|
---|
147 | static void vfs_out_write(ipc_callid_t rid, ipc_call_t *req)
|
---|
148 | {
|
---|
149 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
150 | fs_index_t index = (fs_index_t) IPC_GET_ARG2(*req);
|
---|
151 | aoff64_t pos = (aoff64_t) MERGE_LOUP32(IPC_GET_ARG3(*req),
|
---|
152 | IPC_GET_ARG4(*req));
|
---|
153 | size_t wbytes;
|
---|
154 | aoff64_t nsize;
|
---|
155 | int rc;
|
---|
156 |
|
---|
157 | rc = vfs_out_ops->write(service_id, index, pos, &wbytes, &nsize);
|
---|
158 |
|
---|
159 | if (rc == EOK)
|
---|
160 | async_answer_3(rid, EOK, wbytes, LOWER32(nsize), UPPER32(nsize));
|
---|
161 | else
|
---|
162 | async_answer_0(rid, rc);
|
---|
163 | }
|
---|
164 |
|
---|
165 | static void vfs_out_truncate(ipc_callid_t rid, ipc_call_t *req)
|
---|
166 | {
|
---|
167 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
168 | fs_index_t index = (fs_index_t) IPC_GET_ARG2(*req);
|
---|
169 | aoff64_t size = (aoff64_t) MERGE_LOUP32(IPC_GET_ARG3(*req),
|
---|
170 | IPC_GET_ARG4(*req));
|
---|
171 | int rc;
|
---|
172 |
|
---|
173 | rc = vfs_out_ops->truncate(service_id, index, size);
|
---|
174 |
|
---|
175 | async_answer_0(rid, rc);
|
---|
176 | }
|
---|
177 |
|
---|
178 | static void vfs_out_close(ipc_callid_t rid, ipc_call_t *req)
|
---|
179 | {
|
---|
180 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
181 | fs_index_t index = (fs_index_t) IPC_GET_ARG2(*req);
|
---|
182 | int rc;
|
---|
183 |
|
---|
184 | rc = vfs_out_ops->close(service_id, index);
|
---|
185 |
|
---|
186 | async_answer_0(rid, rc);
|
---|
187 | }
|
---|
188 |
|
---|
189 | static void vfs_out_destroy(ipc_callid_t rid, ipc_call_t *req)
|
---|
190 | {
|
---|
191 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
192 | fs_index_t index = (fs_index_t) IPC_GET_ARG2(*req);
|
---|
193 | int rc;
|
---|
194 |
|
---|
195 | rc = vfs_out_ops->destroy(service_id, index);
|
---|
196 |
|
---|
197 | async_answer_0(rid, rc);
|
---|
198 | }
|
---|
199 |
|
---|
200 | static void vfs_out_open_node(ipc_callid_t rid, ipc_call_t *req)
|
---|
201 | {
|
---|
202 | libfs_open_node(libfs_ops, reg.fs_handle, rid, req);
|
---|
203 | }
|
---|
204 |
|
---|
205 | static void vfs_out_stat(ipc_callid_t rid, ipc_call_t *req)
|
---|
206 | {
|
---|
207 | libfs_stat(libfs_ops, reg.fs_handle, rid, req);
|
---|
208 | }
|
---|
209 |
|
---|
210 | static void vfs_out_sync(ipc_callid_t rid, ipc_call_t *req)
|
---|
211 | {
|
---|
212 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
213 | fs_index_t index = (fs_index_t) IPC_GET_ARG2(*req);
|
---|
214 | int rc;
|
---|
215 |
|
---|
216 | rc = vfs_out_ops->sync(service_id, index);
|
---|
217 |
|
---|
218 | async_answer_0(rid, rc);
|
---|
219 | }
|
---|
220 |
|
---|
221 | static void vfs_connection(ipc_callid_t iid, ipc_call_t *icall, void *arg)
|
---|
222 | {
|
---|
223 | if (iid) {
|
---|
224 | /*
|
---|
225 | * This only happens for connections opened by
|
---|
226 | * IPC_M_CONNECT_ME_TO calls as opposed to callback connections
|
---|
227 | * created by IPC_M_CONNECT_TO_ME.
|
---|
228 | */
|
---|
229 | async_answer_0(iid, EOK);
|
---|
230 | }
|
---|
231 |
|
---|
232 | while (true) {
|
---|
233 | ipc_call_t call;
|
---|
234 | ipc_callid_t callid = async_get_call(&call);
|
---|
235 |
|
---|
236 | if (!IPC_GET_IMETHOD(call))
|
---|
237 | return;
|
---|
238 |
|
---|
239 | switch (IPC_GET_IMETHOD(call)) {
|
---|
240 | case VFS_OUT_MOUNTED:
|
---|
241 | vfs_out_mounted(callid, &call);
|
---|
242 | break;
|
---|
243 | case VFS_OUT_MOUNT:
|
---|
244 | vfs_out_mount(callid, &call);
|
---|
245 | break;
|
---|
246 | case VFS_OUT_UNMOUNTED:
|
---|
247 | vfs_out_unmounted(callid, &call);
|
---|
248 | break;
|
---|
249 | case VFS_OUT_UNMOUNT:
|
---|
250 | vfs_out_unmount(callid, &call);
|
---|
251 | break;
|
---|
252 | case VFS_OUT_LOOKUP:
|
---|
253 | vfs_out_lookup(callid, &call);
|
---|
254 | break;
|
---|
255 | case VFS_OUT_READ:
|
---|
256 | vfs_out_read(callid, &call);
|
---|
257 | break;
|
---|
258 | case VFS_OUT_WRITE:
|
---|
259 | vfs_out_write(callid, &call);
|
---|
260 | break;
|
---|
261 | case VFS_OUT_TRUNCATE:
|
---|
262 | vfs_out_truncate(callid, &call);
|
---|
263 | break;
|
---|
264 | case VFS_OUT_CLOSE:
|
---|
265 | vfs_out_close(callid, &call);
|
---|
266 | break;
|
---|
267 | case VFS_OUT_DESTROY:
|
---|
268 | vfs_out_destroy(callid, &call);
|
---|
269 | break;
|
---|
270 | case VFS_OUT_OPEN_NODE:
|
---|
271 | vfs_out_open_node(callid, &call);
|
---|
272 | break;
|
---|
273 | case VFS_OUT_STAT:
|
---|
274 | vfs_out_stat(callid, &call);
|
---|
275 | break;
|
---|
276 | case VFS_OUT_SYNC:
|
---|
277 | vfs_out_sync(callid, &call);
|
---|
278 | break;
|
---|
279 | default:
|
---|
280 | async_answer_0(callid, ENOTSUP);
|
---|
281 | break;
|
---|
282 | }
|
---|
283 | }
|
---|
284 | }
|
---|
285 |
|
---|
286 | /** Register file system server.
|
---|
287 | *
|
---|
288 | * This function abstracts away the tedious registration protocol from
|
---|
289 | * file system implementations and lets them to reuse this registration glue
|
---|
290 | * code.
|
---|
291 | *
|
---|
292 | * @param sess Session for communication with VFS.
|
---|
293 | * @param info VFS info structure supplied by the file system
|
---|
294 | * implementation.
|
---|
295 | * @param vops Address of the vfs_out_ops_t structure.
|
---|
296 | * @param lops Address of the libfs_ops_t structure.
|
---|
297 | *
|
---|
298 | * @return EOK on success or a non-zero error code on errror.
|
---|
299 | *
|
---|
300 | */
|
---|
301 | int fs_register(async_sess_t *sess, vfs_info_t *info, vfs_out_ops_t *vops,
|
---|
302 | libfs_ops_t *lops)
|
---|
303 | {
|
---|
304 | /*
|
---|
305 | * Tell VFS that we are here and want to get registered.
|
---|
306 | * We use the async framework because VFS will answer the request
|
---|
307 | * out-of-order, when it knows that the operation succeeded or failed.
|
---|
308 | */
|
---|
309 |
|
---|
310 | async_exch_t *exch = async_exchange_begin(sess);
|
---|
311 |
|
---|
312 | ipc_call_t answer;
|
---|
313 | aid_t req = async_send_0(exch, VFS_IN_REGISTER, &answer);
|
---|
314 |
|
---|
315 | /*
|
---|
316 | * Send our VFS info structure to VFS.
|
---|
317 | */
|
---|
318 | int rc = async_data_write_start(exch, info, sizeof(*info));
|
---|
319 |
|
---|
320 | if (rc != EOK) {
|
---|
321 | async_exchange_end(exch);
|
---|
322 | async_wait_for(req, NULL);
|
---|
323 | return rc;
|
---|
324 | }
|
---|
325 |
|
---|
326 | /*
|
---|
327 | * Set VFS_OUT and libfs operations.
|
---|
328 | */
|
---|
329 | vfs_out_ops = vops;
|
---|
330 | libfs_ops = lops;
|
---|
331 |
|
---|
332 | /*
|
---|
333 | * Ask VFS for callback connection.
|
---|
334 | */
|
---|
335 | async_connect_to_me(exch, 0, 0, 0, vfs_connection, NULL);
|
---|
336 |
|
---|
337 | /*
|
---|
338 | * Allocate piece of address space for PLB.
|
---|
339 | */
|
---|
340 | reg.plb_ro = as_get_mappable_page(PLB_SIZE);
|
---|
341 | if (!reg.plb_ro) {
|
---|
342 | async_exchange_end(exch);
|
---|
343 | async_wait_for(req, NULL);
|
---|
344 | return ENOMEM;
|
---|
345 | }
|
---|
346 |
|
---|
347 | /*
|
---|
348 | * Request sharing the Path Lookup Buffer with VFS.
|
---|
349 | */
|
---|
350 | rc = async_share_in_start_0_0(exch, reg.plb_ro, PLB_SIZE);
|
---|
351 |
|
---|
352 | async_exchange_end(exch);
|
---|
353 |
|
---|
354 | if (rc) {
|
---|
355 | async_wait_for(req, NULL);
|
---|
356 | return rc;
|
---|
357 | }
|
---|
358 |
|
---|
359 | /*
|
---|
360 | * Pick up the answer for the request to the VFS_IN_REQUEST call.
|
---|
361 | */
|
---|
362 | async_wait_for(req, NULL);
|
---|
363 | reg.fs_handle = (int) IPC_GET_ARG1(answer);
|
---|
364 |
|
---|
365 | /*
|
---|
366 | * Tell the async framework that other connections are to be handled by
|
---|
367 | * the same connection fibril as well.
|
---|
368 | */
|
---|
369 | async_set_client_connection(vfs_connection);
|
---|
370 |
|
---|
371 | return IPC_GET_RETVAL(answer);
|
---|
372 | }
|
---|
373 |
|
---|
374 | void fs_node_initialize(fs_node_t *fn)
|
---|
375 | {
|
---|
376 | memset(fn, 0, sizeof(fs_node_t));
|
---|
377 | }
|
---|
378 |
|
---|
379 | void libfs_mount(libfs_ops_t *ops, fs_handle_t fs_handle, ipc_callid_t rid,
|
---|
380 | ipc_call_t *req)
|
---|
381 | {
|
---|
382 | service_id_t mp_service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
383 | fs_index_t mp_fs_index = (fs_index_t) IPC_GET_ARG2(*req);
|
---|
384 | fs_handle_t mr_fs_handle = (fs_handle_t) IPC_GET_ARG3(*req);
|
---|
385 | service_id_t mr_service_id = (service_id_t) IPC_GET_ARG4(*req);
|
---|
386 |
|
---|
387 | async_sess_t *mountee_sess = async_clone_receive(EXCHANGE_PARALLEL);
|
---|
388 | if (mountee_sess == NULL) {
|
---|
389 | async_answer_0(rid, EINVAL);
|
---|
390 | return;
|
---|
391 | }
|
---|
392 |
|
---|
393 | fs_node_t *fn;
|
---|
394 | int res = ops->node_get(&fn, mp_service_id, mp_fs_index);
|
---|
395 | if ((res != EOK) || (!fn)) {
|
---|
396 | async_hangup(mountee_sess);
|
---|
397 | async_data_write_void(combine_rc(res, ENOENT));
|
---|
398 | async_answer_0(rid, combine_rc(res, ENOENT));
|
---|
399 | return;
|
---|
400 | }
|
---|
401 |
|
---|
402 | if (fn->mp_data.mp_active) {
|
---|
403 | async_hangup(mountee_sess);
|
---|
404 | (void) ops->node_put(fn);
|
---|
405 | async_data_write_void(EBUSY);
|
---|
406 | async_answer_0(rid, EBUSY);
|
---|
407 | return;
|
---|
408 | }
|
---|
409 |
|
---|
410 | async_exch_t *exch = async_exchange_begin(mountee_sess);
|
---|
411 | async_sess_t *sess = async_connect_me(EXCHANGE_PARALLEL, exch);
|
---|
412 |
|
---|
413 | if (!sess) {
|
---|
414 | async_exchange_end(exch);
|
---|
415 | async_hangup(mountee_sess);
|
---|
416 | (void) ops->node_put(fn);
|
---|
417 | async_data_write_void(errno);
|
---|
418 | async_answer_0(rid, errno);
|
---|
419 | return;
|
---|
420 | }
|
---|
421 |
|
---|
422 | ipc_call_t answer;
|
---|
423 | int rc = async_data_write_forward_1_1(exch, VFS_OUT_MOUNTED,
|
---|
424 | mr_service_id, &answer);
|
---|
425 | async_exchange_end(exch);
|
---|
426 |
|
---|
427 | if (rc == EOK) {
|
---|
428 | fn->mp_data.mp_active = true;
|
---|
429 | fn->mp_data.fs_handle = mr_fs_handle;
|
---|
430 | fn->mp_data.service_id = mr_service_id;
|
---|
431 | fn->mp_data.sess = mountee_sess;
|
---|
432 | }
|
---|
433 |
|
---|
434 | /*
|
---|
435 | * Do not release the FS node so that it stays in memory.
|
---|
436 | */
|
---|
437 | async_answer_4(rid, rc, IPC_GET_ARG1(answer), IPC_GET_ARG2(answer),
|
---|
438 | IPC_GET_ARG3(answer), IPC_GET_ARG4(answer));
|
---|
439 | }
|
---|
440 |
|
---|
441 | void libfs_unmount(libfs_ops_t *ops, ipc_callid_t rid, ipc_call_t *req)
|
---|
442 | {
|
---|
443 | service_id_t mp_service_id = (service_id_t) IPC_GET_ARG1(*req);
|
---|
444 | fs_index_t mp_fs_index = (fs_index_t) IPC_GET_ARG2(*req);
|
---|
445 | fs_node_t *fn;
|
---|
446 | int res;
|
---|
447 |
|
---|
448 | res = ops->node_get(&fn, mp_service_id, mp_fs_index);
|
---|
449 | if ((res != EOK) || (!fn)) {
|
---|
450 | async_answer_0(rid, combine_rc(res, ENOENT));
|
---|
451 | return;
|
---|
452 | }
|
---|
453 |
|
---|
454 | /*
|
---|
455 | * We are clearly expecting to find the mount point active.
|
---|
456 | */
|
---|
457 | if (!fn->mp_data.mp_active) {
|
---|
458 | (void) ops->node_put(fn);
|
---|
459 | async_answer_0(rid, EINVAL);
|
---|
460 | return;
|
---|
461 | }
|
---|
462 |
|
---|
463 | /*
|
---|
464 | * Tell the mounted file system to unmount.
|
---|
465 | */
|
---|
466 | async_exch_t *exch = async_exchange_begin(fn->mp_data.sess);
|
---|
467 | res = async_req_1_0(exch, VFS_OUT_UNMOUNTED, fn->mp_data.service_id);
|
---|
468 | async_exchange_end(exch);
|
---|
469 |
|
---|
470 | /*
|
---|
471 | * If everything went well, perform the clean-up on our side.
|
---|
472 | */
|
---|
473 | if (res == EOK) {
|
---|
474 | async_hangup(fn->mp_data.sess);
|
---|
475 | fn->mp_data.mp_active = false;
|
---|
476 | fn->mp_data.fs_handle = 0;
|
---|
477 | fn->mp_data.service_id = 0;
|
---|
478 | fn->mp_data.sess = NULL;
|
---|
479 |
|
---|
480 | /* Drop the reference created in libfs_mount(). */
|
---|
481 | (void) ops->node_put(fn);
|
---|
482 | }
|
---|
483 |
|
---|
484 | (void) ops->node_put(fn);
|
---|
485 | async_answer_0(rid, res);
|
---|
486 | }
|
---|
487 |
|
---|
488 | static char plb_get_char(unsigned pos)
|
---|
489 | {
|
---|
490 | return reg.plb_ro[pos % PLB_SIZE];
|
---|
491 | }
|
---|
492 |
|
---|
493 | /** Lookup VFS triplet by name in the file system name space.
|
---|
494 | *
|
---|
495 | * The path passed in the PLB must be in the canonical file system path format
|
---|
496 | * as returned by the canonify() function.
|
---|
497 | *
|
---|
498 | * @param ops libfs operations structure with function pointers to
|
---|
499 | * file system implementation
|
---|
500 | * @param fs_handle File system handle of the file system where to perform
|
---|
501 | * the lookup.
|
---|
502 | * @param rid Request ID of the VFS_OUT_LOOKUP request.
|
---|
503 | * @param request VFS_OUT_LOOKUP request data itself.
|
---|
504 | *
|
---|
505 | */
|
---|
506 | void libfs_lookup(libfs_ops_t *ops, fs_handle_t fs_handle, ipc_callid_t rid,
|
---|
507 | ipc_call_t *req)
|
---|
508 | {
|
---|
509 | unsigned int first = IPC_GET_ARG1(*req);
|
---|
510 | unsigned int last = IPC_GET_ARG2(*req);
|
---|
511 | unsigned int next = first;
|
---|
512 | service_id_t service_id = IPC_GET_ARG3(*req);
|
---|
513 | int lflag = IPC_GET_ARG4(*req);
|
---|
514 | fs_index_t index = IPC_GET_ARG5(*req);
|
---|
515 | char component[NAME_MAX + 1];
|
---|
516 | int len;
|
---|
517 | int rc;
|
---|
518 |
|
---|
519 | if (last < next)
|
---|
520 | last += PLB_SIZE;
|
---|
521 |
|
---|
522 | fs_node_t *par = NULL;
|
---|
523 | fs_node_t *cur = NULL;
|
---|
524 | fs_node_t *tmp = NULL;
|
---|
525 |
|
---|
526 | rc = ops->root_get(&cur, service_id);
|
---|
527 | on_error(rc, goto out_with_answer);
|
---|
528 |
|
---|
529 | if (cur->mp_data.mp_active) {
|
---|
530 | async_exch_t *exch = async_exchange_begin(cur->mp_data.sess);
|
---|
531 | async_forward_slow(rid, exch, VFS_OUT_LOOKUP, next, last,
|
---|
532 | cur->mp_data.service_id, lflag, index,
|
---|
533 | IPC_FF_ROUTE_FROM_ME);
|
---|
534 | async_exchange_end(exch);
|
---|
535 |
|
---|
536 | (void) ops->node_put(cur);
|
---|
537 | return;
|
---|
538 | }
|
---|
539 |
|
---|
540 | /* Eat slash */
|
---|
541 | if (plb_get_char(next) == '/')
|
---|
542 | next++;
|
---|
543 |
|
---|
544 | while (next <= last) {
|
---|
545 | bool has_children;
|
---|
546 |
|
---|
547 | rc = ops->has_children(&has_children, cur);
|
---|
548 | on_error(rc, goto out_with_answer);
|
---|
549 | if (!has_children)
|
---|
550 | break;
|
---|
551 |
|
---|
552 | /* Collect the component */
|
---|
553 | len = 0;
|
---|
554 | while ((next <= last) && (plb_get_char(next) != '/')) {
|
---|
555 | if (len + 1 == NAME_MAX) {
|
---|
556 | /* Component length overflow */
|
---|
557 | async_answer_0(rid, ENAMETOOLONG);
|
---|
558 | goto out;
|
---|
559 | }
|
---|
560 | component[len++] = plb_get_char(next);
|
---|
561 | /* Process next character */
|
---|
562 | next++;
|
---|
563 | }
|
---|
564 |
|
---|
565 | assert(len);
|
---|
566 | component[len] = '\0';
|
---|
567 | /* Eat slash */
|
---|
568 | next++;
|
---|
569 |
|
---|
570 | /* Match the component */
|
---|
571 | rc = ops->match(&tmp, cur, component);
|
---|
572 | on_error(rc, goto out_with_answer);
|
---|
573 |
|
---|
574 | /*
|
---|
575 | * If the matching component is a mount point, there are two
|
---|
576 | * legitimate semantics of the lookup operation. The first is
|
---|
577 | * the commonly used one in which the lookup crosses each mount
|
---|
578 | * point into the mounted file system. The second semantics is
|
---|
579 | * used mostly during unmount() and differs from the first one
|
---|
580 | * only in that the last mount point in the looked up path,
|
---|
581 | * which is also its last component, is not crossed.
|
---|
582 | */
|
---|
583 |
|
---|
584 | if ((tmp) && (tmp->mp_data.mp_active) &&
|
---|
585 | (!(lflag & L_MP) || (next <= last))) {
|
---|
586 | if (next > last)
|
---|
587 | next = last = first;
|
---|
588 | else
|
---|
589 | next--;
|
---|
590 |
|
---|
591 | async_exch_t *exch = async_exchange_begin(tmp->mp_data.sess);
|
---|
592 | async_forward_slow(rid, exch, VFS_OUT_LOOKUP, next,
|
---|
593 | last, tmp->mp_data.service_id, lflag, index,
|
---|
594 | IPC_FF_ROUTE_FROM_ME);
|
---|
595 | async_exchange_end(exch);
|
---|
596 |
|
---|
597 | (void) ops->node_put(cur);
|
---|
598 | (void) ops->node_put(tmp);
|
---|
599 | if (par)
|
---|
600 | (void) ops->node_put(par);
|
---|
601 | return;
|
---|
602 | }
|
---|
603 |
|
---|
604 | /* Handle miss: match amongst siblings */
|
---|
605 | if (!tmp) {
|
---|
606 | if (next <= last) {
|
---|
607 | /* There are unprocessed components */
|
---|
608 | async_answer_0(rid, ENOENT);
|
---|
609 | goto out;
|
---|
610 | }
|
---|
611 |
|
---|
612 | /* Miss in the last component */
|
---|
613 | if (lflag & (L_CREATE | L_LINK)) {
|
---|
614 | /* Request to create a new link */
|
---|
615 | if (!ops->is_directory(cur)) {
|
---|
616 | async_answer_0(rid, ENOTDIR);
|
---|
617 | goto out;
|
---|
618 | }
|
---|
619 |
|
---|
620 | fs_node_t *fn;
|
---|
621 | if (lflag & L_CREATE)
|
---|
622 | rc = ops->create(&fn, service_id,
|
---|
623 | lflag);
|
---|
624 | else
|
---|
625 | rc = ops->node_get(&fn, service_id,
|
---|
626 | index);
|
---|
627 | on_error(rc, goto out_with_answer);
|
---|
628 |
|
---|
629 | if (fn) {
|
---|
630 | rc = ops->link(cur, fn, component);
|
---|
631 | if (rc != EOK) {
|
---|
632 | if (lflag & L_CREATE)
|
---|
633 | (void) ops->destroy(fn);
|
---|
634 | else
|
---|
635 | (void) ops->node_put(fn);
|
---|
636 | async_answer_0(rid, rc);
|
---|
637 | } else {
|
---|
638 | aoff64_t size = ops->size_get(fn);
|
---|
639 | async_answer_5(rid, fs_handle,
|
---|
640 | service_id,
|
---|
641 | ops->index_get(fn),
|
---|
642 | LOWER32(size),
|
---|
643 | UPPER32(size),
|
---|
644 | ops->lnkcnt_get(fn));
|
---|
645 | (void) ops->node_put(fn);
|
---|
646 | }
|
---|
647 | } else
|
---|
648 | async_answer_0(rid, ENOSPC);
|
---|
649 |
|
---|
650 | goto out;
|
---|
651 | }
|
---|
652 |
|
---|
653 | async_answer_0(rid, ENOENT);
|
---|
654 | goto out;
|
---|
655 | }
|
---|
656 |
|
---|
657 | if (par) {
|
---|
658 | rc = ops->node_put(par);
|
---|
659 | on_error(rc, goto out_with_answer);
|
---|
660 | }
|
---|
661 |
|
---|
662 | /* Descend one level */
|
---|
663 | par = cur;
|
---|
664 | cur = tmp;
|
---|
665 | tmp = NULL;
|
---|
666 | }
|
---|
667 |
|
---|
668 | /* Handle miss: excessive components */
|
---|
669 | if (next <= last) {
|
---|
670 | bool has_children;
|
---|
671 | rc = ops->has_children(&has_children, cur);
|
---|
672 | on_error(rc, goto out_with_answer);
|
---|
673 |
|
---|
674 | if (has_children)
|
---|
675 | goto skip_miss;
|
---|
676 |
|
---|
677 | if (lflag & (L_CREATE | L_LINK)) {
|
---|
678 | if (!ops->is_directory(cur)) {
|
---|
679 | async_answer_0(rid, ENOTDIR);
|
---|
680 | goto out;
|
---|
681 | }
|
---|
682 |
|
---|
683 | /* Collect next component */
|
---|
684 | len = 0;
|
---|
685 | while (next <= last) {
|
---|
686 | if (plb_get_char(next) == '/') {
|
---|
687 | /* More than one component */
|
---|
688 | async_answer_0(rid, ENOENT);
|
---|
689 | goto out;
|
---|
690 | }
|
---|
691 |
|
---|
692 | if (len + 1 == NAME_MAX) {
|
---|
693 | /* Component length overflow */
|
---|
694 | async_answer_0(rid, ENAMETOOLONG);
|
---|
695 | goto out;
|
---|
696 | }
|
---|
697 |
|
---|
698 | component[len++] = plb_get_char(next);
|
---|
699 | /* Process next character */
|
---|
700 | next++;
|
---|
701 | }
|
---|
702 |
|
---|
703 | assert(len);
|
---|
704 | component[len] = '\0';
|
---|
705 |
|
---|
706 | fs_node_t *fn;
|
---|
707 | if (lflag & L_CREATE)
|
---|
708 | rc = ops->create(&fn, service_id, lflag);
|
---|
709 | else
|
---|
710 | rc = ops->node_get(&fn, service_id, index);
|
---|
711 | on_error(rc, goto out_with_answer);
|
---|
712 |
|
---|
713 | if (fn) {
|
---|
714 | rc = ops->link(cur, fn, component);
|
---|
715 | if (rc != EOK) {
|
---|
716 | if (lflag & L_CREATE)
|
---|
717 | (void) ops->destroy(fn);
|
---|
718 | else
|
---|
719 | (void) ops->node_put(fn);
|
---|
720 | async_answer_0(rid, rc);
|
---|
721 | } else {
|
---|
722 | aoff64_t size = ops->size_get(fn);
|
---|
723 | async_answer_5(rid, fs_handle,
|
---|
724 | service_id,
|
---|
725 | ops->index_get(fn),
|
---|
726 | LOWER32(size),
|
---|
727 | UPPER32(size),
|
---|
728 | ops->lnkcnt_get(fn));
|
---|
729 | (void) ops->node_put(fn);
|
---|
730 | }
|
---|
731 | } else
|
---|
732 | async_answer_0(rid, ENOSPC);
|
---|
733 |
|
---|
734 | goto out;
|
---|
735 | }
|
---|
736 |
|
---|
737 | async_answer_0(rid, ENOENT);
|
---|
738 | goto out;
|
---|
739 | }
|
---|
740 |
|
---|
741 | skip_miss:
|
---|
742 |
|
---|
743 | /* Handle hit */
|
---|
744 | if (lflag & L_UNLINK) {
|
---|
745 | unsigned int old_lnkcnt = ops->lnkcnt_get(cur);
|
---|
746 | rc = ops->unlink(par, cur, component);
|
---|
747 |
|
---|
748 | if (rc == EOK) {
|
---|
749 | aoff64_t size = ops->size_get(cur);
|
---|
750 | async_answer_5(rid, fs_handle, service_id,
|
---|
751 | ops->index_get(cur), LOWER32(size), UPPER32(size),
|
---|
752 | old_lnkcnt);
|
---|
753 | } else
|
---|
754 | async_answer_0(rid, rc);
|
---|
755 |
|
---|
756 | goto out;
|
---|
757 | }
|
---|
758 |
|
---|
759 | if (((lflag & (L_CREATE | L_EXCLUSIVE)) == (L_CREATE | L_EXCLUSIVE)) ||
|
---|
760 | (lflag & L_LINK)) {
|
---|
761 | async_answer_0(rid, EEXIST);
|
---|
762 | goto out;
|
---|
763 | }
|
---|
764 |
|
---|
765 | if ((lflag & L_FILE) && (ops->is_directory(cur))) {
|
---|
766 | async_answer_0(rid, EISDIR);
|
---|
767 | goto out;
|
---|
768 | }
|
---|
769 |
|
---|
770 | if ((lflag & L_DIRECTORY) && (ops->is_file(cur))) {
|
---|
771 | async_answer_0(rid, ENOTDIR);
|
---|
772 | goto out;
|
---|
773 | }
|
---|
774 |
|
---|
775 | if ((lflag & L_ROOT) && par) {
|
---|
776 | async_answer_0(rid, EINVAL);
|
---|
777 | goto out;
|
---|
778 | }
|
---|
779 |
|
---|
780 | out_with_answer:
|
---|
781 |
|
---|
782 | if (rc == EOK) {
|
---|
783 | if (lflag & L_OPEN)
|
---|
784 | rc = ops->node_open(cur);
|
---|
785 |
|
---|
786 | if (rc == EOK) {
|
---|
787 | aoff64_t size = ops->size_get(cur);
|
---|
788 | async_answer_5(rid, fs_handle, service_id,
|
---|
789 | ops->index_get(cur), LOWER32(size), UPPER32(size),
|
---|
790 | ops->lnkcnt_get(cur));
|
---|
791 | } else
|
---|
792 | async_answer_0(rid, rc);
|
---|
793 |
|
---|
794 | } else
|
---|
795 | async_answer_0(rid, rc);
|
---|
796 |
|
---|
797 | out:
|
---|
798 |
|
---|
799 | if (par)
|
---|
800 | (void) ops->node_put(par);
|
---|
801 |
|
---|
802 | if (cur)
|
---|
803 | (void) ops->node_put(cur);
|
---|
804 |
|
---|
805 | if (tmp)
|
---|
806 | (void) ops->node_put(tmp);
|
---|
807 | }
|
---|
808 |
|
---|
809 | void libfs_stat(libfs_ops_t *ops, fs_handle_t fs_handle, ipc_callid_t rid,
|
---|
810 | ipc_call_t *request)
|
---|
811 | {
|
---|
812 | service_id_t service_id = (service_id_t) IPC_GET_ARG1(*request);
|
---|
813 | fs_index_t index = (fs_index_t) IPC_GET_ARG2(*request);
|
---|
814 |
|
---|
815 | fs_node_t *fn;
|
---|
816 | int rc = ops->node_get(&fn, service_id, index);
|
---|
817 | on_error(rc, answer_and_return(rid, rc));
|
---|
818 |
|
---|
819 | ipc_callid_t callid;
|
---|
820 | size_t size;
|
---|
821 | if ((!async_data_read_receive(&callid, &size)) ||
|
---|
822 | (size != sizeof(struct stat))) {
|
---|
823 | ops->node_put(fn);
|
---|
824 | async_answer_0(callid, EINVAL);
|
---|
825 | async_answer_0(rid, EINVAL);
|
---|
826 | return;
|
---|
827 | }
|
---|
828 |
|
---|
829 | struct stat stat;
|
---|
830 | memset(&stat, 0, sizeof(struct stat));
|
---|
831 |
|
---|
832 | stat.fs_handle = fs_handle;
|
---|
833 | stat.service_id = service_id;
|
---|
834 | stat.index = index;
|
---|
835 | stat.lnkcnt = ops->lnkcnt_get(fn);
|
---|
836 | stat.is_file = ops->is_file(fn);
|
---|
837 | stat.is_directory = ops->is_directory(fn);
|
---|
838 | stat.size = ops->size_get(fn);
|
---|
839 | stat.service = ops->service_get(fn);
|
---|
840 |
|
---|
841 | ops->node_put(fn);
|
---|
842 |
|
---|
843 | async_data_read_finalize(callid, &stat, sizeof(struct stat));
|
---|
844 | async_answer_0(rid, EOK);
|
---|
845 | }
|
---|
846 |
|
---|
847 | /** Open VFS triplet.
|
---|
848 | *
|
---|
849 | * @param ops libfs operations structure with function pointers to
|
---|
850 | * file system implementation
|
---|
851 | * @param rid Request ID of the VFS_OUT_OPEN_NODE request.
|
---|
852 | * @param request VFS_OUT_OPEN_NODE request data itself.
|
---|
853 | *
|
---|
854 | */
|
---|
855 | void libfs_open_node(libfs_ops_t *ops, fs_handle_t fs_handle, ipc_callid_t rid,
|
---|
856 | ipc_call_t *request)
|
---|
857 | {
|
---|
858 | service_id_t service_id = IPC_GET_ARG1(*request);
|
---|
859 | fs_index_t index = IPC_GET_ARG2(*request);
|
---|
860 |
|
---|
861 | fs_node_t *fn;
|
---|
862 | int rc = ops->node_get(&fn, service_id, index);
|
---|
863 | on_error(rc, answer_and_return(rid, rc));
|
---|
864 |
|
---|
865 | if (fn == NULL) {
|
---|
866 | async_answer_0(rid, ENOENT);
|
---|
867 | return;
|
---|
868 | }
|
---|
869 |
|
---|
870 | rc = ops->node_open(fn);
|
---|
871 | aoff64_t size = ops->size_get(fn);
|
---|
872 | async_answer_4(rid, rc, LOWER32(size), UPPER32(size),
|
---|
873 | ops->lnkcnt_get(fn),
|
---|
874 | (ops->is_file(fn) ? L_FILE : 0) | (ops->is_directory(fn) ? L_DIRECTORY : 0));
|
---|
875 |
|
---|
876 | (void) ops->node_put(fn);
|
---|
877 | }
|
---|
878 |
|
---|
879 | /** @}
|
---|
880 | */
|
---|