source: mainline/uspace/lib/ext4/libext4_filesystem.c@ 7eb033ce

lfn serial ticket/834-toolchain-update topic/msim-upgrade topic/simplify-dev-export
Last change on this file since 7eb033ce was 7eb033ce, checked in by Frantisek Princ <frantisek.princ@…>, 14 years ago

not debugged version of dir index initialization
  • Property mode set to 100644
File size: 25.0 KB
Line 
1/*
2 * Copyright (c) 2011 Frantisek Princ
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 libext4
30 * @{
31 */
32
33/**
34 * @file libext4_filesystem.c
35 * @brief More complex filesystem operations.
36 */
37
38#include <byteorder.h>
39#include <errno.h>
40#include <malloc.h>
41#include "libext4.h"
42
43int ext4_filesystem_init(ext4_filesystem_t *fs, service_id_t service_id)
44{
45 int rc;
46
47 fs->device = service_id;
48
49 rc = block_init(EXCHANGE_SERIALIZE, fs->device, 4096);
50 if (rc != EOK) {
51 return rc;
52 }
53
54 /* Read superblock from device */
55 ext4_superblock_t *temp_superblock;
56 rc = ext4_superblock_read_direct(fs->device, &temp_superblock);
57 if (rc != EOK) {
58 block_fini(fs->device);
59 return rc;
60 }
61
62 /* Read block size from superblock and check */
63 uint32_t block_size = ext4_superblock_get_block_size(temp_superblock);
64 if (block_size > EXT4_MAX_BLOCK_SIZE) {
65 block_fini(fs->device);
66 return ENOTSUP;
67 }
68
69 /* Initialize block caching */
70 rc = block_cache_init(service_id, block_size, 0, CACHE_MODE_WT);
71 if (rc != EOK) {
72 block_fini(fs->device);
73 return rc;
74 }
75
76 uint32_t block_ids_per_block = block_size / sizeof(uint32_t);
77 fs->inode_block_limits[0] = EXT4_INODE_DIRECT_BLOCK_COUNT;
78 fs->inode_blocks_per_level[0] = 1;
79 for (int i = 1; i < 4; i++) {
80 fs->inode_blocks_per_level[i] = fs->inode_blocks_per_level[i-1] *
81 block_ids_per_block;
82 fs->inode_block_limits[i] = fs->inode_block_limits[i-1] +
83 fs->inode_blocks_per_level[i];
84 }
85
86 /* Return loaded superblock */
87 fs->superblock = temp_superblock;
88
89 return EOK;
90}
91
92int ext4_filesystem_fini(ext4_filesystem_t *fs, bool write_sb)
93{
94 int rc = EOK;
95
96 if (write_sb) {
97 rc = ext4_superblock_write_direct(fs->device, fs->superblock);
98 }
99
100 free(fs->superblock);
101 block_fini(fs->device);
102
103 return rc;
104}
105
106int ext4_filesystem_check_sanity(ext4_filesystem_t *fs)
107{
108 int rc;
109
110 rc = ext4_superblock_check_sanity(fs->superblock);
111 if (rc != EOK) {
112 return rc;
113 }
114
115 return EOK;
116}
117
118int ext4_filesystem_check_features(ext4_filesystem_t *fs, bool *o_read_only)
119{
120 /* Feature flags are present in rev 1 and later */
121 if (ext4_superblock_get_rev_level(fs->superblock) == 0) {
122 *o_read_only = false;
123 return EOK;
124 }
125
126 uint32_t incompatible_features;
127 incompatible_features = ext4_superblock_get_features_incompatible(fs->superblock);
128 incompatible_features &= ~EXT4_FEATURE_INCOMPAT_SUPP;
129 if (incompatible_features > 0) {
130 *o_read_only = true;
131 return ENOTSUP;
132 }
133
134 uint32_t compatible_read_only;
135 compatible_read_only = ext4_superblock_get_features_read_only(fs->superblock);
136 compatible_read_only &= ~EXT4_FEATURE_RO_COMPAT_SUPP;
137 if (compatible_read_only > 0) {
138 *o_read_only = true;
139 }
140
141 return EOK;
142}
143
144int ext4_filesystem_get_block_group_ref(ext4_filesystem_t *fs, uint32_t bgid,
145 ext4_block_group_ref_t **ref)
146{
147 int rc;
148
149 ext4_block_group_ref_t *newref = malloc(sizeof(ext4_block_group_ref_t));
150 if (newref == NULL) {
151 return ENOMEM;
152 }
153
154 uint32_t descriptors_per_block = ext4_superblock_get_block_size(fs->superblock)
155 / ext4_superblock_get_desc_size(fs->superblock);
156
157 /* Block group descriptor table starts at the next block after superblock */
158 aoff64_t block_id = ext4_superblock_get_first_data_block(fs->superblock) + 1;
159
160 /* Find the block containing the descriptor we are looking for */
161 block_id += bgid / descriptors_per_block;
162 uint32_t offset = (bgid % descriptors_per_block) * ext4_superblock_get_desc_size(fs->superblock);
163
164 rc = block_get(&newref->block, fs->device, block_id, 0);
165 if (rc != EOK) {
166 free(newref);
167 return rc;
168 }
169
170 newref->block_group = newref->block->data + offset;
171 newref->fs = fs;
172 newref->index = bgid;
173 newref->dirty = false;
174
175 *ref = newref;
176
177 return EOK;
178}
179
180static uint16_t ext4_filesystem_bg_checksum(ext4_superblock_t *sb, uint32_t bgid,
181 ext4_block_group_t *bg)
182{
183 uint16_t crc = 0;
184
185 if (ext4_superblock_has_feature_read_only(sb, EXT4_FEATURE_RO_COMPAT_GDT_CSUM)) {
186
187 void *base = bg;
188 void *checksum = &bg->checksum;
189
190 uint32_t offset = (uint32_t)(checksum - base);
191
192 uint32_t le_group = host2uint32_t_le(bgid);
193
194 crc = crc16(~0, sb->uuid, sizeof(sb->uuid));
195 crc = crc16(crc, (uint8_t *)&le_group, sizeof(le_group));
196 crc = crc16(crc, (uint8_t *)bg, offset);
197
198 offset += sizeof(bg->checksum); /* skip checksum */
199
200 /* for checksum of struct ext4_group_desc do the rest...*/
201 if ((ext4_superblock_has_feature_incompatible(sb, EXT4_FEATURE_INCOMPAT_64BIT)) &&
202 offset < ext4_superblock_get_desc_size(sb)) {
203
204 crc = crc16(crc, ((uint8_t *)bg) + offset, ext4_superblock_get_desc_size(sb) - offset);
205 }
206 }
207
208 return crc;
209
210}
211
212
213int ext4_filesystem_put_block_group_ref(ext4_block_group_ref_t *ref)
214{
215 int rc;
216
217 if (ref->dirty) {
218 uint16_t checksum = ext4_filesystem_bg_checksum(
219 ref->fs->superblock, ref->index, ref->block_group);
220
221 ext4_block_group_set_checksum(ref->block_group, checksum);
222
223 ref->block->dirty = true;
224 }
225
226 rc = block_put(ref->block);
227 free(ref);
228
229 return rc;
230}
231
232int ext4_filesystem_get_inode_ref(ext4_filesystem_t *fs, uint32_t index,
233 ext4_inode_ref_t **ref)
234{
235 int rc;
236
237 ext4_inode_ref_t *newref = malloc(sizeof(ext4_inode_ref_t));
238 if (newref == NULL) {
239 return ENOMEM;
240 }
241
242 uint32_t inodes_per_group =
243 ext4_superblock_get_inodes_per_group(fs->superblock);
244
245 /* inode numbers are 1-based, but it is simpler to work with 0-based
246 * when computing indices
247 */
248 index -= 1;
249 uint32_t block_group = index / inodes_per_group;
250 uint32_t offset_in_group = index % inodes_per_group;
251
252 ext4_block_group_ref_t *bg_ref;
253 rc = ext4_filesystem_get_block_group_ref(fs, block_group, &bg_ref);
254 if (rc != EOK) {
255 free(newref);
256 return rc;
257 }
258
259 uint32_t inode_table_start = ext4_block_group_get_inode_table_first_block(
260 bg_ref->block_group, fs->superblock);
261
262 rc = ext4_filesystem_put_block_group_ref(bg_ref);
263 if (rc != EOK) {
264 free(newref);
265 return rc;
266 }
267
268 uint16_t inode_size = ext4_superblock_get_inode_size(fs->superblock);
269 uint32_t block_size = ext4_superblock_get_block_size(fs->superblock);
270 uint32_t byte_offset_in_group = offset_in_group * inode_size;
271
272 aoff64_t block_id = inode_table_start + (byte_offset_in_group / block_size);
273 rc = block_get(&newref->block, fs->device, block_id, 0);
274 if (rc != EOK) {
275 free(newref);
276 return rc;
277 }
278
279 uint32_t offset_in_block = byte_offset_in_group % block_size;
280 newref->inode = newref->block->data + offset_in_block;
281 /* we decremented index above, but need to store the original value
282 * in the reference
283 */
284 newref->index = index + 1;
285 newref->fs = fs;
286 newref->dirty = false;
287
288 *ref = newref;
289
290 return EOK;
291}
292
293
294int ext4_filesystem_put_inode_ref(ext4_inode_ref_t *ref)
295{
296 int rc;
297
298 if (ref->dirty) {
299 ref->block->dirty = true;
300 }
301
302 rc = block_put(ref->block);
303 free(ref);
304
305 return rc;
306}
307
308int ext4_filesystem_alloc_inode(ext4_filesystem_t *fs,
309 ext4_inode_ref_t **inode_ref, int flags)
310{
311 int rc;
312
313 bool is_dir = false;
314 if (flags & L_DIRECTORY) {
315 is_dir = true;
316 }
317
318 // allocate inode
319 uint32_t index;
320 rc = ext4_ialloc_alloc_inode(fs, &index, is_dir);
321 if (rc != EOK) {
322 return rc;
323 }
324
325 rc = ext4_filesystem_get_inode_ref(fs, index, inode_ref);
326 if (rc != EOK) {
327 ext4_ialloc_free_inode(fs, index, is_dir);
328 return rc;
329 }
330
331 // init inode
332 ext4_inode_t *inode = (*inode_ref)->inode;
333
334 if (is_dir) {
335 ext4_inode_set_mode(fs->superblock, inode, EXT4_INODE_MODE_DIRECTORY);
336 ext4_inode_set_links_count(inode, 1); // '.' entry
337 } else {
338 ext4_inode_set_mode(fs->superblock, inode, EXT4_INODE_MODE_FILE);
339 ext4_inode_set_links_count(inode, 0);
340 }
341
342 ext4_inode_set_uid(inode, 0);
343 ext4_inode_set_gid(inode, 0);
344 ext4_inode_set_size(inode, 0);
345 ext4_inode_set_access_time(inode, 0);
346 ext4_inode_set_change_inode_time(inode, 0);
347 ext4_inode_set_modification_time(inode, 0);
348 ext4_inode_set_deletion_time(inode, 0);
349 ext4_inode_set_blocks_count(fs->superblock, inode, 0);
350 ext4_inode_set_flags(inode, 0);
351 ext4_inode_set_generation(inode, 0);
352
353 // Reset blocks array
354 for (uint32_t i = 0; i < EXT4_INODE_BLOCKS; i++) {
355 inode->blocks[i] = 0;
356 }
357
358 if (ext4_superblock_has_feature_incompatible(
359 fs->superblock, EXT4_FEATURE_INCOMPAT_EXTENTS)) {
360
361 ext4_inode_set_flag(inode, EXT4_INODE_FLAG_EXTENTS);
362
363 // Initialize extent root header
364 ext4_extent_header_t *header = ext4_inode_get_extent_header(inode);
365 ext4_extent_header_set_depth(header, 0);
366 ext4_extent_header_set_entries_count(header, 0);
367 ext4_extent_header_set_generation(header, 0);
368 ext4_extent_header_set_magic(header, EXT4_EXTENT_MAGIC);
369
370 uint16_t max_entries = (EXT4_INODE_BLOCKS * sizeof (uint32_t) - sizeof(ext4_extent_header_t))
371 / sizeof(ext4_extent_t);
372
373 ext4_extent_header_set_max_entries_count(header, max_entries);
374 }
375
376 (*inode_ref)->dirty = true;
377
378 return EOK;
379}
380
381int ext4_filesystem_free_inode(ext4_inode_ref_t *inode_ref)
382{
383 int rc;
384
385 ext4_filesystem_t *fs = inode_ref->fs;
386
387 if (ext4_superblock_has_feature_incompatible(
388 fs->superblock, EXT4_FEATURE_INCOMPAT_EXTENTS) &&
389 ext4_inode_has_flag(inode_ref->inode, EXT4_INODE_FLAG_EXTENTS)) {
390
391 // Data structures are released during truncate operation...
392 goto finish;
393 }
394
395 // release all indirect (no data) blocks
396
397 // 1) Single indirect
398 uint32_t fblock = ext4_inode_get_indirect_block(inode_ref->inode, 0);
399 if (fblock != 0) {
400 rc = ext4_balloc_free_block(inode_ref, fblock);
401 if (rc != EOK) {
402 return rc;
403 }
404
405 ext4_inode_set_indirect_block(inode_ref->inode, 0, 0);
406 }
407
408 block_t *block;
409 uint32_t block_size = ext4_superblock_get_block_size(fs->superblock);
410 uint32_t count = block_size / sizeof(uint32_t);
411
412 // 2) Double indirect
413 fblock = ext4_inode_get_indirect_block(inode_ref->inode, 1);
414 if (fblock != 0) {
415 rc = block_get(&block, fs->device, fblock, BLOCK_FLAGS_NONE);
416 if (rc != EOK) {
417 return rc;
418 }
419
420 uint32_t ind_block;
421 for (uint32_t offset = 0; offset < count; ++offset) {
422 ind_block = uint32_t_le2host(((uint32_t*)block->data)[offset]);
423
424 if (ind_block != 0) {
425 rc = ext4_balloc_free_block(inode_ref, ind_block);
426 if (rc != EOK) {
427 block_put(block);
428 return rc;
429 }
430 }
431 }
432
433 block_put(block);
434 rc = ext4_balloc_free_block(inode_ref, fblock);
435 if (rc != EOK) {
436 return rc;
437 }
438
439 ext4_inode_set_indirect_block(inode_ref->inode, 1, 0);
440 }
441
442
443 // 3) Tripple indirect
444 block_t *subblock;
445 fblock = ext4_inode_get_indirect_block(inode_ref->inode, 2);
446 if (fblock != 0) {
447 rc = block_get(&block, fs->device, fblock, BLOCK_FLAGS_NONE);
448 if (rc != EOK) {
449 return rc;
450 }
451
452 uint32_t ind_block;
453 for (uint32_t offset = 0; offset < count; ++offset) {
454 ind_block = uint32_t_le2host(((uint32_t*)block->data)[offset]);
455
456 if (ind_block != 0) {
457 rc = block_get(&subblock, fs->device, ind_block, BLOCK_FLAGS_NONE);
458 if (rc != EOK) {
459 block_put(block);
460 return rc;
461 }
462
463 uint32_t ind_subblock;
464 for (uint32_t suboffset = 0; suboffset < count; ++suboffset) {
465 ind_subblock = uint32_t_le2host(((uint32_t*)subblock->data)[suboffset]);
466
467 if (ind_subblock != 0) {
468 rc = ext4_balloc_free_block(inode_ref, ind_subblock);
469 if (rc != EOK) {
470 block_put(subblock);
471 block_put(block);
472 return rc;
473 }
474 }
475
476 }
477 block_put(subblock);
478
479 }
480
481 rc = ext4_balloc_free_block(inode_ref, ind_block);
482 if (rc != EOK) {
483 block_put(block);
484 return rc;
485 }
486
487
488 }
489
490 block_put(block);
491 rc = ext4_balloc_free_block(inode_ref, fblock);
492 if (rc != EOK) {
493 return rc;
494 }
495
496 ext4_inode_set_indirect_block(inode_ref->inode, 2, 0);
497 }
498
499finish:
500 inode_ref->dirty = true;
501
502 // Free inode
503 if (ext4_inode_is_type(fs->superblock, inode_ref->inode,
504 EXT4_INODE_MODE_DIRECTORY)) {
505 rc = ext4_ialloc_free_inode(fs, inode_ref->index, true);
506 } else {
507 rc = ext4_ialloc_free_inode(fs, inode_ref->index, false);
508 }
509 if (rc != EOK) {
510 return rc;
511 }
512
513 return EOK;
514}
515
516int ext4_filesystem_truncate_inode(
517 ext4_inode_ref_t *inode_ref, aoff64_t new_size)
518{
519 int rc;
520
521 ext4_superblock_t *sb = inode_ref->fs->superblock;
522
523 if (! ext4_inode_can_truncate(sb, inode_ref->inode)) {
524 // Unable to truncate
525 return EINVAL;
526 }
527
528 aoff64_t old_size = ext4_inode_get_size(sb, inode_ref->inode);
529 if (old_size == new_size) {
530 // Nothing to do
531 return EOK;
532 }
533
534 // It's not suppported to make the larger file
535 if (old_size < new_size) {
536 return EINVAL;
537 }
538
539 aoff64_t size_diff = old_size - new_size;
540 uint32_t block_size = ext4_superblock_get_block_size(sb);
541 uint32_t diff_blocks_count = size_diff / block_size;
542 if (size_diff % block_size != 0) {
543 diff_blocks_count++;
544 }
545
546 uint32_t old_blocks_count = old_size / block_size;
547 if (old_size % block_size != 0) {
548 old_blocks_count++;
549 }
550
551 if (ext4_superblock_has_feature_incompatible(
552 inode_ref->fs->superblock, EXT4_FEATURE_INCOMPAT_EXTENTS) &&
553 ext4_inode_has_flag(inode_ref->inode, EXT4_INODE_FLAG_EXTENTS)) {
554
555 rc = ext4_extent_release_blocks_from(inode_ref,
556 old_blocks_count - diff_blocks_count);
557 if (rc != EOK) {
558 return rc;
559 }
560 } else {
561 // starting from 1 because of logical blocks are numbered from 0
562 for (uint32_t i = 1; i <= diff_blocks_count; ++i) {
563 rc = ext4_filesystem_release_inode_block(inode_ref, old_blocks_count - i);
564 if (rc != EOK) {
565 return rc;
566 }
567 }
568 }
569
570 ext4_inode_set_size(inode_ref->inode, new_size);
571
572 inode_ref->dirty = true;
573
574 return EOK;
575}
576
577int ext4_filesystem_get_inode_data_block_index(ext4_inode_ref_t *inode_ref,
578 aoff64_t iblock, uint32_t *fblock)
579{
580 int rc;
581
582 ext4_filesystem_t *fs = inode_ref->fs;
583
584 if (ext4_inode_get_size(fs->superblock, inode_ref->inode) == 0) {
585 *fblock = 0;
586 return EOK;
587 }
588
589 uint32_t current_block;
590
591 /* Handle inode using extents */
592 if (ext4_superblock_has_feature_incompatible(fs->superblock, EXT4_FEATURE_INCOMPAT_EXTENTS) &&
593 ext4_inode_has_flag(inode_ref->inode, EXT4_INODE_FLAG_EXTENTS)) {
594 rc = ext4_extent_find_block(inode_ref, iblock, &current_block);
595
596 EXT4FS_DBG("ext: loading iblock \%u, address \%u", (uint32_t)iblock, current_block);
597
598 if (rc != EOK) {
599 return rc;
600 }
601
602 *fblock = current_block;
603 return EOK;
604
605 }
606
607 ext4_inode_t *inode = inode_ref->inode;
608
609 /* Handle simple case when we are dealing with direct reference */
610 if (iblock < EXT4_INODE_DIRECT_BLOCK_COUNT) {
611 current_block = ext4_inode_get_direct_block(inode, (uint32_t)iblock);
612 *fblock = current_block;
613 return EOK;
614 }
615
616 /* Determine the indirection level needed to get the desired block */
617 int level = -1;
618 for (int i = 1; i < 4; i++) {
619 if (iblock < fs->inode_block_limits[i]) {
620 level = i;
621 break;
622 }
623 }
624
625 if (level == -1) {
626 return EIO;
627 }
628
629 /* Compute offsets for the topmost level */
630 aoff64_t block_offset_in_level = iblock - fs->inode_block_limits[level-1];
631 current_block = ext4_inode_get_indirect_block(inode, level-1);
632 uint32_t offset_in_block = block_offset_in_level / fs->inode_blocks_per_level[level-1];
633
634 if (current_block == 0) {
635 *fblock = 0;
636 return EOK;
637 }
638
639 block_t *block;
640
641 /* Navigate through other levels, until we find the block number
642 * or find null reference meaning we are dealing with sparse file
643 */
644 while (level > 0) {
645 rc = block_get(&block, fs->device, current_block, 0);
646 if (rc != EOK) {
647 return rc;
648 }
649
650 current_block = uint32_t_le2host(((uint32_t*)block->data)[offset_in_block]);
651
652 rc = block_put(block);
653 if (rc != EOK) {
654 return rc;
655 }
656
657 if (current_block == 0) {
658 /* This is a sparse file */
659 *fblock = 0;
660 return EOK;
661 }
662
663 level -= 1;
664
665 /* If we are on the last level, break here as
666 * there is no next level to visit
667 */
668 if (level == 0) {
669 break;
670 }
671
672 /* Visit the next level */
673 block_offset_in_level %= fs->inode_blocks_per_level[level];
674 offset_in_block = block_offset_in_level / fs->inode_blocks_per_level[level-1];
675 }
676
677 *fblock = current_block;
678
679 return EOK;
680}
681
682
683int ext4_filesystem_set_inode_data_block_index(ext4_inode_ref_t *inode_ref,
684 aoff64_t iblock, uint32_t fblock)
685{
686 int rc;
687
688 ext4_filesystem_t *fs = inode_ref->fs;
689
690 /* Handle inode using extents */
691 if (ext4_superblock_has_feature_compatible(fs->superblock, EXT4_FEATURE_INCOMPAT_EXTENTS) &&
692 ext4_inode_has_flag(inode_ref->inode, EXT4_INODE_FLAG_EXTENTS)) {
693 // not reachable !!!
694 return ENOTSUP;
695 }
696
697 /* Handle simple case when we are dealing with direct reference */
698 if (iblock < EXT4_INODE_DIRECT_BLOCK_COUNT) {
699 ext4_inode_set_direct_block(inode_ref->inode, (uint32_t)iblock, fblock);
700 inode_ref->dirty = true;
701 return EOK;
702 }
703
704 /* Determine the indirection level needed to get the desired block */
705 int level = -1;
706 for (int i = 1; i < 4; i++) {
707 if (iblock < fs->inode_block_limits[i]) {
708 level = i;
709 break;
710 }
711 }
712
713 if (level == -1) {
714 return EIO;
715 }
716
717 uint32_t block_size = ext4_superblock_get_block_size(fs->superblock);
718
719 /* Compute offsets for the topmost level */
720 aoff64_t block_offset_in_level = iblock - fs->inode_block_limits[level-1];
721 uint32_t current_block = ext4_inode_get_indirect_block(inode_ref->inode, level-1);
722 uint32_t offset_in_block = block_offset_in_level / fs->inode_blocks_per_level[level-1];
723
724 uint32_t new_block_addr;
725 block_t *block, *new_block;
726
727 if (current_block == 0) {
728 rc = ext4_balloc_alloc_block(inode_ref, &new_block_addr);
729 if (rc != EOK) {
730 return rc;
731 }
732
733 ext4_inode_set_indirect_block(inode_ref->inode, level - 1, new_block_addr);
734
735 inode_ref->dirty = true;
736
737 rc = block_get(&new_block, fs->device, new_block_addr, BLOCK_FLAGS_NOREAD);
738 if (rc != EOK) {
739 ext4_balloc_free_block(inode_ref, new_block_addr);
740 return rc;
741 }
742
743 memset(new_block->data, 0, block_size);
744 new_block->dirty = true;
745
746 rc = block_put(new_block);
747 if (rc != EOK) {
748 return rc;
749 }
750
751 current_block = new_block_addr;
752 }
753
754 /* Navigate through other levels, until we find the block number
755 * or find null reference meaning we are dealing with sparse file
756 */
757 while (level > 0) {
758
759 rc = block_get(&block, fs->device, current_block, 0);
760 if (rc != EOK) {
761 return rc;
762 }
763
764 current_block = uint32_t_le2host(((uint32_t*)block->data)[offset_in_block]);
765
766 if ((level > 1) && (current_block == 0)) {
767 rc = ext4_balloc_alloc_block(inode_ref, &new_block_addr);
768 if (rc != EOK) {
769 block_put(block);
770 return rc;
771 }
772
773 rc = block_get(&new_block, fs->device, new_block_addr, BLOCK_FLAGS_NOREAD);
774 if (rc != EOK) {
775 block_put(block);
776 return rc;
777 }
778
779 memset(new_block->data, 0, block_size);
780 new_block->dirty = true;
781
782 rc = block_put(new_block);
783 if (rc != EOK) {
784 block_put(block);
785 return rc;
786 }
787
788 ((uint32_t*)block->data)[offset_in_block] = host2uint32_t_le(new_block_addr);
789 block->dirty = true;
790 current_block = new_block_addr;
791 }
792
793 if (level == 1) {
794 ((uint32_t*)block->data)[offset_in_block] = host2uint32_t_le(fblock);
795 block->dirty = true;
796 }
797
798 rc = block_put(block);
799 if (rc != EOK) {
800 return rc;
801 }
802
803 level -= 1;
804
805 /* If we are on the last level, break here as
806 * there is no next level to visit
807 */
808 if (level == 0) {
809 break;
810 }
811
812 /* Visit the next level */
813 block_offset_in_level %= fs->inode_blocks_per_level[level];
814 offset_in_block = block_offset_in_level / fs->inode_blocks_per_level[level-1];
815 }
816
817 return EOK;
818}
819
820int ext4_filesystem_release_inode_block(
821 ext4_inode_ref_t *inode_ref, uint32_t iblock)
822{
823 int rc;
824
825 uint32_t fblock;
826
827 ext4_filesystem_t *fs = inode_ref->fs;
828
829 // EXTENTS are handled otherwise
830 assert(! (ext4_superblock_has_feature_incompatible(fs->superblock,
831 EXT4_FEATURE_INCOMPAT_EXTENTS) &&
832 ext4_inode_has_flag(inode_ref->inode, EXT4_INODE_FLAG_EXTENTS)));
833
834 ext4_inode_t *inode = inode_ref->inode;
835
836 /* Handle simple case when we are dealing with direct reference */
837 if (iblock < EXT4_INODE_DIRECT_BLOCK_COUNT) {
838 fblock = ext4_inode_get_direct_block(inode, iblock);
839 // Sparse file
840 if (fblock == 0) {
841 return EOK;
842 }
843
844 ext4_inode_set_direct_block(inode, iblock, 0);
845 return ext4_balloc_free_block(inode_ref, fblock);
846 }
847
848
849 /* Determine the indirection level needed to get the desired block */
850 int level = -1;
851 for (int i = 1; i < 4; i++) {
852 if (iblock < fs->inode_block_limits[i]) {
853 level = i;
854 break;
855 }
856 }
857
858 if (level == -1) {
859 return EIO;
860 }
861
862 /* Compute offsets for the topmost level */
863 aoff64_t block_offset_in_level = iblock - fs->inode_block_limits[level-1];
864 uint32_t current_block = ext4_inode_get_indirect_block(inode, level-1);
865 uint32_t offset_in_block = block_offset_in_level / fs->inode_blocks_per_level[level-1];
866
867 /* Navigate through other levels, until we find the block number
868 * or find null reference meaning we are dealing with sparse file
869 */
870 block_t *block;
871 while (level > 0) {
872 rc = block_get(&block, fs->device, current_block, 0);
873 if (rc != EOK) {
874 return rc;
875 }
876
877 current_block = uint32_t_le2host(((uint32_t*)block->data)[offset_in_block]);
878
879 // Set zero
880 if (level == 1) {
881 ((uint32_t*)block->data)[offset_in_block] = host2uint32_t_le(0);
882 block->dirty = true;
883 }
884
885 rc = block_put(block);
886 if (rc != EOK) {
887 return rc;
888 }
889
890 level -= 1;
891
892 /* If we are on the last level, break here as
893 * there is no next level to visit
894 */
895 if (level == 0) {
896 break;
897 }
898
899 /* Visit the next level */
900 block_offset_in_level %= fs->inode_blocks_per_level[level];
901 offset_in_block = block_offset_in_level / fs->inode_blocks_per_level[level-1];
902 }
903
904 fblock = current_block;
905
906 if (fblock == 0) {
907 return EOK;
908 }
909
910 return ext4_balloc_free_block(inode_ref, fblock);
911
912}
913
914int ext4_filesystem_append_inode_block(ext4_inode_ref_t *inode_ref,
915 uint32_t *fblock, uint32_t *iblock)
916{
917 int rc;
918
919 EXT4FS_DBG("");
920
921 // Handle extents separately
922 if (ext4_superblock_has_feature_incompatible(
923 inode_ref->fs->superblock, EXT4_FEATURE_INCOMPAT_EXTENTS) &&
924 ext4_inode_has_flag(inode_ref->inode, EXT4_INODE_FLAG_EXTENTS)) {
925
926 return ext4_extent_append_block(inode_ref, iblock, fblock);
927
928 }
929
930 ext4_superblock_t *sb = inode_ref->fs->superblock;
931
932 // Compute next block index and allocate data block
933 uint64_t inode_size = ext4_inode_get_size(sb, inode_ref->inode);
934 uint32_t block_size = ext4_superblock_get_block_size(sb);
935
936 // TODO zarovnat inode size a ne assert!!!
937 assert(inode_size % block_size == 0);
938
939 // Logical blocks are numbered from 0
940 uint32_t new_block_idx = inode_size / block_size;
941
942 uint32_t phys_block;
943 rc = ext4_balloc_alloc_block(inode_ref, &phys_block);
944 if (rc != EOK) {
945 return rc;
946 }
947
948 rc = ext4_filesystem_set_inode_data_block_index(inode_ref, new_block_idx, phys_block);
949 if (rc != EOK) {
950 ext4_balloc_free_block(inode_ref, phys_block);
951 return rc;
952 }
953
954 ext4_inode_set_size(inode_ref->inode, inode_size + block_size);
955
956 inode_ref->dirty = true;
957
958 *fblock = phys_block;
959 *iblock = new_block_idx;
960 return EOK;
961}
962
963int ext4_filesystem_add_orphan(ext4_inode_ref_t *inode_ref)
964{
965 uint32_t next_orphan = ext4_superblock_get_last_orphan(
966 inode_ref->fs->superblock);
967 ext4_inode_set_deletion_time(inode_ref->inode, next_orphan);
968 ext4_superblock_set_last_orphan(
969 inode_ref->fs->superblock, inode_ref->index);
970 inode_ref->dirty = true;
971
972 return EOK;
973}
974
975int ext4_filesystem_delete_orphan(ext4_inode_ref_t *inode_ref)
976{
977 int rc;
978
979 uint32_t last_orphan = ext4_superblock_get_last_orphan(
980 inode_ref->fs->superblock);
981 assert(last_orphan > 0);
982
983 uint32_t next_orphan = ext4_inode_get_deletion_time(inode_ref->inode);
984
985 if (last_orphan == inode_ref->index) {
986 ext4_superblock_set_last_orphan(inode_ref->fs->superblock, next_orphan);
987 ext4_inode_set_deletion_time(inode_ref->inode, 0);
988 inode_ref->dirty = true;
989 return EOK;
990 }
991
992 ext4_inode_ref_t *current;
993 rc = ext4_filesystem_get_inode_ref(inode_ref->fs, last_orphan, &current);
994 if (rc != EOK) {
995 return rc;
996 }
997 next_orphan = ext4_inode_get_deletion_time(current->inode);
998
999 bool found;
1000
1001 while (next_orphan != 0) {
1002 if (next_orphan == inode_ref->index) {
1003 next_orphan = ext4_inode_get_deletion_time(inode_ref->inode);
1004 ext4_inode_set_deletion_time(current->inode, next_orphan);
1005 current->dirty = true;
1006 found = true;
1007 break;
1008 }
1009
1010 ext4_filesystem_put_inode_ref(current);
1011
1012 rc = ext4_filesystem_get_inode_ref(inode_ref->fs, next_orphan, &current);
1013 if (rc != EOK) {
1014 return rc;
1015 }
1016 next_orphan = ext4_inode_get_deletion_time(current->inode);
1017
1018 }
1019
1020 ext4_inode_set_deletion_time(inode_ref->inode, 0);
1021
1022 rc = ext4_filesystem_put_inode_ref(current);
1023 if (rc != EOK) {
1024 return rc;
1025 }
1026
1027 if (!found) {
1028 return ENOENT;
1029 }
1030
1031 return EOK;
1032}
1033
1034/**
1035 * @}
1036 */
Note: See TracBrowser for help on using the repository browser.