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 unsigned int alarm(unsigned int seconds)
 187 {
 188         static int64_t  alarm_time;
 189         if( seconds > 0 )
 190         {
 191                 alarm_time = _SysTimestamp() + seconds * 1000;
 192                 // TODO: Schedule SIGALRM
 193         }
 194         return (alarm_time - _SysTimestamp()) / 1000;
 195 }
 196
 197 int kill(pid_t pid, int signal)
 198 {
 199         // TODO: Need special handling?
 200         return _SysKill(pid, signal);
 201 }
 202
 203 int select(int nfd, fd_set *rfd, fd_set *wfd, fd_set *efd, struct timeval *timeout)
 204 {
 205         long long int   ltimeout = 0, *ltimeoutp = NULL;
 206         if( timeout )
 207         {
 208                 ltimeout = timeout->tv_sec*1000 + timeout->tv_usec / 1000;
 209                 ltimeoutp = &ltimeout;
 210         }
 211         _SysDebug("select(%i,{0x%x},{0x%x},{0x%x},%lli)",
 212                 nfd, (rfd?rfd->flags[0]:0), (wfd?wfd->flags[0]:0), (efd?efd->flags[0]:0),
 213                 (ltimeoutp ? *ltimeoutp : -1)
 214                 );
 215         return _SysSelect(nfd, rfd, wfd, efd, ltimeoutp, 0);
 216 }
 217
 218 int pipe(int pipefd[2])
 219 {
 220         pipefd[0] = _SysOpen("/Devices/fifo/anon", OPENFLAG_READ|OPENFLAG_WRITE);
 221         pipefd[1] = _SysCopyFD(pipefd[0], -1);
 222         _SysFDFlags(pipefd[1], OPENFLAG_READ|OPENFLAG_WRITE, OPENFLAG_WRITE);
 223         _SysDebug("pipe({%i,%i})", pipefd[0], pipefd[1]);
 224         return 0;
 225 }
 226
 227 int chdir(const char *dir)
 228 {
 229         return _SysChdir(dir);
 230 }
 231
 232 int rmdir(const char *pathname)
 233 {
 234 //      return _SysUnlink(pathname);
 235         _SysDebug("TODO: POSIX rmdir('%s')", pathname);
 236         errno = ENOTIMPL;
 237         return -1;
 238 }
 239
 240 int mkdir(const char *pathname, mode_t mode)
 241 {
 242         _SysDebug("TODO: POSIX mkdir('%s', 0%o)", pathname, mode);
 243         _SysMkDir(pathname);
 244         return 0;
 245 }
 246
 247 char *getpass(const char *prompt)
 248 {
 249         static char passbuf[PASS_MAX+1];
 250         struct ptymode  oldmode, mode;
 251         _SysIOCtl(STDIN_FILENO, PTY_IOCTL_GETMODE, &oldmode);
 252         mode.InputMode = PTYIMODE_CANON;
 253         mode.OutputMode = 0;
 254         _SysIOCtl(STDIN_FILENO, PTY_IOCTL_SETMODE, &mode);
 255         fprintf(stderr, "%s", prompt);
 256         fflush(stdin);  // clear stdin buffer
 257         fgets(passbuf, PASS_MAX+1, stdin);
 258         fprintf(stderr, "\n");
 259         for( int i = strlen(passbuf); i > 0 && (passbuf[i-1] == '\r' || passbuf[i-1] == '\n'); i -- )
 260                 passbuf[i-1] = 0;
 261
 262         _SysIOCtl(STDIN_FILENO, PTY_IOCTL_SETMODE, &oldmode);
 263
 264         return passbuf;
 265 }
 266
 267 char *ttyname(int fd)
 268 {
 269         static char ttyname_buf[32];
 270         errno = ttyname_r(fd, ttyname_buf, sizeof(ttyname_buf));
 271         if(errno)       return NULL;
 272
 273         return ttyname_buf;
 274 }
 275 int ttyname_r(int fd, char *buf, size_t buflen)
 276 {
 277          int    type = _SysIOCtl(fd, DRV_IOCTL_TYPE, NULL);
 278         if( type == -1 )
 279                 return errno;
 280         if( type != DRV_TYPE_TERMINAL )
 281                 return ENOTTY;
 282
 283         _SysIOCtl(fd, PTY_IOCTL_GETID, NULL);
 284
 285         _SysDebug("TODO: ttyname_r");
 286
 287         return ENOTIMPL;
 288 }