Rev 2770 | Rev 3011 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
2689 | jermar | 1 | /* |
2 | * Copyright (c) 2008 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 fs |
||
30 | * @{ |
||
31 | */ |
||
32 | |||
33 | /** |
||
34 | * @file vfs_ops.c |
||
35 | * @brief Operations that VFS offers to its clients. |
||
36 | */ |
||
37 | |||
2763 | jermar | 38 | #include "vfs.h" |
2689 | jermar | 39 | #include <ipc/ipc.h> |
40 | #include <async.h> |
||
41 | #include <errno.h> |
||
42 | #include <stdio.h> |
||
43 | #include <stdlib.h> |
||
44 | #include <string.h> |
||
45 | #include <bool.h> |
||
46 | #include <futex.h> |
||
47 | #include <rwlock.h> |
||
48 | #include <libadt/list.h> |
||
49 | #include <unistd.h> |
||
50 | #include <ctype.h> |
||
2708 | jermar | 51 | #include <fcntl.h> |
2689 | jermar | 52 | #include <assert.h> |
2763 | jermar | 53 | #include <vfs/canonify.h> |
2689 | jermar | 54 | |
2748 | jermar | 55 | /* Forward declarations of static functions. */ |
2770 | jermar | 56 | static int vfs_truncate_internal(fs_handle_t, dev_handle_t, fs_index_t, size_t); |
2748 | jermar | 57 | |
2689 | jermar | 58 | /** |
59 | * This rwlock prevents the race between a triplet-to-VFS-node resolution and a |
||
60 | * concurrent VFS operation which modifies the file system namespace. |
||
61 | */ |
||
62 | RWLOCK_INITIALIZE(namespace_rwlock); |
||
63 | |||
2766 | jermar | 64 | futex_t rootfs_futex = FUTEX_INITIALIZER; |
2689 | jermar | 65 | vfs_triplet_t rootfs = { |
66 | .fs_handle = 0, |
||
67 | .dev_handle = 0, |
||
68 | .index = 0, |
||
69 | }; |
||
70 | |||
2770 | jermar | 71 | static int |
72 | lookup_root(fs_handle_t fs_handle, dev_handle_t dev_handle, |
||
73 | vfs_lookup_res_t *result) |
||
2689 | jermar | 74 | { |
75 | vfs_pair_t altroot = { |
||
76 | .fs_handle = fs_handle, |
||
77 | .dev_handle = dev_handle, |
||
78 | }; |
||
79 | |||
2752 | jermar | 80 | return vfs_lookup_internal("/", L_DIRECTORY, result, &altroot); |
2689 | jermar | 81 | } |
82 | |||
83 | void vfs_mount(ipc_callid_t rid, ipc_call_t *request) |
||
84 | { |
||
2770 | jermar | 85 | dev_handle_t dev_handle; |
2689 | jermar | 86 | vfs_node_t *mp_node = NULL; |
87 | |||
88 | /* |
||
89 | * We expect the library to do the device-name to device-handle |
||
90 | * translation for us, thus the device handle will arrive as ARG1 |
||
91 | * in the request. |
||
92 | */ |
||
2770 | jermar | 93 | dev_handle = (dev_handle_t)IPC_GET_ARG1(*request); |
2689 | jermar | 94 | |
95 | /* |
||
96 | * For now, don't make use of ARG2 and ARG3, but they can be used to |
||
97 | * carry mount options in the future. |
||
98 | */ |
||
99 | |||
100 | ipc_callid_t callid; |
||
101 | size_t size; |
||
102 | |||
103 | /* |
||
104 | * Now, we expect the client to send us data with the name of the file |
||
105 | * system. |
||
106 | */ |
||
107 | if (!ipc_data_write_receive(&callid, &size)) { |
||
108 | ipc_answer_0(callid, EINVAL); |
||
109 | ipc_answer_0(rid, EINVAL); |
||
110 | return; |
||
111 | } |
||
112 | |||
113 | /* |
||
114 | * Don't receive more than is necessary for storing a full file system |
||
115 | * name. |
||
116 | */ |
||
117 | if (size < 1 || size > FS_NAME_MAXLEN) { |
||
118 | ipc_answer_0(callid, EINVAL); |
||
119 | ipc_answer_0(rid, EINVAL); |
||
120 | return; |
||
121 | } |
||
122 | |||
2707 | jermar | 123 | /* Deliver the file system name. */ |
2689 | jermar | 124 | char fs_name[FS_NAME_MAXLEN + 1]; |
125 | (void) ipc_data_write_finalize(callid, fs_name, size); |
||
126 | fs_name[size] = '\0'; |
||
127 | |||
128 | /* |
||
129 | * Check if we know a file system with the same name as is in fs_name. |
||
130 | * This will also give us its file system handle. |
||
131 | */ |
||
2770 | jermar | 132 | fs_handle_t fs_handle = fs_name_to_handle(fs_name, true); |
2689 | jermar | 133 | if (!fs_handle) { |
134 | ipc_answer_0(rid, ENOENT); |
||
135 | return; |
||
136 | } |
||
137 | |||
2707 | jermar | 138 | /* Now, we want the client to send us the mount point. */ |
2689 | jermar | 139 | if (!ipc_data_write_receive(&callid, &size)) { |
140 | ipc_answer_0(callid, EINVAL); |
||
141 | ipc_answer_0(rid, EINVAL); |
||
142 | return; |
||
143 | } |
||
144 | |||
2707 | jermar | 145 | /* Check whether size is reasonable wrt. the mount point. */ |
2689 | jermar | 146 | if (size < 1 || size > MAX_PATH_LEN) { |
147 | ipc_answer_0(callid, EINVAL); |
||
148 | ipc_answer_0(rid, EINVAL); |
||
149 | return; |
||
150 | } |
||
2707 | jermar | 151 | /* Allocate buffer for the mount point data being received. */ |
2689 | jermar | 152 | uint8_t *buf; |
2752 | jermar | 153 | buf = malloc(size + 1); |
2689 | jermar | 154 | if (!buf) { |
155 | ipc_answer_0(callid, ENOMEM); |
||
156 | ipc_answer_0(rid, ENOMEM); |
||
157 | return; |
||
158 | } |
||
159 | |||
2707 | jermar | 160 | /* Deliver the mount point. */ |
2689 | jermar | 161 | (void) ipc_data_write_finalize(callid, buf, size); |
2752 | jermar | 162 | buf[size] = '\0'; |
2689 | jermar | 163 | |
164 | /* |
||
165 | * Lookup the root node of the filesystem being mounted. |
||
166 | * In this case, we don't need to take the namespace_futex as the root |
||
167 | * node cannot be removed. However, we do take a reference to it so |
||
168 | * that we can track how many times it has been mounted. |
||
169 | */ |
||
170 | int rc; |
||
2691 | jermar | 171 | vfs_lookup_res_t mr_res; |
172 | rc = lookup_root(fs_handle, dev_handle, &mr_res); |
||
2689 | jermar | 173 | if (rc != EOK) { |
174 | free(buf); |
||
175 | ipc_answer_0(rid, rc); |
||
176 | return; |
||
177 | } |
||
2691 | jermar | 178 | vfs_node_t *mr_node = vfs_node_get(&mr_res); |
2689 | jermar | 179 | if (!mr_node) { |
180 | free(buf); |
||
181 | ipc_answer_0(rid, ENOMEM); |
||
182 | return; |
||
183 | } |
||
184 | |||
2707 | jermar | 185 | /* Finally, we need to resolve the path to the mountpoint. */ |
2691 | jermar | 186 | vfs_lookup_res_t mp_res; |
2689 | jermar | 187 | futex_down(&rootfs_futex); |
188 | if (rootfs.fs_handle) { |
||
2707 | jermar | 189 | /* We already have the root FS. */ |
2689 | jermar | 190 | rwlock_write_lock(&namespace_rwlock); |
2752 | jermar | 191 | rc = vfs_lookup_internal(buf, L_DIRECTORY, &mp_res, NULL); |
2689 | jermar | 192 | if (rc != EOK) { |
2707 | jermar | 193 | /* The lookup failed for some reason. */ |
2689 | jermar | 194 | rwlock_write_unlock(&namespace_rwlock); |
195 | futex_up(&rootfs_futex); |
||
196 | vfs_node_put(mr_node); /* failed -> drop reference */ |
||
197 | free(buf); |
||
198 | ipc_answer_0(rid, rc); |
||
199 | return; |
||
200 | } |
||
2691 | jermar | 201 | mp_node = vfs_node_get(&mp_res); |
2689 | jermar | 202 | if (!mp_node) { |
203 | rwlock_write_unlock(&namespace_rwlock); |
||
204 | futex_up(&rootfs_futex); |
||
205 | vfs_node_put(mr_node); /* failed -> drop reference */ |
||
206 | free(buf); |
||
207 | ipc_answer_0(rid, ENOMEM); |
||
208 | return; |
||
209 | } |
||
210 | /* |
||
211 | * Now we hold a reference to mp_node. |
||
212 | * It will be dropped upon the corresponding VFS_UNMOUNT. |
||
213 | * This prevents the mount point from being deleted. |
||
214 | */ |
||
215 | rwlock_write_unlock(&namespace_rwlock); |
||
216 | } else { |
||
2707 | jermar | 217 | /* We still don't have the root file system mounted. */ |
2689 | jermar | 218 | if ((size == 1) && (buf[0] == '/')) { |
2707 | jermar | 219 | /* For this simple, but important case, we are done. */ |
2691 | jermar | 220 | rootfs = mr_res.triplet; |
2689 | jermar | 221 | futex_up(&rootfs_futex); |
222 | free(buf); |
||
223 | ipc_answer_0(rid, EOK); |
||
224 | return; |
||
225 | } else { |
||
226 | /* |
||
227 | * We can't resolve this without the root filesystem |
||
228 | * being mounted first. |
||
229 | */ |
||
230 | futex_up(&rootfs_futex); |
||
231 | free(buf); |
||
232 | vfs_node_put(mr_node); /* failed -> drop reference */ |
||
233 | ipc_answer_0(rid, ENOENT); |
||
234 | return; |
||
235 | } |
||
236 | } |
||
237 | futex_up(&rootfs_futex); |
||
238 | |||
239 | free(buf); /* The buffer is not needed anymore. */ |
||
240 | |||
241 | /* |
||
242 | * At this point, we have all necessary pieces: file system and device |
||
243 | * handles, and we know the mount point VFS node and also the root node |
||
244 | * of the file system being mounted. |
||
245 | */ |
||
246 | |||
2691 | jermar | 247 | int phone = vfs_grab_phone(mp_res.triplet.fs_handle); |
2689 | jermar | 248 | /* Later we can use ARG3 to pass mode/flags. */ |
2691 | jermar | 249 | aid_t req1 = async_send_3(phone, VFS_MOUNT, |
250 | (ipcarg_t) mp_res.triplet.dev_handle, |
||
251 | (ipcarg_t) mp_res.triplet.index, 0, NULL); |
||
2689 | jermar | 252 | /* The second call uses the same method. */ |
253 | aid_t req2 = async_send_3(phone, VFS_MOUNT, |
||
2691 | jermar | 254 | (ipcarg_t) mr_res.triplet.fs_handle, |
255 | (ipcarg_t) mr_res.triplet.dev_handle, |
||
256 | (ipcarg_t) mr_res.triplet.index, NULL); |
||
2689 | jermar | 257 | vfs_release_phone(phone); |
258 | |||
259 | ipcarg_t rc1; |
||
260 | ipcarg_t rc2; |
||
261 | async_wait_for(req1, &rc1); |
||
262 | async_wait_for(req2, &rc2); |
||
263 | |||
264 | if ((rc1 != EOK) || (rc2 != EOK)) { |
||
265 | /* Mount failed, drop references to mr_node and mp_node. */ |
||
266 | vfs_node_put(mr_node); |
||
267 | if (mp_node) |
||
268 | vfs_node_put(mp_node); |
||
269 | } |
||
270 | |||
271 | if (rc2 == EOK) |
||
272 | ipc_answer_0(rid, rc1); |
||
273 | else if (rc1 == EOK) |
||
274 | ipc_answer_0(rid, rc2); |
||
275 | else |
||
276 | ipc_answer_0(rid, rc1); |
||
277 | } |
||
278 | |||
279 | void vfs_open(ipc_callid_t rid, ipc_call_t *request) |
||
280 | { |
||
281 | if (!vfs_files_init()) { |
||
282 | ipc_answer_0(rid, ENOMEM); |
||
283 | return; |
||
284 | } |
||
285 | |||
286 | /* |
||
2700 | jermar | 287 | * The POSIX interface is open(path, oflag, mode). |
288 | * We can receive oflags and mode along with the VFS_OPEN call; the path |
||
2689 | jermar | 289 | * will need to arrive in another call. |
2700 | jermar | 290 | * |
291 | * We also receive one private, non-POSIX set of flags called lflag |
||
292 | * used to pass information to vfs_lookup_internal(). |
||
2689 | jermar | 293 | */ |
2700 | jermar | 294 | int lflag = IPC_GET_ARG1(*request); |
295 | int oflag = IPC_GET_ARG2(*request); |
||
296 | int mode = IPC_GET_ARG3(*request); |
||
2689 | jermar | 297 | size_t len; |
298 | |||
2708 | jermar | 299 | if (oflag & O_CREAT) |
300 | lflag |= L_CREATE; |
||
301 | if (oflag & O_EXCL) |
||
302 | lflag |= L_EXCLUSIVE; |
||
303 | |||
2689 | jermar | 304 | ipc_callid_t callid; |
305 | |||
306 | if (!ipc_data_write_receive(&callid, &len)) { |
||
307 | ipc_answer_0(callid, EINVAL); |
||
308 | ipc_answer_0(rid, EINVAL); |
||
309 | return; |
||
310 | } |
||
2752 | jermar | 311 | char *path = malloc(len + 1); |
2689 | jermar | 312 | if (!path) { |
313 | ipc_answer_0(callid, ENOMEM); |
||
314 | ipc_answer_0(rid, ENOMEM); |
||
315 | return; |
||
316 | } |
||
317 | int rc; |
||
318 | if ((rc = ipc_data_write_finalize(callid, path, len))) { |
||
319 | ipc_answer_0(rid, rc); |
||
320 | free(path); |
||
321 | return; |
||
322 | } |
||
2752 | jermar | 323 | path[len] = '\0'; |
2689 | jermar | 324 | |
325 | /* |
||
326 | * Avoid the race condition in which the file can be deleted before we |
||
327 | * find/create-and-lock the VFS node corresponding to the looked-up |
||
328 | * triplet. |
||
329 | */ |
||
2708 | jermar | 330 | if (lflag & L_CREATE) |
331 | rwlock_write_lock(&namespace_rwlock); |
||
332 | else |
||
333 | rwlock_read_lock(&namespace_rwlock); |
||
2689 | jermar | 334 | |
2707 | jermar | 335 | /* The path is now populated and we can call vfs_lookup_internal(). */ |
2691 | jermar | 336 | vfs_lookup_res_t lr; |
2752 | jermar | 337 | rc = vfs_lookup_internal(path, lflag, &lr, NULL); |
2689 | jermar | 338 | if (rc) { |
2708 | jermar | 339 | if (lflag & L_CREATE) |
340 | rwlock_write_unlock(&namespace_rwlock); |
||
341 | else |
||
342 | rwlock_read_unlock(&namespace_rwlock); |
||
2689 | jermar | 343 | ipc_answer_0(rid, rc); |
344 | free(path); |
||
345 | return; |
||
346 | } |
||
347 | |||
2748 | jermar | 348 | /* Path is no longer needed. */ |
2689 | jermar | 349 | free(path); |
350 | |||
2691 | jermar | 351 | vfs_node_t *node = vfs_node_get(&lr); |
2708 | jermar | 352 | if (lflag & L_CREATE) |
353 | rwlock_write_unlock(&namespace_rwlock); |
||
354 | else |
||
355 | rwlock_read_unlock(&namespace_rwlock); |
||
2689 | jermar | 356 | |
2748 | jermar | 357 | /* Truncate the file if requested and if necessary. */ |
358 | if (oflag & O_TRUNC) { |
||
2749 | jermar | 359 | rwlock_write_lock(&node->contents_rwlock); |
2748 | jermar | 360 | if (node->size) { |
361 | rc = vfs_truncate_internal(node->fs_handle, |
||
362 | node->dev_handle, node->index, 0); |
||
363 | if (rc) { |
||
2749 | jermar | 364 | rwlock_write_unlock(&node->contents_rwlock); |
2748 | jermar | 365 | vfs_node_put(node); |
366 | ipc_answer_0(rid, rc); |
||
367 | return; |
||
368 | } |
||
369 | node->size = 0; |
||
370 | } |
||
2749 | jermar | 371 | rwlock_write_unlock(&node->contents_rwlock); |
2748 | jermar | 372 | } |
373 | |||
2689 | jermar | 374 | /* |
375 | * Get ourselves a file descriptor and the corresponding vfs_file_t |
||
376 | * structure. |
||
377 | */ |
||
378 | int fd = vfs_fd_alloc(); |
||
379 | if (fd < 0) { |
||
380 | vfs_node_put(node); |
||
381 | ipc_answer_0(rid, fd); |
||
382 | return; |
||
383 | } |
||
384 | vfs_file_t *file = vfs_file_get(fd); |
||
385 | file->node = node; |
||
2710 | jermar | 386 | if (oflag & O_APPEND) |
2709 | jermar | 387 | file->append = true; |
2689 | jermar | 388 | |
389 | /* |
||
390 | * The following increase in reference count is for the fact that the |
||
391 | * file is being opened and that a file structure is pointing to it. |
||
392 | * It is necessary so that the file will not disappear when |
||
393 | * vfs_node_put() is called. The reference will be dropped by the |
||
394 | * respective VFS_CLOSE. |
||
395 | */ |
||
396 | vfs_node_addref(node); |
||
397 | vfs_node_put(node); |
||
398 | |||
2707 | jermar | 399 | /* Success! Return the new file descriptor to the client. */ |
2689 | jermar | 400 | ipc_answer_1(rid, EOK, fd); |
401 | } |
||
402 | |||
2734 | jermar | 403 | void vfs_close(ipc_callid_t rid, ipc_call_t *request) |
404 | { |
||
405 | int fd = IPC_GET_ARG1(*request); |
||
406 | if (fd >= MAX_OPEN_FILES) { |
||
407 | ipc_answer_0(rid, EBADF); |
||
408 | return; |
||
409 | } |
||
410 | vfs_fd_free(fd); |
||
411 | ipc_answer_0(rid, EOK); |
||
412 | } |
||
413 | |||
2689 | jermar | 414 | static void vfs_rdwr(ipc_callid_t rid, ipc_call_t *request, bool read) |
415 | { |
||
416 | |||
417 | /* |
||
418 | * The following code strongly depends on the fact that the files data |
||
419 | * structure can be only accessed by a single fibril and all file |
||
420 | * operations are serialized (i.e. the reads and writes cannot |
||
421 | * interleave and a file cannot be closed while it is being read). |
||
422 | * |
||
423 | * Additional synchronization needs to be added once the table of |
||
424 | * open files supports parallel access! |
||
425 | */ |
||
426 | |||
427 | int fd = IPC_GET_ARG1(*request); |
||
428 | |||
2707 | jermar | 429 | /* Lookup the file structure corresponding to the file descriptor. */ |
2689 | jermar | 430 | vfs_file_t *file = vfs_file_get(fd); |
431 | if (!file) { |
||
432 | ipc_answer_0(rid, ENOENT); |
||
433 | return; |
||
434 | } |
||
435 | |||
436 | /* |
||
437 | * Now we need to receive a call with client's |
||
438 | * IPC_M_DATA_READ/IPC_M_DATA_WRITE request. |
||
439 | */ |
||
440 | ipc_callid_t callid; |
||
441 | int res; |
||
442 | if (read) |
||
443 | res = ipc_data_read_receive(&callid, NULL); |
||
444 | else |
||
445 | res = ipc_data_write_receive(&callid, NULL); |
||
446 | if (!res) { |
||
447 | ipc_answer_0(callid, EINVAL); |
||
448 | ipc_answer_0(rid, EINVAL); |
||
449 | return; |
||
450 | } |
||
451 | |||
452 | /* |
||
453 | * Lock the open file structure so that no other thread can manipulate |
||
454 | * the same open file at a time. |
||
455 | */ |
||
456 | futex_down(&file->lock); |
||
457 | |||
458 | /* |
||
459 | * Lock the file's node so that no other client can read/write to it at |
||
460 | * the same time. |
||
461 | */ |
||
462 | if (read) |
||
463 | rwlock_read_lock(&file->node->contents_rwlock); |
||
464 | else |
||
465 | rwlock_write_lock(&file->node->contents_rwlock); |
||
466 | |||
467 | int fs_phone = vfs_grab_phone(file->node->fs_handle); |
||
468 | |||
2707 | jermar | 469 | /* Make a VFS_READ/VFS_WRITE request at the destination FS server. */ |
2689 | jermar | 470 | aid_t msg; |
471 | ipc_call_t answer; |
||
2709 | jermar | 472 | if (!read && file->append) |
473 | file->pos = file->node->size; |
||
2689 | jermar | 474 | msg = async_send_3(fs_phone, IPC_GET_METHOD(*request), |
475 | file->node->dev_handle, file->node->index, file->pos, &answer); |
||
476 | |||
477 | /* |
||
478 | * Forward the IPC_M_DATA_READ/IPC_M_DATA_WRITE request to the |
||
479 | * destination FS server. The call will be routed as if sent by |
||
480 | * ourselves. Note that call arguments are immutable in this case so we |
||
481 | * don't have to bother. |
||
482 | */ |
||
483 | ipc_forward_fast(callid, fs_phone, 0, 0, 0, IPC_FF_ROUTE_FROM_ME); |
||
484 | |||
485 | vfs_release_phone(fs_phone); |
||
486 | |||
2707 | jermar | 487 | /* Wait for reply from the FS server. */ |
2689 | jermar | 488 | ipcarg_t rc; |
489 | async_wait_for(msg, &rc); |
||
490 | size_t bytes = IPC_GET_ARG1(answer); |
||
491 | |||
2707 | jermar | 492 | /* Unlock the VFS node. */ |
2689 | jermar | 493 | if (read) |
494 | rwlock_read_unlock(&file->node->contents_rwlock); |
||
495 | else { |
||
496 | /* Update the cached version of node's size. */ |
||
2710 | jermar | 497 | if (rc == EOK) |
498 | file->node->size = IPC_GET_ARG2(answer); |
||
2689 | jermar | 499 | rwlock_write_unlock(&file->node->contents_rwlock); |
500 | } |
||
501 | |||
2707 | jermar | 502 | /* Update the position pointer and unlock the open file. */ |
2710 | jermar | 503 | if (rc == EOK) |
504 | file->pos += bytes; |
||
2689 | jermar | 505 | futex_up(&file->lock); |
506 | |||
507 | /* |
||
508 | * FS server's reply is the final result of the whole operation we |
||
509 | * return to the client. |
||
510 | */ |
||
511 | ipc_answer_1(rid, rc, bytes); |
||
512 | } |
||
513 | |||
514 | void vfs_read(ipc_callid_t rid, ipc_call_t *request) |
||
515 | { |
||
516 | vfs_rdwr(rid, request, true); |
||
517 | } |
||
518 | |||
519 | void vfs_write(ipc_callid_t rid, ipc_call_t *request) |
||
520 | { |
||
521 | vfs_rdwr(rid, request, false); |
||
522 | } |
||
523 | |||
524 | void vfs_seek(ipc_callid_t rid, ipc_call_t *request) |
||
525 | { |
||
526 | int fd = (int) IPC_GET_ARG1(*request); |
||
527 | off_t off = (off_t) IPC_GET_ARG2(*request); |
||
528 | int whence = (int) IPC_GET_ARG3(*request); |
||
529 | |||
530 | |||
2707 | jermar | 531 | /* Lookup the file structure corresponding to the file descriptor. */ |
2689 | jermar | 532 | vfs_file_t *file = vfs_file_get(fd); |
533 | if (!file) { |
||
534 | ipc_answer_0(rid, ENOENT); |
||
535 | return; |
||
536 | } |
||
537 | |||
538 | off_t newpos; |
||
539 | futex_down(&file->lock); |
||
540 | if (whence == SEEK_SET) { |
||
541 | file->pos = off; |
||
542 | futex_up(&file->lock); |
||
543 | ipc_answer_1(rid, EOK, off); |
||
544 | return; |
||
545 | } |
||
546 | if (whence == SEEK_CUR) { |
||
547 | if (file->pos + off < file->pos) { |
||
548 | futex_up(&file->lock); |
||
549 | ipc_answer_0(rid, EOVERFLOW); |
||
550 | return; |
||
551 | } |
||
552 | file->pos += off; |
||
553 | newpos = file->pos; |
||
554 | futex_up(&file->lock); |
||
555 | ipc_answer_1(rid, EOK, newpos); |
||
556 | return; |
||
557 | } |
||
558 | if (whence == SEEK_END) { |
||
559 | rwlock_read_lock(&file->node->contents_rwlock); |
||
560 | size_t size = file->node->size; |
||
561 | rwlock_read_unlock(&file->node->contents_rwlock); |
||
562 | if (size + off < size) { |
||
563 | futex_up(&file->lock); |
||
564 | ipc_answer_0(rid, EOVERFLOW); |
||
565 | return; |
||
566 | } |
||
567 | newpos = size + off; |
||
568 | futex_up(&file->lock); |
||
569 | ipc_answer_1(rid, EOK, newpos); |
||
570 | return; |
||
571 | } |
||
572 | futex_up(&file->lock); |
||
573 | ipc_answer_0(rid, EINVAL); |
||
574 | } |
||
575 | |||
2770 | jermar | 576 | int |
577 | vfs_truncate_internal(fs_handle_t fs_handle, dev_handle_t dev_handle, |
||
578 | fs_index_t index, size_t size) |
||
2748 | jermar | 579 | { |
580 | ipcarg_t rc; |
||
581 | int fs_phone; |
||
582 | |||
583 | fs_phone = vfs_grab_phone(fs_handle); |
||
584 | rc = async_req_3_0(fs_phone, VFS_TRUNCATE, (ipcarg_t)dev_handle, |
||
585 | (ipcarg_t)index, (ipcarg_t)size); |
||
586 | vfs_release_phone(fs_phone); |
||
587 | return (int)rc; |
||
588 | } |
||
589 | |||
2693 | jermar | 590 | void vfs_truncate(ipc_callid_t rid, ipc_call_t *request) |
591 | { |
||
592 | int fd = IPC_GET_ARG1(*request); |
||
593 | size_t size = IPC_GET_ARG2(*request); |
||
2748 | jermar | 594 | int rc; |
2693 | jermar | 595 | |
596 | vfs_file_t *file = vfs_file_get(fd); |
||
597 | if (!file) { |
||
598 | ipc_answer_0(rid, ENOENT); |
||
599 | return; |
||
600 | } |
||
601 | futex_down(&file->lock); |
||
602 | |||
603 | rwlock_write_lock(&file->node->contents_rwlock); |
||
2748 | jermar | 604 | rc = vfs_truncate_internal(file->node->fs_handle, |
605 | file->node->dev_handle, file->node->index, size); |
||
2693 | jermar | 606 | if (rc == EOK) |
607 | file->node->size = size; |
||
608 | rwlock_write_unlock(&file->node->contents_rwlock); |
||
609 | |||
610 | futex_up(&file->lock); |
||
2748 | jermar | 611 | ipc_answer_0(rid, (ipcarg_t)rc); |
2693 | jermar | 612 | } |
613 | |||
2707 | jermar | 614 | void vfs_mkdir(ipc_callid_t rid, ipc_call_t *request) |
615 | { |
||
616 | int mode = IPC_GET_ARG1(*request); |
||
2735 | jermar | 617 | |
2707 | jermar | 618 | size_t len; |
619 | ipc_callid_t callid; |
||
620 | |||
621 | if (!ipc_data_write_receive(&callid, &len)) { |
||
622 | ipc_answer_0(callid, EINVAL); |
||
623 | ipc_answer_0(rid, EINVAL); |
||
624 | return; |
||
625 | } |
||
2752 | jermar | 626 | char *path = malloc(len + 1); |
2707 | jermar | 627 | if (!path) { |
628 | ipc_answer_0(callid, ENOMEM); |
||
629 | ipc_answer_0(rid, ENOMEM); |
||
630 | return; |
||
631 | } |
||
632 | int rc; |
||
633 | if ((rc = ipc_data_write_finalize(callid, path, len))) { |
||
634 | ipc_answer_0(rid, rc); |
||
635 | free(path); |
||
636 | return; |
||
637 | } |
||
2752 | jermar | 638 | path[len] = '\0'; |
2707 | jermar | 639 | |
640 | rwlock_write_lock(&namespace_rwlock); |
||
641 | int lflag = L_DIRECTORY | L_CREATE | L_EXCLUSIVE; |
||
2752 | jermar | 642 | rc = vfs_lookup_internal(path, lflag, NULL, NULL); |
2707 | jermar | 643 | rwlock_write_unlock(&namespace_rwlock); |
644 | free(path); |
||
645 | ipc_answer_0(rid, rc); |
||
646 | } |
||
647 | |||
2735 | jermar | 648 | void vfs_unlink(ipc_callid_t rid, ipc_call_t *request) |
649 | { |
||
650 | int lflag = IPC_GET_ARG1(*request); |
||
651 | |||
652 | size_t len; |
||
653 | ipc_callid_t callid; |
||
654 | |||
655 | if (!ipc_data_write_receive(&callid, &len)) { |
||
656 | ipc_answer_0(callid, EINVAL); |
||
657 | ipc_answer_0(rid, EINVAL); |
||
658 | return; |
||
659 | } |
||
2752 | jermar | 660 | char *path = malloc(len + 1); |
2735 | jermar | 661 | if (!path) { |
662 | ipc_answer_0(callid, ENOMEM); |
||
663 | ipc_answer_0(rid, ENOMEM); |
||
664 | return; |
||
665 | } |
||
666 | int rc; |
||
667 | if ((rc = ipc_data_write_finalize(callid, path, len))) { |
||
668 | ipc_answer_0(rid, rc); |
||
669 | free(path); |
||
670 | return; |
||
671 | } |
||
2752 | jermar | 672 | path[len] = '\0'; |
2735 | jermar | 673 | |
674 | rwlock_write_lock(&namespace_rwlock); |
||
675 | lflag &= L_DIRECTORY; /* sanitize lflag */ |
||
676 | vfs_lookup_res_t lr; |
||
2763 | jermar | 677 | rc = vfs_lookup_internal(path, lflag | L_UNLINK, &lr, NULL); |
2735 | jermar | 678 | free(path); |
679 | if (rc != EOK) { |
||
680 | rwlock_write_unlock(&namespace_rwlock); |
||
681 | ipc_answer_0(rid, rc); |
||
682 | return; |
||
683 | } |
||
684 | |||
685 | /* |
||
686 | * The name has already been unlinked by vfs_lookup_internal(). |
||
687 | * We have to get and put the VFS node to ensure that it is |
||
2742 | jermar | 688 | * VFS_DESTROY'ed after the last reference to it is dropped. |
2735 | jermar | 689 | */ |
690 | vfs_node_t *node = vfs_node_get(&lr); |
||
2766 | jermar | 691 | futex_down(&nodes_futex); |
2735 | jermar | 692 | node->lnkcnt--; |
2766 | jermar | 693 | futex_up(&nodes_futex); |
2735 | jermar | 694 | rwlock_write_unlock(&namespace_rwlock); |
695 | vfs_node_put(node); |
||
696 | ipc_answer_0(rid, EOK); |
||
697 | } |
||
698 | |||
2763 | jermar | 699 | void vfs_rename(ipc_callid_t rid, ipc_call_t *request) |
700 | { |
||
701 | size_t len; |
||
702 | ipc_callid_t callid; |
||
703 | int rc; |
||
704 | |||
705 | /* Retrieve the old path. */ |
||
706 | if (!ipc_data_write_receive(&callid, &len)) { |
||
707 | ipc_answer_0(callid, EINVAL); |
||
708 | ipc_answer_0(rid, EINVAL); |
||
709 | return; |
||
710 | } |
||
711 | char *old = malloc(len + 1); |
||
712 | if (!old) { |
||
713 | ipc_answer_0(callid, ENOMEM); |
||
714 | ipc_answer_0(rid, ENOMEM); |
||
715 | return; |
||
716 | } |
||
717 | if ((rc = ipc_data_write_finalize(callid, old, len))) { |
||
718 | ipc_answer_0(rid, rc); |
||
719 | free(old); |
||
720 | return; |
||
721 | } |
||
722 | old[len] = '\0'; |
||
723 | |||
724 | /* Retrieve the new path. */ |
||
725 | if (!ipc_data_write_receive(&callid, &len)) { |
||
726 | ipc_answer_0(callid, EINVAL); |
||
727 | ipc_answer_0(rid, EINVAL); |
||
728 | free(old); |
||
729 | return; |
||
730 | } |
||
731 | char *new = malloc(len + 1); |
||
732 | if (!new) { |
||
733 | ipc_answer_0(callid, ENOMEM); |
||
734 | ipc_answer_0(rid, ENOMEM); |
||
735 | free(old); |
||
736 | return; |
||
737 | } |
||
738 | if ((rc = ipc_data_write_finalize(callid, new, len))) { |
||
739 | ipc_answer_0(rid, rc); |
||
740 | free(old); |
||
741 | free(new); |
||
742 | return; |
||
743 | } |
||
744 | new[len] = '\0'; |
||
745 | |||
746 | char *oldc = canonify(old, &len); |
||
747 | char *newc = canonify(new, NULL); |
||
748 | if (!oldc || !newc) { |
||
749 | ipc_answer_0(rid, EINVAL); |
||
750 | free(old); |
||
751 | free(new); |
||
752 | return; |
||
753 | } |
||
754 | if (!strncmp(newc, oldc, len)) { |
||
755 | /* oldc is a prefix of newc */ |
||
756 | ipc_answer_0(rid, EINVAL); |
||
757 | free(old); |
||
758 | free(new); |
||
759 | return; |
||
760 | } |
||
761 | |||
762 | vfs_lookup_res_t old_lr; |
||
763 | vfs_lookup_res_t new_lr; |
||
764 | vfs_lookup_res_t new_par_lr; |
||
765 | rwlock_write_lock(&namespace_rwlock); |
||
766 | /* Lookup the node belonging to the old file name. */ |
||
767 | rc = vfs_lookup_internal(oldc, L_NONE, &old_lr, NULL); |
||
768 | if (rc != EOK) { |
||
769 | rwlock_write_unlock(&namespace_rwlock); |
||
770 | ipc_answer_0(rid, rc); |
||
771 | free(old); |
||
772 | free(new); |
||
773 | return; |
||
774 | } |
||
775 | vfs_node_t *old_node = vfs_node_get(&old_lr); |
||
776 | if (!old_node) { |
||
777 | rwlock_write_unlock(&namespace_rwlock); |
||
778 | ipc_answer_0(rid, ENOMEM); |
||
779 | free(old); |
||
780 | free(new); |
||
781 | return; |
||
782 | } |
||
783 | /* Lookup parent of the new file name. */ |
||
784 | rc = vfs_lookup_internal(newc, L_PARENT, &new_par_lr, NULL); |
||
785 | if (rc != EOK) { |
||
786 | rwlock_write_unlock(&namespace_rwlock); |
||
787 | ipc_answer_0(rid, rc); |
||
788 | free(old); |
||
789 | free(new); |
||
790 | return; |
||
791 | } |
||
792 | /* Check whether linking to the same file system instance. */ |
||
793 | if ((old_node->fs_handle != new_par_lr.triplet.fs_handle) || |
||
794 | (old_node->dev_handle != new_par_lr.triplet.dev_handle)) { |
||
795 | rwlock_write_unlock(&namespace_rwlock); |
||
796 | ipc_answer_0(rid, EXDEV); /* different file systems */ |
||
797 | free(old); |
||
798 | free(new); |
||
799 | return; |
||
800 | } |
||
801 | /* Destroy the old link for the new name. */ |
||
802 | vfs_node_t *new_node = NULL; |
||
803 | rc = vfs_lookup_internal(newc, L_UNLINK, &new_lr, NULL); |
||
804 | switch (rc) { |
||
805 | case ENOENT: |
||
806 | /* simply not in our way */ |
||
807 | break; |
||
808 | case EOK: |
||
809 | new_node = vfs_node_get(&new_lr); |
||
810 | if (!new_node) { |
||
811 | rwlock_write_unlock(&namespace_rwlock); |
||
812 | ipc_answer_0(rid, ENOMEM); |
||
813 | free(old); |
||
814 | free(new); |
||
815 | return; |
||
816 | } |
||
2766 | jermar | 817 | futex_down(&nodes_futex); |
2763 | jermar | 818 | new_node->lnkcnt--; |
2766 | jermar | 819 | futex_up(&nodes_futex); |
2763 | jermar | 820 | break; |
821 | default: |
||
822 | rwlock_write_unlock(&namespace_rwlock); |
||
823 | ipc_answer_0(rid, ENOTEMPTY); |
||
824 | free(old); |
||
825 | free(new); |
||
826 | return; |
||
827 | } |
||
828 | /* Create the new link for the new name. */ |
||
829 | rc = vfs_lookup_internal(newc, L_LINK, NULL, NULL, old_node->index); |
||
830 | if (rc != EOK) { |
||
831 | rwlock_write_unlock(&namespace_rwlock); |
||
832 | if (new_node) |
||
833 | vfs_node_put(new_node); |
||
834 | ipc_answer_0(rid, rc); |
||
835 | free(old); |
||
836 | free(new); |
||
837 | return; |
||
838 | } |
||
2766 | jermar | 839 | futex_down(&nodes_futex); |
2763 | jermar | 840 | old_node->lnkcnt++; |
2766 | jermar | 841 | futex_up(&nodes_futex); |
2763 | jermar | 842 | /* Destroy the link for the old name. */ |
843 | rc = vfs_lookup_internal(oldc, L_UNLINK, NULL, NULL); |
||
844 | if (rc != EOK) { |
||
845 | rwlock_write_unlock(&namespace_rwlock); |
||
846 | vfs_node_put(old_node); |
||
847 | if (new_node) |
||
848 | vfs_node_put(new_node); |
||
849 | ipc_answer_0(rid, rc); |
||
850 | free(old); |
||
851 | free(new); |
||
852 | return; |
||
853 | } |
||
2766 | jermar | 854 | futex_down(&nodes_futex); |
2763 | jermar | 855 | old_node->lnkcnt--; |
2766 | jermar | 856 | futex_up(&nodes_futex); |
2763 | jermar | 857 | rwlock_write_unlock(&namespace_rwlock); |
858 | vfs_node_put(old_node); |
||
859 | if (new_node) |
||
860 | vfs_node_put(new_node); |
||
861 | free(old); |
||
862 | free(new); |
||
863 | ipc_answer_0(rid, EOK); |
||
864 | } |
||
865 | |||
2689 | jermar | 866 | /** |
867 | * @} |
||
868 | */ |