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  *
   6  *  This program is free software: you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation, either version 3 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  */
  19
  20
  21 #include <system.h>
  22 #include <string.h>
  23 #include <stdio.h>
  24 #include <file.h>
  25 #include <mount.h>
  26 #include <env.h>
  27 #include <vfs.h>
  28
  29 extern fd_t fd_list;
  30
  31 static fd_t *getbyfd (int id)
  32 {
  33         fd_t *fd;
  34         for (fd = fd_list.next; fd != &fd_list; fd = fd->next) {
  35                 if (fd->id == (unsigned) id)
  36                         return fd;
  37         }
  38
  39         return 0;
  40 }
  41
  42 /* TODO: flags */
  43 int write (unsigned fd, void *buf, unsigned len)
  44 {
  45         fd_t *d = getbyfd (fd);
  46
  47         if (!d)
  48                 return 0;
  49
  50         char pwd[64];
  51         strcpy (pwd, (char *) env_get ("PWD"));
  52
  53         /*partition_t *p = mount_find (pwd);
  54
  55         if (!p) {
  56                 DPRINT ("mount point does not exist !\n");
  57                 return 0;
  58         }*/
  59
  60         /*if (!d->index) {
  61                 DPRINT ("file not found!\n");
  62                 return 0;
  63         }
  64 */
  65         char *file = dir[d->index].name;
  66
  67         if (!file) {
  68                 DPRINT ("write () -> !file\n");
  69                 return 0;
  70         }
  71
  72         unsigned file_len = strlen (file);
  73
  74         /* create file when not exist */
  75         if (d->flags & O_CREAT) {
  76                 vfs_touch ((char *) file, file_len);
  77         }
  78
  79         memcpy (d->s, (char *) buf, len);
  80         d->s[len] = '\0';
  81
  82         if (!d->e) {
  83                 if (!vfs_mmap (file, file_len, buf, len))
  84                         return 0;
  85         } else {
  86                 DPRINT ("write () - !d->e not implemented - O_APPEND..\n");
  87                 return 0;
  88         }
  89
  90         d->e += len;
  91
  92         return 1;
  93 }
  94
  95