kernel/lib/stdio/close.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 <file.h>
  24 #include <fd.h>
  25 #include <net/socket.h>
  26 #include <pipe.h>
  27
  28 int close (int fd)
  29 {
  30         fd_t *f = fd_get (fd);
  31
  32         if (!f)
  33                 return 0;
  34
  35         if (f->flags & FD_SOCK) // socket close
  36                 sclose (fd);
  37
  38         if (f->flags & FD_PIPE) // pipe close
  39                 pipe_close (fd);
  40
  41         f->id = 0;
  42         f->flags = 0;
  43         f->e = 0;
  44
  45         /* delete old file descriptor from fd_list */
  46         f->next->prev = f->prev;
  47         f->prev->next = f->next;
  48
  49         return 1;
  50 }
  51