Mercurial > hg > dmlib
annotate packed.c @ 409:b529b7e8ff83
Various improvements and cruft cleanups.
| author | Matti Hamalainen <ccr@tnsp.org> |
|---|---|
| date | Sat, 03 Nov 2012 02:40:07 +0200 |
| parents | ec70ae5aaa1a |
| children |
| 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 dmAddFileToPack(DMPackFile *pack, const char *filename, int compression, int resFlags) | |
| 254 { | |
| 255 DMPackEntry *node; | |
| 256 int res = dm_pack_add_file(pack, filename, compression, resFlags, &node); | |
| 257 | |
| 258 if (res != DMERR_OK) | |
| 259 { | |
| 314 | 260 dmPrint(1, "%-32s [ERROR:%d]\n", |
| 0 | 261 filename, res); |
| 262 } | |
| 263 else | |
| 264 { | |
| 314 | 265 char tmp[16]; |
| 266 dmres_flags_to_symbolic(tmp, sizeof(tmp), node->resFlags); | |
| 267 dmPrint(1, "%-32s ['%s', s=%d, c=%d, o=%ld, f=%s]\n", | |
| 0 | 268 filename, node->filename, |
| 269 node->size, node->length, node->offset, | |
| 314 | 270 tmp); |
| 0 | 271 } |
| 272 | |
| 273 return res; | |
| 274 } | |
| 275 | |
| 276 | |
| 277 int main(int argc, char *argv[]) | |
| 278 { | |
| 279 int i, res = 0; | |
| 280 DMPackFile *pack = NULL; | |
| 281 | |
|
31
7ad2c6b57932
This ugly trick won't work under MinGW, so disable it there.
Matti Hamalainen <ccr@tnsp.org>
parents:
0
diff
changeset
|
282 #ifndef __WIN32 |
| 0 | 283 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
|
284 #endif |
| 0 | 285 |
| 286 // Parse arguments | |
| 287 dmInitProg("packed", "Pack File Editor", "0.4", NULL, NULL); | |
| 288 dmVerbosity = 1; | |
| 289 | |
| 290 if (!dmArgsProcess(argc, argv, optList, optListN, | |
| 291 argHandleOpt, argHandleFile, TRUE)) | |
| 292 exit(1); | |
| 293 | |
| 294 // Check PACK filename | |
| 295 if (optPackFilename == NULL) | |
| 296 optPackFilename = SET_DEFAULT_PACK; | |
| 297 | |
| 298 if (optCommand == CMD_NONE) | |
| 299 { | |
| 300 argShowHelp(); | |
| 301 dmError("Nothing to do.\n"); | |
| 302 exit(0); | |
| 303 return 0; | |
| 304 } | |
| 305 | |
| 306 dmMsg(1, "Processing %s ...\n", optPackFilename); | |
| 307 | |
| 308 // Execute command | |
| 309 switch (optCommand) | |
| 310 { | |
| 311 case CMD_CREATE: | |
| 312 case CMD_ADD: | |
| 313 switch (optCommand) | |
| 314 { | |
| 315 case CMD_CREATE: | |
| 316 dmMsg(1, "Creating new PACK\n"); | |
| 317 res = dm_pack_create(optPackFilename, &pack); | |
| 318 break; | |
| 319 | |
| 320 case CMD_ADD: | |
| 321 dmMsg(1, "Opening existing PACK\n"); | |
| 322 res = dm_pack_open(optPackFilename, &pack, FALSE); | |
| 323 break; | |
| 324 } | |
| 325 | |
| 326 // Add files into PACK | |
| 327 if (res == DMERR_OK) | |
| 328 { | |
| 329 dmMsg(1, "Adding %d files...\n", nsrcFilenames); | |
| 330 | |
| 331 for (i = 0; i < nsrcFilenames; i++) | |
| 332 { | |
| 333 // Handle resource definition files | |
| 334 if (srcFilenames[i][0] == '@') | |
| 335 { | |
| 336 } | |
| 337 else | |
| 338 { | |
| 339 dmAddFileToPack(pack, srcFilenames[i], optCompress, optDefResFlags); | |
| 340 } | |
| 341 } | |
| 342 | |
| 314 | 343 dmMsg(1, "w=%d\n", dm_pack_write(pack)); |
| 344 dmMsg(1, "c=%d\n", dm_pack_close(pack)); | |
| 0 | 345 } |
| 346 else | |
| 347 { | |
| 314 | 348 dmError("Could not open packfile, error #%d: %s\n", res, |
| 0 | 349 dmErrorStr(res)); |
| 350 } | |
| 351 break; | |
| 352 | |
| 353 case CMD_LIST: | |
| 354 // List files in PACK | |
| 355 res = dm_pack_open(optPackFilename, &pack, TRUE); | |
| 356 if (res == DMERR_OK) | |
| 357 { | |
| 358 DMPackEntry *node; | |
| 359 for (i = 0, node = pack->entries; node; i++) | |
| 360 node = node->next; | |
| 361 dmMsg(1, "%d files total\n", i); | |
| 362 | |
|
115
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
363 dmPrint(0, "%-32s | %8s | %8s | %8s | %s\n", |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
364 "Name", "Size", "CSize", "Offset", "ResFlags"); |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
365 |
| 0 | 366 for (node = pack->entries; node != NULL; node = node->next) |
| 367 { | |
| 368 BOOL match; | |
| 369 | |
| 370 // Check for matches | |
| 371 if (nsrcFilenames > 0) | |
| 372 { | |
| 373 match = FALSE; | |
| 374 for (i = 0; i < nsrcFilenames && !match; i++) | |
| 375 { | |
| 376 match = dm_strmatch(node->filename, srcFilenames[i]); | |
| 377 } | |
| 378 } | |
| 379 else | |
| 380 match = TRUE; | |
| 381 | |
| 382 if (match) | |
| 383 { | |
|
115
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
384 char flags[16]; |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
385 dmres_flags_to_symbolic(flags, sizeof(flags), node->resFlags); |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
386 |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
387 dmPrint(0, "%-32s | %8d | %8d | %08x | %s\n", |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
388 node->filename, node->size, node->length, |
|
23e03defa759
Prettify pack content listing output.
Matti Hamalainen <ccr@tnsp.org>
parents:
31
diff
changeset
|
389 node->offset, flags); |
| 0 | 390 } |
| 391 } | |
| 392 | |
| 314 | 393 dmMsg(1, "c=%d\n", dm_pack_close(pack)); |
| 0 | 394 } |
| 395 else | |
| 314 | 396 dmError("Could not open packfile, error #%d: %s\n", res, |
| 0 | 397 dmErrorStr(res)); |
| 398 break; | |
| 399 | |
| 400 case CMD_EXTRACT: | |
| 401 // Extract files from PACK | |
| 402 res = dm_pack_open(optPackFilename, &pack, TRUE); | |
| 403 if (res == DMERR_OK) | |
| 404 { | |
| 405 DMPackEntry *node; | |
| 406 FILE *resFile = fopen(DMRES_RES_FILE, "w"); | |
| 407 if (resFile == NULL) | |
| 408 { | |
| 314 | 409 dmError("Could not create resource output file '%s' #%d: %s\n", |
| 0 | 410 DMRES_RES_FILE, errno, strerror(errno)); |
| 411 } | |
| 412 | |
| 413 for (node = pack->entries; node != NULL; node = node->next) | |
| 414 { | |
| 415 BOOL match; | |
| 416 | |
| 417 // Check for matches | |
| 418 if (nsrcFilenames > 0) | |
| 419 { | |
| 420 match = FALSE; | |
| 421 for (i = 0; (i < nsrcFilenames) && !match; i++) | |
| 422 { | |
| 423 match = dm_strmatch(node->filename, srcFilenames[i]); | |
| 424 } | |
| 425 } | |
| 426 else | |
| 427 match = TRUE; | |
| 428 | |
| 429 if (match && (node->privFlags & PACK_EXTRACTED) == 0) | |
| 430 { | |
| 314 | 431 char tmp[16]; |
| 432 | |
| 0 | 433 // Mark as done |
| 434 node->privFlags |= PACK_EXTRACTED; | |
| 435 | |
| 436 // Print one entry | |
| 314 | 437 dmres_flags_to_symbolic(tmp, sizeof(tmp), node->resFlags); |
| 438 dmPrint(0, "Extracting: %-32s [siz=%d, cmp=%d, offs=0x%08x, flags=%s]\n", | |
| 0 | 439 node->filename, node->size, node->length, |
| 314 | 440 node->offset, tmp); |
| 0 | 441 |
| 442 dm_pack_extract_file(pack, node); | |
| 443 | |
| 444 if (resFile != NULL) | |
| 445 { | |
| 446 fprintf(resFile, | |
|
315
ec70ae5aaa1a
Oops, resource file output was missing a linefeed.
Matti Hamalainen <ccr@tnsp.org>
parents:
314
diff
changeset
|
447 "%s|%s\n", node->filename, tmp); |
| 0 | 448 } |
| 449 } | |
| 450 } | |
| 451 | |
| 314 | 452 dmMsg(1, "c=%d\n", dm_pack_close(pack)); |
| 0 | 453 |
| 454 if (resFile != NULL) | |
| 455 fclose(resFile); | |
| 456 } | |
| 457 else | |
| 314 | 458 dmError("Could not open packfile, error #%d: %s\n", res, |
| 0 | 459 dmErrorStr(res)); |
| 460 break; | |
| 461 | |
| 462 } | |
| 463 | |
| 464 return 0; | |
| 465 } |