summaryrefslogtreecommitdiff
path: root/VP/unarc.cpp
blob: 36a258ab6c4e1867f3021e13ccbeca1bc8270a9a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>

#include "Input.h"
#include "Output.h"
#include "generic.h"
#include "Main.h"

#define THRESHOLD 2000

CODE_BEGINS
virtual int startup() throw(GeneralException) {
    int n, * index, * sizes, i, d;
    String temp;
    Handle * h, * o;

    verbosity = M_INFO;

    if (argc != 2) {
	printm(M_BARE, "Usage: unarc <archive>\n");
	exit(-1);
    }
    
    h = new Input(argv[1]);
    
    h->read(&n, 4);
    
    printm(M_STATUS, "Archive claims to have %i files, checking integrity.\n", n);
    
    if (n > THRESHOLD) {
	printm(M_ERROR, "Archive has more than %i files, that doesn't make sense to me.\n", THRESHOLD);
	exit(-1);
    }
    
    index = (int *) malloc(n * sizeof(int));
    sizes = (int *) malloc(n * sizeof(int));
    
    for (i = 0; i < n; i++) {
	h->seek((i + 1) * 8 + 4, SEEK_SET);
	h->read(&(sizes[i]), 4);
	printm(M_INFO, "File #%i size = %i = 0x%08x\n", i, sizes[i], sizes[i]);
    }
    
    index[0] = (n + 1) * 8;
    i = 0;
    printm(M_INFO, "Index #%i = %i = 0x%08x\n", i, index[i], index[i]);
    
    for (i = 1; i < n; i++) {
	index[i] = index[i - 1] + sizes[i - 1];
	printm(M_INFO, "Index #%i = %i = 0x%08x\n", i, index[i], index[i]);
    }
    
    d = h->GetSize() - index[n - 1] - sizes[n - 1];

    printm(M_INFO, "Archive size: %i, last index: %i, last file size: %i, difference = %i\n", h->GetSize(), index[n - 1], sizes[n - 1], d);
    
    if ((d < 0) || (d > 2048)) {
	printm(M_ERROR, "Archive incoherent.\n");
	exit(-1);
    }
    
    printm(M_STATUS, "Archive seems to be ok, extracting.\n");
    
    for (i = 0; i < n; i++) {
	temp.set("%04i.out", i);
	o = new Output(temp);
	
	printm(M_INFO, "Extracting " + temp + "\n");
	
	h->seek(index[i], SEEK_SET);
	copy(h, o, sizes[i]);
	delete o;
    }
    
    delete h;
    return 0;
}
CODE_ENDS