| 1 | /*****************************************************************************/ |
| 2 | /* */ |
| 3 | /* fileio.c */ |
| 4 | /* */ |
| 5 | /* Binary file I/O for the co65 object file converter */ |
| 6 | /* */ |
| 7 | /* */ |
| 8 | /* */ |
| 9 | /* (C) 1998-2003 Ullrich von Bassewitz */ |
| 10 | /* Römerstrasse 52 */ |
| 11 | /* D-70794 Filderstadt */ |
| 12 | /* EMail: uz@cc65.org */ |
| 13 | /* */ |
| 14 | /* */ |
| 15 | /* This software is provided 'as-is', without any expressed or implied */ |
| 16 | /* warranty. In no event will the authors be held liable for any damages */ |
| 17 | /* arising from the use of this software. */ |
| 18 | /* */ |
| 19 | /* Permission is granted to anyone to use this software for any purpose, */ |
| 20 | /* including commercial applications, and to alter it and redistribute it */ |
| 21 | /* freely, subject to the following restrictions: */ |
| 22 | /* */ |
| 23 | /* 1. The origin of this software must not be misrepresented; you must not */ |
| 24 | /* claim that you wrote the original software. If you use this software */ |
| 25 | /* in a product, an acknowledgment in the product documentation would be */ |
| 26 | /* appreciated but is not required. */ |
| 27 | /* 2. Altered source versions must be plainly marked as such, and must not */ |
| 28 | /* be misrepresented as being the original software. */ |
| 29 | /* 3. This notice may not be removed or altered from any source */ |
| 30 | /* distribution. */ |
| 31 | /* */ |
| 32 | /*****************************************************************************/ |
| 33 | |
| 34 | |
| 35 | |
| 36 | #include <string.h> |
| 37 | |
| 38 | /* common */ |
| 39 | #include "xmalloc.h" |
| 40 | |
| 41 | /* ld65 */ |
| 42 | #include "error.h" |
| 43 | #include "fileio.h" |
| 44 | |
| 45 | |
| 46 | |
| 47 | /*****************************************************************************/ |
| 48 | /* Code */ |
| 49 | /*****************************************************************************/ |
| 50 | |
| 51 | |
| 52 | |
| 53 | unsigned Read8 (FILE* F) |
| 54 | /* Read an 8 bit value from the file */ |
| 55 | { |
| 56 | int C = getc (F); |
| 57 | if (C == EOF) { |
| 58 | Error ("Read error (file corrupt?)" ); |
| 59 | } |
| 60 | return C; |
| 61 | } |
| 62 | |
| 63 | |
| 64 | |
| 65 | unsigned Read16 (FILE* F) |
| 66 | /* Read a 16 bit value from the file */ |
| 67 | { |
| 68 | unsigned Lo = Read8 (F); |
| 69 | unsigned Hi = Read8 (F); |
| 70 | return (Hi << 8) | Lo; |
| 71 | } |
| 72 | |
| 73 | |
| 74 | |
| 75 | unsigned long Read24 (FILE* F) |
| 76 | /* Read a 24 bit value from the file */ |
| 77 | { |
| 78 | unsigned long Lo = Read16 (F); |
| 79 | unsigned long Hi = Read8 (F); |
| 80 | return (Hi << 16) | Lo; |
| 81 | } |
| 82 | |
| 83 | |
| 84 | |
| 85 | unsigned long Read32 (FILE* F) |
| 86 | /* Read a 32 bit value from the file */ |
| 87 | { |
| 88 | unsigned long Lo = Read16 (F); |
| 89 | unsigned long Hi = Read16 (F); |
| 90 | return (Hi << 16) | Lo; |
| 91 | } |
| 92 | |
| 93 | |
| 94 | |
| 95 | void* ReadData (FILE* F, void* Data, unsigned Size) |
| 96 | /* Read data from the file */ |
| 97 | { |
| 98 | /* Explicitly allow reading zero bytes */ |
| 99 | if (Size > 0) { |
| 100 | if (fread (Data, 1, Size, F) != Size) { |
| 101 | Error ("Read error (file corrupt?)" ); |
| 102 | } |
| 103 | } |
| 104 | return Data; |
| 105 | } |
| 106 | |