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
80
81
82
83
84
85
86
87
|
/*
*
* bigfits -- test large file creation
*
* gcc -g -o bigfits -I $HOME/include -L$HOME/lib bigfits.c -lfuntools
*
* gcc -g -o bigfits -I $HOME/include -L$HOME/lib bigfits.c -lfuntools -lm -lsocket -ldl -lnsl
*
*/
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <funtools.h>
#define MAXX 100
#define MAXY 100
#define MAXREC (MAXX*MAXY)
typedef struct EvStruct{
unsigned int n;
short x, y;
unsigned short block;
} *Event, EventRec;
int main(int argc, char **argv)
{
int i, j, n;
int put;
unsigned int total=0;
char *oname;
Fun fun;
EventRec events[MAXREC];
Event ev;
/* exit on gio errors */
setgerror(2);
if( argc < 3 ){
fprintf( stderr, "usage: %s oname n\n", argv[0]);
exit(1);
}
oname = argv[1];
n = atoi(argv[2]);
fprintf(stderr, "writing 10 bytes * %d groups of records * %d times\n",
MAXREC, n);
/* fill in the records */
for(j=0; j<MAXY; j++){
for(i=0; i<MAXX; i++){
ev = &events[j*MAXY+i];
ev->x = i;
ev->y = j;
ev->n = total++;
}
}
/* open output file */
if( !(fun = FunOpen(oname,"w", NULL)) )
gerror(stderr, "Could not open the output file: %s\n", oname);
/* set up the (hardwired) columns */
FunColumnSelect( fun, sizeof(EventRec), NULL,
"x", "I:0:99", "w", FUN_OFFSET(Event, x),
"y", "I:0:99", "w", FUN_OFFSET(Event, y),
"block","I", "w", FUN_OFFSET(Event, block),
"n", "J", "w", FUN_OFFSET(Event, n),
NULL);
/* write n * MAXREC records */
for(i=0; i<n; i++){
/* set block count */
for(j=0; j<MAXREC; j++){
ev = &events[j];
ev->block = i;
}
if( (put=FunTableRowPut(fun, events, MAXREC, 0, NULL)) != MAXREC ){
gerror(stderr, "expected to write %d rows; only wrote %d\n",
MAXREC, put);
}
}
FunClose(fun);
return(0);
}
|
