5 * This is part of ypp-sc-tools, a set of third-party tools for assisting
6 * players of Yohoho Puzzle Pirates.
8 * Copyright (C) 2009 Ian Jackson <ijackson@chiark.greenend.org.uk>
10 * This program is free software: you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation, either version 3 of the License, or
13 * (at your option) any later version.
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
20 * You should have received a copy of the GNU General Public License
21 * along with this program. If not, see <http://www.gnu.org/licenses/>.
23 * Yohoho and Puzzle Pirates are probably trademarks of Three Rings and
24 * are used without permission. This program is not endorsed or
25 * sponsored by Three Rings.
30 void *mmalloc(size_t sz) {
33 sysassert( r= malloc(sz) );
36 void *mrealloc(void *p, size_t sz) {
39 sysassert( r= realloc(p,sz) );
45 static const char *basepath; /* as passed in by caller */
48 int dbfile_gzopen(const char *basepath_spec) {
51 basepath= basepath_spec;
52 //uncomppath= masprintf("%s (uncompressed)", basepath);
54 char *zpath= masprintf("%s.gz", basepath);
55 int zfd= open(zpath, O_RDONLY);
58 if (zfd<0) { sysassert(errno==ENOENT); return 0; }
61 sysassert(! pipe(pipefds) );
63 sysassert( (dbzcat=fork()) != -1 );
65 sysassert( dup2(zfd,0)==0 );
66 sysassert( dup2(pipefds[1],1)==1 );
67 sysassert(! close(zfd) );
68 sysassert(! close(pipefds[0]) );
69 sysassert(! close(pipefds[1]) );
70 execlp("zcat","zcat",(char*)0);
71 sysassert(!"execlp zcat");
73 sysassert(! close(zfd) );
74 sysassert(! close(pipefds[1]) );
75 sysassert( dbfile= fdopen(pipefds[0], "r") );
80 int dbfile_open(const char *tpath) {
86 dbfile= fopen(tpath,"r");
87 if (!dbfile) { sysassert(errno==ENOENT); return 0; }
91 void dbfile_close(void) {
94 sysassert(!ferror(dbfile));
95 sysassert(!fclose(dbfile));
98 char *zcatstr= masprintf("zcat %s.gz", basepath);
99 waitpid_check_exitstatus(dbzcat,zcatstr,1);
107 #define dbassertgl(x) ((x) ? (void)0 : dbfile_assertfail(file,line,#x))
109 void dbfile_getsline(char *lbuf, size_t lbufsz, const char *file, int line) {
111 char *s= fgets(lbuf,lbufsz,dbfile);
112 sysassert(!ferror(dbfile));
113 dbassertgl(!feof(dbfile));
116 dbassertgl(l>0); dbassertgl(lbuf[--l]=='\n');
120 int dbfile_vscanf(const char *fmt, va_list al) {
121 int r= vfscanf(dbfile,fmt,al);
122 sysassert(!ferror(dbfile));
126 int dbfile_scanf(const char *fmt, ...) {
129 int r= dbfile_vscanf(fmt,al);
134 void dbfile_assertfail(const char *file, int line, const char *m) {
136 fatal("Error in dictionary file %s.gz:\n"
137 " Requirement not met at %s:%d:\n"
139 basepath, file,line, m);
141 fatal("Error in dictionary file %s at byte %ld:\n"
142 " Requirement not met at %s:%d:\n"
144 basepath,(long)ftell(dbfile), file,line, m);
146 fatal("Semantic error in dictionaries:\n"
147 " Requirement not met at %s:%d:\n"