/* =================================================================
 *
 *      loader_fs.c
 *
 *      Routines to read a module from a file system.
 *
 * ================================================================= 
 * ####ECOSGPLCOPYRIGHTBEGIN####                                     
 * -------------------------------------------                       
 * This file is part of eCos, the Embedded Configurable Operating System.
 * Copyright (C) 2005, 2008 Free Software Foundation, Inc.           
 * Copyright (C) 2005, 2008 eCosCentric Limited                      
 *
 * eCos is free software; you can redistribute it and/or modify it under
 * the terms of the GNU General Public License as published by the Free
 * Software Foundation; either version 2 or (at your option) any later
 * version.                                                          
 *
 * eCos is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 * for more details.                                                 
 *
 * You should have received a copy of the GNU General Public License 
 * along with eCos; if not, write to the Free Software Foundation, Inc.,
 * 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.     
 *
 * As a special exception, if other files instantiate templates or use
 * macros or inline functions from this file, or you compile this file
 * and link it with other works to produce a work based on this file,
 * this file does not by itself cause the resulting work to be covered by
 * the GNU General Public License. However the source code for this file
 * must still be made available in accordance with section (3) of the GNU
 * General Public License v2.                                        
 *
 * This exception does not invalidate any other reasons why a work based
 * on this file might be covered by the GNU General Public License.  
 * -------------------------------------------                       
 * ####ECOSGPLCOPYRIGHTEND####                                       
 * =================================================================
 * #####DESCRIPTIONBEGIN####
 * 
 *  Author(s):    nickg, Anthony Tonizzo (atonizzo@gmail.com)
 *  Contributors: nickg@ecoscentric.com
 *  Date:         2005-05-13
 *  Purpose:      
 *  Description:  
 *               
 * ####DESCRIPTIONEND####
 * 
 * =================================================================
 */

#include <pkgconf/system.h>
#include <pkgconf/objloader.h>

#include <cyg/infra/diag.h>     // For diagnostic printing.
#include <pkgconf/io_fileio.h>
#include <cyg/infra/cyg_ass.h>

#include <unistd.h>
#include <fcntl.h>
#include <stdlib.h>
#include <string.h>

#include <cyg/objloader/elf.h>
#include <cyg/objloader/objelf.h>

// =================================================================

size_t 
cyg_ldr_fs_read(CYG_LDR_ELF_OBJECT * p, size_t s, void *mem)
{
    return read( (int)p->ptr, mem, s );
}

// =================================================================

cyg_int32 
cyg_ldr_fs_seek(CYG_LDR_ELF_OBJECT * p, cyg_uint32 offs)
{
    return lseek( (int)p->ptr, offs, SEEK_SET );
}

// =================================================================

cyg_int32 
cyg_ldr_fs_close(CYG_LDR_ELF_OBJECT * p)
{
    return close((int)p->ptr);
}

// =================================================================

CYG_LDR_ELF_OBJECT *
cyg_ldr_open_fs(CYG_ADDRWORD arg)
{
    char *ptr = (char *)arg;
    int fd = open(ptr, O_RDONLY);
    if (fd < 0)
    {
        cyg_ldr_last_error = "FILE NOT FOUND";
        return (void*)0;
    }
    
    // Create a file object to keep track of this module.
    CYG_LDR_ELF_OBJECT * e_obj = (CYG_LDR_ELF_OBJECT *)cyg_ldr_malloc(sizeof(CYG_LDR_ELF_OBJECT));
    CYG_ASSERT(e_obj != 0, "Cannot malloc() e_obj");
    if (e_obj == 0)
    {
        cyg_ldr_last_error = "ERROR IN MALLOC";
        close(fd); 
        return (void*)0;
    }
    memset(e_obj, 0, sizeof(CYG_LDR_ELF_OBJECT));
    e_obj->ptr   = (CYG_ADDRWORD)fd;

    // Handlers for the file system open.
    e_obj->read  = cyg_ldr_fs_read;
    e_obj->seek  = cyg_ldr_fs_seek;
    e_obj->close = cyg_ldr_fs_close;
    return e_obj;
}

// =================================================================

void
cyg_ldr_close_fs(CYG_LDR_ELF_OBJECT * p)
{
}

// =================================================================
