#include <stdlib.h>
#include <strings.h>
#include <string.h>
+#include <unistd.h>
#include <errno.h>
#include "rsb-crc.h"
#include "rsb-lz.h"
+#include "filesystem.h"
/* TODO: IMPLEMET THIS! */
/* Probably very broken lzw implementation by Agilent:
* 59b80: 46335053 undefined
*/
-void fn_59560(unsigned int arg1)
+void err_exit(const char *fname)
{
+ fprintf(stderr,"%s: error extracting...\n", fname);
+ exit(1);
}
-void fn_59578(unsigned int arg1, unsigned int arg2, unsigned int arg3, unsigned int arg4)
+struct data_in_s {
+ unsigned char *start; /* 0 */
+ unsigned char *stop; /* 4 */
+ unsigned char bit; /* 8 */
+ unsigned char x; /* 9 */
+};
+
+struct data_out_s {
+ unsigned char *pos;
+ unsigned char *end;
+};
+
+unsigned char fn_597c8(struct data_in_s *r6_data)
{
+ unsigned char *r0;
+ unsigned char *r1;
+ unsigned char r5;
+
+ r5 = 0;
+
+ r0 = r6_data->start;
+ r1 = r6_data->stop;
+
+ if (r1 < r0)
+ err_exit(__func__);
+
+ r5 = *r0;
+ r0++;
+ r6_data->start = r0;
+
+ return r5;
}
-void fn_59788()
+unsigned int fn_59848(struct data_in_s *r6_data)
{
- fprintf(stderr,"error extracting...\n");
- exit(1);
-}
+ unsigned char r1;
+ unsigned char r2;
+ unsigned int r5;
-struct s_59b78 {
- unsigned char *start;
- unsigned char *stop;
- unsigned char y; /* 8 */
- unsigned char x; /* 9 */
-};
+ r1 = r6_data->bit;
+ if (r1 == 0x80) {
+ r6_data->x = fn_597c8(r6_data);
+ }
+ r1 = r6_data->bit;
+ r2 = r6_data->x;
+ r1 = r1 & r2;
+ r5 = r1 & 0xff;
+
+ r1 = r6_data->bit;
+ r1 = r1 >> 1;
+ r6_data->bit = r1;
+ if (r1 == 0) {
+ r1 = 0x80;
+ r6_data->bit = r1;
+ }
-unsigned int fn_59848(struct s_59b78 *data)
-{
- return 0;
+ if (r5 == 0)
+ return 0;
+
+ return 1;
}
-unsigned int fn_598b4(struct s_59b78 *data, unsigned int arg2)
+unsigned int fn_598b4(struct data_in_s *r11_data, unsigned int r10_arg2)
{
- return 0;
+ unsigned int r1;
+ unsigned int r2;
+ unsigned int r6;
+ unsigned int r7;
+
+ r1 = r10_arg2 - 1;
+ r6 = 1 << r1;
+
+ r7 = 0;
+ while (r6 != 0) {
+ r1 = r11_data->bit;
+ if (r1 == 0x80) {
+ r1 = fn_597c8(r11_data);
+ r11_data->x = r1;
+ }
+ r1 = r11_data->bit;
+ r2 = r11_data->x;
+ r1 = r1 & r2;
+ if (r1 != 0)
+ r7 = r7 | r6;
+
+ r6 = r6 >> 1;
+
+ r2 = r11_data->bit;
+ r2 = r2 >> 1;
+ r11_data->bit = r2;
+
+ r1 = r11_data->bit;
+ if(r1 == 0) {
+ r11_data->bit = 0x80;
+ }
+ }
+
+ return r7;
}
-void fn_5980c(unsigned int arg1, unsigned int mem[])
+void fn_5980c(unsigned int arg1, struct data_out_s *data_out)
{
unsigned char *r1;
unsigned char *r2;
- r1 = (unsigned char*)mem[0];
- r2 = (unsigned char*)mem[1];
+ r1 = data_out->pos;
+ r2 = data_out->end;
- if (r1 >= r2)
- fn_59788();
+ if (r1 > r2) {
+ printf("r1: 0x%08x, r2: 0x%08x\n", (unsigned int)r1, (unsigned int)r2);
+ err_exit(__func__);
+ }
*r1 = arg1 & 0xff;
r1++;
- mem[0] = (unsigned int)r1;
+ data_out->pos = r1;
}
-void fn_5993c(struct s_59b78 *data, unsigned int mem[])
+void lz_expand(struct data_in_s *r10_data, struct data_out_s *data_out)
{
unsigned int r5;
unsigned int r2;
- unsigned int r4;
+ unsigned char r4;
unsigned int r6;
unsigned int r7;
unsigned int r11;
- unsigned char arr_59b64[1024];
+ unsigned char arr_59b64[2048];
r5 = 1;
- do {
- do {
- r2 = fn_59848(data);
+ while (1) {
+ while (1) {
+ r2 = fn_59848(r10_data);
if (r2 == 0)
break;
- r2 = fn_598b4(data, 8) & 0xff;
+ r2 = fn_598b4(r10_data, 8) & 0xff;
r4 = r2;
- fn_5980c(r4, mem);
+ fn_5980c(r4, data_out);
arr_59b64[r5] = r4 & 0xff;
r2 = r5 + 1;
r2 = r2 << 22;
r2 = r2 >> 22;
r5 = r2;
- } while(1);
+ }
- r11 = fn_598b4(data, 0x0a);
+ r11 = fn_598b4(r10_data, 0x0a);
if(r11 == 0)
return;
- r2 = fn_598b4(data, 0x04);
+ r2 = fn_598b4(r10_data, 0x04);
r7 = r2 + 1;
r6 = 0;
- do {
+ while (r6 <= r7) {
r2 = r6 + r11;
r2 = r2 << 22;
r2 = r2 >> 22;
r4 = arr_59b64[r2];
- fn_5980c(r4, mem);
- arr_59b64[r5] = r4 & 0xff;
+ fn_5980c(r4, data_out);
+ arr_59b64[r5] = r4;
r2 = r5 + 1;
r2 = r2 << 22;
r2 = r2 >> 22;
r5 = r2;
r6++;
- } while(r6 <= r7);
- } while(1);
+ }
+ }
}
unsigned int crc_check_59684(unsigned char *arg1, unsigned int arg2, unsigned int magic)
return 1;
#endif
+ /* ??? */
r4 = *((unsigned int*)arg1 + 0x20);
r5 = *((unsigned int*)arg1 + 0x24);
+ printf("magic: 0x%08x <-> 0x%08x\n", r5, magic);
if (r5 != magic)
return 2;
return 4;
}
-void fn_59508()
+void extract_lz_file(unsigned char *inbuf, unsigned char *name)
{
-}
+ unsigned int len;
+ unsigned char *outbuf;
+ struct data_in_s data_in;
+ struct data_out_s data_out;
-void extract_lz_file(unsigned char *buf, unsigned char *name)
-{
- unsigned char *r3;
- unsigned int r5;
- unsigned char *r7 = NULL; /* Arg1, mem start */
- unsigned char *r10 = NULL; /* Arg2, mem end */
- unsigned char *r11 = buf; /* Arg3 */
- struct s_59b78 struct1;
- unsigned int arr_59b7c[1024];
+ if (*((unsigned int*)inbuf) != LZ_MAGIC)
+ err_exit(__func__);
- r7 = malloc(1024*1024*1024);
- r10 = r7 + (1024*1024*1024);
+ len = *((unsigned int*)(inbuf + 4));
+ printf(", length: %d", len);
- if (r7 == NULL) {
+ if ((outbuf = malloc(len)) == NULL) {
perror("malloc");
exit(1);
}
- fn_59578(0, 0, 0x3f, 0x33);
- fn_59578(4, 0x10000000, 0x33, 0x366);
- fn_59578(5, 0x14000000, 0x1b, 0x733);
- fn_59578(7, 0xc0000000, 0x3b, 0x33);
- fn_59560(0x1005);
-
- if (*((unsigned int*)r11) != LZ_MAGIC)
- fn_59788();
- r3 = r11 + 4;
- r5 = *((unsigned int*)r3);
- printf(", Length: %d\n", r5);
+ bzero(outbuf, len);
- r3 = r7 + r5;
- if (r3 > r10)
- fn_59788();
-
- struct1.start = r11 + 8;
- struct1.stop = r5 + r11;
- struct1.x = 0;
- struct1.y = 0x80;
+ data_in.start = inbuf + 8;
+ data_in.stop = inbuf + len;
+ data_in.x = 0;
+ data_in.bit = 0x80;
- arr_59b7c[0] = (unsigned int)r7;
- arr_59b7c[1] = (unsigned int)(r5 + r7);
+ data_out.pos = outbuf;
+ data_out.end = outbuf + len;
- fn_5993c(&struct1, arr_59b7c);
+ lz_expand(&data_in, &data_out);
+#if 0
+ /* This seems to still be completely broken */
r3 = r7 + 0x20;
r5 = *((unsigned int*)r3);
- if (crc_check_59684(r7, r5, 0x46335053) != 0)
- fn_59788();
-
- fn_59508();
-
- free(r7);
-}
-
-void search_lz_sections(unsigned char *fw, int len)
-{
- int i;
- unsigned char *j;
-
- for(i = 0; i < len - 4; i++) {
- if (*((unsigned int*)(fw+i)) == LZ_MAGIC) {
- j = fw + i - 1;
- if (*j != 0x00)
- continue;
- printf("0x%02x: ", i);
- j--;
- while (j > fw) {
- if (*j == 0x00) {
- printf("%s", j+1);
- extract_lz_file(fw + i, j+1);
- break;
- }
- j--;
- }
- printf("\n");
- }
+ if ((ret = crc_check_59684(r7, r5, 0x46335053)) != 0) {
+ printf("crc_check return: %d\n", ret);
+ err_exit(__func__);
}
+#endif
+
+ write_file((char*)name, outbuf, len);
+
+ free(outbuf);
}
projects / rsbs2 / blobdiff