Usermode/Libraries/libposix.so_src/unistd.c

   1 /*
   2  * Acess2 POSIX Emulation Layer
   3  * - By John Hodge
   4  *
   5  * unistd.c
   6  * - POSIX->Acess VFS call translation
   7  */
   8 #include <unistd.h>
   9 #include <acess/sys.h>
  10 #include <stdarg.h>
  11 #include <sys/select.h>
  12 #include <stdio.h>
  13 #include <string.h>
  14 #include <acess/devices/pty.h>
  15 #include <errno.h>
  16
  17 // === CODE ===
  18 int unlink(const char *pathname)
  19 {
  20         return _SysUnlink(pathname);
  21 }
  22
  23 int open(const char *path, int openmode, ...)
  24 {
  25         mode_t  create_mode = 0;
  26         int openflags = 0;
  27
  28         switch( openmode & O_RDWR )
  29         {
  30         case 0: // Special
  31                 break;
  32         case O_RDONLY:  openflags |= OPENFLAG_READ;     break;
  33         case O_WRONLY:  openflags |= OPENFLAG_WRITE;    break;
  34         case O_RDWR:    openflags |= OPENFLAG_READ|OPENFLAG_WRITE;      break;
  35         }
  36
  37         if( openmode & O_CREAT ) {
  38                 openflags |= OPENFLAG_CREATE;
  39                 va_list args;
  40                 va_start(args, openmode);
  41                 create_mode = va_arg(args, mode_t);
  42                 va_end(args);
  43         }
  44
  45         if( openmode & O_NONBLOCK )
  46                 openflags |= OPENFLAG_NONBLOCK;
  47
  48         int ret = _SysOpen(path, openflags, create_mode);
  49         _SysDebug("open('%s', 0%o, 0%o) = %i", path, openmode, create_mode, ret);
  50         return ret;
  51 }
  52
  53 int creat(const char *path, mode_t mode)
  54 {
  55         // TODO: Make native call to do this cheaper
  56         int fd = _SysOpen(path, OPENFLAG_CREATE, mode);
  57         if( fd == -1 )  return -1;
  58         _SysClose(fd);
  59         return 0;
  60 }
  61
  62 int close(int fd)
  63 {
  64         _SysClose(fd);
  65         return 0;
  66 }
  67
  68 ssize_t write(int fd, const void *buf, size_t count)
  69 {
  70         return _SysWrite(fd, buf, count);
  71 }
  72
  73 ssize_t read(int fd, void *buf, size_t count)
  74 {
  75         return _SysRead(fd, buf, count);
  76 }
  77
  78 int seek(int fd, int whence, off_t dest)
  79 {
  80         return _SysSeek(fd, whence, dest);
  81 }
  82
  83 off_t lseek(int fd, off_t offset, int whence)
  84 {
  85         return _SysSeek(fd, whence, offset);
  86 }
  87
  88 off_t tell(int fd)
  89 {
  90         return _SysTell(fd);
  91 }
  92
  93 int fork(void)
  94 {
  95         return _SysClone(CLONE_VM, 0);
  96 }
  97
  98 int execv(const char *b, char *v[])
  99 {
 100         return _SysExecVE(b, v, NULL);
 101 }
 102
 103 int dup(int oldfd)
 104 {
 105         _SysDebug("libposix: dup() does not share offsets/flags");
 106         // NOTE: Acess's CopyFD doesn't cause offset sharing
 107         int ret = _SysCopyFD(oldfd, -1);
 108         _SysDebug("dup(%i) = %i", oldfd, ret);
 109         return ret;
 110 }
 111
 112 int dup2(int oldfd, int newfd)
 113 {
 114         _SysDebug("libposix: dup2() does not share offsets/flags");
 115         // NOTE: Acess's CopyFD doesn't cause offset sharing
 116         _SysDebug("dup2(%i,%i)", oldfd, newfd);
 117         return _SysCopyFD(oldfd, newfd);
 118 }
 119
 120 int chown(const char *path, uid_t owner, gid_t group)
 121 {
 122         _SysDebug("TODO: chown(%s, %i, %i)", path, owner, group);
 123         errno = ENOTIMPL;
 124         return -1;
 125 }
 126 int chmod(const char *path, mode_t mode)
 127 {
 128         _SysDebug("TODO: chmod(%s, 0%o)", path, mode);
 129         errno = ENOTIMPL;
 130         return -1;
 131 }
 132
 133 /*
 134  * Set session ID to PID
 135  */
 136 pid_t setsid(void)
 137 {
 138         // TODO: actual syscall for this
 139         return _SysGetPID();
 140 }
 141
 142 pid_t getpid(void)
 143 {
 144         return _SysGetPID();
 145 }
 146
 147 uid_t getuid(void)
 148 {
 149         return _SysGetUID();
 150 }
 151 gid_t getgid(void)
 152 {
 153         return _SysGetGID();
 154 }
 155
 156 uid_t geteuid(void)
 157 {
 158         // TODO: Impliment EUIDs in-kernel?
 159         return _SysGetUID();
 160 }
 161
 162 int seteuid(uid_t euid)
 163 {
 164         _SysDebug("TODO: %s", __func__);
 165         return 0;
 166 }
 167 int setegid(gid_t egid)
 168 {
 169         _SysDebug("TODO: %s", __func__);
 170         return 0;
 171 }
 172
 173 unsigned int sleep(unsigned int seconds)
 174 {
 175         int64_t start = _SysTimestamp();
 176         _SysTimedSleep( seconds*1000 );
 177         return (_SysTimestamp() - start) / 1000;
 178 }
 179
 180 int usleep(useconds_t usec)
 181 {
 182         _SysTimedSleep( (usec+999)/1000 );
 183         return 0;
 184 }
 185
 186 int kill(pid_t pid, int signal)
 187 {
 188         // TODO: Need special handling?
 189         return _SysKill(pid, signal);
 190 }
 191
 192 int select(int nfd, fd_set *rfd, fd_set *wfd, fd_set *efd, struct timeval *timeout)
 193 {
 194         long long int   ltimeout = 0, *ltimeoutp = NULL;
 195         if( timeout )
 196         {
 197                 ltimeout = timeout->tv_sec*1000 + timeout->tv_usec / 1000;
 198                 ltimeoutp = &ltimeout;
 199         }
 200         _SysDebug("select(%i,{0x%x},{0x%x},{0x%x},%lli)",
 201                 nfd, (rfd?rfd->flags[0]:0), (wfd?wfd->flags[0]:0), (efd?efd->flags[0]:0),
 202                 (ltimeoutp ? *ltimeoutp : -1)
 203                 );
 204         return _SysSelect(nfd, rfd, wfd, efd, ltimeoutp, 0);
 205 }
 206
 207 int pipe(int pipefd[2])
 208 {
 209         pipefd[0] = _SysOpen("/Devices/fifo/anon", OPENFLAG_READ|OPENFLAG_WRITE);
 210         pipefd[1] = _SysCopyFD(pipefd[0], -1);
 211         _SysFDFlags(pipefd[1], OPENFLAG_READ|OPENFLAG_WRITE, OPENFLAG_WRITE);
 212         _SysDebug("pipe({%i,%i})", pipefd[0], pipefd[1]);
 213         return 0;
 214 }
 215
 216 int chdir(const char *dir)
 217 {
 218         return _SysChdir(dir);
 219 }
 220
 221 int rmdir(const char *pathname)
 222 {
 223 //      return _SysUnlink(pathname);
 224         _SysDebug("TODO: POSIX rmdir('%s')", pathname);
 225         errno = ENOTIMPL;
 226         return -1;
 227 }
 228
 229 int mkdir(const char *pathname, mode_t mode)
 230 {
 231         _SysDebug("TODO: POSIX mkdir('%s', 0%o)", pathname, mode);
 232         _SysMkDir(pathname);
 233         return 0;
 234 }
 235
 236 char *getpass(const char *prompt)
 237 {
 238         static char passbuf[PASS_MAX+1];
 239         struct ptymode  oldmode, mode;
 240         _SysIOCtl(STDIN_FILENO, PTY_IOCTL_GETMODE, &oldmode);
 241         mode.InputMode = PTYIMODE_CANON;
 242         mode.OutputMode = 0;
 243         _SysIOCtl(STDIN_FILENO, PTY_IOCTL_SETMODE, &mode);
 244         fprintf(stderr, "%s", prompt);
 245         fflush(stdin);  // clear stdin buffer
 246         fgets(passbuf, PASS_MAX+1, stdin);
 247         fprintf(stderr, "\n");
 248         for( int i = strlen(passbuf); i > 0 && (passbuf[i-1] == '\r' || passbuf[i-1] == '\n'); i -- )
 249                 passbuf[i-1] = 0;
 250
 251         _SysIOCtl(STDIN_FILENO, PTY_IOCTL_SETMODE, &oldmode);
 252
 253         return passbuf;
 254 }
 255
 256 char *ttyname(int fd)
 257 {
 258         static char ttyname_buf[32];
 259         errno = ttyname_r(fd, ttyname_buf, sizeof(ttyname_buf));
 260         if(errno)       return NULL;
 261
 262         return ttyname_buf;
 263 }
 264 int ttyname_r(int fd, char *buf, size_t buflen)
 265 {
 266          int    type = _SysIOCtl(fd, DRV_IOCTL_TYPE, NULL);
 267         if( type == -1 )
 268                 return errno;
 269         if( type != DRV_TYPE_TERMINAL )
 270                 return ENOTTY;
 271
 272         _SysIOCtl(fd, PTY_IOCTL_GETID, NULL);
 273
 274         _SysDebug("TODO: ttyname_r");
 275
 276         return ENOTIMPL;
 277 }