[1] | 1 | /* |
---|
[612] | 2 | * sys_opendir.c - Open an user accessible VFS directory. |
---|
[1] | 3 | * |
---|
[625] | 4 | * Author Alain Greiner (2016,2017,2018,2019) |
---|
[1] | 5 | * |
---|
[23] | 6 | * Copyright (c) UPMC Sorbonne Universites |
---|
[1] | 7 | * |
---|
[23] | 8 | * This file is part of ALMOS-MKH. |
---|
| 9 | * |
---|
| 10 | * ALMOS-MKH is free software; you can redistribute it and/or modify it |
---|
[1] | 11 | * under the terms of the GNU General Public License as published by |
---|
| 12 | * the Free Software Foundation; version 2.0 of the License. |
---|
| 13 | * |
---|
[23] | 14 | * ALMOS-MKH is distributed in the hope that it will be useful, but |
---|
[1] | 15 | * WITHOUT ANY WARRANTY; without even the implied warranty of |
---|
| 16 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
---|
| 17 | * General Public License for more details. |
---|
| 18 | * |
---|
| 19 | * You should have received a copy of the GNU General Public License |
---|
[23] | 20 | * along with ALMOS-MKH; if not, write to the Free Software Foundation, |
---|
[1] | 21 | * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
---|
| 22 | */ |
---|
| 23 | |
---|
[611] | 24 | #include <kernel_config.h> |
---|
[457] | 25 | #include <hal_kernel_types.h> |
---|
[610] | 26 | #include <hal_uspace.h> |
---|
[625] | 27 | #include <hal_vmm.h> |
---|
[407] | 28 | #include <thread.h> |
---|
| 29 | #include <process.h> |
---|
[612] | 30 | #include <user_dir.h> |
---|
[407] | 31 | #include <printk.h> |
---|
| 32 | #include <errno.h> |
---|
[611] | 33 | #include <vseg.h> |
---|
[1] | 34 | #include <vfs.h> |
---|
[23] | 35 | #include <syscalls.h> |
---|
[407] | 36 | #include <shared_syscalls.h> |
---|
[1] | 37 | |
---|
| 38 | /////////////////////////////////// |
---|
[407] | 39 | int sys_opendir ( char * pathname, |
---|
| 40 | DIR ** dirp ) |
---|
[1] | 41 | { |
---|
[611] | 42 | error_t error; |
---|
| 43 | xptr_t root_inode_xp; // extended pointer on path root inode |
---|
| 44 | xptr_t inode_xp; // extended pointer on directory inode |
---|
| 45 | vfs_inode_t * inode_ptr; // local pointer on directory inode |
---|
| 46 | cxy_t inode_cxy; // directory inode cluster |
---|
| 47 | uint32_t inode_type; // to check directory inode type |
---|
[612] | 48 | user_dir_t * dir_ptr; // local pointer on user_dir_t |
---|
[611] | 49 | vseg_t * vseg; // for user space checking |
---|
| 50 | intptr_t ident; // dirent array pointer in user space |
---|
[610] | 51 | char kbuf[CONFIG_VFS_MAX_PATH_LENGTH]; |
---|
| 52 | |
---|
[611] | 53 | thread_t * this = CURRENT_THREAD; // client thread |
---|
| 54 | process_t * process = this->process; // client process |
---|
[610] | 55 | |
---|
| 56 | #if (DEBUG_SYS_OPENDIR || CONFIG_INSTRUMENTATION_SYSCALLS) |
---|
| 57 | uint64_t tm_start = hal_get_cycles(); |
---|
| 58 | #endif |
---|
| 59 | |
---|
| 60 | // check DIR buffer in user space |
---|
| 61 | error = vmm_get_vseg( process , (intptr_t)dirp, &vseg ); |
---|
| 62 | |
---|
| 63 | if( error ) |
---|
| 64 | { |
---|
| 65 | |
---|
| 66 | #if DEBUG_SYSCALLS_ERROR |
---|
| 67 | printk("\n[ERROR] in %s / thread[%x,%x] : DIR buffer %x unmapped\n", |
---|
| 68 | __FUNCTION__ , process->pid , this->trdid, dirp ); |
---|
[624] | 69 | hal_vmm_display( process , false ); |
---|
[610] | 70 | #endif |
---|
| 71 | this->errno = EINVAL; |
---|
| 72 | return -1; |
---|
| 73 | } |
---|
| 74 | |
---|
| 75 | // check pathname length |
---|
| 76 | if( hal_strlen_from_uspace( pathname ) >= CONFIG_VFS_MAX_PATH_LENGTH ) |
---|
| 77 | { |
---|
| 78 | |
---|
| 79 | #if DEBUG_SYSCALLS_ERROR |
---|
| 80 | printk("\n[ERROR] in %s / thread[%x,%x] : pathname too long\n", |
---|
| 81 | __FUNCTION__ , process->pid , this->trdid ); |
---|
| 82 | #endif |
---|
| 83 | this->errno = ENFILE; |
---|
| 84 | return -1; |
---|
| 85 | } |
---|
| 86 | |
---|
| 87 | // copy pathname in kernel space |
---|
| 88 | hal_strcpy_from_uspace( kbuf , pathname , CONFIG_VFS_MAX_PATH_LENGTH ); |
---|
| 89 | |
---|
| 90 | #if DEBUG_SYS_OPENDIR |
---|
| 91 | if( DEBUG_SYS_OPENDIR < tm_start ) |
---|
| 92 | printk("\n[%s] thread[%x,%x] enter for directory <%s> / cycle %d\n", |
---|
| 93 | __FUNCTION__, process->pid, this->trdid, kbuf, (uint32_t)tm_start ); |
---|
| 94 | #endif |
---|
| 95 | |
---|
[611] | 96 | // compute root inode for pathname |
---|
[610] | 97 | if( kbuf[0] == '/' ) // absolute path |
---|
| 98 | { |
---|
| 99 | // use extended pointer on VFS root inode |
---|
| 100 | root_inode_xp = process->vfs_root_xp; |
---|
| 101 | } |
---|
| 102 | else // relative path |
---|
| 103 | { |
---|
| 104 | // get cluster and local pointer on reference process |
---|
| 105 | xptr_t ref_xp = process->ref_xp; |
---|
| 106 | process_t * ref_ptr = (process_t *)GET_PTR( ref_xp ); |
---|
| 107 | cxy_t ref_cxy = GET_CXY( ref_xp ); |
---|
| 108 | |
---|
| 109 | // use extended pointer on CWD inode |
---|
| 110 | root_inode_xp = hal_remote_l64( XPTR( ref_cxy , &ref_ptr->cwd_xp ) ); |
---|
| 111 | } |
---|
| 112 | |
---|
[611] | 113 | // get extended pointer on directory inode |
---|
| 114 | error = vfs_lookup( root_inode_xp, |
---|
| 115 | kbuf, |
---|
| 116 | 0, |
---|
| 117 | &inode_xp, |
---|
| 118 | NULL ); |
---|
[610] | 119 | if( error ) |
---|
| 120 | { |
---|
| 121 | |
---|
| 122 | #if DEBUG_SYSCALLS_ERROR |
---|
[611] | 123 | printk("\n[ERROR] in %s / thread[%x,%x] : cannot found directory <%s>\n", |
---|
| 124 | __FUNCTION__ , process->pid , this->trdid , kbuf ); |
---|
[610] | 125 | #endif |
---|
| 126 | this->errno = ENFILE; |
---|
| 127 | return -1; |
---|
| 128 | } |
---|
| 129 | |
---|
[611] | 130 | // check inode type |
---|
| 131 | inode_ptr = GET_PTR( inode_xp ); |
---|
| 132 | inode_cxy = GET_CXY( inode_xp ); |
---|
| 133 | inode_type = hal_remote_l32( XPTR( inode_cxy , &inode_ptr->type ) ); |
---|
[610] | 134 | |
---|
[611] | 135 | if( inode_type != INODE_TYPE_DIR ) |
---|
| 136 | { |
---|
| 137 | |
---|
| 138 | #if DEBUG_SYSCALLS_ERROR |
---|
| 139 | printk("\n[ERROR] in %s / thread[%x,%x] : cannot found directory <%s>\n", |
---|
| 140 | __FUNCTION__ , process->pid , this->trdid , kbuf ); |
---|
| 141 | #endif |
---|
| 142 | this->errno = ENFILE; |
---|
| 143 | return -1; |
---|
| 144 | } |
---|
| 145 | |
---|
[614] | 146 | // create a new user_dir_t structure in target directory inode cluster |
---|
| 147 | // map it in the reference user process VMM (in a new ANON vseg) |
---|
| 148 | // an get the local pointer on the created user_dir_t structure |
---|
[612] | 149 | if( inode_cxy == local_cxy ) |
---|
| 150 | { |
---|
[614] | 151 | dir_ptr = user_dir_create( inode_ptr, |
---|
| 152 | process->ref_xp ); |
---|
[612] | 153 | } |
---|
| 154 | else |
---|
| 155 | { |
---|
| 156 | rpc_user_dir_create_client( inode_cxy, |
---|
| 157 | inode_ptr, |
---|
[614] | 158 | process->ref_xp, |
---|
[612] | 159 | &dir_ptr ); |
---|
| 160 | } |
---|
[611] | 161 | |
---|
[612] | 162 | if( dir_ptr == NULL ) |
---|
[611] | 163 | { |
---|
| 164 | |
---|
| 165 | #if DEBUG_SYSCALLS_ERROR |
---|
[612] | 166 | printk("\n[ERROR] in %s / thread[%x,%x] : cannot create user_dir for <%s>\n", |
---|
[611] | 167 | __FUNCTION__ , process->pid , this->trdid , kbuf ); |
---|
| 168 | #endif |
---|
| 169 | this->errno = ENFILE; |
---|
| 170 | return -1; |
---|
| 171 | } |
---|
| 172 | |
---|
[612] | 173 | // get ident from user_dir structure |
---|
| 174 | ident = (intptr_t)hal_remote_lpt( XPTR( inode_cxy , &dir_ptr->ident ) ); |
---|
[611] | 175 | |
---|
| 176 | // set ident value in user buffer |
---|
[626] | 177 | hal_copy_to_uspace( local_cxy, |
---|
| 178 | &ident, |
---|
| 179 | dirp, |
---|
| 180 | sizeof(intptr_t) ); |
---|
[611] | 181 | |
---|
[610] | 182 | hal_fence(); |
---|
| 183 | |
---|
| 184 | #if (DEBUG_SYS_OPENDIR || CONFIG_INSTRUMENTATION_SYSCALLS) |
---|
| 185 | uint64_t tm_end = hal_get_cycles(); |
---|
| 186 | #endif |
---|
| 187 | |
---|
| 188 | #if DEBUG_SYS_OPENDIR |
---|
| 189 | if( DEBUG_SYS_OPENDIR < tm_end ) |
---|
| 190 | printk("\n[%s] thread[%x,%x] exit for directory <%s> / cycle %d\n", |
---|
| 191 | __FUNCTION__, process->pid, this->trdid, kbuf, (uint32_t)tm_end ); |
---|
| 192 | #endif |
---|
| 193 | |
---|
| 194 | #if CONFIG_INSTRUMENTATION_SYSCALLS |
---|
| 195 | hal_atomic_add( &syscalls_cumul_cost[SYS_OPENDIR] , tm_end - tm_start ); |
---|
| 196 | hal_atomic_add( &syscalls_occurences[SYS_OPENDIR] , 1 ); |
---|
| 197 | #endif |
---|
| 198 | |
---|
| 199 | return 0; |
---|
| 200 | |
---|
| 201 | } // end sys_opendir() |
---|