packages/io/common/v2_0/src/io_file.c

   1 //==========================================================================
   2 //
   3 //      io/common/io_file.c
   4 //
   5 //      High-level file I/O support.
   6 //
   7 //==========================================================================
   8 //####ECOSGPLCOPYRIGHTBEGIN####
   9 // -------------------------------------------
  10 // This file is part of eCos, the Embedded Configurable Operating System.
  11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
  12 //
  13 // eCos is free software; you can redistribute it and/or modify it under
  14 // the terms of the GNU General Public License as published by the Free
  15 // Software Foundation; either version 2 or (at your option) any later version.
  16 //
  17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
  18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
  19 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  20 // for more details.
  21 //
  22 // You should have received a copy of the GNU General Public License along
  23 // with eCos; if not, write to the Free Software Foundation, Inc.,
  24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  25 //
  26 // As a special exception, if other files instantiate templates or use macros
  27 // or inline functions from this file, or you compile this file and link it
  28 // with other works to produce a work based on this file, this file does not
  29 // by itself cause the resulting work to be covered by the GNU General Public
  30 // License. However the source code for this file must still be made available
  31 // in accordance with section (3) of the GNU General Public License.
  32 //
  33 // This exception does not invalidate any other reasons why a work based on
  34 // this file might be covered by the GNU General Public License.
  35 //
  36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
  37 // at http://sources.redhat.com/ecos/ecos-license/
  38 // -------------------------------------------
  39 //####ECOSGPLCOPYRIGHTEND####
  40 //==========================================================================
  41 //#####DESCRIPTIONBEGIN####
  42 //
  43 // Author(s):    gthomas
  44 // Contributors: gthomas
  45 // Date:         2000-01-10
  46 // Purpose:
  47 // Description:
  48 //
  49 //
  50 //####DESCRIPTIONEND####
  51 //
  52 //==========================================================================
  53
  54
  55 // File I/O support
  56
  57 #include <pkgconf/io.h>
  58 #include <cyg/io/file.h>
  59 #include <cyg/error/codes.h>
  60
  61 struct file fds[CYGPKG_IO_NFILE];
  62
  63 //
  64 // This function allcates a file "slot".
  65 //
  66 int
  67 falloc(struct file **fp, int *fd)
  68 {
  69     int i;
  70     struct file *f;
  71     f = &fds[0];
  72     for (i = 0;  i < CYGPKG_IO_NFILE;  i++, f++) {
  73         if (f->f_flag == 0) {
  74             f->f_flag = FALLOC;
  75             *fp = f;
  76             *fd = i;
  77             return 0;
  78         }
  79     }
  80     return EMFILE;  // No more files
  81 }
  82
  83 //
  84 // This function is used to return a file slot.
  85 //
  86 void
  87 ffree(struct file *fp)
  88 {
  89     fp->f_flag = 0;  // Mark free
  90 }
  91
  92 //
  93 // This function provides the mapping from a file descriptor (small
  94 // integer used by application code) to the corresponding file slot.
  95 cyg_bool
  96 getfp(int fd, struct file **fp)
  97 {
  98     struct file *f;
  99     if (fd >= CYGPKG_IO_NFILE)
 100         return -1;
 101     f =  &fds[fd];
 102     if (f->f_flag == 0)
 103         return -1;
 104     *fp = f;
 105     return 0;
 106 }