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
|
#include "globals.h"
#include "../util/util.h"
#include "buffer.h"
#include "../fileio/wrfile.h"
#include <stdlib.h>
char *data_fork, *rsrc_fork;
int data_size, rsrc_size;
static int max_data_size, max_rsrc_size;
static int do_data;
void put_byte(c)
char c;
{
if(do_data) {
if(data_size >= max_data_size) {
if(max_data_size == 0) {
data_fork = malloc(1024);
} else {
data_fork = realloc(data_fork, (unsigned)max_data_size + 1024);
}
max_data_size += 1024;
if(data_fork == NULL) {
(void)fprintf(stderr, "Insufficient memory.\n");
exit(1);
}
}
data_fork[data_size++] = c;
} else {
if(rsrc_size >= max_rsrc_size) {
if(max_rsrc_size == 0) {
rsrc_fork = malloc(1024);
} else {
rsrc_fork = realloc(rsrc_fork, (unsigned)max_rsrc_size + 1024);
}
max_rsrc_size += 1024;
if(rsrc_fork == NULL) {
(void)fprintf(stderr, "Insufficient memory.\n");
exit(1);
}
}
rsrc_fork[rsrc_size++] = c;
}
}
void set_put(data)
int data;
{
do_data = data;
if(do_data) {
data_size = 0;
} else {
rsrc_size = 0;
}
}
void end_put()
{
if(info_only) {
return;
}
start_info(info, (unsigned long)rsrc_size, (unsigned long)data_size);
if(data_size != 0) {
start_data();
copy(out_ptr, data_fork, data_size);
}
if(rsrc_size != 0) {
start_rsrc();
copy(out_ptr, rsrc_fork, rsrc_size);
}
end_file();
}
|
