lwext4/ext4.c

   1 /*
   2  * Copyright (c) 2013 Grzegorz Kostka (kostka.grzegorz@gmail.com)
   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 lwext4
  30  * @{
  31  */
  32 /**
  33  * @file  ext4.h
  34  * @brief Ext4 high level operations (file, directory, mountpoints...)
  35  */
  36
  37 #include "ext4_config.h"
  38 #include "ext4_blockdev.h"
  39 #include "ext4_types.h"
  40 #include "ext4_debug.h"
  41 #include "ext4_errno.h"
  42 #include "ext4_fs.h"
  43 #include "ext4_dir.h"
  44 #include "ext4_inode.h"
  45 #include "ext4_super.h"
  46 #include "ext4_dir_idx.h"
  47 #include "ext4.h"
  48
  49 #include <stdlib.h>
  50 #include <string.h>
  51
  52 /**@brief   Mount point OS dependent lock*/
  53 #define EXT4_MP_LOCK(_m)                                                       \
  54         do {                                                                   \
  55                 if ((_m)->os_locks)                                            \
  56                         (_m)->os_locks->lock();                                \
  57         } while (0)
  58
  59 /**@brief   Mount point OS dependent unlock*/
  60 #define EXT4_MP_UNLOCK(_m)                                                     \
  61         do {                                                                   \
  62                 if ((_m)->os_locks)                                            \
  63                         (_m)->os_locks->unlock();                              \
  64         } while (0)
  65
  66 /**@brief   Mount point descriptor.*/
  67 struct ext4_mountpoint {
  68
  69         /**@brief   Mount done flag.*/
  70         bool mounted;
  71
  72         /**@brief   Mount point name (@ref ext4_mount)*/
  73         char name[32];
  74
  75         /**@brief   OS dependent lock/unlock functions.*/
  76         const struct ext4_lock *os_locks;
  77
  78         /**@brief   Ext4 filesystem internals.*/
  79         struct ext4_fs fs;
  80
  81         /**@brief   Dynamic allocation cache flag.*/
  82         bool cache_dynamic;
  83 };
  84
  85 /**@brief   Block devices descriptor.*/
  86 struct _ext4_devices {
  87
  88         /**@brief   Block device name (@ref ext4_device_register)*/
  89         char name[32];
  90
  91         /**@brief   Block device handle.*/
  92         struct ext4_blockdev *bd;
  93
  94         /**@brief   Block cache handle.*/
  95         struct ext4_bcache *bc;
  96 };
  97
  98 /**@brief   Block devices.*/
  99 struct _ext4_devices _bdevices[CONFIG_EXT4_BLOCKDEVS_COUNT];
 100
 101 /**@brief   Mountpoints.*/
 102 struct ext4_mountpoint _mp[CONFIG_EXT4_MOUNTPOINTS_COUNT];
 103
 104 int ext4_device_register(struct ext4_blockdev *bd, struct ext4_bcache *bc,
 105                          const char *dev_name)
 106 {
 107         uint32_t i;
 108         ext4_assert(bd && dev_name);
 109
 110         for (i = 0; i < CONFIG_EXT4_BLOCKDEVS_COUNT; ++i) {
 111                 if (!_bdevices[i].bd) {
 112                         strcpy(_bdevices[i].name, dev_name);
 113                         _bdevices[i].bd = bd;
 114                         _bdevices[i].bc = bc;
 115                         return EOK;
 116                 }
 117
 118                 if (!strcmp(_bdevices[i].name, dev_name))
 119                         return EOK;
 120         }
 121         return ENOSPC;
 122 }
 123
 124 /****************************************************************************/
 125
 126 static bool ext4_is_dots(const uint8_t *name, size_t name_size)
 127 {
 128         if ((name_size == 1) && (name[0] == '.'))
 129                 return true;
 130
 131         if ((name_size == 2) && (name[0] == '.') && (name[1] == '.'))
 132                 return true;
 133
 134         return false;
 135 }
 136
 137 static int ext4_has_children(bool *has_children, struct ext4_inode_ref *enode)
 138 {
 139         struct ext4_fs *fs = enode->fs;
 140
 141         /* Check if node is directory */
 142         if (!ext4_inode_is_type(&fs->sb, enode->inode,
 143                                 EXT4_INODE_MODE_DIRECTORY)) {
 144                 *has_children = false;
 145                 return EOK;
 146         }
 147
 148         struct ext4_directory_iterator it;
 149         int rc = ext4_dir_iterator_init(&it, enode, 0);
 150         if (rc != EOK)
 151                 return rc;
 152
 153         /* Find a non-empty directory entry */
 154         bool found = false;
 155         while (it.current != NULL) {
 156                 if (ext4_dir_entry_ll_get_inode(it.current) != 0) {
 157                         uint16_t name_size = ext4_dir_entry_ll_get_name_length(
 158                             &fs->sb, it.current);
 159                         if (!ext4_is_dots(it.current->name, name_size)) {
 160                                 found = true;
 161                                 break;
 162                         }
 163                 }
 164
 165                 rc = ext4_dir_iterator_next(&it);
 166                 if (rc != EOK) {
 167                         ext4_dir_iterator_fini(&it);
 168                         return rc;
 169                 }
 170         }
 171
 172         rc = ext4_dir_iterator_fini(&it);
 173         if (rc != EOK)
 174                 return rc;
 175
 176         *has_children = found;
 177
 178         return EOK;
 179 }
 180
 181 static int ext4_link(struct ext4_mountpoint *mp, struct ext4_inode_ref *parent,
 182                      struct ext4_inode_ref *child, const char *name,
 183                      uint32_t name_len)
 184 {
 185         /* Check maximum name length */
 186         if (name_len > EXT4_DIRECTORY_FILENAME_LEN)
 187                 return EINVAL;
 188
 189         /* Add entry to parent directory */
 190         int rc = ext4_dir_add_entry(parent, name, name_len, child);
 191         if (rc != EOK)
 192                 return rc;
 193
 194         /* Fill new dir -> add '.' and '..' entries.
 195          * Also newly allocated inode should have 0 link count.
 196          */
 197         if (ext4_inode_is_type(&mp->fs.sb, child->inode,
 198                                EXT4_INODE_MODE_DIRECTORY) &&
 199             ext4_inode_get_links_count(child->inode) == 0) {
 200                 rc = ext4_dir_add_entry(child, ".", strlen("."), child);
 201                 if (rc != EOK) {
 202                         ext4_dir_remove_entry(parent, name, strlen(name));
 203                         return rc;
 204                 }
 205
 206                 rc = ext4_dir_add_entry(child, "..", strlen(".."), parent);
 207                 if (rc != EOK) {
 208                         ext4_dir_remove_entry(parent, name, strlen(name));
 209                         ext4_dir_remove_entry(child, ".", strlen("."));
 210                         return rc;
 211                 }
 212
 213                 /*New empty directory. Two links (. and ..) */
 214                 ext4_inode_set_links_count(child->inode, 2);
 215
 216 #if CONFIG_DIR_INDEX_ENABLE
 217                 /* Initialize directory index if supported */
 218                 if (ext4_sb_has_feature_compatible(
 219                         &mp->fs.sb, EXT4_FEATURE_COMPAT_DIR_INDEX)) {
 220                         rc = ext4_dir_dx_init(child);
 221                         if (rc != EOK)
 222                                 return rc;
 223
 224                         ext4_inode_set_flag(child->inode,
 225                                             EXT4_INODE_FLAG_INDEX);
 226                         child->dirty = true;
 227                 }
 228 #endif
 229
 230                 ext4_fs_inode_links_count_inc(parent);
 231                 child->dirty = true;
 232                 parent->dirty = true;
 233         } else {
 234                 if (ext4_inode_is_type(&mp->fs.sb, child->inode,
 235                                         EXT4_INODE_MODE_DIRECTORY)) {
 236                         int has_flag_index =
 237                                 ext4_inode_has_flag(child->inode,
 238                                                     EXT4_INODE_FLAG_INDEX);
 239                         struct ext4_directory_search_result result;
 240                         if (!has_flag_index) {
 241                                 rc = ext4_dir_find_entry(&result,
 242                                                          child, "..",
 243                                                          strlen(".."));
 244                                 if (rc != EOK)
 245                                         return EIO;
 246
 247                                 ext4_dir_entry_ll_set_inode(result.dentry,
 248                                                             parent->index);
 249                                 result.block.dirty = true;
 250                                 rc = ext4_dir_destroy_result(child, &result);
 251                                 if (rc != EOK)
 252                                         return rc;
 253
 254                         } else {
 255 #if CONFIG_DIR_INDEX_ENABLE
 256                                 rc = ext4_dir_dx_reset_parent_inode(parent,
 257                                                 parent->index);
 258                                 if (rc != EOK)
 259                                         return rc;
 260
 261 #endif
 262                         }
 263
 264                         ext4_fs_inode_links_count_inc(parent);
 265                         parent->dirty = true;
 266                 } else {
 267                         ext4_fs_inode_links_count_inc(child);
 268                         child->dirty = true;
 269                 }
 270         }
 271
 272         return rc;
 273 }
 274
 275 static int ext4_unlink(struct ext4_mountpoint *mp,
 276                        struct ext4_inode_ref *parent,
 277                        struct ext4_inode_ref *child_inode_ref, const char *name,
 278                        uint32_t name_len)
 279 {
 280         bool has_children;
 281         int rc = ext4_has_children(&has_children, child_inode_ref);
 282         if (rc != EOK)
 283                 return rc;
 284
 285         /* Cannot unlink non-empty node */
 286         if (has_children)
 287                 return ENOTSUP;
 288
 289         /* Remove entry from parent directory */
 290         rc = ext4_dir_remove_entry(parent, name, name_len);
 291         if (rc != EOK)
 292                 return rc;
 293
 294         bool is_dir = ext4_inode_is_type(&mp->fs.sb, child_inode_ref->inode,
 295                                          EXT4_INODE_MODE_DIRECTORY);
 296
 297         /* If directory - handle links from parent */
 298         if (is_dir) {
 299                 // ext4_assert(ext4_inode_get_links_count(child_inode_ref->inode)
 300                 // == 1);
 301                 ext4_fs_inode_links_count_dec(parent);
 302                 parent->dirty = true;
 303         }
 304
 305         /*
 306          * TODO: Update timestamps of the parent
 307          * (when we have wall-clock time).
 308          *
 309          * ext4_inode_set_change_inode_time(parent->inode, (uint32_t) now);
 310          * ext4_inode_set_modification_time(parent->inode, (uint32_t) now);
 311          * parent->dirty = true;
 312          */
 313
 314         /*
 315          * TODO: Update timestamp for inode.
 316          *
 317          * ext4_inode_set_change_inode_time(child_inode_ref->inode,
 318          *     (uint32_t) now);
 319          */
 320         if (ext4_inode_get_links_count(child_inode_ref->inode)) {
 321                 ext4_fs_inode_links_count_dec(child_inode_ref);
 322                 child_inode_ref->dirty = true;
 323         }
 324
 325         return EOK;
 326 }
 327
 328 /****************************************************************************/
 329
 330 int ext4_mount(const char *dev_name, const char *mount_point)
 331 {
 332         ext4_assert(mount_point && dev_name);
 333         int r;
 334         int i;
 335
 336         uint32_t bsize;
 337         struct ext4_blockdev *bd = 0;
 338         struct ext4_bcache *bc = 0;
 339         struct ext4_mountpoint *mp = 0;
 340
 341         if (mount_point[strlen(mount_point) - 1] != '/')
 342                 return ENOTSUP;
 343
 344         for (i = 0; i < CONFIG_EXT4_BLOCKDEVS_COUNT; ++i) {
 345                 if (_bdevices[i].name) {
 346                         if (!strcmp(dev_name, _bdevices[i].name)) {
 347                                 bd = _bdevices[i].bd;
 348                                 bc = _bdevices[i].bc;
 349                                 break;
 350                         }
 351                 }
 352         }
 353
 354         if (!bd)
 355                 return ENODEV;
 356
 357         for (i = 0; i < CONFIG_EXT4_MOUNTPOINTS_COUNT; ++i) {
 358                 if (!_mp[i].mounted) {
 359                         strcpy(_mp[i].name, mount_point);
 360                         _mp[i].mounted = 1;
 361                         mp = &_mp[i];
 362                         break;
 363                 }
 364
 365                 if (!strcmp(_mp[i].name, mount_point))
 366                         return EOK;
 367         }
 368
 369         if (!mp)
 370                 return ENOMEM;
 371
 372         r = ext4_block_init(bd);
 373         if (r != EOK)
 374                 return r;
 375
 376         r = ext4_fs_init(&mp->fs, bd);
 377         if (r != EOK) {
 378                 ext4_block_fini(bd);
 379                 return r;
 380         }
 381
 382         bsize = ext4_sb_get_block_size(&mp->fs.sb);
 383         ext4_block_set_lb_size(bd, bsize);
 384
 385         mp->cache_dynamic = 0;
 386
 387         if (!bc) {
 388                 /*Automatic block cache alloc.*/
 389                 mp->cache_dynamic = 1;
 390                 bc = malloc(sizeof(struct ext4_bcache));
 391
 392                 r = ext4_bcache_init_dynamic(bc, CONFIG_BLOCK_DEV_CACHE_SIZE,
 393                                              bsize);
 394                 if (r != EOK) {
 395                         free(bc);
 396                         ext4_block_fini(bd);
 397                         return r;
 398                 }
 399         }
 400
 401         if (bsize != bc->itemsize)
 402                 return ENOTSUP;
 403
 404         /*Bind block cache to block device*/
 405         r = ext4_block_bind_bcache(bd, bc);
 406         if (r != EOK) {
 407                 ext4_block_fini(bd);
 408                 if (mp->cache_dynamic) {
 409                         ext4_bcache_fini_dynamic(bc);
 410                         free(bc);
 411                 }
 412                 return r;
 413         }
 414
 415         return r;
 416 }
 417
 418 int ext4_umount(const char *mount_point)
 419 {
 420         int i;
 421         int r;
 422         struct ext4_mountpoint *mp = 0;
 423
 424         for (i = 0; i < CONFIG_EXT4_MOUNTPOINTS_COUNT; ++i) {
 425                 if (!strcmp(_mp[i].name, mount_point)) {
 426                         mp = &_mp[i];
 427                         break;
 428                 }
 429         }
 430
 431         if (!mp)
 432                 return ENODEV;
 433
 434         r = ext4_fs_fini(&mp->fs);
 435         if (r != EOK)
 436                 return r;
 437
 438         mp->mounted = 0;
 439
 440         if (mp->cache_dynamic) {
 441                 ext4_bcache_fini_dynamic(mp->fs.bdev->bc);
 442                 free(mp->fs.bdev->bc);
 443         }
 444
 445         return ext4_block_fini(mp->fs.bdev);
 446 }
 447
 448 int ext4_mount_point_stats(const char *mount_point,
 449                            struct ext4_mount_stats *stats)
 450 {
 451         uint32_t i;
 452         struct ext4_mountpoint *mp = 0;
 453
 454         for (i = 0; i < CONFIG_EXT4_MOUNTPOINTS_COUNT; ++i) {
 455                 if (!strcmp(_mp[i].name, mount_point)) {
 456                         mp = &_mp[i];
 457                         break;
 458                 }
 459         }
 460         if (!mp)
 461                 return ENOENT;
 462
 463         EXT4_MP_LOCK(mp);
 464         stats->inodes_count = ext4_get32(&mp->fs.sb, inodes_count);
 465         stats->free_inodes_count = ext4_get32(&mp->fs.sb, free_inodes_count);
 466         stats->blocks_count = ext4_sb_get_blocks_cnt(&mp->fs.sb);
 467         stats->free_blocks_count = ext4_sb_get_free_blocks_cnt(&mp->fs.sb);
 468         stats->block_size = ext4_sb_get_block_size(&mp->fs.sb);
 469
 470         stats->block_group_count = ext4_block_group_cnt(&mp->fs.sb);
 471         stats->blocks_per_group = ext4_get32(&mp->fs.sb, blocks_per_group);
 472         stats->inodes_per_group = ext4_get32(&mp->fs.sb, inodes_per_group);
 473
 474         memcpy(stats->volume_name, mp->fs.sb.volume_name, 16);
 475         EXT4_MP_UNLOCK(mp);
 476
 477         return EOK;
 478 }
 479
 480 int ext4_mount_setup_locks(const char *mount_point,
 481                            const struct ext4_lock *locks)
 482 {
 483         uint32_t i;
 484         struct ext4_mountpoint *mp = 0;
 485
 486         for (i = 0; i < CONFIG_EXT4_MOUNTPOINTS_COUNT; ++i) {
 487                 if (!strcmp(_mp[i].name, mount_point)) {
 488                         mp = &_mp[i];
 489                         break;
 490                 }
 491         }
 492         if (!mp)
 493                 return ENOENT;
 494
 495         mp->os_locks = locks;
 496         return EOK;
 497 }
 498
 499 /********************************FILE OPERATIONS*****************************/
 500
 501 static struct ext4_mountpoint *ext4_get_mount(const char *path)
 502 {
 503         int i;
 504         for (i = 0; i < CONFIG_EXT4_MOUNTPOINTS_COUNT; ++i) {
 505
 506                 if (!_mp[i].mounted)
 507                         continue;
 508
 509                 if (!strncmp(_mp[i].name, path, strlen(_mp[i].name)))
 510                         return &_mp[i];
 511         }
 512         return 0;
 513 }
 514
 515 static int ext4_path_check(const char *path, bool *is_goal)
 516 {
 517         int i;
 518
 519         for (i = 0; i < EXT4_DIRECTORY_FILENAME_LEN; ++i) {
 520
 521                 if (path[i] == '/') {
 522                         *is_goal = false;
 523                         return i;
 524                 }
 525
 526                 if (path[i] == 0) {
 527                         *is_goal = true;
 528                         return i;
 529                 }
 530         }
 531
 532         return 0;
 533 }
 534
 535 static bool ext4_parse_flags(const char *flags, uint32_t *file_flags)
 536 {
 537         if (!flags)
 538                 return false;
 539
 540         if (!strcmp(flags, "r") || !strcmp(flags, "rb")) {
 541                 *file_flags = O_RDONLY;
 542                 return true;
 543         }
 544
 545         if (!strcmp(flags, "w") || !strcmp(flags, "wb")) {
 546                 *file_flags = O_WRONLY | O_CREAT | O_TRUNC;
 547                 return true;
 548         }
 549
 550         if (!strcmp(flags, "a") || !strcmp(flags, "ab")) {
 551                 *file_flags = O_WRONLY | O_CREAT | O_APPEND;
 552                 return true;
 553         }
 554
 555         if (!strcmp(flags, "r+") || !strcmp(flags, "rb+") ||
 556             !strcmp(flags, "r+b")) {
 557                 *file_flags = O_RDWR;
 558                 return true;
 559         }
 560
 561         if (!strcmp(flags, "w+") || !strcmp(flags, "wb+") ||
 562             !strcmp(flags, "w+b")) {
 563                 *file_flags = O_RDWR | O_CREAT | O_TRUNC;
 564                 return true;
 565         }
 566
 567         if (!strcmp(flags, "a+") || !strcmp(flags, "ab+") ||
 568             !strcmp(flags, "a+b")) {
 569                 *file_flags = O_RDWR | O_CREAT | O_APPEND;
 570                 return true;
 571         }
 572
 573         return false;
 574 }
 575
 576 /*
 577  * NOTICE: if filetype is equal to EXT4_DIRECTORY_FILETYPE_UNKNOWN,
 578  * any filetype of the target dir entry will be accepted.
 579  */
 580 static int ext4_generic_open2(ext4_file *f, const char *path, int flags,
 581                               int filetype, uint32_t *parent_inode,
 582                               uint32_t *name_off)
 583 {
 584         bool is_goal = false;
 585         uint8_t inode_type = EXT4_DIRECTORY_FILETYPE_DIR;
 586         uint32_t next_inode;
 587
 588         int r;
 589         struct ext4_mountpoint *mp = ext4_get_mount(path);
 590         struct ext4_directory_search_result result;
 591         struct ext4_inode_ref ref;
 592
 593         f->mp = 0;
 594
 595         if (!mp)
 596                 return ENOENT;
 597
 598         f->flags = flags;
 599
 600         /*Skip mount point*/
 601         path += strlen(mp->name);
 602
 603         if (name_off)
 604                 *name_off = strlen(mp->name);
 605
 606         /*Load root*/
 607         r = ext4_fs_get_inode_ref(&mp->fs, EXT4_INODE_ROOT_INDEX, &ref);
 608
 609         if (r != EOK)
 610                 return r;
 611
 612         if (parent_inode)
 613                 *parent_inode = ref.index;
 614
 615         int len = ext4_path_check(path, &is_goal);
 616
 617         while (1) {
 618
 619                 len = ext4_path_check(path, &is_goal);
 620
 621                 if (!len) {
 622                         /*If root open was request.*/
 623                         if (is_goal &&
 624                             ((filetype == EXT4_DIRECTORY_FILETYPE_DIR) ||
 625                              (filetype == EXT4_DIRECTORY_FILETYPE_UNKNOWN)))
 626                                 break;
 627
 628                         r = ENOENT;
 629                         break;
 630                 }
 631
 632                 r = ext4_dir_find_entry(&result, &ref, path, len);
 633                 if (r != EOK) {
 634
 635                         if (r != ENOENT)
 636                                 break;
 637
 638                         if (!(f->flags & O_CREAT))
 639                                 break;
 640
 641                         /*O_CREAT allows create new entry*/
 642                         struct ext4_inode_ref child_ref;
 643                         r = ext4_fs_alloc_inode(
 644                             &mp->fs, &child_ref,
 645                             is_goal ? (filetype == EXT4_DIRECTORY_FILETYPE_DIR)
 646                                     : true);
 647                         if (r != EOK)
 648                                 break;
 649
 650                         /*Destroy last result*/
 651                         ext4_dir_destroy_result(&ref, &result);
 652
 653                         /*Link with root dir.*/
 654                         r = ext4_link(mp, &ref, &child_ref, path, len);
 655                         if (r != EOK) {
 656                                 /*Fail. Free new inode.*/
 657                                 ext4_fs_free_inode(&child_ref);
 658                                 /*We do not want to write new inode.
 659                                   But block has to be released.*/
 660                                 child_ref.dirty = false;
 661                                 ext4_fs_put_inode_ref(&child_ref);
 662                                 break;
 663                         }
 664
 665                         ext4_fs_put_inode_ref(&child_ref);
 666
 667                         continue;
 668                 }
 669
 670                 if (parent_inode)
 671                         *parent_inode = ref.index;
 672
 673                 next_inode = ext4_dir_entry_ll_get_inode(result.dentry);
 674                 inode_type =
 675                     ext4_dir_entry_ll_get_inode_type(&mp->fs.sb, result.dentry);
 676
 677                 r = ext4_dir_destroy_result(&ref, &result);
 678                 if (r != EOK)
 679                         break;
 680
 681                 /*If expected file error*/
 682                 if (inode_type != EXT4_DIRECTORY_FILETYPE_DIR && !is_goal) {
 683                         r = ENOENT;
 684                         break;
 685                 }
 686                 if (filetype != EXT4_DIRECTORY_FILETYPE_UNKNOWN) {
 687                         if ((inode_type != filetype) && is_goal) {
 688                                 r = ENOENT;
 689                                 break;
 690                         }
 691                 }
 692
 693                 r = ext4_fs_put_inode_ref(&ref);
 694                 if (r != EOK)
 695                         break;
 696
 697                 r = ext4_fs_get_inode_ref(&mp->fs, next_inode, &ref);
 698                 if (r != EOK)
 699                         break;
 700
 701                 if (is_goal)
 702                         break;
 703
 704                 path += len + 1;
 705
 706                 if (name_off)
 707                         *name_off += len + 1;
 708         };
 709
 710         if (r != EOK) {
 711                 ext4_fs_put_inode_ref(&ref);
 712                 return r;
 713         }
 714
 715         if (is_goal) {
 716
 717                 if ((f->flags & O_TRUNC) &&
 718                     (inode_type == EXT4_DIRECTORY_FILETYPE_REG_FILE)) {
 719
 720                         r = ext4_fs_truncate_inode(&ref, 0);
 721                         if (r != EOK) {
 722                                 ext4_fs_put_inode_ref(&ref);
 723                                 return r;
 724                         }
 725                 }
 726
 727                 f->mp = mp;
 728                 f->fsize = ext4_inode_get_size(&f->mp->fs.sb, ref.inode);
 729                 f->inode = ref.index;
 730                 f->fpos = 0;
 731
 732                 if (f->flags & O_APPEND)
 733                         f->fpos = f->fsize;
 734         }
 735
 736         r = ext4_fs_put_inode_ref(&ref);
 737         return r;
 738 }
 739
 740 /****************************************************************************/
 741
 742 static int ext4_generic_open(ext4_file *f, const char *path, const char *flags,
 743                              bool file_expect, uint32_t *parent_inode,
 744                              uint32_t *name_off)
 745 {
 746         uint32_t iflags;
 747         int filetype;
 748         if (ext4_parse_flags(flags, &iflags) == false)
 749                 return EINVAL;
 750
 751         if (file_expect == true)
 752                 filetype = EXT4_DIRECTORY_FILETYPE_REG_FILE;
 753         else
 754                 filetype = EXT4_DIRECTORY_FILETYPE_DIR;
 755
 756         return ext4_generic_open2(f, path, iflags, filetype, parent_inode,
 757                                   name_off);
 758 }
 759
 760 static int __ext4_create_hardlink(const char *path,
 761                 struct ext4_inode_ref *child_ref)
 762 {
 763         bool is_goal = false;
 764         uint8_t inode_type = EXT4_DIRECTORY_FILETYPE_DIR;
 765         uint32_t next_inode;
 766
 767         int r;
 768         struct ext4_mountpoint *mp = ext4_get_mount(path);
 769         struct ext4_directory_search_result result;
 770         struct ext4_inode_ref ref;
 771
 772         if (!mp)
 773                 return ENOENT;
 774
 775         /*Skip mount point*/
 776         path += strlen(mp->name);
 777
 778         /*Load root*/
 779         r = ext4_fs_get_inode_ref(&mp->fs, EXT4_INODE_ROOT_INDEX, &ref);
 780
 781         if (r != EOK)
 782                 return r;
 783
 784         int len = ext4_path_check(path, &is_goal);
 785
 786         while (1) {
 787
 788                 len = ext4_path_check(path, &is_goal);
 789
 790                 if (!len) {
 791                         /*If root open was request.*/
 792                         if (is_goal)
 793                                 r = EINVAL;
 794                         else
 795                                 r = ENOENT;
 796                         break;
 797                 }
 798
 799                 r = ext4_dir_find_entry(&result, &ref, path, len);
 800                 if (r != EOK) {
 801
 802                         if (r != ENOENT || !is_goal)
 803                                 break;
 804
 805                         /*Destroy last result*/
 806                         ext4_dir_destroy_result(&ref, &result);
 807
 808                         /*Link with root dir.*/
 809                         r = ext4_link(mp, &ref, child_ref, path, len);
 810                         break;
 811                 }
 812
 813                 next_inode = result.dentry->inode;
 814                 inode_type =
 815                         ext4_dir_entry_ll_get_inode_type(&mp->fs.sb, result.dentry);
 816
 817                 r = ext4_dir_destroy_result(&ref, &result);
 818                 if (r != EOK)
 819                         break;
 820
 821                 if (inode_type == EXT4_DIRECTORY_FILETYPE_REG_FILE) {
 822                         if (is_goal)
 823                                 r = EEXIST;
 824                         else
 825                                 r = ENOENT;
 826
 827                         break;
 828                 }
 829
 830                 r = ext4_fs_put_inode_ref(&ref);
 831                 if (r != EOK)
 832                         break;
 833
 834                 r = ext4_fs_get_inode_ref(&mp->fs, next_inode, &ref);
 835                 if (r != EOK)
 836                         break;
 837
 838                 if (is_goal)
 839                         break;
 840
 841                 path += len + 1;
 842         };
 843
 844         if (r != EOK) {
 845                 ext4_fs_put_inode_ref(&ref);
 846                 return r;
 847         }
 848
 849         r = ext4_fs_put_inode_ref(&ref);
 850         return r;
 851 }
 852
 853 static int __ext4_remove_hardlink(const char *path,
 854                                   uint32_t name_off,
 855                                   struct ext4_inode_ref *parent_ref,
 856                                   struct ext4_inode_ref *child_ref)
 857 {
 858         bool is_goal;
 859         int r;
 860         int len;
 861         struct ext4_mountpoint *mp = ext4_get_mount(path);
 862
 863         if (!mp)
 864                 return ENOENT;
 865
 866         /*Set path*/
 867         path += name_off;
 868
 869         len = ext4_path_check(path, &is_goal);
 870
 871         /*Unlink from parent*/
 872         r = ext4_unlink(mp, parent_ref, child_ref, path, len);
 873         if (r != EOK)
 874                 goto Finish;
 875
 876 Finish:
 877         if (r != EOK)
 878                 ext4_fs_put_inode_ref(child_ref);
 879
 880         ext4_fs_put_inode_ref(parent_ref);
 881         return r;
 882 }
 883
 884 int ext4_flink(const char *path, const char *hardlink_path)
 885 {
 886         int r;
 887         ext4_file f;
 888         uint32_t name_off;
 889         bool child_loaded = false;
 890         uint32_t parent_inode, child_inode;
 891         struct ext4_mountpoint *mp = ext4_get_mount(path);
 892         struct ext4_mountpoint *target_mp = ext4_get_mount(hardlink_path);
 893         struct ext4_inode_ref child_ref;
 894
 895         if (!mp)
 896                 return ENOENT;
 897
 898         /* Will that happen? Anyway return EINVAL for such case. */
 899         if (mp != target_mp)
 900                 return EINVAL;
 901
 902         EXT4_MP_LOCK(mp);
 903
 904         r = ext4_generic_open2(&f, path, O_RDONLY,
 905                                EXT4_DIRECTORY_FILETYPE_UNKNOWN,
 906                                &parent_inode, &name_off);
 907         if (r != EOK)
 908                 goto Finish;
 909
 910         child_inode = f.inode;
 911         ext4_fclose(&f);
 912
 913         /*We have file to unlink. Load it.*/
 914         r = ext4_fs_get_inode_ref(&mp->fs, child_inode, &child_ref);
 915         if (r != EOK)
 916                 goto Finish;
 917
 918         child_loaded = true;
 919
 920         r = __ext4_create_hardlink(hardlink_path, &child_ref);
 921
 922 Finish:
 923         if (child_loaded)
 924                 ext4_fs_put_inode_ref(&child_ref);
 925
 926         EXT4_MP_UNLOCK(mp);
 927         return r;
 928
 929 }
 930
 931 int ext4_frename(const char *path, const char *new_path)
 932 {
 933         int r;
 934         ext4_file f;
 935         uint32_t name_off;
 936         bool parent_loaded = false, child_loaded = false;
 937         uint32_t parent_inode, child_inode;
 938         struct ext4_mountpoint *mp = ext4_get_mount(path);
 939         struct ext4_inode_ref child_ref, parent_ref;
 940
 941         if (!mp)
 942                 return ENOENT;
 943
 944         EXT4_MP_LOCK(mp);
 945
 946         r = ext4_generic_open2(&f, path, O_RDONLY,
 947                         EXT4_DIRECTORY_FILETYPE_UNKNOWN,
 948                         &parent_inode, &name_off);
 949         if (r != EOK)
 950                 goto Finish;
 951
 952         child_inode = f.inode;
 953         ext4_fclose(&f);
 954
 955         /*Load parent*/
 956         r = ext4_fs_get_inode_ref(&mp->fs, parent_inode, &parent_ref);
 957         if (r != EOK)
 958                 goto Finish;
 959
 960         parent_loaded = true;
 961
 962         /*We have file to unlink. Load it.*/
 963         r = ext4_fs_get_inode_ref(&mp->fs, child_inode, &child_ref);
 964         if (r != EOK)
 965                 goto Finish;
 966
 967         child_loaded = true;
 968
 969         r = __ext4_create_hardlink(new_path, &child_ref);
 970         if (r != EOK)
 971                 goto Finish;
 972
 973         r = __ext4_remove_hardlink(path, name_off, &parent_ref, &child_ref);
 974         if (r != EOK)
 975                 goto Finish;
 976
 977 Finish:
 978         if (parent_loaded)
 979                 ext4_fs_put_inode_ref(&parent_ref);
 980
 981         if (child_loaded)
 982                 ext4_fs_put_inode_ref(&child_ref);
 983
 984         EXT4_MP_UNLOCK(mp);
 985         return r;
 986
 987 }
 988
 989 /****************************************************************************/
 990
 991 int ext4_get_sblock(const char *mount_point, struct ext4_sblock **sb)
 992 {
 993         struct ext4_mountpoint *mp = ext4_get_mount(mount_point);
 994
 995         if (!mp)
 996                 return ENOENT;
 997
 998         *sb = &mp->fs.sb;
 999         return EOK;
1000 }
1001
1002 int ext4_cache_write_back(const char *path, bool on)
1003 {
1004         struct ext4_mountpoint *mp = ext4_get_mount(path);
1005
1006         if (!mp)
1007                 return ENOENT;
1008
1009         EXT4_MP_LOCK(mp);
1010         ext4_block_cache_write_back(mp->fs.bdev, on);
1011         EXT4_MP_UNLOCK(mp);
1012         return EOK;
1013 }
1014
1015 int ext4_fremove(const char *path)
1016 {
1017         ext4_file f;
1018         uint32_t parent_inode;
1019         uint32_t name_off;
1020         bool is_goal;
1021         int r;
1022         int len;
1023         struct ext4_inode_ref child;
1024         struct ext4_inode_ref parent;
1025         struct ext4_mountpoint *mp = ext4_get_mount(path);
1026
1027         if (!mp)
1028                 return ENOENT;
1029
1030         EXT4_MP_LOCK(mp);
1031         r = ext4_generic_open(&f, path, "r", true, &parent_inode, &name_off);
1032         if (r != EOK) {
1033                 EXT4_MP_UNLOCK(mp);
1034                 return r;
1035         }
1036
1037         /*Load parent*/
1038         r = ext4_fs_get_inode_ref(&mp->fs, parent_inode, &parent);
1039         if (r != EOK) {
1040                 EXT4_MP_UNLOCK(mp);
1041                 return r;
1042         }
1043
1044         /*We have file to delete. Load it.*/
1045         r = ext4_fs_get_inode_ref(&mp->fs, f.inode, &child);
1046         if (r != EOK) {
1047                 ext4_fs_put_inode_ref(&parent);
1048                 EXT4_MP_UNLOCK(mp);
1049                 return r;
1050         }
1051
1052         /*Set path*/
1053         path += name_off;
1054
1055         len = ext4_path_check(path, &is_goal);
1056
1057         /*Unlink from parent*/
1058         r = ext4_unlink(mp, &parent, &child, path, len);
1059         if (r != EOK)
1060                 goto Finish;
1061
1062         /*Link count is zero, the inode should be freed. */
1063         if (!ext4_inode_get_links_count(child.inode)) {
1064                 printf("ttttt\n");
1065                 ext4_inode_set_deletion_time(child.inode, 0xFFFFFFFF);
1066                 /*Turncate*/
1067                 ext4_block_cache_write_back(mp->fs.bdev, 1);
1068                 /*Truncate may be IO heavy. Do it writeback cache mode.*/
1069                 r = ext4_fs_truncate_inode(&child, 0);
1070                 ext4_block_cache_write_back(mp->fs.bdev, 0);
1071
1072                 if (r != EOK)
1073                         goto Finish;
1074
1075                 r = ext4_fs_free_inode(&child);
1076                 if (r != EOK)
1077                         goto Finish;
1078         }
1079
1080 Finish:
1081         ext4_fs_put_inode_ref(&child);
1082         ext4_fs_put_inode_ref(&parent);
1083         EXT4_MP_UNLOCK(mp);
1084         return r;
1085 }
1086
1087 int ext4_fill_raw_inode(const char *mount_point, uint32_t ino,
1088                         struct ext4_inode *inode)
1089 {
1090         int r;
1091         struct ext4_inode_ref inode_ref;
1092         struct ext4_mountpoint *mp = ext4_get_mount(mount_point);
1093
1094         if (!mp)
1095                 return ENOENT;
1096
1097         EXT4_MP_LOCK(mp);
1098
1099         /*Load parent*/
1100         r = ext4_fs_get_inode_ref(&mp->fs, ino, &inode_ref);
1101         if (r != EOK) {
1102                 EXT4_MP_UNLOCK(mp);
1103                 return r;
1104         }
1105
1106         memcpy(inode, inode_ref.inode, sizeof(struct ext4_inode));
1107
1108         ext4_fs_put_inode_ref(&inode_ref);
1109         EXT4_MP_UNLOCK(mp);
1110         return r;
1111 }
1112
1113 int ext4_fopen(ext4_file *f, const char *path, const char *flags)
1114 {
1115         struct ext4_mountpoint *mp = ext4_get_mount(path);
1116         int r;
1117
1118         if (!mp)
1119                 return ENOENT;
1120
1121         EXT4_MP_LOCK(mp);
1122         ext4_block_cache_write_back(mp->fs.bdev, 1);
1123         r = ext4_generic_open(f, path, flags, true, 0, 0);
1124         ext4_block_cache_write_back(mp->fs.bdev, 0);
1125         EXT4_MP_UNLOCK(mp);
1126         return r;
1127 }
1128
1129 int ext4_fopen2(ext4_file *f, const char *path, int flags, bool file_expect)
1130 {
1131         struct ext4_mountpoint *mp = ext4_get_mount(path);
1132         int r;
1133         int filetype;
1134
1135         if (!mp)
1136                 return ENOENT;
1137
1138         if (file_expect == true)
1139                 filetype = EXT4_DIRECTORY_FILETYPE_REG_FILE;
1140         else
1141                 filetype = EXT4_DIRECTORY_FILETYPE_DIR;
1142
1143         EXT4_MP_LOCK(mp);
1144         ext4_block_cache_write_back(mp->fs.bdev, 1);
1145         r = ext4_generic_open2(f, path, flags, filetype, 0, 0);
1146         ext4_block_cache_write_back(mp->fs.bdev, 0);
1147         EXT4_MP_UNLOCK(mp);
1148         return r;
1149 }
1150
1151 int ext4_fclose(ext4_file *f)
1152 {
1153         ext4_assert(f && f->mp);
1154
1155         f->mp = 0;
1156         f->flags = 0;
1157         f->inode = 0;
1158         f->fpos = f->fsize = 0;
1159
1160         return EOK;
1161 }
1162
1163 static int ext4_ftruncate_no_lock(ext4_file *f, uint64_t size)
1164 {
1165         struct ext4_inode_ref ref;
1166         int r;
1167
1168
1169         r = ext4_fs_get_inode_ref(&f->mp->fs, f->inode, &ref);
1170         if (r != EOK) {
1171                 EXT4_MP_UNLOCK(f->mp);
1172                 return r;
1173         }
1174
1175         /*Sync file size*/
1176         f->fsize = ext4_inode_get_size(&f->mp->fs.sb, ref.inode);
1177         if (f->fsize <= size) {
1178                 r = EOK;
1179                 goto Finish;
1180         }
1181
1182         if ((ext4_inode_get_mode(&f->mp->fs.sb, ref.inode) & EXT4_INODE_MODE_SOFTLINK)
1183                         == EXT4_INODE_MODE_SOFTLINK
1184                         && f->fsize < sizeof(ref.inode->blocks)
1185                         && !ext4_inode_get_blocks_count(&f->mp->fs.sb, ref.inode)) {
1186                 char *content = (char *)ref.inode->blocks;
1187                 memset(content + size, 0, sizeof(ref.inode->blocks) - size);
1188                 ext4_inode_set_size(ref.inode, size);
1189                 ref.dirty = true;
1190
1191                 f->fsize = size;
1192                 if (f->fpos > size)
1193                         f->fpos = size;
1194
1195                 r = EOK;
1196                 goto Finish;
1197         }
1198
1199         /*Start write back cache mode.*/
1200         r = ext4_block_cache_write_back(f->mp->fs.bdev, 1);
1201         if (r != EOK)
1202                 goto Finish;
1203
1204         r = ext4_fs_truncate_inode(&ref, size);
1205         if (r != EOK)
1206                 goto Finish;
1207
1208         f->fsize = size;
1209         if (f->fpos > size)
1210                 f->fpos = size;
1211
1212         /*Stop write back cache mode*/
1213         ext4_block_cache_write_back(f->mp->fs.bdev, 0);
1214
1215         if (r != EOK)
1216                 goto Finish;
1217
1218 Finish:
1219         ext4_fs_put_inode_ref(&ref);
1220         return r;
1221
1222 }
1223
1224 int ext4_ftruncate(ext4_file *f, uint64_t size)
1225 {
1226         int r;
1227         ext4_assert(f && f->mp);
1228
1229         if (f->flags & O_RDONLY)
1230                 return EPERM;
1231
1232         EXT4_MP_LOCK(f->mp);
1233
1234         r = ext4_ftruncate_no_lock(f, size);
1235
1236         EXT4_MP_UNLOCK(f->mp);
1237         return r;
1238 }
1239
1240 int ext4_fread(ext4_file *f, void *buf, uint32_t size, uint32_t *rcnt)
1241 {
1242         uint32_t u;
1243         uint32_t fblock;
1244         uint32_t fblock_start;
1245         uint32_t fblock_cnt;
1246         uint32_t sblock;
1247         uint32_t sblock_end;
1248         uint32_t block_size;
1249         uint8_t *u8_buf = buf;
1250         int r;
1251         struct ext4_block b;
1252         struct ext4_inode_ref ref;
1253
1254         ext4_assert(f && f->mp);
1255
1256         if (f->flags & O_WRONLY)
1257                 return EPERM;
1258
1259         if (!size)
1260                 return EOK;
1261
1262         EXT4_MP_LOCK(f->mp);
1263
1264         if (rcnt)
1265                 *rcnt = 0;
1266
1267         r = ext4_fs_get_inode_ref(&f->mp->fs, f->inode, &ref);
1268         if (r != EOK) {
1269                 EXT4_MP_UNLOCK(f->mp);
1270                 return r;
1271         }
1272
1273         /*Sync file size*/
1274         f->fsize = ext4_inode_get_size(&f->mp->fs.sb, ref.inode);
1275
1276         block_size = ext4_sb_get_block_size(&f->mp->fs.sb);
1277         size = size > (f->fsize - f->fpos) ? (f->fsize - f->fpos) : size;
1278         sblock = (f->fpos) / block_size;
1279         sblock_end = (f->fpos + size) / block_size;
1280         u = (f->fpos) % block_size;
1281
1282         if (u) {
1283
1284                 uint32_t ll = size > (block_size - u) ? (block_size - u) : size;
1285
1286                 r = ext4_fs_get_inode_data_block_index(&ref, sblock, &fblock);
1287                 if (r != EOK)
1288                         goto Finish;
1289
1290                 r = ext4_block_get(f->mp->fs.bdev, &b, fblock);
1291                 if (r != EOK)
1292                         goto Finish;
1293
1294                 memcpy(u8_buf, b.data + u, ll);
1295
1296                 r = ext4_block_set(f->mp->fs.bdev, &b);
1297                 if (r != EOK)
1298                         goto Finish;
1299
1300                 u8_buf += ll;
1301                 size -= ll;
1302                 f->fpos += ll;
1303
1304                 if (rcnt)
1305                         *rcnt += ll;
1306
1307                 sblock++;
1308         }
1309
1310         fblock_start = 0;
1311         fblock_cnt = 0;
1312         while (size >= block_size) {
1313                 while (sblock < sblock_end) {
1314                         r = ext4_fs_get_inode_data_block_index(&ref, sblock,
1315                                                                &fblock);
1316                         if (r != EOK)
1317                                 goto Finish;
1318
1319                         sblock++;
1320
1321                         if (!fblock_start) {
1322                                 fblock_start = fblock;
1323                         }
1324
1325                         if ((fblock_start + fblock_cnt) != fblock)
1326                                 break;
1327
1328                         fblock_cnt++;
1329                 }
1330
1331                 r = ext4_blocks_get_direct(f->mp->fs.bdev, u8_buf, fblock_start,
1332                                            fblock_cnt);
1333                 if (r != EOK)
1334                         goto Finish;
1335
1336                 size -= block_size * fblock_cnt;
1337                 u8_buf += block_size * fblock_cnt;
1338                 f->fpos += block_size * fblock_cnt;
1339
1340                 if (rcnt)
1341                         *rcnt += block_size * fblock_cnt;
1342
1343                 fblock_start = fblock;
1344                 fblock_cnt = 1;
1345         }
1346
1347         if (size) {
1348                 r = ext4_fs_get_inode_data_block_index(&ref, sblock, &fblock);
1349                 if (r != EOK)
1350                         goto Finish;
1351
1352                 r = ext4_block_get(f->mp->fs.bdev, &b, fblock);
1353                 if (r != EOK)
1354                         goto Finish;
1355
1356                 memcpy(u8_buf, b.data, size);
1357
1358                 r = ext4_block_set(f->mp->fs.bdev, &b);
1359                 if (r != EOK)
1360                         goto Finish;
1361
1362                 f->fpos += size;
1363
1364                 if (rcnt)
1365                         *rcnt += size;
1366         }
1367
1368 Finish:
1369         ext4_fs_put_inode_ref(&ref);
1370         EXT4_MP_UNLOCK(f->mp);
1371         return r;
1372 }
1373
1374 int ext4_fwrite(ext4_file *f, const void *buf, uint32_t size, uint32_t *wcnt)
1375 {
1376         uint32_t u;
1377         uint32_t fblock;
1378
1379         uint32_t sblock;
1380         uint32_t sblock_end;
1381         uint32_t file_blocks;
1382         uint32_t block_size;
1383         uint32_t fblock_start;
1384         uint32_t fblock_cnt;
1385
1386         struct ext4_block b;
1387         struct ext4_inode_ref ref;
1388         const uint8_t *u8_buf = buf;
1389         int r;
1390
1391         ext4_assert(f && f->mp);
1392
1393         if (f->flags & O_RDONLY)
1394                 return EPERM;
1395
1396         if (!size)
1397                 return EOK;
1398
1399         EXT4_MP_LOCK(f->mp);
1400
1401         if (wcnt)
1402                 *wcnt = 0;
1403
1404         r = ext4_fs_get_inode_ref(&f->mp->fs, f->inode, &ref);
1405         if (r != EOK) {
1406                 EXT4_MP_UNLOCK(f->mp);
1407                 return r;
1408         }
1409
1410         /*Sync file size*/
1411         f->fsize = ext4_inode_get_size(&f->mp->fs.sb, ref.inode);
1412
1413         block_size = ext4_sb_get_block_size(&f->mp->fs.sb);
1414
1415         sblock_end = (f->fpos + size) > f->fsize ? (f->fpos + size) : f->fsize;
1416         sblock_end /= block_size;
1417         file_blocks = (f->fsize / block_size);
1418
1419         if (f->fsize % block_size)
1420                 file_blocks++;
1421
1422         sblock = (f->fpos) / block_size;
1423
1424         u = (f->fpos) % block_size;
1425
1426         if (u) {
1427                 uint32_t ll = size > (block_size - u) ? (block_size - u) : size;
1428
1429                 r = ext4_fs_get_inode_data_block_index(&ref, sblock, &fblock);
1430                 if (r != EOK)
1431                         goto Finish;
1432
1433                 r = ext4_block_get(f->mp->fs.bdev, &b, fblock);
1434                 if (r != EOK)
1435                         goto Finish;
1436
1437                 memcpy(b.data + u, u8_buf, ll);
1438                 b.dirty = true;
1439
1440                 r = ext4_block_set(f->mp->fs.bdev, &b);
1441                 if (r != EOK)
1442                         goto Finish;
1443
1444                 u8_buf += ll;
1445                 size -= ll;
1446                 f->fpos += ll;
1447
1448                 if (wcnt)
1449                         *wcnt += ll;
1450
1451                 sblock++;
1452         }
1453
1454         /*Start write back cache mode.*/
1455         r = ext4_block_cache_write_back(f->mp->fs.bdev, 1);
1456         if (r != EOK)
1457                 goto Finish;
1458
1459         fblock_start = 0;
1460         fblock_cnt = 0;
1461         while (size >= block_size) {
1462
1463                 while (sblock < sblock_end) {
1464                         if (sblock < file_blocks) {
1465                                 r = ext4_fs_get_inode_data_block_index(
1466                                     &ref, sblock, &fblock);
1467                                 if (r != EOK)
1468                                         break;
1469                         } else {
1470                                 r = ext4_fs_append_inode_block(&ref, &fblock,
1471                                                                &sblock);
1472                                 if (r != EOK)
1473                                         break;
1474                         }
1475
1476                         sblock++;
1477
1478                         if (!fblock_start) {
1479                                 fblock_start = fblock;
1480                         }
1481
1482                         if ((fblock_start + fblock_cnt) != fblock)
1483                                 break;
1484
1485                         fblock_cnt++;
1486                 }
1487
1488                 r = ext4_blocks_set_direct(f->mp->fs.bdev, u8_buf, fblock_start,
1489                                            fblock_cnt);
1490                 if (r != EOK)
1491                         break;
1492
1493                 size -= block_size * fblock_cnt;
1494                 u8_buf += block_size * fblock_cnt;
1495                 f->fpos += block_size * fblock_cnt;
1496
1497                 if (wcnt)
1498                         *wcnt += block_size * fblock_cnt;
1499
1500                 fblock_start = fblock;
1501                 fblock_cnt = 1;
1502         }
1503
1504         /*Stop write back cache mode*/
1505         ext4_block_cache_write_back(f->mp->fs.bdev, 0);
1506
1507         if (r != EOK)
1508                 goto Finish;
1509
1510         if (size) {
1511                 if (sblock < file_blocks) {
1512                         r = ext4_fs_get_inode_data_block_index(&ref, sblock,
1513                                                                &fblock);
1514                         if (r != EOK)
1515                                 goto Finish;
1516                 } else {
1517                         r = ext4_fs_append_inode_block(&ref, &fblock, &sblock);
1518                         if (r != EOK)
1519                                 goto Finish;
1520                 }
1521
1522                 r = ext4_block_get(f->mp->fs.bdev, &b, fblock);
1523                 if (r != EOK)
1524                         goto Finish;
1525
1526                 memcpy(b.data, u8_buf, size);
1527                 b.dirty = true;
1528
1529                 r = ext4_block_set(f->mp->fs.bdev, &b);
1530                 if (r != EOK)
1531                         goto Finish;
1532
1533                 f->fpos += size;
1534
1535                 if (wcnt)
1536                         *wcnt += size;
1537         }
1538
1539         if (f->fpos > f->fsize) {
1540                 f->fsize = f->fpos;
1541                 ext4_inode_set_size(ref.inode, f->fsize);
1542                 ref.dirty = true;
1543         }
1544
1545 Finish:
1546         ext4_fs_put_inode_ref(&ref);
1547         EXT4_MP_UNLOCK(f->mp);
1548         return r;
1549 }
1550
1551 int ext4_fseek(ext4_file *f, uint64_t offset, uint32_t origin)
1552 {
1553         switch (origin) {
1554         case SEEK_SET:
1555                 if (offset > f->fsize)
1556                         return EINVAL;
1557
1558                 f->fpos = offset;
1559                 return EOK;
1560         case SEEK_CUR:
1561                 if ((offset + f->fpos) > f->fsize)
1562                         return EINVAL;
1563
1564                 f->fpos += offset;
1565                 return EOK;
1566         case SEEK_END:
1567                 if (offset > f->fsize)
1568                         return EINVAL;
1569
1570                 f->fpos = f->fsize - offset;
1571                 return EOK;
1572         }
1573         return EINVAL;
1574 }
1575
1576 uint64_t ext4_ftell(ext4_file *f) { return f->fpos; }
1577
1578 uint64_t ext4_fsize(ext4_file *f) { return f->fsize; }
1579
1580 int ext4_fchmod(ext4_file *f, uint32_t mode)
1581 {
1582         int r;
1583         uint32_t ino;
1584         struct ext4_sblock *sb;
1585         struct ext4_inode_ref inode_ref;
1586         struct ext4_mountpoint *mp = f->mp;
1587
1588         if (!mp)
1589                 return ENOENT;
1590
1591         EXT4_MP_LOCK(mp);
1592
1593         ino = f->inode;
1594         r = ext4_fs_get_inode_ref(&mp->fs, ino, &inode_ref);
1595         if (r != EOK) {
1596                 EXT4_MP_UNLOCK(mp);
1597                 return r;
1598         }
1599
1600         sb = &f->mp->fs.sb;
1601         ext4_inode_set_mode(sb, inode_ref.inode, mode);
1602         inode_ref.dirty = true;
1603
1604         ext4_fs_put_inode_ref(&inode_ref);
1605         EXT4_MP_UNLOCK(mp);
1606         return r;
1607 }
1608
1609 int ext4_fchown(ext4_file *f, uint32_t uid, uint32_t gid)
1610 {
1611         int r;
1612         uint32_t ino;
1613         struct ext4_inode_ref inode_ref;
1614         struct ext4_mountpoint *mp = f->mp;
1615
1616         if (!mp)
1617                 return ENOENT;
1618
1619         EXT4_MP_LOCK(mp);
1620
1621         ino = f->inode;
1622         r = ext4_fs_get_inode_ref(&mp->fs, ino, &inode_ref);
1623         if (r != EOK) {
1624                 EXT4_MP_UNLOCK(mp);
1625                 return r;
1626         }
1627
1628         ext4_inode_set_uid(inode_ref.inode, uid);
1629         ext4_inode_set_gid(inode_ref.inode, gid);
1630         inode_ref.dirty = true;
1631
1632         ext4_fs_put_inode_ref(&inode_ref);
1633         EXT4_MP_UNLOCK(mp);
1634         return r;
1635 }
1636
1637 int ext4_file_set_atime(ext4_file *f, uint32_t atime)
1638 {
1639         int r;
1640         uint32_t ino;
1641         struct ext4_inode_ref inode_ref;
1642         struct ext4_mountpoint *mp = f->mp;
1643
1644         if (!mp)
1645                 return ENOENT;
1646
1647         EXT4_MP_LOCK(mp);
1648
1649         ino = f->inode;
1650         r = ext4_fs_get_inode_ref(&mp->fs, ino, &inode_ref);
1651         if (r != EOK) {
1652                 EXT4_MP_UNLOCK(mp);
1653                 return r;
1654         }
1655
1656         ext4_inode_set_access_time(inode_ref.inode, atime);
1657         inode_ref.dirty = true;
1658
1659         ext4_fs_put_inode_ref(&inode_ref);
1660         EXT4_MP_UNLOCK(mp);
1661         return r;
1662 }
1663
1664 int ext4_file_set_mtime(ext4_file *f, uint32_t mtime)
1665 {
1666         int r;
1667         uint32_t ino;
1668         struct ext4_inode_ref inode_ref;
1669         struct ext4_mountpoint *mp = f->mp;
1670
1671         if (!mp)
1672                 return ENOENT;
1673
1674         EXT4_MP_LOCK(mp);
1675
1676         ino = f->inode;
1677         r = ext4_fs_get_inode_ref(&mp->fs, ino, &inode_ref);
1678         if (r != EOK) {
1679                 EXT4_MP_UNLOCK(mp);
1680                 return r;
1681         }
1682
1683         ext4_inode_set_modification_time(inode_ref.inode, mtime);
1684         inode_ref.dirty = true;
1685
1686         ext4_fs_put_inode_ref(&inode_ref);
1687         EXT4_MP_UNLOCK(mp);
1688         return r;
1689 }
1690
1691 int ext4_file_set_ctime(ext4_file *f, uint32_t ctime)
1692 {
1693         int r;
1694         uint32_t ino;
1695         struct ext4_inode_ref inode_ref;
1696         struct ext4_mountpoint *mp = f->mp;
1697
1698         if (!mp)
1699                 return ENOENT;
1700
1701         EXT4_MP_LOCK(mp);
1702
1703         ino = f->inode;
1704         r = ext4_fs_get_inode_ref(&mp->fs, ino, &inode_ref);
1705         if (r != EOK) {
1706                 EXT4_MP_UNLOCK(mp);
1707                 return r;
1708         }
1709
1710         ext4_inode_set_change_inode_time(inode_ref.inode, ctime);
1711         inode_ref.dirty = true;
1712
1713         ext4_fs_put_inode_ref(&inode_ref);
1714         EXT4_MP_UNLOCK(mp);
1715         return r;
1716 }
1717
1718 /*********************************DIRECTORY OPERATION************************/
1719
1720 int ext4_dir_rm(const char *path)
1721 {
1722         int r;
1723         int len;
1724         ext4_file f;
1725
1726         struct ext4_mountpoint *mp = ext4_get_mount(path);
1727         struct ext4_inode_ref current;
1728         struct ext4_inode_ref child;
1729         struct ext4_directory_iterator it;
1730
1731         uint32_t name_off;
1732         uint32_t inode_up;
1733         uint32_t inode_current;
1734         uint32_t depth = 1;
1735
1736         bool has_children;
1737         bool is_goal;
1738         bool dir_end;
1739
1740         if (!mp)
1741                 return ENOENT;
1742
1743         EXT4_MP_LOCK(mp);
1744
1745         /*Check if exist.*/
1746         r = ext4_generic_open(&f, path, "r", false, &inode_up, &name_off);
1747         if (r != EOK) {
1748                 EXT4_MP_UNLOCK(mp);
1749                 return r;
1750         }
1751
1752         path += name_off;
1753         len = ext4_path_check(path, &is_goal);
1754
1755         inode_current = f.inode;
1756         dir_end = false;
1757
1758         ext4_block_cache_write_back(mp->fs.bdev, 1);
1759
1760         do {
1761                 /*Load directory node.*/
1762                 r = ext4_fs_get_inode_ref(&f.mp->fs, inode_current, &current);
1763                 if (r != EOK) {
1764                         break;
1765                 }
1766
1767                 /*Initialize iterator.*/
1768                 r = ext4_dir_iterator_init(&it, &current, 0);
1769                 if (r != EOK) {
1770                         ext4_fs_put_inode_ref(&current);
1771                         break;
1772                 }
1773
1774                 while (r == EOK) {
1775
1776                         if (!it.current) {
1777                                 dir_end = true;
1778                                 break;
1779                         }
1780
1781                         /*Get up directory inode when ".." entry*/
1782                         if ((it.current->name_length == 2) &&
1783                             ext4_is_dots(it.current->name,
1784                                          it.current->name_length)) {
1785                                 inode_up = ext4_dir_entry_ll_get_inode(it.current);
1786                         }
1787
1788                         /*If directory or file entry,  but not "." ".." entry*/
1789                         if (!ext4_is_dots(it.current->name,
1790                                           it.current->name_length)) {
1791
1792                                 /*Get child inode reference do unlink
1793                                  * directory/file.*/
1794                                 r = ext4_fs_get_inode_ref(&f.mp->fs,
1795                                         ext4_dir_entry_ll_get_inode(it.current),
1796                                         &child);
1797                                 if (r != EOK)
1798                                         break;
1799
1800                                 /*If directory with no leaf children*/
1801                                 r = ext4_has_children(&has_children, &child);
1802                                 if (r != EOK) {
1803                                         ext4_fs_put_inode_ref(&child);
1804                                         break;
1805                                 }
1806
1807                                 if (has_children) {
1808                                         /*Has directory children. Go into this
1809                                          * directory.*/
1810                                         inode_up = inode_current;
1811                                         inode_current = ext4_dir_entry_ll_get_inode(it.current);
1812                                         depth++;
1813                                         ext4_fs_put_inode_ref(&child);
1814                                         break;
1815                                 }
1816
1817                                 /*No children in child directory or file. Just
1818                                  * unlink.*/
1819                                 r = ext4_unlink(f.mp, &current, &child,
1820                                                 (char *)it.current->name,
1821                                                 it.current->name_length);
1822                                 if (r != EOK) {
1823                                         ext4_fs_put_inode_ref(&child);
1824                                         break;
1825                                 }
1826
1827                                 ext4_inode_set_deletion_time(child.inode,
1828                                                              0xFFFFFFFF);
1829                                 ext4_inode_set_links_count(child.inode, 0);
1830                                 child.dirty = true;
1831                                 /*Turncate*/
1832                                 r = ext4_fs_truncate_inode(&child, 0);
1833                                 if (r != EOK) {
1834                                         ext4_fs_put_inode_ref(&child);
1835                                         break;
1836                                 }
1837
1838                                 r = ext4_fs_free_inode(&child);
1839                                 if (r != EOK) {
1840                                         ext4_fs_put_inode_ref(&child);
1841                                         break;
1842                                 }
1843
1844                                 r = ext4_fs_put_inode_ref(&child);
1845                                 if (r != EOK)
1846                                         break;
1847                         }
1848
1849                         r = ext4_dir_iterator_next(&it);
1850                 }
1851
1852                 if (dir_end) {
1853                         /*Directory iterator reached last entry*/
1854                         ext4_has_children(&has_children, &current);
1855                         if (!has_children) {
1856                                 inode_current = inode_up;
1857                                 if (depth)
1858                                         depth--;
1859                         }
1860                         /*Last unlink*/
1861                         if (!depth) {
1862                                 /*Load parent.*/
1863                                 struct ext4_inode_ref parent;
1864                                 r = ext4_fs_get_inode_ref(&f.mp->fs, inode_up,
1865                                                           &parent);
1866                                 if (r != EOK)
1867                                         goto End;
1868
1869                                 /* In this place all directories should be
1870                                  * unlinked.
1871                                  * Last unlink from root of current directory*/
1872                                 r = ext4_unlink(f.mp, &parent, &current,
1873                                                 (char *)path, len);
1874                                 if (r != EOK) {
1875                                         ext4_fs_put_inode_ref(&parent);
1876                                         goto End;
1877                                 }
1878
1879                                 if (ext4_inode_get_links_count(current.inode) ==
1880                                     2) {
1881                                         ext4_inode_set_deletion_time(
1882                                             current.inode, 0xFFFFFFFF);
1883                                         ext4_inode_set_links_count(
1884                                             current.inode, 0);
1885                                         current.dirty = true;
1886                                         /*Turncate*/
1887                                         r = ext4_fs_truncate_inode(&current, 0);
1888                                         if (r != EOK) {
1889                                                 ext4_fs_put_inode_ref(&parent);
1890                                                 goto End;
1891                                         }
1892
1893                                         r = ext4_fs_free_inode(&current);
1894                                         if (r != EOK) {
1895                                                 ext4_fs_put_inode_ref(&parent);
1896                                                 goto End;
1897                                         }
1898                                 }
1899
1900                                 r = ext4_fs_put_inode_ref(&parent);
1901                                 if (r != EOK)
1902                                         goto End;
1903                         }
1904                 }
1905
1906         End:
1907                 ext4_dir_iterator_fini(&it);
1908                 ext4_fs_put_inode_ref(&current);
1909                 dir_end = false;
1910
1911                 /*When something goes wrong. End loop.*/
1912                 if (r != EOK)
1913                         break;
1914
1915         } while (depth);
1916
1917         ext4_block_cache_write_back(mp->fs.bdev, 0);
1918         EXT4_MP_UNLOCK(mp);
1919         return r;
1920 }
1921
1922 int ext4_dir_mk(const char *path)
1923 {
1924         int r;
1925         ext4_file f;
1926
1927         struct ext4_mountpoint *mp = ext4_get_mount(path);
1928
1929         if (!mp)
1930                 return ENOENT;
1931
1932         EXT4_MP_LOCK(mp);
1933
1934         /*Check if exist.*/
1935         r = ext4_generic_open(&f, path, "r", false, 0, 0);
1936         if (r == EOK) {
1937                 /*Directory already created*/
1938                 EXT4_MP_UNLOCK(mp);
1939                 return r;
1940         }
1941
1942         /*Create new dir*/
1943         r = ext4_generic_open(&f, path, "w", false, 0, 0);
1944         if (r != EOK) {
1945                 EXT4_MP_UNLOCK(mp);
1946                 return r;
1947         }
1948
1949         EXT4_MP_UNLOCK(mp);
1950         return r;
1951 }
1952
1953 int ext4_dir_open(ext4_dir *d, const char *path)
1954 {
1955         struct ext4_mountpoint *mp = ext4_get_mount(path);
1956         int r;
1957
1958         if (!mp)
1959                 return ENOENT;
1960
1961         EXT4_MP_LOCK(mp);
1962         r = ext4_generic_open(&d->f, path, "r", false, 0, 0);
1963         d->next_off = 0;
1964         EXT4_MP_UNLOCK(mp);
1965         return r;
1966 }
1967
1968 int ext4_dir_close(ext4_dir *d) { return ext4_fclose(&d->f); }
1969
1970 const ext4_direntry *ext4_dir_entry_next(ext4_dir *d)
1971 {
1972 #define EXT4_DIR_ENTRY_OFFSET_TERM (uint64_t)(-1)
1973
1974         int r;
1975         ext4_direntry *de = 0;
1976         struct ext4_inode_ref dir;
1977         struct ext4_directory_iterator it;
1978
1979         EXT4_MP_LOCK(d->f.mp);
1980
1981         if (d->next_off == EXT4_DIR_ENTRY_OFFSET_TERM) {
1982                 EXT4_MP_UNLOCK(d->f.mp);
1983                 return 0;
1984         }
1985
1986         r = ext4_fs_get_inode_ref(&d->f.mp->fs, d->f.inode, &dir);
1987         if (r != EOK) {
1988                 goto Finish;
1989         }
1990
1991         r = ext4_dir_iterator_init(&it, &dir, d->next_off);
1992         if (r != EOK) {
1993                 ext4_fs_put_inode_ref(&dir);
1994                 goto Finish;
1995         }
1996
1997         memcpy(&d->de, it.current, sizeof(ext4_direntry));
1998         de = &d->de;
1999
2000         ext4_dir_iterator_next(&it);
2001
2002         d->next_off =
2003             it.current ? it.current_offset : EXT4_DIR_ENTRY_OFFSET_TERM;
2004
2005         ext4_dir_iterator_fini(&it);
2006         ext4_fs_put_inode_ref(&dir);
2007
2008 Finish:
2009         EXT4_MP_UNLOCK(d->f.mp);
2010         return de;
2011 }
2012
2013 /**
2014  * @}
2015  */