-
Notifications
You must be signed in to change notification settings - Fork 11
/
gi_blorb.h
86 lines (72 loc) · 3.25 KB
/
gi_blorb.h
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
#ifndef _GI_BLORB_H
#define _GI_BLORB_H
/* gi_blorb.h: Blorb library layer for Glk API.
gi_blorb version 1.5.1.
Designed by Andrew Plotkin <[email protected]>
http://eblong.com/zarf/glk/
This file is copyright 1998-2017 by Andrew Plotkin. It is
distributed under the MIT license; see the "LICENSE" file.
*/
/* Error type and error codes */
typedef glui32 giblorb_err_t;
#define giblorb_err_None (0)
#define giblorb_err_CompileTime (1)
#define giblorb_err_Alloc (2)
#define giblorb_err_Read (3)
#define giblorb_err_NotAMap (4)
#define giblorb_err_Format (5)
#define giblorb_err_NotFound (6)
/* Methods for loading a chunk */
#define giblorb_method_DontLoad (0)
#define giblorb_method_Memory (1)
#define giblorb_method_FilePos (2)
/* Four-byte constants */
#define giblorb_make_id(c1, c2, c3, c4) \
(((c1) << 24) | ((c2) << 16) | ((c3) << 8) | (c4))
#define giblorb_ID_Exec (giblorb_make_id('E', 'x', 'e', 'c'))
#define giblorb_ID_Snd (giblorb_make_id('S', 'n', 'd', ' '))
#define giblorb_ID_Pict (giblorb_make_id('P', 'i', 'c', 't'))
#define giblorb_ID_Data (giblorb_make_id('D', 'a', 't', 'a'))
#define giblorb_ID_Copyright (giblorb_make_id('(', 'c', ')', ' '))
#define giblorb_ID_AUTH (giblorb_make_id('A', 'U', 'T', 'H'))
#define giblorb_ID_ANNO (giblorb_make_id('A', 'N', 'N', 'O'))
#define giblorb_ID_TEXT (giblorb_make_id('T', 'E', 'X', 'T'))
#define giblorb_ID_BINA (giblorb_make_id('B', 'I', 'N', 'A'))
/* giblorb_map_t: Holds the complete description of an open Blorb
file. This type is opaque for normal interpreter use. */
typedef struct giblorb_map_struct giblorb_map_t;
/* giblorb_result_t: Result when you try to load a chunk. */
typedef struct giblorb_result_struct {
glui32 chunknum; /* The chunk number (for use in
giblorb_unload_chunk(), etc.) */
union {
void *ptr; /* A pointer to the data (if you used
giblorb_method_Memory) */
glui32 startpos; /* The position in the file (if you
used giblorb_method_FilePos) */
} data;
glui32 length; /* The length of the data */
glui32 chunktype; /* The type of the chunk. */
} giblorb_result_t;
extern giblorb_err_t giblorb_create_map(strid_t file,
giblorb_map_t **newmap);
extern giblorb_err_t giblorb_destroy_map(giblorb_map_t *map);
extern giblorb_err_t giblorb_load_chunk_by_type(giblorb_map_t *map,
glui32 method, giblorb_result_t *res, glui32 chunktype,
glui32 count);
extern giblorb_err_t giblorb_load_chunk_by_number(giblorb_map_t *map,
glui32 method, giblorb_result_t *res, glui32 chunknum);
extern giblorb_err_t giblorb_unload_chunk(giblorb_map_t *map,
glui32 chunknum);
extern giblorb_err_t giblorb_load_resource(giblorb_map_t *map,
glui32 method, giblorb_result_t *res, glui32 usage,
glui32 resnum);
extern giblorb_err_t giblorb_count_resources(giblorb_map_t *map,
glui32 usage, glui32 *num, glui32 *min, glui32 *max);
/* The following functions are part of the Glk library itself, not
the Blorb layer (whose code is in gi_blorb.c). These functions
are necessarily implemented in platform-dependent code.
*/
extern giblorb_err_t giblorb_set_resource_map(strid_t file);
extern giblorb_map_t *giblorb_get_resource_map(void);
#endif /* _GI_BLORB_H */