compiler/clib/__stdio.c

   1 /*
   2     Copyright © 1995-2001, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     Desc: stdio internals
   6     Lang: English
   7 */
   8
   9 #include "__arosc_privdata.h"
  10
  11 #include <stdio.h>
  12 #include <stdlib.h>
  13 #include <fcntl.h>
  14 #include <unistd.h>
  15 #include <errno.h>
  16
  17 #include <exec/lists.h>
  18 #include <dos/dos.h>
  19 #include <proto/exec.h>
  20 #include <proto/dos.h>
  21 #include <aros/symbolsets.h>
  22 #include <aros/debug.h>
  23 #include "__open.h"
  24 #include "__stdio.h"
  25
  26 int __smode2oflags(const char *mode)
  27 {
  28     int ret = -1;
  29     int theresb = 0;
  30
  31     switch (*mode++)
  32     {
  33         case 'r':
  34             ret = O_RDONLY;
  35             break;
  36
  37         case 'w':
  38             ret = O_WRONLY | O_CREAT | O_TRUNC;
  39             break;
  40
  41         case 'a':
  42             ret = O_WRONLY | O_CREAT | O_APPEND;
  43             break;
  44
  45         default:
  46             errno = EINVAL;
  47             return -1;
  48     }
  49
  50     if (*mode == 'b')
  51     {
  52         theresb = 1;
  53         mode++;
  54     }
  55     else if (*mode == 't')
  56     {
  57         // Silently ignore 't' (=text).
  58         // It's deprecated, but it's still in some sources,
  59         // and on other platforms they can compiled without problems.
  60         mode++;
  61     }
  62
  63     if (*mode == '+')
  64     {
  65         ret = O_RDWR | (ret & ~O_ACCMODE);
  66         mode++;
  67     }
  68
  69     if (*mode == 'b' && !theresb)
  70     {
  71         mode++;
  72     }
  73
  74     if (*mode != '\0')
  75     {
  76         errno = EINVAL;
  77         return -1;
  78     }
  79
  80     return ret;
  81 }
  82
  83 int __oflags2sflags(int omode)
  84 {
  85     int ret;
  86
  87     switch (omode & O_ACCMODE)
  88     {
  89         case O_RDONLY:
  90             ret = _STDIO_READ;
  91             break;
  92
  93         case O_WRONLY:
  94             ret = _STDIO_WRITE;
  95             break;
  96
  97         case O_RDWR:
  98             ret = _STDIO_READ | _STDIO_WRITE;
  99             break;
 100
 101         default:
 102             errno = EINVAL;
 103             return 0;
 104     }
 105
 106     if (omode & O_APPEND)
 107         ret |= _STDIO_APPEND;
 108
 109     return ret;
 110 }
 111
 112 int __init_stdio(void)
 113 {
 114     NEWLIST(&__stdio_files);
 115
 116     if
 117     (
 118         !(stdin  = fdopen(STDIN_FILENO, NULL))  ||
 119         !(stdout = fdopen(STDOUT_FILENO, NULL)) ||
 120         !(stderr = fdopen(STDERR_FILENO, NULL))
 121     )
 122     {
 123         SetIoErr(ERROR_NO_FREE_STORE);
 124         return 0;
 125     }
 126
 127     return 1;
 128 }
 129
 130 ADD2INIT(__init_stdio, 5);
 131
 132