packages/services/objloader/v2_0/src/loader_fs.c

   1 /* =================================================================
   2  *
   3  *      loader_fs.c
   4  *
   5  *      Routines to read a library from a file system.
   6  *
   7  * =================================================================
   8  * ####ECOSGPLCOPYRIGHTBEGIN####
   9  * -------------------------------------------
  10  * This file is part of eCos, the Embedded Configurable Operating
  11  * System.
  12  * Copyright (C) 2005 eCosCentric Ltd.
  13  *
  14  * eCos is free software; you can redistribute it and/or modify it
  15  * under the terms of the GNU General Public License as published by
  16  * the Free Software Foundation; either version 2 or (at your option)
  17  * any later version.
  18  *
  19  * eCos is distributed in the hope that it will be useful, but
  20  * WITHOUT ANY WARRANTY; without even the implied warranty of
  21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  22  * General Public License for more details.
  23  *
  24  * You should have received a copy of the GNU General Public License
  25  * along with eCos; if not, write to the Free Software Foundation,
  26  * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
  27  *
  28  * As a special exception, if other files instantiate templates or
  29  * use macros or inline functions from this file, or you compile this
  30  * file and link it with other works to produce a work based on this
  31  * file, this file does not by itself cause the resulting work to be
  32  * covered by the GNU General Public License. However the source code
  33  * for this file must still be made available in accordance with
  34  * section (3) of the GNU General Public License.
  35  *
  36  * This exception does not invalidate any other reasons why a work
  37  * based on this file might be covered by the GNU General Public
  38  * License.
  39  *
  40  * -------------------------------------------
  41  * ####ECOSGPLCOPYRIGHTEND####
  42  * =================================================================
  43  * #####DESCRIPTIONBEGIN####
  44  *
  45  *  Author(s):    Anthony Tonizzo (atonizzo@gmail.com)
  46  *  Contributors: nickg@ecoscentric.com
  47  *  Date:         2005-05-13
  48  *  Purpose:
  49  *  Description:
  50  *
  51  * ####DESCRIPTIONEND####
  52  *
  53  * =================================================================
  54  */
  55
  56 #include <cyg/infra/diag.h>     // For diagnostic printing.
  57 #include <pkgconf/io_fileio.h>
  58 #include <sys/stat.h>
  59 #include <stdlib.h>
  60 #include <stdio.h>
  61 #include <string.h>
  62
  63 #include <pkgconf/objloader.h>
  64 #include <cyg/objloader/elf.h>
  65 #include <cyg/objloader/objelf.h>
  66 #include <cyg/objloader/loader_fs.h>
  67
  68 size_t
  69 cyg_ldr_fs_read(PELF_OBJECT p, size_t s, size_t n, void *mem)
  70 {
  71     return fread(mem, s, n, (FILE*)p->ptr);
  72 }
  73
  74 cyg_int32
  75 cyg_ldr_fs_seek(PELF_OBJECT p, cyg_uint32 offs)
  76 {
  77     return fseek((FILE*)p->ptr, offs, SEEK_SET);
  78 }
  79
  80 cyg_int32
  81 cyg_ldr_fs_close(PELF_OBJECT p)
  82 {
  83     return fclose((FILE*)p->ptr);
  84 }
  85
  86 PELF_OBJECT
  87 cyg_ldr_open_library_fs(char *ptr)
  88 {
  89     FILE *fp = fopen(ptr, "rb");
  90     if (fp == NULL)
  91     {
  92         cyg_ldr_last_error = "FILE NOT FOUND";
  93         return (void*)0;
  94     }
  95
  96     // Create a file object to keep track of this library.
  97     PELF_OBJECT e_obj = (PELF_OBJECT)malloc(sizeof(ELF_OBJECT));
  98     CYG_ASSERT(e_obj != 0, "Cannot malloc() e_obj");
  99     if (e_obj == 0)
 100     {
 101         cyg_ldr_last_error = "ERROR IN MALLOC";
 102         fclose(fp);
 103         return (void*)0;
 104     }
 105     memset(e_obj, 0, sizeof(ELF_OBJECT));
 106     e_obj->ptr   = (CYG_ADDRWORD)fp;
 107     e_obj->mode  = CYG_LDR_MODE_FILESYSTEM;
 108
 109     // Handlers for the file system open.
 110     e_obj->read  = cyg_ldr_fs_read;
 111     e_obj->seek  = cyg_ldr_fs_seek;
 112     e_obj->close = cyg_ldr_fs_close;
 113     return e_obj;
 114 }
 115
 116 void
 117 cyg_ldr_close_library_fs(PELF_OBJECT p)
 118 {
 119 }
 120