blob: ece8f25aac94ff5c5748c82e54451998d2ca398b (
plain) (
blame)
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
|
include <mach.h>
include <tbset.h>
include "tbtables.h"
define SZ_PACKED_REC (SZ_PARREC/SZB_CHAR) # size of packed par record
# tbtbod -- beginning of data
# This function returns the offset (in char) of the first element in the
# data portion of a table relative to the beginning of the file. The offset
# includes a size-information record, maxpar records that may contain user
# parameters, and maxcols records that may contain column descriptors.
# The input arguments maxpar and maxcols would normally be TB_MAXPAR(tp)
# and TB_MAXCOLS(tp).
#
# Phil Hodge, 14-Apr-1998 Change SZ_COLSTRUCT to SZ_COLDEF.
long procedure tbtbod (maxpar, maxcols)
int maxpar # i: current maximum number of header parameters
int maxcols # i: current maximum number of columns
#--
long offset
begin
offset = SZ_SIZINFO +
maxpar * SZ_PACKED_REC +
maxcols * SZ_COLDEF + 1
return (offset)
end
|