Initial commit

engines/ags/lib/allegro/file.cpp

@@ -0,0 +1,261 @@
+/* ScummVM - Graphic Adventure Engine
+ *
+ * ScummVM is the legal property of its developers, whose names
+ * are too numerous to list here. Please refer to the COPYRIGHT
+ * file distributed with this source distribution.
+ *
+ * This program 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.
+ *
+ * This program 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 this program.  If not, see <http://www.gnu.org/licenses/>.
+ *
+ */
+
+#include "ags/lib/allegro/file.h"
+#include "common/file.h"
+#include "common/str.h"
+#include "common/textconsole.h"
+
+namespace AGS3 {
+
+PACKFILE *PACKFILE::pack_fopen_chunk(int pack) {
+	error("TODO: pack_fopen_chunk is not yet supported");
+}
+
+PACKFILE *PACKFILE::pack_fclose_chunk() {
+	error("TODO: pack_fclose_chunk is not yet supported");
+}
+
+int PACKFILE::pack_igetw() {
+	byte buf[2];
+	return pack_fread(buf, 2) == 2 ? READ_LE_UINT16(buf) : 0;
+}
+
+int32_t PACKFILE::pack_igetl() {
+	byte buf[4];
+	return pack_fread(buf, 4) == 4 ? READ_LE_UINT32(buf) : 0;
+}
+
+int PACKFILE::pack_iputw(int w) {
+	byte buf[2];
+	WRITE_LE_UINT16(buf, w);
+	pack_fwrite(buf, 2);
+	return 0;
+}
+
+int32_t PACKFILE::pack_iputl(int32_t l) {
+	byte buf[4];
+	WRITE_LE_UINT32(buf, l);
+	pack_fwrite(buf, 4);
+	return 0;
+}
+
+int PACKFILE::pack_mgetw() {
+	byte buf[2];
+	return pack_fread(buf, 2) == 2 ? READ_BE_UINT16(buf) : 0;
+}
+
+int32_t PACKFILE::pack_mgetl() {
+	byte buf[4];
+	return pack_fread(buf, 4) == 4 ? READ_BE_UINT32(buf) : 0;
+}
+
+int PACKFILE::pack_mputw(int w) {
+	byte buf[2];
+	WRITE_BE_UINT16(buf, 2);
+	pack_fwrite(buf, 2);
+	return 0;
+}
+
+int32_t PACKFILE::pack_mputl(int32_t l) {
+	byte buf[4];
+	WRITE_BE_UINT16(buf, 4);
+	pack_fwrite(buf, 4);
+	return 0;
+}
+
+char *PACKFILE::pack_fgets(char *p, int max) {
+	int c;
+	char *dest = p;
+
+	while ((c = pack_getc()) != 0 && !pack_feof() && max-- > 0) {
+		*dest++ = c;
+	}
+
+	return p;
+}
+
+int PACKFILE::pack_fputs(AL_CONST char *p) {
+	pack_fwrite(p, strlen(p));
+	pack_putc(0);
+	return 0;
+}
+
+/*------------------------------------------------------------------*/
+
+/* Use strictly UTF-8 encoding for the file paths
+ */
+#define U_CURRENT U_UTF8
+#define ugetc     utf8_getc
+#define ugetx     utf8_getx
+#define ugetxc    utf8_getx
+#define usetc     utf8_setc
+#define uwidth    utf8_width
+#define ucwidth   utf8_cwidth
+#define uisok     utf8_isok
+
+void set_filename_encoding(int) {
+	// No implementation
+}
+
+char *fix_filename_case(char *path) {
+	return path;
+}
+
+char *fix_filename_slashes(char *path) {
+	return path;
+}
+
+char *append_filename(char *dest, const char *path, const char *filename, int size) {
+	strncpy(dest, path, size);
+	strncat(dest, filename, size);
+	return dest;
+}
+
+char *canonicalize_filename(char *dest, const char *filename, int size) {
+	strncpy(dest, filename, size);
+	return dest;
+}
+
+char *make_relative_filename(char *dest, const char *path, const char *filename, int size) {
+	strncpy(dest, filename, size);
+	return dest;
+}
+
+int is_relative_filename(const char *filename) {
+	// ScummVM doesn't have absolute paths
+	return true;
+}
+
+/*------------------------------------------------------------------*/
+
+void packfile_password(AL_CONST char *password) {
+	error("TODO: packfile_password");
+}
+
+PACKFILE *pack_fopen(AL_CONST char *filename, AL_CONST char *mode) {
+	assert(!strcmp(mode, "r") || !strcmp(mode, "rb"));
+
+	Common::File *f = new Common::File();
+	if (f->open(filename)) {
+		return new ScummVMPackFile(f);
+
+	} else {
+		delete f;
+		return nullptr;
+	}
+}
+
+PACKFILE *pack_fopen_vtable(AL_CONST PACKFILE_VTABLE *vtable, void *userdata) {
+	return new VTablePackFile(vtable, userdata);
+}
+
+int pack_fclose(PACKFILE *f) {
+	f->close();
+	delete f;
+	return 0;
+}
+
+int pack_fseek(PACKFILE *f, int offset) {
+	return f->pack_fseek(offset);
+}
+
+PACKFILE *pack_fopen_chunk(PACKFILE *f, int pack) {
+	return f->pack_fopen_chunk(pack);
+}
+
+PACKFILE *pack_fclose_chunk(PACKFILE *f) {
+	return f->pack_fclose_chunk();
+}
+
+int pack_getc(PACKFILE *f) {
+	return f->pack_getc();
+}
+
+int pack_putc(int c, PACKFILE *f) {
+	return f->pack_putc(c);
+}
+
+int pack_feof(PACKFILE *f) {
+	return f->pack_feof();
+}
+
+int pack_ferror(PACKFILE *f) {
+	return f->pack_ferror();
+}
+
+int pack_igetw(PACKFILE *f) {
+	error("TODO: xxx");
+}
+
+int32_t pack_igetl(PACKFILE *f) {
+	return f->pack_igetl();
+}
+
+int pack_iputw(int w, PACKFILE *f) {
+	return f->pack_iputw(w);
+}
+
+int32_t pack_iputl(int32_t l, PACKFILE *f) {
+	return f->pack_iputl(l);
+}
+
+int pack_mgetw(PACKFILE *f) {
+	return f->pack_mgetw();
+}
+
+int32_t pack_mgetl(PACKFILE *f) {
+	return f->pack_mgetl();
+}
+
+int pack_mputw(int w, PACKFILE *f) {
+	return f->pack_mputw(w);
+}
+
+int32_t pack_mputl(int32_t l, PACKFILE *f) {
+	return f->pack_mputl(l);
+}
+
+long pack_fread(void *p, long n, PACKFILE *f) {
+	return f->pack_fread(p, n);
+}
+
+long pack_fwrite(AL_CONST void *p, long n, PACKFILE *f) {
+	return f->pack_fwrite(p, n);
+}
+
+int pack_ungetc(int c, PACKFILE *f) {
+	return f->pack_ungetc(c);
+}
+
+char *pack_fgets(char *p, int max, PACKFILE *f) {
+	return f->pack_fgets(p, max);
+}
+
+int pack_fputs(AL_CONST char *p, PACKFILE *f) {
+	return f->pack_fputs(p);
+}
+
+void *pack_get_userdata(PACKFILE *f) {
+	return f->pack_get_userdata();
+}
+
+} // namespace AGS3