Fixing syscalls to new seterrno and setretval.
[akaros.git] / kern / src / vfs.c
index eb39a7c..45851f2 100644 (file)
@@ -14,6 +14,7 @@
 #include <kfs.h>
 #include <pmap.h>
 #include <umem.h>
+#include <smp.h>
 
 struct sb_tailq super_blocks = TAILQ_HEAD_INITIALIZER(super_blocks);
 spinlock_t super_blocks_lock = SPINLOCK_INITIALIZER;
@@ -146,15 +147,6 @@ static struct dentry *do_lookup(struct dentry *parent, char *name)
        return dentry;
 }
 
-/* Walk up one directory, being careful of mountpoints, namespaces, and the top
- * of the FS */
-static int climb_up(struct nameidata *nd)
-{
-       // TODO
-       warn("Climbing up (../) in path lookup not supported yet!");
-       return 0;
-}
-
 /* Update ND such that it represents having followed dentry.  IAW the nd
  * refcnting rules, we need to decref any references that were in there before
  * they get clobbered. */
@@ -174,6 +166,32 @@ static int next_link(struct dentry *dentry, struct nameidata *nd)
        return 0;
 }
 
+/* Walk up one directory, being careful of mountpoints, namespaces, and the top
+ * of the FS */
+static int climb_up(struct nameidata *nd)
+{
+       printd("CLIMB_UP, from %s\n", nd->dentry->d_name.name);
+       /* Top of the world, just return.  Should also check for being at the top of
+        * the current process's namespace (TODO) */
+       if (!nd->dentry->d_parent)
+               return -1;
+       /* Check if we are at the top of a mount, if so, we need to follow
+        * backwards, and then climb_up from that one.  We might need to climb
+        * multiple times if we mount multiple FSs at the same spot (highly
+        * unlikely).  This is completely untested.  Might recurse instead. */
+       while (nd->mnt->mnt_root == nd->dentry) {
+               if (!nd->mnt->mnt_parent) {
+                       warn("Might have expected a parent vfsmount (dentry had a parent)");
+                       return -1;
+               }
+               next_link(nd->mnt->mnt_mountpoint, nd);
+       }
+       /* Backwards walk (no mounts or any other issues now). */
+       next_link(nd->dentry->d_parent, nd);
+       printd("CLIMB_UP, to   %s\n", nd->dentry->d_name.name);
+       return 0;
+}
+
 static int follow_mount(struct nameidata *nd)
 {
        /* Detect mount, follow, etc... (TODO!) */
@@ -186,6 +204,19 @@ static int follow_symlink(struct nameidata *nd)
        return 0;
 }
 
+/* Little helper, to make it easier to break out of the nested loops.  Will also
+ * '\0' out the first slash if it's slashes all the way down.  Or turtles. */
+static bool packed_trailing_slashes(char *first_slash)
+{
+       for (char *i = first_slash; *i == '/'; i++) {
+               if (*(i + 1) == '\0') {
+                       *first_slash = '\0';
+                       return TRUE;
+               }
+       }
+       return FALSE;
+}
+
 /* Resolves the links in a basic path walk.  0 for success, -EWHATEVER
  * otherwise.  The final lookup is returned via nd. */
 static int link_path_walk(char *path, struct nameidata *nd)
@@ -214,25 +245,21 @@ static int link_path_walk(char *path, struct nameidata *nd)
                        return error;
                /* find the next link, break out if it is the end */
                next_slash = strchr(link, '/');
-               if (!next_slash)
+               if (!next_slash) {
                        break;
-               else
-                       if (*(next_slash + 1) == '\0') {
-                               /* trailing slash on the path meant the target is a dir */
+               } else {
+                       if (packed_trailing_slashes(next_slash)) {
                                nd->flags |= LOOKUP_DIRECTORY;
-                               *next_slash = '\0';
                                break;
                        }
-               /* skip over any interim ./ */
-               if (!strncmp("./", link, 2)) {
-                       link = next_slash + 1;
-                       continue;
                }
+               /* skip over any interim ./ */
+               if (!strncmp("./", link, 2))
+                       goto next_loop;
                /* Check for "../", walk up */
                if (!strncmp("../", link, 3)) {
                        climb_up(nd);
-                       link = next_slash + 2;
-                       continue;
+                       goto next_loop;
                }
                *next_slash = '\0';
                link_dentry = do_lookup(nd->dentry, link);
@@ -247,8 +274,13 @@ static int link_path_walk(char *path, struct nameidata *nd)
                follow_symlink(nd);
                if (!(nd->dentry->d_inode->i_type & FS_I_DIR))
                        return -ENOTDIR;
+next_loop:
                /* move through the path string to the next entry */
                link = next_slash + 1;
+               /* advance past any other interim slashes.  we know we won't hit the end
+                * due to the for loop check above */
+               while (*link == '/')
+                       link++;
        }
        /* now, we're on the last link of the path */
        /* if we just want the parent, leave now.  and save the name of the link
@@ -493,7 +525,7 @@ struct inode *get_inode(struct dentry *dentry)
         * specific stuff. */
        struct inode *inode = sb->s_op->alloc_inode(sb);
        if (!inode) {
-               set_errno(current_tf, ENOMEM);
+               set_errno(ENOMEM);
                return 0;
        }
        TAILQ_INSERT_HEAD(&sb->s_inodes, inode, i_sb_list);             /* weak inode ref */
@@ -508,6 +540,7 @@ struct inode *get_inode(struct dentry *dentry)
        inode->i_sb = sb;
        inode->i_state = 0;                                     /* need real states, like I_NEW */
        inode->dirtied_when = 0;
+       inode->i_flags = 0;
        atomic_set(&inode->i_writecount, 0);
        /* Set up the page_map structures.  Default is to use the embedded one.
         * Might push some of this back into specific FSs.  For now, the FS tells us
@@ -553,7 +586,7 @@ static struct inode *create_inode(struct dentry *dentry, int mode)
 /* Create a new disk inode in dir associated with dentry, with the given mode.
  * called when creating a regular file.  dir is the directory/parent.  dentry is
  * the dentry of the inode we are creating.  Note the lack of the nd... */
-int create_file(struct inode *dir, struct dentry *dentry, int flags, int mode)
+int create_file(struct inode *dir, struct dentry *dentry, int mode)
 {
        struct inode *new_file = create_inode(dentry, mode);
        if (!new_file)
@@ -562,8 +595,6 @@ int create_file(struct inode *dir, struct dentry *dentry, int flags, int mode)
        /* when we have notions of users, do something here: */
        new_file->i_uid = 0;
        new_file->i_gid = 0;
-       /* Not supposed to keep these creation flags */
-       new_file->i_flags = flags & ~(O_CREAT|O_TRUNC|O_EXCL|O_NOCTTY);
        kref_put(&new_file->i_kref);
        return 0;
 }
@@ -608,6 +639,45 @@ void inode_release(struct kref *kref)
        // kref_put(inode->i_bdev->kref); /* assuming it's a bdev */
 }
 
+/* Looks up the inode for the given path, returning a refcnt'd inode (or 0).
+ * Permissions are applied for the current user, which is quite a broken system
+ * at the moment.  Flags are lookup flags. */
+struct inode *lookup_inode(char *path, int flags)
+{
+       struct inode *inode;
+       struct nameidata nd_r = {0}, *nd = &nd_r;
+       int error;
+
+       error = path_lookup(path, flags, nd);
+       if (error) {
+               path_release(nd);
+               set_errno(-error);
+               return 0;
+       }
+       inode = nd->dentry->d_inode;
+       kref_get(&inode->i_kref, 1);
+       path_release(nd);
+       return inode;
+}
+
+/* Fills in kstat with the stat information for the inode */
+void stat_inode(struct inode *inode, struct kstat *kstat)
+{
+       kstat->st_dev = inode->i_sb->s_dev;
+       kstat->st_ino = inode->i_ino;
+       kstat->st_mode = inode->i_mode;
+       kstat->st_nlink = inode->i_nlink;
+       kstat->st_uid = inode->i_uid;
+       kstat->st_gid = inode->i_gid;
+       kstat->st_rdev = inode->i_rdev;
+       kstat->st_size = inode->i_size;
+       kstat->st_blksize = inode->i_blksize;
+       kstat->st_blocks = inode->i_blocks;
+       kstat->st_atime = inode->i_atime;
+       kstat->st_mtime = inode->i_mtime;
+       kstat->st_ctime = inode->i_ctime;
+}
+
 /* File functions */
 
 /* Read count bytes from the file into buf, starting at *offset, which is increased
@@ -712,9 +782,10 @@ ssize_t generic_file_write(struct file *file, const char *buf, size_t count,
 
 /* Opens the file, using permissions from current for lack of a better option.
  * It will attempt to create the file if it does not exist and O_CREAT is
- * specified.  This will return 0 on failure, and set errno.
- * TODO: There's a lot of stuff that we don't do, esp related to permission
- * checking and file truncating.  Create should set errno and propagate it up.*/
+ * specified.  This will return 0 on failure, and set errno.  TODO: There's some
+ * stuff that we don't do, esp related file truncating/creation.  flags are for
+ * opening, the mode is for creating.  The flags related to how to create
+ * (O_CREAT_FLAGS) are handled in this function, not in create_file() */
 struct file *do_file_open(char *path, int flags, int mode)
 {
        struct file *file = 0;
@@ -722,7 +793,7 @@ struct file *do_file_open(char *path, int flags, int mode)
        struct inode *parent_i;
        struct nameidata nd_r = {0}, *nd = &nd_r;
        int lookup_flags = LOOKUP_PARENT;
-       int error = 0;
+       int error;
 
        /* lookup the parent */
        nd->intent = flags & (O_RDONLY|O_WRONLY|O_RDWR);
@@ -730,7 +801,8 @@ struct file *do_file_open(char *path, int flags, int mode)
                lookup_flags |= LOOKUP_CREATE;
        error = path_lookup(path, lookup_flags, nd);
        if (error) {
-               set_errno(current_tf, -error);
+               path_release(nd);
+               set_errno(-error);
                return 0;
        }
        /* see if the target is there, handle accordingly */
@@ -738,15 +810,15 @@ struct file *do_file_open(char *path, int flags, int mode)
        if (!file_d) {
                if (!(flags & O_CREAT)) {
                        path_release(nd);
-                       set_errno(current_tf, ENOENT);
+                       set_errno(ENOENT);
                        return 0;
                }
                /* Create the inode/file.  get a fresh dentry too: */
                file_d = get_dentry(nd->dentry->d_sb, nd->dentry, nd->last.name);
                parent_i = nd->dentry->d_inode;
-               /* TODO: mode should be & ~umask.  Note that mode only applies to future
-                * opens. */
-               if (create_file(parent_i, file_d, flags, mode)) {
+               /* TODO: mode should be & ~umask.  Note that mode technically should
+                * only apply to future opens, though we apply it immediately. */
+               if (create_file(parent_i, file_d, mode)) {
                        kref_put(&file_d->d_kref);
                        path_release(nd);
                        return 0;
@@ -757,7 +829,7 @@ struct file *do_file_open(char *path, int flags, int mode)
                        /* wanted to create, not open, bail out */
                        kref_put(&file_d->d_kref);
                        path_release(nd);
-                       set_errno(current_tf, EACCES);
+                       set_errno(EACCES);
                        return 0;
                }
        }
@@ -765,15 +837,12 @@ struct file *do_file_open(char *path, int flags, int mode)
         * point, file_d is a refcnt'd dentry, regardless of which branch we took.*/
        if (flags & O_TRUNC)
                warn("File truncation not supported yet.");
-       file = dentry_open(file_d);             /* sets errno */
+       file = dentry_open(file_d, flags);              /* sets errno */
        if (!file) {
                kref_put(&file_d->d_kref);
                path_release(nd);
                return 0;
        }
-       /* TODO: check the inode's mode (S_XXX) against the flags O_RDWR */
-       /* f_mode stores how the FILE is open, regardless of the mode */
-       file->f_mode = flags & (O_RDONLY|O_WRONLY|O_RDWR);
        kref_put(&file_d->d_kref);
        path_release(nd);
        return file;
@@ -796,15 +865,34 @@ int do_file_access(char *path, int mode)
 }
 
 /* Opens and returns the file specified by dentry */
-struct file *dentry_open(struct dentry *dentry)
+struct file *dentry_open(struct dentry *dentry, int flags)
 {
        struct inode *inode;
+       int desired_mode;
        struct file *file = kmem_cache_alloc(file_kcache, 0);
        if (!file) {
-               set_errno(current_tf, ENOMEM);
+               set_errno(ENOMEM);
                return 0;
        }
        inode = dentry->d_inode;
+       /* Do the mode first, since we can still error out.  f_mode stores how the
+        * OS file is open, which can be more restrictive than the i_mode */
+       switch (flags & (O_RDONLY | O_WRONLY | O_RDWR)) {
+               case O_RDONLY:
+                       desired_mode = S_IRUSR;
+                       break;
+               case O_WRONLY:
+                       desired_mode = S_IWUSR;
+                       break;
+               case O_RDWR:
+                       desired_mode = S_IRUSR | S_IWUSR;
+                       break;
+               default:
+                       goto error_access;
+       }
+       if (check_perms(inode, desired_mode))
+               goto error_access;
+       file->f_mode = desired_mode;
        /* one for the ref passed out, and *none* for the sb TAILQ */
        kref_init(&file->f_kref, file_release, 1);
        /* Add to the list of all files of this SB */
@@ -814,8 +902,8 @@ struct file *dentry_open(struct dentry *dentry)
        kref_get(&inode->i_sb->s_mount->mnt_kref, 1);
        file->f_vfsmnt = inode->i_sb->s_mount;          /* saving a ref to the vmnt...*/
        file->f_op = inode->i_fop;
-       file->f_flags = inode->i_flags;                         /* just taking the inode vals */
-       file->f_mode = inode->i_mode;
+       /* Don't store open mode or creation flags */
+       file->f_flags = flags & ~(O_ACCMODE | O_CREAT_FLAGS);
        file->f_pos = 0;
        file->f_uid = inode->i_uid;
        file->f_gid = inode->i_gid;
@@ -826,6 +914,10 @@ struct file *dentry_open(struct dentry *dentry)
        file->f_mapping = inode->i_mapping;
        file->f_op->open(inode, file);
        return file;
+error_access:
+       set_errno(EACCES);
+       kmem_cache_free(file_kcache, file);
+       return 0;
 }
 
 /* Closes a file, fsync, whatever else is necessary.  Called when the kref hits
@@ -1088,3 +1180,66 @@ void clone_files(struct files_struct *src, struct files_struct *dst)
        spin_unlock(&dst->lock);
        spin_unlock(&src->lock);
 }
+
+static void print_dir(struct dentry *dentry, char *buf, int depth)
+{
+       struct dentry *child_d;
+       struct dirent next;
+       struct file *dir;
+       int retval;
+       int child_num = 0;
+
+       if (!dentry->d_inode->i_type & FS_I_DIR) {
+               warn("Thought this was only directories!!");
+               return;
+       }
+       /* Print this dentry */
+       printk("%s%s/\n", buf, dentry->d_name.name);
+       if (depth >= 32)
+               return;
+       /* Set buffer for our kids */
+       buf[depth] = '\t';
+       dir = dentry_open(dentry, 0);
+       if (!dir)
+               panic("Filesystem seems inconsistent - unable to open a dir!");
+       /* Process every child, recursing on directories */
+       while (1) {
+               next.d_off = child_num++;
+               retval = dir->f_op->readdir(dir, &next);
+               if (retval >= 0) {
+                       /* there is an entry, now get its dentry */
+                       child_d = do_lookup(dentry, next.d_name);
+                       if (!child_d)
+                               panic("Inconsistent FS, dirent doesn't have a dentry!");
+                       /* Recurse for directories, or just print the name for others */
+                       if (child_d->d_inode->i_type & FS_I_DIR)
+                               print_dir(child_d, buf, depth + 1);
+                       else
+                               printk("%s%s  size(B): %d\n", buf, next.d_name,
+                                      child_d->d_inode->i_size);
+                       kref_put(&child_d->d_kref);     
+               }
+               if (retval <= 0)
+                       break;
+       }
+       /* Reset buffer to the way it was */
+       buf[depth] = '\0';
+       kref_put(&dir->f_kref);
+}
+
+/* Debugging */
+int ls_dash_r(char *path)
+{
+       struct nameidata nd_r = {0}, *nd = &nd_r;
+       int error;
+       char buf[32] = {0};
+
+       error = path_lookup(path, LOOKUP_ACCESS | LOOKUP_DIRECTORY, nd);
+       if (error) {
+               path_release(nd);
+               return error;
+       }
+       print_dir(nd->dentry, buf, 0);
+       path_release(nd);
+       return 0;
+}