Mercurial > hg > dmlib
annotate tools/packed.c @ 721:bb14d7907eb2
Rename many pack & resource handling functions.
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Sun, 21 Apr 2013 16:40:45 +0300 |
| parents | d9888292f971 |
| children | 2b9dd22f01e9 |
| rev | line source |
|---|---|
| 0 | 1 /* |
| 2 * PACKed - PACKfile EDitor | |
| 3 * Programmed and designed by Matti 'ccr' Hamalainen | |
| 4 * (C) Copyright 2011 Tecnic Software productions (TNSP) | |
| 5 */ | |
| 6 #include "dmlib.h" | |
| 7 #include "dmargs.h" | |
| 8 #include "dmpack.h" | |
| 9 #include "dmpackutil.h" | |
|
115
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
10 #include "dmres.h" |
|
285
245b15cd1919
Don't link libSDL uselessly to utilities that do not actually use it.
Matti Hamalainen <ccr@tnsp.org>
parents:
211
diff
changeset
|
11 #include "dmmutex.h" |
| 0 | 12 #include <errno.h> |
| 13 | |
| 14 #define SET_MAX_FILES (4096) | |
| 15 #define SET_DEFAULT_PACK "data.pak" | |
| 16 | |
| 17 enum | |
| 18 { | |
| 19 CMD_NONE = 0, | |
| 20 CMD_CREATE, | |
| 21 CMD_ADD, | |
| 22 CMD_LIST, | |
| 23 CMD_EXTRACT | |
| 24 } DCOMMAND; | |
| 25 | |
| 26 enum | |
| 27 { | |
| 28 PACK_EXTRACTED = 0x0001, | |
| 29 }; | |
| 30 | |
| 31 int nsrcFilenames = 0; | |
| 32 char * srcFilenames[SET_MAX_FILES]; | |
| 33 char * optPackFilename = NULL; | |
| 34 BOOL optCompress = TRUE; | |
| 35 int optCommand = CMD_NONE; | |
| 36 int optDefResFlags = 0; | |
| 37 | |
| 38 | |
| 39 static DMOptArg optList[] = | |
| 40 { | |
| 41 { 0, '?', "help", "Show this help", OPT_NONE }, | |
| 42 { 1, 'p', "pack", "Set pack filename (default: " SET_DEFAULT_PACK ")", OPT_ARGREQ }, | |
| 43 { 2, 'c', "create", "Create and add files to PACK", OPT_NONE }, | |
| 44 { 3, 'a', "add", "Add files to PACK", OPT_NONE }, | |
| 45 { 4, 'l', "list", "List files in PACK", OPT_NONE }, | |
| 46 { 5, 'e', "extract", "Extract files from PACK", OPT_NONE }, | |
| 47 { 6, 'n', "nocompress", "No compression", OPT_NONE }, | |
| 48 { 7, 'v', "verbose", "Increase verbosity", OPT_NONE }, | |
| 49 { 8, 'f', "resflags", "Set default resource flags (-f 0xff)", OPT_ARGREQ }, | |
| 50 }; | |
| 51 | |
| 52 static const int optListN = sizeof(optList) / sizeof(optList[0]); | |
| 53 | |
| 54 | |
| 55 void argShowHelp() | |
| 56 { | |
|
117
b56ce9981d79
Correct help of 'packed' utility.
Matti Hamalainen <ccr@tnsp.org>
parents:
115
diff
changeset
|
57 dmPrintBanner(stdout, dmProgName, "[options] [-p <packfilename>] [filename[s]]"); |
| 0 | 58 dmArgsPrintHelp(stdout, optList, optListN); |
| 59 fprintf(stdout, | |
| 60 "\n" | |
| 61 "Examples:\n" | |
| 62 "$ %s -p test.pak -l -- list files in test.pak\n" | |
| 63 "$ %s -a foobar.jpg -- add foobar.jpg in " SET_DEFAULT_PACK "\n" | |
| 64 "$ %s -x foobar.jpg -- extract foobar.jpg from " SET_DEFAULT_PACK "\n", | |
| 65 dmProgName, dmProgName, dmProgName); | |
| 66 } | |
| 67 | |
| 68 | |
| 69 BOOL argHandleOpt(const int optN, char *optArg, char *currArg) | |
| 70 { | |
| 71 (void) optArg; | |
| 72 switch (optN) | |
| 73 { | |
| 211 | 74 case 0: |
| 75 argShowHelp(); | |
| 76 exit(0); | |
| 77 break; | |
| 0 | 78 |
| 211 | 79 case 1: |
| 80 optPackFilename = optArg; | |
| 81 break; | |
| 82 case 2: | |
| 83 optCommand = CMD_CREATE; | |
| 84 break; | |
| 85 case 3: | |
| 86 optCommand = CMD_ADD; | |
| 87 break; | |
| 88 case 4: | |
| 89 optCommand = CMD_LIST; | |
| 90 break; | |
| 91 case 5: | |
| 92 optCommand = CMD_EXTRACT; | |
| 93 break; | |
| 0 | 94 |
| 211 | 95 case 6: |
| 96 optCompress = FALSE; | |
| 97 break; | |
| 0 | 98 |
| 211 | 99 case 7: |
| 100 dmVerbosity++; | |
| 101 break; | |
| 0 | 102 |
| 211 | 103 case 8: |
| 0 | 104 { |
| 211 | 105 int i; |
| 106 if (!dmGetIntVal(optArg, &i)) | |
| 107 { | |
| 108 dmError("Invalid flags value '%s'.\n", optArg); | |
| 109 return FALSE; | |
| 110 } | |
| 111 optDefResFlags = i; | |
| 0 | 112 } |
| 211 | 113 break; |
| 0 | 114 |
| 211 | 115 default: |
| 116 dmError("Unknown argument '%s'.\n", currArg); | |
| 117 return FALSE; | |
| 0 | 118 } |
| 119 | |
| 120 return TRUE; | |
| 121 } | |
| 122 | |
| 123 | |
| 124 BOOL argHandleFile(char *currArg) | |
| 125 { | |
| 126 if (nsrcFilenames < SET_MAX_FILES) | |
| 127 { | |
| 128 srcFilenames[nsrcFilenames] = currArg; | |
| 129 nsrcFilenames++; | |
| 130 } | |
| 131 else | |
| 132 { | |
| 314 | 133 dmError("Maximum number of input files (%d) exceeded!\n", |
| 0 | 134 SET_MAX_FILES); |
| 135 return FALSE; | |
| 136 } | |
| 137 return TRUE; | |
| 138 } | |
| 139 | |
| 140 | |
| 141 /* Compare a string to a pattern. Case-SENSITIVE version. | |
| 142 * The matching pattern can consist of any normal characters plus | |
| 143 * wildcards ? and *. "?" matches any character and "*" matches | |
| 144 * any number of characters. | |
| 145 */ | |
| 146 BOOL dm_strmatch(const char *str, const char *pattern) | |
| 147 { | |
| 148 BOOL didMatch = TRUE, isAnyMode = FALSE, isEnd = FALSE; | |
| 149 const char *tmpPattern = NULL; | |
| 150 | |
| 151 // Check given pattern and string | |
| 152 if (str == NULL || pattern == NULL) | |
| 153 return FALSE; | |
| 154 | |
| 155 // Start comparision | |
| 156 do { | |
| 157 didMatch = FALSE; | |
| 158 switch (*pattern) | |
| 159 { | |
| 160 case '?': | |
| 161 // Any single character matches | |
| 162 if (*str) | |
| 163 { | |
| 164 didMatch = TRUE; | |
| 165 pattern++; | |
| 166 str++; | |
| 167 } | |
| 168 break; | |
| 169 | |
| 170 case '*': | |
| 171 didMatch = TRUE; | |
| 172 pattern++; | |
| 173 if (!*pattern) | |
| 174 isEnd = TRUE; | |
| 175 isAnyMode = TRUE; | |
| 176 tmpPattern = pattern; | |
| 177 break; | |
| 178 | |
| 179 case 0: | |
| 180 if (isAnyMode) | |
| 181 { | |
| 182 if (*str) | |
| 183 str++; | |
| 184 else | |
| 185 isEnd = TRUE; | |
| 186 } | |
| 187 else | |
| 188 { | |
| 189 if (*str) | |
| 190 { | |
| 191 if (tmpPattern) | |
| 192 { | |
| 193 isAnyMode = TRUE; | |
| 194 pattern = tmpPattern; | |
| 195 } | |
| 196 else | |
| 197 didMatch = FALSE; | |
| 198 } | |
| 199 else | |
| 200 isEnd = TRUE; | |
| 201 } | |
| 202 break; | |
| 203 default: | |
| 204 if (isAnyMode) | |
| 205 { | |
| 206 if (*pattern == *str) | |
| 207 { | |
| 208 isAnyMode = FALSE; | |
| 209 didMatch = TRUE; | |
| 210 } | |
| 211 else | |
| 212 { | |
| 213 if (*str) | |
| 214 { | |
| 215 didMatch = TRUE; | |
| 216 str++; | |
| 217 } | |
| 218 } | |
| 219 } | |
| 220 else | |
| 221 { | |
| 222 if (*pattern == *str) | |
| 223 { | |
| 224 didMatch = TRUE; | |
| 225 if (*pattern) | |
| 226 pattern++; | |
| 227 if (*str) | |
| 228 str++; | |
| 229 } | |
| 230 else | |
| 231 { | |
| 232 if (tmpPattern) | |
| 233 { | |
| 234 didMatch = TRUE; | |
| 235 isAnyMode = TRUE; | |
| 236 pattern = tmpPattern; | |
| 237 } | |
| 238 } | |
| 239 } | |
| 240 | |
| 241 if (!*str && !*pattern) | |
| 242 isEnd = TRUE; | |
| 243 break; | |
| 244 | |
| 245 } // switch | |
| 246 | |
| 247 } while (didMatch && !isEnd); | |
| 248 | |
| 249 return didMatch; | |
| 250 } | |
| 251 | |
| 252 | |
| 253 int main(int argc, char *argv[]) | |
| 254 { | |
| 255 int i, res = 0; | |
| 256 DMPackFile *pack = NULL; | |
| 257 | |
|
31
7ad2c6b57932
This ugly trick won't work under MinGW, so disable it there.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
258 #ifndef __WIN32 |
| 0 | 259 stderr = stdout; |
|
31
7ad2c6b57932
This ugly trick won't work under MinGW, so disable it there.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
260 #endif |
| 0 | 261 |
| 262 // Parse arguments | |
| 263 dmInitProg("packed", "Pack File Editor", "0.4", NULL, NULL); | |
| 264 dmVerbosity = 1; | |
| 265 | |
| 266 if (!dmArgsProcess(argc, argv, optList, optListN, | |
| 267 argHandleOpt, argHandleFile, TRUE)) | |
| 268 exit(1); | |
| 269 | |
| 270 // Check PACK filename | |
| 271 if (optPackFilename == NULL) | |
| 272 optPackFilename = SET_DEFAULT_PACK; | |
| 273 | |
| 274 if (optCommand == CMD_NONE) | |
| 275 { | |
| 276 argShowHelp(); | |
| 277 dmError("Nothing to do.\n"); | |
| 278 exit(0); | |
| 279 return 0; | |
| 280 } | |
| 281 | |
| 282 dmMsg(1, "Processing %s ...\n", optPackFilename); | |
| 283 | |
| 284 // Execute command | |
| 285 switch (optCommand) | |
| 286 { | |
| 287 case CMD_CREATE: | |
| 288 case CMD_ADD: | |
| 289 switch (optCommand) | |
| 290 { | |
| 291 case CMD_CREATE: | |
| 292 dmMsg(1, "Creating new PACK\n"); | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
293 res = dmPackCreate(optPackFilename, &pack); |
| 0 | 294 break; |
| 295 | |
| 296 case CMD_ADD: | |
| 297 dmMsg(1, "Opening existing PACK\n"); | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
298 res = dmPackOpen(optPackFilename, &pack, FALSE); |
| 0 | 299 break; |
| 300 } | |
| 301 | |
| 302 // Add files into PACK | |
| 303 if (res == DMERR_OK) | |
| 304 { | |
| 305 dmMsg(1, "Adding %d files...\n", nsrcFilenames); | |
| 306 | |
| 307 for (i = 0; i < nsrcFilenames; i++) | |
| 308 { | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
309 DMPackEntry *node = NULL; |
|
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
310 int res = dmPackAddFile(pack, srcFilenames[i], optCompress, optDefResFlags, &node); |
|
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
311 |
|
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
312 if (res != DMERR_OK) |
| 0 | 313 { |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
314 dmPrint(1, "%-32s [ERROR:%d]\n", |
|
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
315 srcFilenames[i], res); |
| 0 | 316 } |
| 317 else | |
| 318 { | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
319 dmPrint(1, "%-32s ['%s', s=%d, c=%d, o=%ld, f=0x%04x]\n", |
|
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
320 srcFilenames[i], node->filename, |
|
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
321 node->size, node->length, node->offset, node->flags); |
| 0 | 322 } |
| 323 } | |
| 324 | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
325 dmMsg(1, "w=%d\n", dmPackWrite(pack)); |
|
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
326 dmMsg(1, "c=%d\n", dmPackClose(pack)); |
| 0 | 327 } |
| 328 else | |
| 329 { | |
| 314 | 330 dmError("Could not open packfile, error #%d: %s\n", res, |
| 0 | 331 dmErrorStr(res)); |
| 332 } | |
| 333 break; | |
| 334 | |
| 335 case CMD_LIST: | |
| 336 // List files in PACK | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
337 res = dmPackOpen(optPackFilename, &pack, TRUE); |
| 0 | 338 if (res == DMERR_OK) |
| 339 { | |
| 340 DMPackEntry *node; | |
| 341 for (i = 0, node = pack->entries; node; i++) | |
| 342 node = node->next; | |
| 343 dmMsg(1, "%d files total\n", i); | |
| 344 | |
|
115
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
345 dmPrint(0, "%-32s | %8s | %8s | %8s | %s\n", |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
346 "Name", "Size", "CSize", "Offset", "ResFlags"); |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
347 |
| 0 | 348 for (node = pack->entries; node != NULL; node = node->next) |
| 349 { | |
| 350 BOOL match; | |
| 351 | |
| 352 // Check for matches | |
| 353 if (nsrcFilenames > 0) | |
| 354 { | |
| 355 match = FALSE; | |
| 356 for (i = 0; i < nsrcFilenames && !match; i++) | |
| 357 { | |
| 358 match = dm_strmatch(node->filename, srcFilenames[i]); | |
| 359 } | |
| 360 } | |
| 361 else | |
| 362 match = TRUE; | |
| 363 | |
| 364 if (match) | |
| 365 { | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
366 dmPrint(0, "%-32s | %8d | %8d | %08x | %04x\n", |
|
115
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
367 node->filename, node->size, node->length, |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
368 node->offset, node->flags); |
| 0 | 369 } |
| 370 } | |
| 371 | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
372 dmMsg(1, "c=%d\n", dmPackClose(pack)); |
| 0 | 373 } |
| 374 else | |
| 314 | 375 dmError("Could not open packfile, error #%d: %s\n", res, |
| 0 | 376 dmErrorStr(res)); |
| 377 break; | |
| 378 | |
| 379 case CMD_EXTRACT: | |
| 380 // Extract files from PACK | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
381 res = dmPackOpen(optPackFilename, &pack, TRUE); |
| 0 | 382 if (res == DMERR_OK) |
| 383 { | |
| 384 DMPackEntry *node; | |
| 385 FILE *resFile = fopen(DMRES_RES_FILE, "w"); | |
| 386 if (resFile == NULL) | |
| 387 { | |
| 314 | 388 dmError("Could not create resource output file '%s' #%d: %s\n", |
| 0 | 389 DMRES_RES_FILE, errno, strerror(errno)); |
| 390 } | |
| 391 | |
| 392 for (node = pack->entries; node != NULL; node = node->next) | |
| 393 { | |
| 394 BOOL match; | |
| 395 | |
| 396 // Check for matches | |
| 397 if (nsrcFilenames > 0) | |
| 398 { | |
| 399 match = FALSE; | |
| 400 for (i = 0; (i < nsrcFilenames) && !match; i++) | |
| 401 { | |
| 402 match = dm_strmatch(node->filename, srcFilenames[i]); | |
| 403 } | |
| 404 } | |
| 405 else | |
| 406 match = TRUE; | |
| 407 | |
| 408 if (match && (node->privFlags & PACK_EXTRACTED) == 0) | |
| 409 { | |
| 410 // Mark as done | |
| 411 node->privFlags |= PACK_EXTRACTED; | |
| 412 | |
| 413 // Print one entry | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
414 dmPrint(0, "Extracting: %-32s [siz=%d, cmp=%d, offs=0x%08x, flags=0x%04x]\n", |
| 0 | 415 node->filename, node->size, node->length, |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
416 node->offset, node->flags); |
| 0 | 417 |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
418 dmPackExtractFile(pack, node); |
| 0 | 419 } |
| 420 } | |
| 421 | |
|
721
bb14d7907eb2
Rename many pack & resource handling functions.
Matti Hamalainen <ccr@tnsp.org>
parents:
652
diff
changeset
|
422 dmMsg(1, "c=%d\n", dmPackClose(pack)); |
| 0 | 423 |
| 424 if (resFile != NULL) | |
| 425 fclose(resFile); | |
| 426 } | |
| 427 else | |
| 314 | 428 dmError("Could not open packfile, error #%d: %s\n", res, |
| 0 | 429 dmErrorStr(res)); |
| 430 break; | |
| 431 | |
| 432 } | |
| 433 | |
| 434 return 0; | |
| 435 } |