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):    atonizzo@lycos.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( cyg_uint8 *ptr )
  88 {
  89     PELF_OBJECT  e_obj;
  90     FILE        *fp;
  91
  92     fp = fopen( ptr, "rb" );
  93     if ( fp == 0 )
  94     {
  95         cyg_ldr_last_error = "FILE NOT FOUND";
  96         return (void*)0;
  97     }
  98
  99     // Create a file object to keep track of this library.
 100     e_obj = (PELF_OBJECT)malloc( sizeof( ELF_OBJECT ) );
 101     CYG_ASSERT( e_obj != 0, "Cannot malloc() e_obj" );
 102     if ( e_obj == 0 )
 103     {
 104         cyg_ldr_last_error = "ERROR IN MALLOC";
 105         fclose( fp );
 106         return (void*)0;
 107     }
 108     memset( e_obj, 0, sizeof( ELF_OBJECT ) );
 109     e_obj->ptr   = (CYG_ADDRWORD)fp;
 110     e_obj->mode  = CYG_LDR_MODE_FILESYSTEM;
 111
 112     // Handlers for the file system open.
 113     e_obj->read  = cyg_ldr_fs_read;
 114     e_obj->seek  = cyg_ldr_fs_seek;
 115     e_obj->close = cyg_ldr_fs_close;
 116     return e_obj;
 117 }
 118
 119 void
 120 cyg_ldr_close_library_fs( PELF_OBJECT p )
 121 {
 122 }
 123