1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
|
// sfArkLib file i/o
// copyright 1998-2000, Andy Inman
// Contact via: http://netgenius.co.uk or http://melodymachine.com
// This file is part of sfArkLib.
//
// sfArkLib 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 3 of the License, or
// (at your option) any later version.
//
// sfArkLib 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 sfArkLib. If not, see <http://www.gnu.org/licenses/>.
// NB: When sfArkLib is used with SDL, these functions are replaced
// by equvalents in sdl.cpp because the linker finds those first.
#include <stdio.h>
#include <string.h>
#include "wcc.h"
//#include "zlib.h" // only needed for debug printf
#ifdef TARGET_WIN32
// Windows32 target
#define WIN32_LEAN_AND_MEAN // Exclude rarely-used stuff from Windows headers
#include "windows.h"
#undef WIN32_LEAN_AND_MEAN
#define FILE_SHARE_NONE 0
#define NO_SECURITY ((LPSECURITY_ATTRIBUTES) 0)
#define NOT_OVERLAPPED ((LPOVERLAPPED) 0)
#define NO_TEMPLATE ((HANDLE) 0)
#define CREATEFILE(FileName) CreateFile((LPCTSTR)FileName, GENERIC_WRITE, FILE_SHARE_NONE, NO_SECURITY, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL + FILE_FLAG_SEQUENTIAL_SCAN, NO_TEMPLATE)
#define OPENFILE(FileName) CreateFile((LPCTSTR)FileName, GENERIC_READ, FILE_SHARE_READ, NO_SECURITY, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL + FILE_FLAG_SEQUENTIAL_SCAN, NO_TEMPLATE)
#define READFILE(fh, Buf, BytesToRead, pBytesRead) ReadFile(fh, Buf, BytesToRead, pBytesRead, NOT_OVERLAPPED)
#define WRITEFILE(fh, Buf, BytesToWrite, pBytesWritten) ReadFile(fh, Buf, BytesToWrite, pBytesWritten, NOT_OVERLAPPED)
#define SETFILEPOINTER(fh, NewPos) (SetFilePointer(fh, NewPos, 0, FILE_BEGIN))
#define CLOSEFILE(fh) (CloseHandle(fh))
#define GETLASTERROR() (GetLastError())
// Mac, Linux target
#else
typedef FILE* HANDLE;
#define INVALID_HANDLE_VALUE (NULL)
#define CREATEFILE(filename) fopen(filename, "wb")
#define OPENFILE(filename) fopen(filename, "rb")
#define READFILE(fh, Buf, BytesToRead, pBytesRead) *pBytesRead = fread(Buf, 1, BytesToRead, fh)
#define WRITEFILE(fh, Buf, BytesToWrite, pBytesWritten) *pBytesWritten = fwrite(Buf, 1, BytesToWrite, fh)
#define SETFILEPOINTER(fh, NewPos) (fseek(fh, NewPos, SEEK_SET))
#define CLOSEFILE(fh) (fclose(fh) == 0)
#define GETLASTERROR() (-1)
#endif
// Static data to track current input and output file...
HANDLE InputFileHandle = INVALID_HANDLE_VALUE; // current input file handle
HANDLE OutputFileHandle = INVALID_HANDLE_VALUE; // ... output file handle
char InFileName[SFARKLIB_MAX_FILEPATH]; // current input file name
char OutFileName[SFARKLIB_MAX_FILEPATH]; // ... and output file name
//char *TempFileExt = "$sfkl";
// Local prototypes...
int ChkErr(const char *message, const char *filename);
// =================================================================================
void OpenOutputFile(const char *FileName)
{
#if 1
int i;
int lenInFileName = strlen(InFileName);
for (i = lenInFileName; i >= 0; i--)
{
char c = InFileName[i];
if (c == '\\' || c == '/') break;
}
if (i < 0)
strncpy(OutFileName, FileName, sizeof(OutFileName));
else
{
strncpy(OutFileName, InFileName, i+1);
strncpy(OutFileName+i+1, FileName, sizeof(OutFileName) - (i+1));
}
#else
strncpy(OutFileName, FileName, sizeof(OutFileName));
#endif
//strcat(OutFileName, TempFileExt); // Add temporary extension
OutputFileHandle = CREATEFILE(OutFileName);
if (OutputFileHandle == INVALID_HANDLE_VALUE) ChkErr("create", OutFileName);
return;
}
// =================================================================================
void OpenInputFile(const char *FileName)
{
//printf("OpenInputFile: %s\n", FileName);
strncpy(InFileName, FileName, sizeof(InFileName));
InputFileHandle = OPENFILE(FileName);
if (InputFileHandle == INVALID_HANDLE_VALUE) ChkErr("open", InFileName);
//else printf("OpenInputFile successful\n");
return;
}
// =================================================================================
int ReadInputFile(BYTE *Buf, int BytesToRead)
{
int BytesRead;
READFILE(InputFileHandle, Buf, BytesToRead, &BytesRead);
if (BytesRead < 0)
{
ChkErr("read from", InFileName);
BytesRead = 0;
}
//else printf("ReadInputFile Ok: %d bytes read\n", BytesRead);
return BytesRead;
}
// =================================================================================
int WriteOutputFile(const BYTE *Buf, int BytesToWrite)
{
int BytesWritten;
//printf("WriteOutputFile: bytes=%d\n", BytesToWrite);
WRITEFILE(OutputFileHandle, Buf, BytesToWrite, &BytesWritten);
if (BytesWritten != BytesToWrite)
{
//printf("WriteOutputFile error: %d bytes to write, %d bytes written\n", BytesToWrite, BytesWritten);
ChkErr("write to", OutFileName);
BytesWritten = 0;
}
//else printf("WriteOutputFile Ok: %d bytes written\n", BytesWritten);
return BytesWritten;
}
// =================================================================================
bool SetInputFilePosition(int NewPos)
{
if (SETFILEPOINTER(InputFileHandle, NewPos) != 0)
{
ChkErr("SetInputFilePosition", InFileName);
return false;
}
//else printf("SetInputFilePosition Ok: Requested %d Actual %ld\n", NewPos, ftell(InputFileHandle));
return true;
}
// =================================================================================
bool SetOutputFilePosition(int NewPos)
{
if (SETFILEPOINTER(OutputFileHandle, NewPos) != 0)
{
ChkErr("SetOutputFilePosition", OutFileName);
return false;
}
//else printf("SetOutputFilePosition Ok: Requested %d Actual %ld\n", NewPos, ftell(InputFileHandle));
return true;
}
// =================================================================================
void CloseInputFile(void)
{
if (InputFileHandle != INVALID_HANDLE_VALUE && CLOSEFILE(InputFileHandle) == 0)
ChkErr("Close input file: ", InFileName);
InputFileHandle = INVALID_HANDLE_VALUE;
return;
}
// =================================================================================
void CloseOutputFile(void)
{
if (OutputFileHandle != INVALID_HANDLE_VALUE && CLOSEFILE(OutputFileHandle) == 0)
ChkErr("Close output file", OutFileName);
//char FinalFileName[SFARKLIB_MAX_FILEPATH];
OutputFileHandle = INVALID_HANDLE_VALUE;
return;
}
// =================================================================================
int ChkErr(const char *ErrorMsg, const char *FileName)
{
int ErrCode;
char ErrDesc[MAX_MSGTEXT];
if (~GlobalErrorFlag) // Prevent multiple error messages
{
ErrCode = GETLASTERROR();
sprintf(ErrDesc, "OS ERROR %d - Failed to %s: %s", ErrCode, ErrorMsg, FileName);
msg(ErrDesc, MSG_PopUp);
GlobalErrorFlag = SFARKLIB_ERR_FILEIO;
}
return(GlobalErrorFlag);
}
// =================================================================================
// eof
|
