summaryrefslogtreecommitdiff
path: root/phnxdeco/phnxdeco.c
diff options
context:
space:
mode:
Diffstat (limited to 'phnxdeco/phnxdeco.c')
-rw-r--r--phnxdeco/phnxdeco.c424
1 files changed, 0 insertions, 424 deletions
diff --git a/phnxdeco/phnxdeco.c b/phnxdeco/phnxdeco.c
deleted file mode 100644
index 4d9968d..0000000
--- a/phnxdeco/phnxdeco.c
+++ /dev/null
@@ -1,424 +0,0 @@
-/*
- * Phoenix BIOS Decompress
- *
- * Copyright (C) 2000, 2002, 2003 Anthony Borisow
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2, or (at your option)
- * any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License
- * along with this program; see the file COPYING. If not, write to
- * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <memory.h>
-
-#include "phnxdeco.h"
-
-#define BLOCK 0x8000
-
-#define Xtract 0x10
-#define List 0x11
-
-static unsigned int FoundAt(FILE * ptx, unsigned char *Buf, char *Pattern, unsigned int BLOCK_LEN)
-{
-
- unsigned int i, Ret;
- unsigned short Len;
- Len = strlen(Pattern);
- for (i = 0; i < BLOCK_LEN - 0x80; i++) {
- if (memcmp(Buf + i, Pattern, Len) == 0) {
- Ret = ftell(ptx) - (BLOCK_LEN - i);
- return (Ret);
- }
- }
- return 0;
-}
-struct PhoenixModuleName
-{
- char Id;
- char *Name;
-};
-
-static struct PhoenixModuleName
-PhoenixModuleNames[] = {
- {'A', "ACPI"},
- {'B', "BIOSCODE"},
- {'C', "UPDATE"},
- {'D', "DISPLAY"},
- {'E', "SETUP"},
- {'F', "FONT"},
- {'G', "DECOMPCODE"},
- {'I', "BOOTBLOCK"},
- {'L', "LOGO"},
- {'M', "MISER"},
- {'N', "ROMPILOTLOAD"},
- {'O', "NETWORK"},
- {'P', "ROMPILOTINIT"},
- {'R', "OPROM"},
- {'S', "STRINGS"},
- {'T', "TEMPLATE"},
- {'U', "USER"},
- {'X', "ROMEXEC"},
- {'W', "WAV"},
- {'H', "TCPA_H"}, /* TCPA (Trusted Computing), USBKCLIB? */
- {'K', "TCPA_K"}, /* TCPA (Trusted Computing), "AUTH"? */
- {'Q', "TCPA_Q"}, /* TCPA (Trusted Computing), "SROM"? */
- {'<', "TCPA_<"},
- {'*', "TCPA_*"},
- {'?', "TCPA_?"},
- {'J', "SmartCardPAS"},
-};
-
-static char *
-PhoenixModuleNameGet(char Id)
-{
- int i;
-
- for (i = 0; PhoenixModuleNames[i].Name; i++)
- if (PhoenixModuleNames[i].Id == Id)
- return PhoenixModuleNames[i].Name;
-
- return "";
-}
-
-#define COMPRESSION_NONE 0
-#define COMPRESSION_UNKNOWN 1
-#define COMPRESSION_LZARI 2
-#define COMPRESSION_LZSS 3
-#define COMPRESSION_LZHUF 4
-#define COMPRESSION_LZINT 5
-
-/*
- * This is nothing but the lzss algo, done rather horribly wrong.
- */
-static void decodeM3(FILE *ptx, FILE *bmx, unsigned int RealLen)
-{
- unsigned short Index, Index2, DX, Loop, i;
- unsigned char Buffer[0x1000], tmp;
- unsigned int Now;
-
- memset(Buffer, 0, 0x1000);
-
- DX = 0;
- Index = 0xFEE;
- Now = 0;
-
- for (;;) {
- DX >>= 1;
- if ((DX & 0x100) == 0) {
- if (Now >= RealLen)
- return;
- fread(&tmp, 1, 1, ptx);
- DX = (unsigned short) (0xFF) * 0x100 + tmp;
- };
-
- if ((DX & 0x1) != 0) {
- if (Now++ >= RealLen)
- return;
-
- fread(&tmp, 1, 1, ptx);
- fwrite(&tmp, 1, 1, bmx);
- Buffer[Index++] = tmp;
- Index &= 0xFFF;
- continue;
- };
-
- fread(&Index2, 1, 1, ptx);
- Index2 &= 0xFF;
-
- fread(&tmp, 1, 1, ptx);
-
- Index2 += (tmp & 0xF0) << 4;
- Loop = (tmp & 0xf) + 3;
-
- for (i = 0; i < Loop; i++) {
- tmp = Buffer[Index2++];
- Index2 &= 0xFFF;
- fwrite(&tmp, 1, 1, bmx);
- Buffer[Index++] = tmp;
- Index &= 0xFFF;
- }
-
- Now += Loop;
- }
-
-}
-
-typedef struct {
- unsigned int Prev;
- unsigned char Sig[3];
- unsigned char ID_HI;
- unsigned char ID_LO;
- unsigned char HeadLen;
- unsigned char isPacked;
- unsigned short Offset;
- unsigned short Segment;
- unsigned int ExpLen1;
- unsigned int Packed1;
- unsigned int Packed2;
- unsigned int ExpLen2;
-} PHOENIXHEAD;
-
-typedef struct {
- unsigned char Name[6];
- unsigned short Flags;
- unsigned short Len;
-} PHNXID;
-
-/*
- * Modified Module Detection & Manipulating
- * According to BCPSYS block
- */
-static unsigned char TotalSecM(FILE * ptx, unsigned char * Buf, unsigned char Action, unsigned int Start, unsigned int ConstOff, unsigned int SYSOff)
-{
- FILE *pto;
- unsigned int i;
- unsigned int blkend = 0, blkstart = 0;
- PHOENIXHEAD phhead;
- unsigned char TotalSec = 0;
- unsigned int Offset = Start;
-
- phhead.Prev = 0xFFFF0000;
- fseek(ptx, 0, 2);
-
- if (Action == List)
- printf("\nC I COMP START END LENGTH LINK TO FILEOFFSET");
-
-
- while (phhead.Prev != 0x0 && !feof(ptx)) {
- fseek(ptx, Offset, 0);
- TotalSec++;
- Start = Offset;
- if (Start > 0x100000)
- break;
- fread(&phhead, 1, sizeof(phhead), ptx);
- Offset = phhead.Prev - ConstOff;
-
- blkend = Start + ConstOff + sizeof(PHOENIXHEAD) - 5;
- blkstart = Start + 0xFFF00000;
- switch (Action) {
- case List:
-
- printf("\n%c %.1X %1d %8X %8X %5.X %8X %5.2Xh %05X", phhead.ID_LO, phhead.ID_HI,
- phhead.isPacked, blkstart, blkend + phhead.Packed1, phhead.Packed1, phhead.Prev, Start, phhead.Segment << 16 | phhead.Offset);
-
-
- break;
-
- case Xtract:
- {
- char *modulename = PhoenixModuleNameGet(phhead.ID_LO);
- char filename[64];
-
- snprintf(filename, 64, "%s%1.1X.rom", modulename, phhead.ID_HI);
- printf("\n%c %1.1X -> %s", phhead.ID_LO, phhead.ID_HI, filename);
-
-
- if ((pto = fopen(filename, "wb")) == NULL) {
- printf("\nFile %s I/O error..Exit", filename);
- exit(1);
- }
- }
-
- /* Evidently, isPacked == PackedLevel */
- if (phhead.isPacked == 0x5) {
- interfacing interface;
-
- interface.infile = ptx;
- interface.outfile = pto;
- interface.original = phhead.ExpLen1;
- interface.packed = phhead.Packed1;
-
- decode(interface);
- } else if (phhead.isPacked == 0x3) {
- fseek(ptx, -4L, 1);
- decodeM3(ptx, pto, phhead.ExpLen1);
- } else {
- unsigned char tmp[1];
-
- fseek(ptx, -4L, 1);
- for (i = 0; i < phhead.ExpLen1; i++) {
- fread(tmp, 1, 1, ptx);
- fwrite(tmp, 1, 1, pto);
- };
- }
- fclose(pto);
-
- break;
- }
- }
-
- return (TotalSec);
-}
-
-static unsigned int IsPhoenixBIOS(FILE * ptx, unsigned char * Buf)
-{
-
- unsigned int CurPos = 0;
- char FirstPattern[] = "Phoenix FirstBIOS";
- char PhoenixPattern[] = "PhoenixBIOS 4.0";
-
- rewind(ptx);
- while (!feof(ptx)) {
- fread(Buf, 1, BLOCK, ptx);
- if ((CurPos = FoundAt(ptx, Buf, PhoenixPattern, BLOCK)) != 0)
- break;
- /* O'K, we got PhoenixBIOS 4.0 hook */
- CurPos = ftell(ptx) - 0x100;
- }
-
- if (feof(ptx)) {
- rewind(ptx);
- while (!feof(ptx)) {
- fread(Buf, 1, BLOCK, ptx);
- if ((CurPos = FoundAt(ptx, Buf, FirstPattern, BLOCK)) != 0)
- break;
- /* O'K, we got Phoenix FirstBIOS hook */
- CurPos = ftell(ptx) - 0x100;
- }
-
- /* Neither PhoenixBIOS 4.0 nor FirstBIOS */
- if (feof(ptx))
- return (0);
-
- }
-
- return (CurPos);
-}
-
-int main(int argc, char *argv[])
-{
- FILE *ptx;
- unsigned char Buf[BLOCK];
- unsigned int CurPos, fLen, Start, Offset;
- unsigned int SYSOff;
- char BCPSEGMENT[] = "BCPSEGMENT";
- char phdate[18]; /* "XX/XX/XX\20XX:XX:XX\0" */
- unsigned char TotalSections = 0, Action, Mods = 0;
- PHNXID IDMod;
-
- memset(Buf, 0, BLOCK);
-
- if (argc != 3) {
- printf("wrong usage.\n");
- return 1;
- }
-
- if (!strcmp(argv[1], "x"))
- Action = Xtract;
- else if (!strcmp(argv[1], "l"))
- Action = List;
- else {
- printf("wrong usage.\n");
- return 1;
- }
-
- if ((ptx = fopen(argv[2], "rb")) == NULL) {
- printf("\nFATAL ERROR: File %s opening error...\n", argv[2]);
- return 0;
- };
-
- CurPos = 0;
- IDMod.Name[0] = 0xff;
- IDMod.Len = 0xff;
- SYSOff = 0;
-
- fseek(ptx, 0, 2);
- fLen = ftell(ptx);
- rewind(ptx);
- printf("Filelength\t: %X (%u bytes)\n", fLen, fLen);
- printf("Filename\t: %s\n", argv[2]);
-
- while (!feof(ptx)) {
- fread(Buf, 1, BLOCK, ptx);
- if ((CurPos = FoundAt(ptx, Buf, BCPSEGMENT, BLOCK)) != 0)
- break;
- /* O'K, we got PhoenixBIOS BCPSEGMENT hook */
- CurPos = ftell(ptx) - 0x100;
-
- }
-
- if (feof(ptx)) {
- printf("Searched through file. Not a PhoenixBIOS\n");
- exit(1);
- }
-
- printf("PhoenixBIOS hook found at\t: %X\n", CurPos);
- CurPos += 10;
- fseek(ptx, (unsigned int) (CurPos), 0);
-
- while (IDMod.Name[0] != 0x0 && IDMod.Len != 0x0) {
- fread(&IDMod, 1, sizeof(IDMod), ptx);
-
- /* Wrong Count w/ ALR and some S/N internal errors ? */
- if (IDMod.Name[0] < 0x41 && IDMod.Name[0] != 0x0) {
- do {
- fread(Buf, 1, 1, ptx);
- } while (Buf[0] != 0x42);
- fseek(ptx, -1L, SEEK_CUR);
- CurPos = ftell(ptx);
- fread(&IDMod, 1, sizeof(IDMod), ptx);
- };
-
- if (memcmp(IDMod.Name, "BCPSYS", 6) == 0)
- SYSOff = CurPos;
- CurPos += IDMod.Len;
- fseek(ptx, (unsigned int) (CurPos), 0);
- if (IDMod.Name[0] == 0x0 || IDMod.Name[0] < 0x41)
- break;
- else
- Mods++;
- }
-
- printf("System Information at\t\t: %X\n", SYSOff);
-
- fseek(ptx, SYSOff + 15, 0);
- fread(&phdate, 1, 17, ptx);
- phdate[8] = ' ';
- phdate[17] = 0;
-
- fseek(ptx, SYSOff + 0x77, 0);
- /* Move to the pointer of 1st module */
- fread(&Start, 1, sizeof(Start), ptx);
- Offset = (0xFFFE0000 - (ftell(ptx) & 0xFFFE0000));
- Start -= Offset;
-
- /* Move to the DEVEL string */
- fseek(ptx, SYSOff + 0x37, 0);
- fread(Buf, 1, 8, ptx);
-
- printf("Version\t\t: %8.8s\n", Buf);
- printf("Start\t\t: %X\n", Start);
- printf("Offset\t\t: %X\n", 0xFFFF0000 - Offset);
-
- printf("BCP Modules\t: %i\n", Mods);
-
- printf("Released\t: %s\n", phdate);
-
- CurPos = IsPhoenixBIOS(ptx, Buf);
- fseek(ptx, (unsigned int) (CurPos), 0);
-
- fread(Buf, 1, 0x100, ptx);
-
- printf("\t%.64s\n", Buf);
-
- TotalSections = TotalSecM(ptx, Buf, Action, Start, Offset, SYSOff);
-
- printf("\n");
- printf("Total Sections: %u\n", TotalSections);
-
- fclose(ptx);
-
- printf("\n");
- return 0;
-}
generated by cgit v1.2.3 (git 2.39.1) at 2024-05-28 04:38:37 +0000