dxx-rebirth/d2x-rebirth/utilities/mvlextract.c
Kp 12b57e84e6 Switch most in-tree http:// links to https://
For each link given as http://, verify that the site is accessible over
https:// and, if so, switch to it.  These domains were converted:

* llvm.org
* clang.llvm.org
* en.cppreference.com
* www.dxx-rebirth.com
* www.libsdl.org
* www.scons.org
2018-09-02 00:57:29 +00:00

99 lines
2.4 KiB
C

/*
* This file is part of the DXX-Rebirth project <https://www.dxx-rebirth.com/>.
* It is copyright by its individual contributors, as recorded in the
* project's Git history. See COPYING.txt at the top level for license
* terms and a link to the Git history.
*/
/*
* Written 1999 Jan 29 by Josh Cogliati
* Modified for mvl by Bradley Bell, 2002, 2003
* This program is licensed under the terms of the GPL, version 2 or later
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#define SWAPINT(x) (((x)<<24) | (((unsigned int)(x)) >> 24) | (((x) &0x0000ff00) << 8) | (((x) & 0x00ff0000) >> 8))
#define MAX_FILES 256
int
main(int argc, char *argv[])
{
FILE *mvlfile, *writefile;
int i, nfiles, len[MAX_FILES];
char filename[MAX_FILES][13];
char *buf;
struct stat statbuf;
int v = 0;
int bigendian = 0;
if (argc > 1 && !strcmp(argv[1], "v")) {
v = 1;
argc--;
argv++;
}
if (argc < 2) {
printf("Usage: mvlextract [v] mvlfile [filename]\n"
"extracts all the files in mvlfile into the current directory\n"
"Options:\n"
" v View files, don't extract\n");
exit(0);
}
mvlfile = fopen(argv[1], "rb");
stat(argv[1], &statbuf);
printf("%i\n", (int)statbuf.st_size);
buf = (char *)malloc(4);
fread(buf, 4, 1, mvlfile);
fread(&nfiles, 4, 1, mvlfile);
printf("%d files\n", nfiles);
if (nfiles > MAX_FILES) { // must be a bigendian mvl
fprintf(stderr, "warning: nfiles>%d, trying reverse byte order...",
MAX_FILES);
bigendian = 1;
}
if (bigendian)
nfiles = SWAPINT(nfiles);
printf("Extracting from: %s\n", argv[1]);
free(buf);
for (i = 0; i < nfiles; i++) {
fread(filename[i], 13, 1, mvlfile);
fread(&len[i], 4, 1, mvlfile);
if (bigendian)
len[i] = SWAPINT(len[i]);
if (argc == 2 || !strcmp(argv[2], filename[i]))
printf("Filename: %s \tLength: %i\n", filename[i], len[i]);
}
if (!v) {
for (i = 0; i < nfiles; i++) {
if (argc > 2 && strcmp(argv[2], filename[i]))
fseek(mvlfile, len[i], SEEK_CUR);
else {
if (ftell(mvlfile) > statbuf.st_size) {
printf("Error, end of file\n");
exit(1);
}
buf = (char *)malloc(len[i]);
if (buf == NULL) {
printf("Unable to allocate memory\n");
} else {
fread(buf, len[i], 1, mvlfile);
writefile = fopen(filename[i], "wb");
fwrite(buf, len[i], 1, writefile);
fclose(writefile);
free(buf);
}
}
}
}
fclose(mvlfile);
return 0;
}