paul@90 | 1 | /* |
paul@90 | 2 | * Filesystem client functions. |
paul@90 | 3 | * |
paul@90 | 4 | * Copyright (C) 2018, 2019, 2020, 2021 Paul Boddie <paul@boddie.org.uk> |
paul@90 | 5 | * |
paul@90 | 6 | * This program is free software; you can redistribute it and/or |
paul@90 | 7 | * modify it under the terms of the GNU General Public License as |
paul@90 | 8 | * published by the Free Software Foundation; either version 2 of |
paul@90 | 9 | * the License, or (at your option) any later version. |
paul@90 | 10 | * |
paul@90 | 11 | * This program is distributed in the hope that it will be useful, |
paul@90 | 12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
paul@90 | 13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
paul@90 | 14 | * GNU General Public License for more details. |
paul@90 | 15 | * |
paul@90 | 16 | * You should have received a copy of the GNU General Public License |
paul@90 | 17 | * along with this program; if not, write to the Free Software |
paul@90 | 18 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, |
paul@90 | 19 | * Boston, MA 02110-1301, USA |
paul@90 | 20 | */ |
paul@90 | 21 | |
paul@90 | 22 | #include <l4/re/env.h> |
paul@90 | 23 | |
paul@90 | 24 | #include <stdio.h> |
paul@90 | 25 | #include <stdlib.h> |
paul@90 | 26 | |
paul@90 | 27 | #include "client.h" |
paul@90 | 28 | |
paul@90 | 29 | |
paul@90 | 30 | |
paul@90 | 31 | /* Default size of pipe regions. */ |
paul@90 | 32 | |
paul@90 | 33 | const offset_t DEFAULT_PIPE_SIZE = 4096; |
paul@90 | 34 | |
paul@90 | 35 | |
paul@90 | 36 | |
paul@117 | 37 | /* Access the given position and synchronise state with the file object. */ |
paul@117 | 38 | |
paul@117 | 39 | static long _access(file_t *file, offset_t position) |
paul@117 | 40 | { |
paul@117 | 41 | long err; |
paul@117 | 42 | |
paul@117 | 43 | if (file->can_mmap) |
paul@117 | 44 | { |
paul@117 | 45 | /* Where the position is outside the current region, re-map. */ |
paul@117 | 46 | |
paul@117 | 47 | if ((position < file->start_pos) || (position >= file->end_pos)) |
paul@117 | 48 | { |
paul@117 | 49 | if (file_mmap(file, position, file_span(file))) |
paul@117 | 50 | return -L4_EIO; |
paul@117 | 51 | } |
paul@117 | 52 | |
paul@117 | 53 | /* Otherwise, flush any written data in the current region and update the |
paul@117 | 54 | file size details. */ |
paul@117 | 55 | |
paul@117 | 56 | else |
paul@117 | 57 | { |
paul@117 | 58 | err = client_flush(file); |
paul@117 | 59 | if (err) |
paul@117 | 60 | return err; |
paul@117 | 61 | } |
paul@117 | 62 | } |
paul@117 | 63 | else |
paul@117 | 64 | { |
paul@117 | 65 | /* Strict conditions for region navigation in pipes. */ |
paul@117 | 66 | |
paul@117 | 67 | if ((position < file->start_pos) || (position > file->end_pos)) |
paul@117 | 68 | { |
paul@117 | 69 | return -L4_EIO; |
paul@117 | 70 | } |
paul@117 | 71 | |
paul@117 | 72 | /* The next region is only available at the end of the mapped memory. */ |
paul@117 | 73 | |
paul@117 | 74 | else if (position == file->end_pos) |
paul@117 | 75 | { |
paul@117 | 76 | err = client_next_region(file); |
paul@117 | 77 | if (err) |
paul@117 | 78 | return err; |
paul@117 | 79 | |
paul@117 | 80 | file->data_current = 0; |
paul@117 | 81 | return L4_EOK; |
paul@117 | 82 | } |
paul@117 | 83 | |
paul@117 | 84 | /* Within the current pipe region, synchronise with the pipe object. */ |
paul@117 | 85 | |
paul@117 | 86 | else |
paul@117 | 87 | { |
paul@117 | 88 | err = client_current_region(file); |
paul@117 | 89 | if (err) |
paul@117 | 90 | return err; |
paul@117 | 91 | } |
paul@117 | 92 | } |
paul@117 | 93 | |
paul@117 | 94 | /* Update the current data offset. */ |
paul@117 | 95 | |
paul@117 | 96 | file->data_current = position - file->start_pos; |
paul@117 | 97 | |
paul@117 | 98 | return L4_EOK; |
paul@117 | 99 | } |
paul@117 | 100 | |
paul@117 | 101 | |
paul@117 | 102 | |
paul@117 | 103 | /* Return whether an access could occur, blocking if necessary. */ |
paul@117 | 104 | |
paul@117 | 105 | static int _access_blocking(file_t *file, offset_t position) |
paul@117 | 106 | { |
paul@117 | 107 | long err; |
paul@117 | 108 | |
paul@117 | 109 | while ((err = _access(file, position))) |
paul@117 | 110 | { |
paul@117 | 111 | /* Exit if blocking is not configured or suitable. */ |
paul@117 | 112 | |
paul@117 | 113 | if ((err != -L4_EBUSY) || !file->can_block) |
paul@117 | 114 | return 0; |
paul@117 | 115 | |
paul@117 | 116 | /* Handle an inability to access by blocking, exiting if waiting failed. */ |
paul@117 | 117 | |
paul@117 | 118 | if (client_wait(file)) |
paul@117 | 119 | return 0; |
paul@117 | 120 | } |
paul@117 | 121 | |
paul@117 | 122 | return 1; |
paul@117 | 123 | } |
paul@117 | 124 | |
paul@117 | 125 | |
paul@117 | 126 | |
paul@117 | 127 | /* Ensure that memory is mapped for accessing the given file, using the |
paul@117 | 128 | indicated count as a region size hint. */ |
paul@117 | 129 | |
paul@117 | 130 | static void *_map_memory(file_t *file, offset_t count) |
paul@117 | 131 | { |
paul@117 | 132 | if (file->memory == NULL) |
paul@117 | 133 | { |
paul@117 | 134 | if (file->can_mmap) |
paul@117 | 135 | return client_mmap(file, client_tell(file), count); |
paul@117 | 136 | else if (pipe_current(file)) |
paul@117 | 137 | return NULL; |
paul@117 | 138 | } |
paul@117 | 139 | |
paul@117 | 140 | return file->memory; |
paul@117 | 141 | } |
paul@117 | 142 | |
paul@117 | 143 | |
paul@117 | 144 | |
paul@90 | 145 | /* Close a filesystem object. */ |
paul@90 | 146 | |
paul@90 | 147 | void client_close(file_t *file) |
paul@90 | 148 | { |
paul@90 | 149 | if (file == NULL) |
paul@90 | 150 | return; |
paul@90 | 151 | |
paul@90 | 152 | file_close(file); |
paul@90 | 153 | free(file); |
paul@90 | 154 | } |
paul@90 | 155 | |
paul@90 | 156 | |
paul@90 | 157 | |
paul@90 | 158 | /* Open a filesystem object. */ |
paul@90 | 159 | |
paul@90 | 160 | file_t *client_open(const char *name, flags_t flags) |
paul@90 | 161 | { |
paul@103 | 162 | return client_open_device("server", name, flags); |
paul@103 | 163 | } |
paul@103 | 164 | |
paul@103 | 165 | /* Open a filesystem object via a named capability. */ |
paul@103 | 166 | |
paul@103 | 167 | file_t *client_open_device(const char *cap, const char *name, flags_t flags) |
paul@103 | 168 | { |
paul@90 | 169 | file_t *file = (file_t *) malloc(sizeof(file_t)); |
paul@90 | 170 | |
paul@90 | 171 | if (file == NULL) |
paul@90 | 172 | return NULL; |
paul@90 | 173 | |
paul@103 | 174 | l4_cap_idx_t server = l4re_env_get_cap(cap); |
paul@90 | 175 | |
paul@90 | 176 | if (file_open(file, name, flags, server)) |
paul@90 | 177 | { |
paul@90 | 178 | free(file); |
paul@90 | 179 | return NULL; |
paul@90 | 180 | } |
paul@90 | 181 | |
paul@90 | 182 | return file; |
paul@90 | 183 | } |
paul@90 | 184 | |
paul@90 | 185 | |
paul@90 | 186 | |
paul@90 | 187 | /* Open a pipe object. */ |
paul@90 | 188 | |
paul@90 | 189 | long client_pipe(file_t **reader, file_t **writer) |
paul@90 | 190 | { |
paul@90 | 191 | *reader = (file_t *) malloc(sizeof(file_t)); |
paul@90 | 192 | |
paul@90 | 193 | if (*reader == NULL) |
paul@90 | 194 | return -L4_ENOMEM; |
paul@90 | 195 | |
paul@90 | 196 | *writer = (file_t *) malloc(sizeof(file_t)); |
paul@90 | 197 | |
paul@90 | 198 | if (*writer == NULL) |
paul@90 | 199 | { |
paul@90 | 200 | free(*reader); |
paul@90 | 201 | return -L4_ENOMEM; |
paul@90 | 202 | } |
paul@90 | 203 | |
paul@90 | 204 | l4_cap_idx_t server = l4re_env_get_cap("pipes"); |
paul@90 | 205 | |
paul@90 | 206 | long err = pipe_open(DEFAULT_PIPE_SIZE, *reader, *writer, server); |
paul@90 | 207 | |
paul@90 | 208 | if (err) |
paul@90 | 209 | { |
paul@90 | 210 | free(*reader); |
paul@90 | 211 | free(*writer); |
paul@90 | 212 | } |
paul@90 | 213 | |
paul@90 | 214 | return err; |
paul@90 | 215 | } |
paul@90 | 216 | |
paul@90 | 217 | |
paul@90 | 218 | |
paul@90 | 219 | /* Flush data explicitly to the filesystem object. */ |
paul@90 | 220 | |
paul@90 | 221 | long client_flush(file_t *file) |
paul@90 | 222 | { |
paul@90 | 223 | if (file == NULL) |
paul@90 | 224 | return -L4_EINVAL; |
paul@90 | 225 | |
paul@90 | 226 | /* Flush and retain most buffer settings. */ |
paul@90 | 227 | |
paul@90 | 228 | return file_flush(file); |
paul@90 | 229 | } |
paul@90 | 230 | |
paul@90 | 231 | |
paul@90 | 232 | |
paul@90 | 233 | /* Map a memory region to a file. */ |
paul@90 | 234 | |
paul@90 | 235 | void *client_mmap(file_t *file, offset_t position, offset_t length) |
paul@90 | 236 | { |
paul@90 | 237 | if ((file == NULL) || (file_mmap(file, position, length))) |
paul@90 | 238 | return NULL; |
paul@90 | 239 | |
paul@90 | 240 | return file->memory; |
paul@90 | 241 | } |
paul@90 | 242 | |
paul@90 | 243 | |
paul@90 | 244 | |
paul@90 | 245 | /* Obtain the current region of a pipe. */ |
paul@90 | 246 | |
paul@116 | 247 | long client_current_region(file_t *file) |
paul@90 | 248 | { |
paul@116 | 249 | if (file == NULL) |
paul@116 | 250 | return -L4_EINVAL; |
paul@90 | 251 | |
paul@116 | 252 | return pipe_current(file); |
paul@90 | 253 | } |
paul@90 | 254 | |
paul@90 | 255 | |
paul@90 | 256 | |
paul@90 | 257 | /* Obtain the next region of a pipe. */ |
paul@90 | 258 | |
paul@116 | 259 | long client_next_region(file_t *file) |
paul@90 | 260 | { |
paul@116 | 261 | if (file == NULL) |
paul@116 | 262 | return -L4_EINVAL; |
paul@90 | 263 | |
paul@116 | 264 | return pipe_next(file); |
paul@90 | 265 | } |
paul@90 | 266 | |
paul@90 | 267 | |
paul@90 | 268 | |
paul@90 | 269 | /* Read from the filesystem object into the buffer provided. */ |
paul@90 | 270 | |
paul@90 | 271 | offset_t client_read(file_t *file, void *buf, offset_t count) |
paul@90 | 272 | { |
paul@90 | 273 | if (file == NULL) |
paul@90 | 274 | return 0; |
paul@90 | 275 | |
paul@100 | 276 | /* Map memory if none has been mapped so far. */ |
paul@100 | 277 | |
paul@108 | 278 | if (_map_memory(file, count) == NULL) |
paul@100 | 279 | return 0; |
paul@100 | 280 | |
paul@90 | 281 | /* Amount available in the descriptor buffer already. */ |
paul@90 | 282 | |
paul@90 | 283 | offset_t available = file_data_available(file); |
paul@90 | 284 | offset_t to_transfer, total = 0; |
paul@90 | 285 | |
paul@90 | 286 | while (count > 0) |
paul@90 | 287 | { |
paul@90 | 288 | /* If there is no data, try and obtain more data. */ |
paul@90 | 289 | |
paul@90 | 290 | if (!available) |
paul@90 | 291 | { |
paul@90 | 292 | /* Flush any unwritten data, preparing to read from the file position at |
paul@90 | 293 | the end of the data, and returning if no new data is available. */ |
paul@90 | 294 | |
paul@117 | 295 | if (!_access_blocking(file, file_data_end_position(file))) |
paul@90 | 296 | break; |
paul@90 | 297 | |
paul@90 | 298 | available = file_data_available(file); |
paul@90 | 299 | |
paul@90 | 300 | if (!available) |
paul@90 | 301 | break; |
paul@90 | 302 | } |
paul@90 | 303 | |
paul@90 | 304 | /* Transfer data into the supplied buffer. */ |
paul@90 | 305 | |
paul@90 | 306 | to_transfer = available <= count ? available : count; |
paul@90 | 307 | |
paul@90 | 308 | file_data_read(file, (char *) buf, to_transfer); |
paul@90 | 309 | |
paul@90 | 310 | /* Update counters. */ |
paul@90 | 311 | |
paul@90 | 312 | available -= to_transfer; |
paul@90 | 313 | |
paul@90 | 314 | count -= to_transfer; |
paul@90 | 315 | total += to_transfer; |
paul@90 | 316 | |
paul@90 | 317 | buf = ((char *) buf + to_transfer); |
paul@90 | 318 | } |
paul@90 | 319 | |
paul@90 | 320 | return total; |
paul@90 | 321 | } |
paul@90 | 322 | |
paul@90 | 323 | |
paul@90 | 324 | |
paul@90 | 325 | /* Ensure that the buffer can provide the needed data. */ |
paul@90 | 326 | |
paul@90 | 327 | offset_t client_seek(file_t *file, offset_t offset, int whence) |
paul@90 | 328 | { |
paul@90 | 329 | if (file == NULL) |
paul@90 | 330 | return 0; |
paul@90 | 331 | |
paul@90 | 332 | offset_t position, current = file_data_current_position(file), change; |
paul@90 | 333 | |
paul@90 | 334 | switch (whence) |
paul@90 | 335 | { |
paul@90 | 336 | case SEEK_SET: |
paul@90 | 337 | position = offset; |
paul@90 | 338 | break; |
paul@90 | 339 | |
paul@90 | 340 | case SEEK_CUR: |
paul@90 | 341 | position = current + offset; |
paul@90 | 342 | break; |
paul@90 | 343 | |
paul@90 | 344 | case SEEK_END: |
paul@90 | 345 | position = file->size + offset; |
paul@90 | 346 | break; |
paul@90 | 347 | |
paul@90 | 348 | default: |
paul@90 | 349 | /* NOTE: Set errno to EINVAL. */ |
paul@117 | 350 | return current; |
paul@90 | 351 | } |
paul@90 | 352 | |
paul@90 | 353 | /* Retain the current position if unchanged. */ |
paul@90 | 354 | |
paul@90 | 355 | if (position == current) |
paul@90 | 356 | return position; |
paul@90 | 357 | |
paul@90 | 358 | /* Move forward in the file. */ |
paul@90 | 359 | |
paul@90 | 360 | if (position > current) |
paul@90 | 361 | { |
paul@90 | 362 | change = position - current; |
paul@90 | 363 | |
paul@90 | 364 | /* Move towards the end of available data. |
paul@90 | 365 | Request new data if not enough is available. */ |
paul@90 | 366 | |
paul@90 | 367 | if (change <= file_data_available(file)) |
paul@90 | 368 | { |
paul@90 | 369 | file->data_current += change; |
paul@90 | 370 | return position; |
paul@90 | 371 | } |
paul@90 | 372 | } |
paul@90 | 373 | |
paul@90 | 374 | /* Move backward in the file. */ |
paul@90 | 375 | |
paul@90 | 376 | else |
paul@90 | 377 | { |
paul@90 | 378 | change = current - position; |
paul@90 | 379 | |
paul@90 | 380 | /* Move towards the start of available data. |
paul@90 | 381 | Request new data if moving beyond the start of the data. */ |
paul@90 | 382 | |
paul@90 | 383 | if (change <= file->data_current) |
paul@90 | 384 | { |
paul@90 | 385 | file->data_current -= change; |
paul@90 | 386 | return position; |
paul@90 | 387 | } |
paul@90 | 388 | } |
paul@90 | 389 | |
paul@90 | 390 | /* Handle unwritten data and reset the buffer for reading. */ |
paul@90 | 391 | |
paul@117 | 392 | if (_access(file, position)) |
paul@117 | 393 | return current; |
paul@117 | 394 | |
paul@90 | 395 | return position; |
paul@90 | 396 | } |
paul@90 | 397 | |
paul@90 | 398 | |
paul@90 | 399 | |
paul@117 | 400 | /* Set or unset blocking access for a file. */ |
paul@117 | 401 | |
paul@117 | 402 | long client_set_blocking(file_t *file, int can_block) |
paul@117 | 403 | { |
paul@117 | 404 | long err; |
paul@117 | 405 | |
paul@117 | 406 | if (file->can_block == can_block) |
paul@117 | 407 | return L4_EOK; |
paul@117 | 408 | |
paul@117 | 409 | // NOTE: Set appropriate flags. |
paul@117 | 410 | |
paul@117 | 411 | if (can_block) |
paul@117 | 412 | err = client_subscribe(file, 0); |
paul@117 | 413 | else |
paul@117 | 414 | err = client_unsubscribe(file); |
paul@117 | 415 | |
paul@117 | 416 | if (err) |
paul@117 | 417 | return err; |
paul@117 | 418 | |
paul@117 | 419 | file->can_block = can_block; |
paul@117 | 420 | return L4_EOK; |
paul@117 | 421 | } |
paul@117 | 422 | |
paul@117 | 423 | |
paul@117 | 424 | |
paul@117 | 425 | /* Subscribe from events concerning a file. */ |
paul@117 | 426 | |
paul@117 | 427 | long client_subscribe(file_t *file, flags_t flags) |
paul@117 | 428 | { |
paul@117 | 429 | if (file == NULL) |
paul@117 | 430 | return -L4_EINVAL; |
paul@117 | 431 | |
paul@117 | 432 | return file_notify_subscribe(file, flags); |
paul@117 | 433 | } |
paul@117 | 434 | |
paul@117 | 435 | |
paul@117 | 436 | |
paul@117 | 437 | /* Return the current position in the file. */ |
paul@117 | 438 | |
paul@90 | 439 | long client_tell(file_t *file) |
paul@90 | 440 | { |
paul@90 | 441 | if (file == NULL) |
paul@90 | 442 | return -L4_EINVAL; |
paul@90 | 443 | |
paul@90 | 444 | return file_data_current_position(file); |
paul@90 | 445 | } |
paul@90 | 446 | |
paul@90 | 447 | |
paul@90 | 448 | |
paul@117 | 449 | /* Unsubscribe from events concerning a file. */ |
paul@117 | 450 | |
paul@117 | 451 | long client_unsubscribe(file_t *file) |
paul@117 | 452 | { |
paul@117 | 453 | if (file == NULL) |
paul@117 | 454 | return -L4_EINVAL; |
paul@117 | 455 | |
paul@117 | 456 | return file_notify_unsubscribe(file); |
paul@117 | 457 | } |
paul@117 | 458 | |
paul@117 | 459 | |
paul@117 | 460 | |
paul@117 | 461 | /* Register for events concerning a file. */ |
paul@117 | 462 | |
paul@117 | 463 | long client_wait(file_t *file) |
paul@117 | 464 | { |
paul@117 | 465 | if (file == NULL) |
paul@117 | 466 | return -L4_EINVAL; |
paul@117 | 467 | |
paul@117 | 468 | return file_notify_wait(file); |
paul@117 | 469 | } |
paul@117 | 470 | |
paul@117 | 471 | |
paul@117 | 472 | |
paul@90 | 473 | /* Write to the filesystem object from the buffer provided. */ |
paul@90 | 474 | |
paul@90 | 475 | offset_t client_write(file_t *file, const void *buf, offset_t count) |
paul@90 | 476 | { |
paul@90 | 477 | if (file == NULL) |
paul@90 | 478 | return 0; |
paul@90 | 479 | |
paul@100 | 480 | /* Map memory if none has been mapped so far. */ |
paul@100 | 481 | |
paul@108 | 482 | if (_map_memory(file, count) == NULL) |
paul@100 | 483 | return 0; |
paul@100 | 484 | |
paul@90 | 485 | /* Attempt to ensure that the file can accept the amount of data to be |
paul@90 | 486 | written. This may not resize to the needed amount if a file has a fixed |
paul@90 | 487 | size, but data will still be written to any available space. */ |
paul@90 | 488 | |
paul@90 | 489 | offset_t needed_size = file_data_current_position(file) + count; |
paul@90 | 490 | |
paul@108 | 491 | if (file->has_size) |
paul@90 | 492 | { |
paul@108 | 493 | if (file->size < needed_size) |
paul@108 | 494 | { |
paul@108 | 495 | file_resize(file, needed_size); |
paul@90 | 496 | |
paul@108 | 497 | if (file->size < needed_size) |
paul@108 | 498 | count = file->size - file_data_current_position(file); |
paul@108 | 499 | } |
paul@90 | 500 | } |
paul@90 | 501 | |
paul@90 | 502 | /* Space remaining in the descriptor buffer. */ |
paul@90 | 503 | |
paul@90 | 504 | offset_t space = file_data_space(file); |
paul@90 | 505 | offset_t to_transfer, total = 0; |
paul@90 | 506 | |
paul@90 | 507 | while (count > 0) |
paul@90 | 508 | { |
paul@90 | 509 | /* If no space is available, try and send data, reset the buffer. */ |
paul@90 | 510 | |
paul@90 | 511 | if (!space) |
paul@90 | 512 | { |
paul@90 | 513 | /* Flush any unwritten data and continue writing from the current data |
paul@90 | 514 | position. */ |
paul@90 | 515 | |
paul@117 | 516 | if (!_access_blocking(file, file_data_current_position(file))) |
paul@90 | 517 | break; |
paul@90 | 518 | |
paul@90 | 519 | space = file_data_space(file); |
paul@90 | 520 | } |
paul@90 | 521 | |
paul@90 | 522 | /* Transfer data into the supplied buffer. */ |
paul@90 | 523 | |
paul@90 | 524 | to_transfer = space <= count ? space : count; |
paul@90 | 525 | |
paul@90 | 526 | file_data_write(file, (char *) buf, to_transfer); |
paul@90 | 527 | |
paul@90 | 528 | /* Update counters. */ |
paul@90 | 529 | |
paul@90 | 530 | space -= to_transfer; |
paul@90 | 531 | |
paul@90 | 532 | count -= to_transfer; |
paul@90 | 533 | total += to_transfer; |
paul@90 | 534 | |
paul@90 | 535 | buf = ((char *) buf + to_transfer); |
paul@90 | 536 | } |
paul@90 | 537 | |
paul@90 | 538 | return total; |
paul@90 | 539 | } |
paul@90 | 540 | |
paul@90 | 541 | // vim: tabstop=2 expandtab shiftwidth=2 |