/* Made by Maurus Cuelenaere */ #include #include #include #include #include #include #include #include #include #define VERSION "0.1" static unsigned char* int2le(unsigned int val) { static unsigned char addr[4]; addr[0] = val & 0xff; addr[1] = (val >> 8) & 0xff; addr[2] = (val >> 16) & 0xff; addr[3] = (val >> 24) & 0xff; return addr; } static unsigned int le2int(unsigned char* buf) { unsigned int res = (buf[3] << 24) | (buf[2] << 16) | (buf[1] << 8) | buf[0]; return res; } unsigned int _filesize(FILE* fd) { unsigned int tmp, oldpos; oldpos = ftell(fd); fseek(fd, 0, SEEK_END); tmp = ftell(fd); fseek(fd, oldpos, SEEK_SET); return tmp; } static void print_usage(void) { #ifdef _WIN32 fprintf(stderr, "Usage: hxfreplace.exe [IN_FW] [OUT_FW] [BIN_FILE]\n\n"); fprintf(stderr, "Example: hxfreplace.exe VX747.HXF out.hxf ccpmp.bin\n\n"); #else fprintf(stderr, "Usage: HXFreplace [IN_FW] [OUT_FW] [BIN_FILE]\n\n"); fprintf(stderr, "Example: HXFreplace VX747.HXF out.hxf ccpmp.bin\n\n"); #endif } static int checksum(FILE *file) { int oldpos = ftell(file); int ret=0, i, filesize = _filesize(file)-0x40; unsigned char *buf; buf = (unsigned char*)malloc(filesize); if(buf == NULL) { fseek(file, oldpos, SEEK_SET); fprintf(stderr, "[ERR] Error while allocating memory\n"); return 0; } fseek(file, 0x40, SEEK_SET); if(fread(buf, filesize, 1, file) != 1) { free(buf); fseek(file, oldpos, SEEK_SET); fprintf(stderr, "[ERR] Error while reading from file\n"); return 0; } fprintf(stderr, "[INFO] Computing checksum..."); for(i = 0; i < filesize; i+=4) ret += le2int(&buf[i]); free(buf); fseek(file, oldpos, SEEK_SET); fprintf(stderr, " Done!\n"); return ret; } int main(int argc, char *argv[]) { FILE *infile, *outfile, *fw; fprintf(stderr, "HXFreplace v" VERSION " - (C) 2008 Maurus Cuelenaere\n"); fprintf(stderr, "This is free software; see the source for copying conditions. There is NO\n"); fprintf(stderr, "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n"); if(argc != 4) { print_usage(); return 1; } if((infile = fopen(argv[1], "rb")) == NULL) { fprintf(stderr, "[ERR] Cannot open %s\n", argv[1]); return 2; } if(fseek(infile, 0x40, SEEK_SET) != 0) { fprintf(stderr, "[ERR] Cannot seek to 0x40\n"); fclose(infile); return 3; } fprintf(stderr, "[INFO] Searching for ccpmp.bin...\n"); int found = -1; int filenamesize; char *filename; unsigned char tmp[4]; #define READ(x, len) if(fread(x, len, 1, infile) != 1) \ { \ fprintf(stderr, "[ERR] Cannot read from %s\n", argv[1]); \ fclose(infile); \ return 4; \ } while(found < 0) { READ(&tmp[0], 4); filenamesize = le2int(tmp); filename = (char*)malloc(filenamesize); READ(filename, filenamesize); if(strcmp(filename, "ccpmp.bin") == 0) found = ftell(infile); else { READ(&tmp[0], 4); fseek(infile, le2int(tmp), SEEK_CUR); } free(filename); } fprintf(stderr, "[INFO] Found ccpmp.bin at 0x%x\n", found); if((outfile = fopen(argv[2], "wb+")) == NULL) { fclose(infile); fprintf(stderr, "[ERR] Cannot open %s\n", argv[2]); return 5; } #define WRITE(x, len) if(fwrite(x, len, 1, outfile) != 1) \ { \ fprintf(stderr, "[ERR] Cannot write to %s\n", argv[2]); \ fclose(outfile); \ if(fw != NULL) \ fclose(fw); \ return 5; \ } unsigned char* buffer; buffer = (unsigned char*)malloc(found); fseek(infile, 0, SEEK_SET); READ(buffer, found); WRITE(buffer, found); free(buffer); if((fw = fopen(argv[3], "rb")) == NULL) { fclose(infile); fclose(outfile); fprintf(stderr, "[ERR] Cannot open %s\n", argv[3]); } int fw_filesize = _filesize(fw); #define READ2(x, len) if(fread(x, len, 1, fw) != 1) \ { \ fprintf(stderr, "[ERR] Cannot read from %s\n", argv[3]); \ fclose(infile); \ fclose(outfile); \ return 6; \ } buffer = (unsigned char*)malloc(fw_filesize); READ2(buffer, fw_filesize); fputc(0x20, outfile); /* Padding */ WRITE(int2le(fw_filesize), 4); WRITE(buffer, fw_filesize); free(buffer); fclose(fw); fw = NULL; fseek(infile, found+1, SEEK_SET); READ(&tmp, 4); if(fseek(infile, le2int(&tmp[0]), SEEK_CUR) != 0) { fprintf(stderr, "[INFO] Cannot seek into %s\n", argv[1]); fclose(infile); fclose(outfile); return 7; } found = ftell(infile); int other_size = _filesize(infile) - found; buffer = (unsigned char*)malloc(other_size); READ(buffer, other_size); WRITE(buffer, other_size); free(buffer); fclose(infile); fflush(outfile); fseek(outfile, 0x14, SEEK_SET); WRITE(int2le(_filesize(outfile)), 4); WRITE(int2le(checksum(outfile)), 4); fclose(outfile); fprintf(stderr, "[INFO] Done!\n"); return 0; }