kernel/lib/stdio/write.c

   1 /*
   2  *  ZeX/OS
   3  *  Copyright (C) 2007  Tomas 'ZeXx86' Jedrzejek (zexx86@gmail.com)
   4  *  Copyright (C) 2008  Tomas 'ZeXx86' Jedrzejek (zexx86@gmail.com)
   5  *  Copyright (C) 2009  Martin 'povik' Poviser (martin.povik@gmail.com)
   6  *
   7  *  This program is free software: you can redistribute it and/or modify
   8  *  it under the terms of the GNU General Public License as published by
   9  *  the Free Software Foundation, either version 3 of the License, or
  10  *  (at your option) any later version.
  11  *
  12  *  This program is distributed in the hope that it will be useful,
  13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *  GNU General Public License for more details.
  16  *
  17  *  You should have received a copy of the GNU General Public License
  18  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  19  */
  20
  21
  22 #include <system.h>
  23 #include <string.h>
  24 #include <stdio.h>
  25 #include <file.h>
  26 #include <mount.h>
  27 #include <env.h>
  28 #include <vfs.h>
  29 #include <fd.h>
  30 #include <pipe.h>
  31
  32 /* TODO: flags */
  33
  34 int write (unsigned fd, void *buf, unsigned len)
  35 {
  36         fd_t *d = fd_get (fd);
  37
  38         if (!d)
  39                 return 0;
  40
  41         if (d->flags & FD_PIPE) {
  42                 pipe_t *p = pipe_get (fd);
  43                 if (p) {
  44                         return pipe_write (p, buf, len);
  45                 } else
  46                         return 0;
  47         }
  48
  49         char *file = dir[d->index].name;
  50
  51         if (!file) {
  52                 DPRINT ("write () -> !file\n");
  53                 return 0;
  54         }
  55
  56         unsigned file_len = strlen (file);
  57
  58         /* create file when not exist */
  59         if (d->flags & O_CREAT) {
  60                 vfs_touch ((char *) file, file_len);
  61         }
  62
  63         memcpy (d->s, (char *) buf, len);
  64         d->s[len] = '\0';
  65
  66         if (!d->e) {
  67                 if (!vfs_mmap (file, file_len, buf, len))
  68                         return 0;
  69         } else {
  70                 DPRINT ("write () - !d->e not implemented - O_APPEND..\n");
  71                 return 0;
  72         }
  73
  74         d->e += len;
  75
  76         return 1;
  77 }
  78
  79