unified MX27, MX25, MX37 trees
[karo-tx-redboot.git] / 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