load_coff.cpp revision 1.2.8.2
1 1.2.8.2 nathanw /* $NetBSD: load_coff.cpp,v 1.2.8.2 2002/02/28 04:09:45 nathanw Exp $ */ 2 1.2.8.2 nathanw 3 1.2.8.2 nathanw /*- 4 1.2.8.2 nathanw * Copyright (c) 2001 The NetBSD Foundation, Inc. 5 1.2.8.2 nathanw * All rights reserved. 6 1.2.8.2 nathanw * 7 1.2.8.2 nathanw * This code is derived from software contributed to The NetBSD Foundation 8 1.2.8.2 nathanw * by UCHIYAMA Yasushi. 9 1.2.8.2 nathanw * 10 1.2.8.2 nathanw * Redistribution and use in source and binary forms, with or without 11 1.2.8.2 nathanw * modification, are permitted provided that the following conditions 12 1.2.8.2 nathanw * are met: 13 1.2.8.2 nathanw * 1. Redistributions of source code must retain the above copyright 14 1.2.8.2 nathanw * notice, this list of conditions and the following disclaimer. 15 1.2.8.2 nathanw * 2. Redistributions in binary form must reproduce the above copyright 16 1.2.8.2 nathanw * notice, this list of conditions and the following disclaimer in the 17 1.2.8.2 nathanw * documentation and/or other materials provided with the distribution. 18 1.2.8.2 nathanw * 3. All advertising materials mentioning features or use of this software 19 1.2.8.2 nathanw * must display the following acknowledgement: 20 1.2.8.2 nathanw * This product includes software developed by the NetBSD 21 1.2.8.2 nathanw * Foundation, Inc. and its contributors. 22 1.2.8.2 nathanw * 4. Neither the name of The NetBSD Foundation nor the names of its 23 1.2.8.2 nathanw * contributors may be used to endorse or promote products derived 24 1.2.8.2 nathanw * from this software without specific prior written permission. 25 1.2.8.2 nathanw * 26 1.2.8.2 nathanw * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 1.2.8.2 nathanw * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 1.2.8.2 nathanw * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 1.2.8.2 nathanw * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 1.2.8.2 nathanw * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 1.2.8.2 nathanw * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 1.2.8.2 nathanw * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 1.2.8.2 nathanw * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 1.2.8.2 nathanw * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 1.2.8.2 nathanw * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 1.2.8.2 nathanw * POSSIBILITY OF SUCH DAMAGE. 37 1.2.8.2 nathanw */ 38 1.2.8.2 nathanw 39 1.2.8.2 nathanw #include <load.h> 40 1.2.8.2 nathanw #include <load_coff.h> 41 1.2.8.2 nathanw #undef DPRINTF // trash coff_machdep.h 's define. 42 1.2.8.2 nathanw #include <console.h> 43 1.2.8.2 nathanw #include <memory.h> 44 1.2.8.2 nathanw #include <file.h> 45 1.2.8.2 nathanw 46 1.2.8.2 nathanw CoffLoader::CoffLoader(Console *&cons, MemoryManager *&mem) 47 1.2.8.2 nathanw : Loader(cons, mem) 48 1.2.8.2 nathanw { 49 1.2.8.2 nathanw memset(&_eh, 0, sizeof(struct coff_exechdr)); 50 1.2.8.2 nathanw _fh = &_eh.f; 51 1.2.8.2 nathanw _ah = &_eh.a; 52 1.2.8.2 nathanw 53 1.2.8.2 nathanw DPRINTF((TEXT("Loader: COFF\n"))); 54 1.2.8.2 nathanw } 55 1.2.8.2 nathanw 56 1.2.8.2 nathanw CoffLoader::~CoffLoader(void) 57 1.2.8.2 nathanw { 58 1.2.8.2 nathanw } 59 1.2.8.2 nathanw 60 1.2.8.2 nathanw BOOL 61 1.2.8.2 nathanw CoffLoader::setFile(File *&file) 62 1.2.8.2 nathanw { 63 1.2.8.2 nathanw Loader::setFile(file); 64 1.2.8.2 nathanw 65 1.2.8.2 nathanw /* read COFF header and check it */ 66 1.2.8.2 nathanw return read_header(); 67 1.2.8.2 nathanw } 68 1.2.8.2 nathanw 69 1.2.8.2 nathanw size_t 70 1.2.8.2 nathanw CoffLoader::memorySize() 71 1.2.8.2 nathanw { 72 1.2.8.2 nathanw size_t sz = _ah->a_tsize + _ah->a_dsize; 73 1.2.8.2 nathanw 74 1.2.8.2 nathanw DPRINTF((TEXT("file size: text 0x%x + data 0x%x = 0x%x byte\n"), 75 1.2.8.2 nathanw _ah->a_tsize, _ah->a_dsize, sz)); 76 1.2.8.2 nathanw return sz; 77 1.2.8.2 nathanw } 78 1.2.8.2 nathanw 79 1.2.8.2 nathanw kaddr_t 80 1.2.8.2 nathanw CoffLoader::jumpAddr() 81 1.2.8.2 nathanw { 82 1.2.8.2 nathanw 83 1.2.8.2 nathanw DPRINTF((TEXT("kernel entry address: 0x%08x\n"), _ah->a_entry)); 84 1.2.8.2 nathanw 85 1.2.8.2 nathanw return _ah->a_entry; 86 1.2.8.2 nathanw } 87 1.2.8.2 nathanw 88 1.2.8.2 nathanw BOOL 89 1.2.8.2 nathanw CoffLoader::load() 90 1.2.8.2 nathanw { 91 1.2.8.2 nathanw size_t filesz; 92 1.2.8.2 nathanw size_t memsz; 93 1.2.8.2 nathanw vaddr_t kv; 94 1.2.8.2 nathanw off_t fileofs; 95 1.2.8.2 nathanw 96 1.2.8.2 nathanw /* start tag chain */ 97 1.2.8.2 nathanw _load_segment_start(); 98 1.2.8.2 nathanw 99 1.2.8.2 nathanw /* text */ 100 1.2.8.2 nathanw filesz = memsz = _ah->a_tsize; 101 1.2.8.2 nathanw kv = _ah->a_tstart; 102 1.2.8.2 nathanw fileofs = COFF_ROUND(N_TXTOFF(_fh, _ah), 16); 103 1.2.8.2 nathanw DPRINTF((TEXT("[text]"))); 104 1.2.8.2 nathanw _load_segment(kv, memsz, fileofs, filesz); 105 1.2.8.2 nathanw /* data */ 106 1.2.8.2 nathanw fileofs += filesz; 107 1.2.8.2 nathanw filesz = memsz = _ah->a_dsize; 108 1.2.8.2 nathanw kv = _ah->a_dstart; 109 1.2.8.2 nathanw DPRINTF((TEXT("[data]"))); 110 1.2.8.2 nathanw _load_segment(kv, memsz, fileofs, filesz); 111 1.2.8.2 nathanw /* bss */ 112 1.2.8.2 nathanw filesz = 0; 113 1.2.8.2 nathanw memsz = _ah->a_bsize; 114 1.2.8.2 nathanw kv = _ah->a_dstart + _ah->a_dsize; 115 1.2.8.2 nathanw fileofs = 0; 116 1.2.8.2 nathanw DPRINTF((TEXT("[bss ]"))); 117 1.2.8.2 nathanw _load_segment(kv, memsz, fileofs, filesz); 118 1.2.8.2 nathanw 119 1.2.8.2 nathanw /* tag chain still opening */ 120 1.2.8.2 nathanw return _load_success(); 121 1.2.8.2 nathanw } 122 1.2.8.2 nathanw 123 1.2.8.2 nathanw BOOL 124 1.2.8.2 nathanw CoffLoader::read_header(void) 125 1.2.8.2 nathanw { 126 1.2.8.2 nathanw #ifndef COFF_BADMAG 127 1.2.8.2 nathanw DPRINTF((TEXT("coff loader not implemented.\n"))); 128 1.2.8.2 nathanw return FALSE; 129 1.2.8.2 nathanw #else 130 1.2.8.2 nathanw // read COFF header 131 1.2.8.2 nathanw _file->read(&_eh, sizeof(struct coff_exechdr), 0); 132 1.2.8.2 nathanw 133 1.2.8.2 nathanw // check COFF Magic. 134 1.2.8.2 nathanw if (COFF_BADMAG(_fh)) { 135 1.2.8.2 nathanw DPRINTF((TEXT("not a COFF file.\n"))); 136 1.2.8.2 nathanw return FALSE; 137 1.2.8.2 nathanw } 138 1.2.8.2 nathanw 139 1.2.8.2 nathanw return TRUE; 140 1.2.8.2 nathanw #endif 141 1.2.8.2 nathanw } 142
Indexes created Mon Sep 22 13:09:51 GMT 2025