Fairly ropey font-embedding support. In particular, the PDF output is
[sgt/halibut] / halibut.h
1 #ifndef HALIBUT_HALIBUT_H
2 #define HALIBUT_HALIBUT_H
3
4 #include <stdio.h>
5 #include <wchar.h>
6 #include <time.h>
7 #include <string.h>
8
9 #include "charset.h"
10
11 #ifdef __GNUC__
12 #define NORETURN __attribute__((__noreturn__))
13 #else
14 #define NORETURN /* nothing */
15 #endif
16
17 #ifndef TRUE
18 #define TRUE 1
19 #endif
20 #ifndef FALSE
21 #define FALSE 0
22 #endif
23
24 /* For suppressing unused-parameter warnings */
25 #define IGNORE(x) ( (x) = (x) )
26
27 #include "tree234.h"
28
29 /*
30 * Structure tags
31 */
32 typedef struct input_Tag input;
33 typedef struct filepos_Tag filepos;
34 typedef struct paragraph_Tag paragraph;
35 typedef struct word_Tag word;
36 typedef struct keywordlist_Tag keywordlist;
37 typedef struct keyword_Tag keyword;
38 typedef struct numberstate_Tag numberstate;
39 typedef struct indexdata_Tag indexdata;
40 typedef struct indextag_Tag indextag;
41 typedef struct indexentry_Tag indexentry;
42 typedef struct macrostack_Tag macrostack;
43
44 /*
45 * Data structure to hold a file name and index, a line and a
46 * column number, for reporting errors
47 */
48 struct filepos_Tag {
49 char *filename;
50 int line, col;
51 };
52
53 /*
54 * Data structure to hold all the file names etc for input
55 */
56 typedef struct pushback_Tag {
57 int chr;
58 filepos pos;
59 } pushback;
60 struct input_Tag {
61 char **filenames; /* complete list of input files */
62 int nfiles; /* how many in the list */
63 FILE *currfp; /* the currently open one */
64 int currindex; /* which one is that in the list */
65 pushback *pushback; /* pushed-back input characters */
66 int npushback, pushbacksize;
67 filepos pos;
68 int reportcols; /* report column numbers in errors */
69 macrostack *stack; /* macro expansions in force */
70 int defcharset, charset; /* character sets for input files */
71 charset_state csstate;
72 wchar_t wc[16]; /* wide chars from input conversion */
73 int nwc, wcpos; /* size of, and position in, wc[] */
74 char *pushback_chars; /* used to save input-encoding data */
75 };
76
77 /*
78 * Data structure to hold the input form of the source, ie a linked
79 * list of paragraphs
80 */
81 struct paragraph_Tag {
82 paragraph *next;
83 int type;
84 wchar_t *keyword; /* for most special paragraphs */
85 char *origkeyword; /* same again in original charset */
86 word *words; /* list of words in paragraph */
87 int aux; /* number, in a numbered paragraph
88 * or subsection level
89 */
90 word *kwtext; /* chapter/section indication */
91 word *kwtext2; /* numeric-only form of kwtext */
92 filepos fpos;
93
94 paragraph *parent, *child, *sibling; /* for hierarchy navigation */
95
96 void *private_data; /* for temp use in backends */
97 };
98 enum {
99 para_IM, /* index merge */
100 para_BR, /* bibliography rewrite */
101 para_Rule, /* random horizontal rule */
102 para_Chapter,
103 para_Appendix,
104 para_UnnumberedChapter,
105 para_Heading,
106 para_Subsect,
107 para_Normal,
108 para_Biblio, /* causes no output unless turned ... */
109 para_BiblioCited, /* ... into this paragraph type */
110 para_Bullet,
111 para_NumberedList,
112 para_DescribedThing,
113 para_Description,
114 para_Code,
115 para_Copyright,
116 para_NoCite,
117 para_Title,
118 para_VersionID,
119 para_Config, /* configuration directive */
120 para_LcontPush, /* begin continuation of list item */
121 para_LcontPop, /* end continuation of list item */
122 para_QuotePush, /* begin block quote */
123 para_QuotePop, /* end block quote */
124 /*
125 * Back ends may define their own paragraph types beyond here,
126 * in case they need to use them internally.
127 */
128 para_NotParaType /* placeholder value */
129 };
130
131 /*
132 * Data structure to hold an individual word
133 */
134 struct word_Tag {
135 word *next, *alt;
136 int type;
137 int aux;
138 int breaks; /* can a line break after it? */
139 wchar_t *text;
140 filepos fpos;
141
142 void *private_data; /* for temp use in backends */
143 };
144 enum {
145 /* ORDERING CONSTRAINT: these normal-word types ... */
146 word_Normal,
147 word_Emph,
148 word_Code, /* monospaced; `quoted' in text */
149 word_WeakCode, /* monospaced, normal in text */
150 /* ... must be in the same order as these space types ... */
151 word_WhiteSpace, /* text is NULL or ignorable */
152 word_EmphSpace, /* WhiteSpace when emphasised */
153 word_CodeSpace, /* WhiteSpace when code */
154 word_WkCodeSpace, /* WhiteSpace when weak code */
155 /* ... and must be in the same order as these quote types ... */
156 word_Quote, /* text is NULL or ignorable */
157 word_EmphQuote, /* Quote when emphasised */
158 word_CodeQuote, /* (can't happen) */
159 word_WkCodeQuote, /* (can't happen) */
160 /* END ORDERING CONSTRAINT */
161 word_internal_endattrs,
162 word_UpperXref, /* \K */
163 word_LowerXref, /* \k */
164 word_XrefEnd, /* (invisible; no text) */
165 word_IndexRef, /* (always an invisible one) */
166 word_HyperLink, /* (invisible) */
167 word_HyperEnd, /* (also invisible; no text) */
168 /*
169 * Back ends may define their own word types beyond here, in
170 * case they need to use them internally.
171 */
172 word_NotWordType /* placeholder value */
173 };
174 /* aux values for attributed words */
175 enum {
176 attr_Only = 0x0000, /* a lone word with the attribute */
177 attr_First = 0x0001, /* the first of a series */
178 attr_Last = 0x0002, /* the last of a series */
179 attr_Always = 0x0003, /* any other part of a series */
180 attr_mask = 0x0003
181 };
182 /* aux values for quote-type words */
183 enum {
184 quote_Open = 0x0010,
185 quote_Close = 0x0020,
186 quote_mask = 0x0030
187 };
188 #define isattr(x) ( ( (x) > word_Normal && (x) < word_WhiteSpace ) || \
189 ( (x) > word_WhiteSpace && (x) < word_internal_endattrs ) )
190 #define sameattr(x,y) ( (((x)-(y)) & 3) == 0 )
191 #define towordstyle(x) ( word_Normal + ((x) & 3) )
192 #define tospacestyle(x) ( word_WhiteSpace + ((x) & 3) )
193 #define toquotestyle(x) ( word_Quote + ((x) & 3) )
194 #define removeattr(x) ( word_Normal + ((x) &~ 3) )
195
196 #define attraux(x) ( (x) & attr_mask )
197 #define quoteaux(x) ( (x) & quote_mask )
198
199 /*
200 * error.c
201 */
202 void fatal(int code, ...) NORETURN;
203 void error(int code, ...);
204 enum {
205 err_nomemory, /* out of memory */
206 err_optnoarg, /* option `-%s' requires an argument */
207 err_nosuchopt, /* unrecognised option `-%s' */
208 err_cmdcharset, /* unrecognised charset %s (cmdline) */
209 err_futileopt, /* futile option `-%s'%s */
210 err_noinput, /* no input files */
211 err_cantopen, /* unable to open input file `%s' */
212 err_nodata, /* no data in input files */
213 err_brokencodepara, /* line in codepara didn't begin `\c' */
214 err_kwunclosed, /* expected `}' after keyword */
215 err_kwillegal, /* paragraph type expects no keyword */
216 err_kwexpected, /* paragraph type expects a keyword */
217 err_kwtoomany, /* paragraph type expects only 1 */
218 err_bodyillegal, /* paragraph type expects only kws! */
219 err_badparatype, /* invalid command at start of para */
220 err_badmidcmd, /* invalid command in mid-para */
221 err_unexbrace, /* unexpected brace */
222 err_explbr, /* expected `{' after command */
223 err_commenteof, /* EOF inside braced comment */
224 err_kwexprbr, /* expected `}' after cross-ref */
225 err_codequote, /* \q within \c is not supported */
226 err_missingrbrace, /* unclosed braces at end of para */
227 err_missingrbrace2, /* unclosed braces at end of file */
228 err_nestedstyles, /* unable to nest text styles */
229 err_nestedindex, /* unable to nest `\i' thingys */
230 err_indexcase, /* two \i differing only in case */
231 err_nosuchkw, /* unresolved cross-reference */
232 err_multiBR, /* multiple \BRs on same keyword */
233 err_nosuchidxtag, /* \IM on unknown index tag (warning) */
234 err_cantopenw, /* can't open output file for write */
235 err_macroexists, /* this macro already exists */
236 err_sectjump, /* jump a heading level, eg \C -> \S */
237 err_winhelp_ctxclash, /* WinHelp context ID hash clash */
238 err_multikw, /* keyword clash in sections */
239 err_misplacedlcont, /* \lcont not after a list item */
240 err_sectmarkerinblock, /* section marker appeared in block */
241 err_cfginsufarg, /* \cfg{%s} insufficient args (<%d) */
242 err_infonodechar, /* colon/comma in node name in info */
243 err_text_codeline, /* \c line too long in text backend */
244 err_htmlver, /* unrecognised HTML version keyword */
245 err_charset, /* unrecognised character set name */
246 err_nofont, /* unrecognised font name */
247 err_afmeof, /* eof in AFM file */
248 err_afmkey, /* missing expected keyword in AFM */
249 err_afmvers, /* unsupported AFM version */
250 err_afmval, /* missing value(s) for AFM key */
251 err_whatever /* random error of another type */
252 };
253
254 /*
255 * malloc.c
256 */
257 #ifdef LOGALLOC
258 void *smalloc(char *file, int line, int size);
259 void *srealloc(char *file, int line, void *p, int size);
260 void sfree(char *file, int line, void *p);
261 #define smalloc(x) smalloc(__FILE__, __LINE__, x)
262 #define srealloc(x, y) srealloc(__FILE__, __LINE__, x, y)
263 #define sfree(x) sfree(__FILE__, __LINE__, x)
264 #else
265 void *smalloc(int size);
266 void *srealloc(void *p, int size);
267 void sfree(void *p);
268 #endif
269 void free_word_list(word *w);
270 void free_para_list(paragraph *p);
271 word *dup_word_list(word *w);
272 char *dupstr(char *s);
273
274 #define snew(type) ( (type *) smalloc (sizeof (type)) )
275 #define snewn(number, type) ( (type *) smalloc ((number) * sizeof (type)) )
276 #define sresize(array, number, type) \
277 ( (type *) srealloc ((array), (number) * sizeof (type)) )
278 #define lenof(array) ( sizeof(array) / sizeof(*(array)) )
279
280 /*
281 * ustring.c
282 */
283 wchar_t *ustrdup(wchar_t const *s);
284 char *ustrtoa(wchar_t const *s, char *outbuf, int size, int charset);
285 char *ustrtoa_careful(wchar_t const *s, char *outbuf, int size, int charset);
286 wchar_t *ustrfroma(char const *s, wchar_t *outbuf, int size, int charset);
287 char *utoa_dup(wchar_t const *s, int charset);
288 char *utoa_dup_len(wchar_t const *s, int charset, int *len);
289 char *utoa_careful_dup(wchar_t const *s, int charset);
290 wchar_t *ufroma_dup(char const *s, int charset);
291 char *utoa_locale_dup(wchar_t const *s);
292 wchar_t *ufroma_locale_dup(char const *s);
293 int ustrlen(wchar_t const *s);
294 wchar_t *uadv(wchar_t *s);
295 wchar_t *ustrcpy(wchar_t *dest, wchar_t const *source);
296 wchar_t *ustrncpy(wchar_t *dest, wchar_t const *source, int n);
297 wchar_t utolower(wchar_t);
298 int uisalpha(wchar_t);
299 int ustrcmp(wchar_t *lhs, wchar_t *rhs);
300 int ustricmp(wchar_t const *lhs, wchar_t const *rhs);
301 int ustrnicmp(wchar_t const *lhs, wchar_t const *rhs, int maxlen);
302 int utoi(wchar_t const *);
303 double utof(wchar_t const *);
304 int utob(wchar_t const *);
305 int uisdigit(wchar_t);
306 wchar_t *ustrlow(wchar_t *s);
307 wchar_t *ustrftime(const wchar_t *wfmt, const struct tm *timespec);
308 int cvt_ok(int charset, const wchar_t *s);
309 int charset_from_ustr(filepos *fpos, const wchar_t *name);
310
311 /*
312 * wcwidth.c
313 */
314 int strwid(char const *s, int charset);
315 int ustrwid(wchar_t const *s, int charset);
316
317 /*
318 * help.c
319 */
320 void help(void);
321 void usage(void);
322 void showversion(void);
323 void listcharsets(void);
324
325 /*
326 * licence.c
327 */
328 void licence(void);
329
330 /*
331 * version.c
332 */
333 extern const char *const version;
334
335 /*
336 * misc.c
337 */
338 char *adv(char *s);
339
340 typedef struct stackTag *stack;
341 stack stk_new(void);
342 void stk_free(stack);
343 void stk_push(stack, void *);
344 void *stk_pop(stack);
345 void *stk_top(stack);
346
347 typedef struct tagRdstring rdstring;
348 struct tagRdstring {
349 int pos, size;
350 wchar_t *text;
351 };
352 typedef struct tagRdstringc rdstringc;
353 struct tagRdstringc {
354 int pos, size;
355 char *text;
356 };
357 extern const rdstring empty_rdstring;
358 extern const rdstringc empty_rdstringc;
359 void rdadd(rdstring *rs, wchar_t c);
360 void rdadds(rdstring *rs, wchar_t const *p);
361 wchar_t *rdtrim(rdstring *rs);
362 void rdaddc(rdstringc *rs, char c);
363 void rdaddsc(rdstringc *rs, char const *p);
364 char *rdtrimc(rdstringc *rs);
365
366 int compare_wordlists(word *a, word *b);
367
368 void mark_attr_ends(word *words);
369
370 typedef struct tagWrappedLine wrappedline;
371 struct tagWrappedLine {
372 wrappedline *next;
373 word *begin, *end; /* first & last words of line */
374 int nspaces; /* number of whitespaces in line */
375 int shortfall; /* how much shorter than max width */
376 };
377 wrappedline *wrap_para(word *, int, int, int (*)(void *, word *), void *, int);
378 void wrap_free(wrappedline *);
379 void cmdline_cfg_add(paragraph *cfg, char *string);
380 paragraph *cmdline_cfg_new(void);
381 paragraph *cmdline_cfg_simple(char *string, ...);
382
383 /*
384 * input.c
385 */
386 paragraph *read_input(input *in, indexdata *idx);
387
388 /*
389 * in_afm.c
390 */
391 void read_afm_file(input *in);
392
393 /*
394 * in_pf.c
395 */
396 void read_pfa_file(input *in);
397
398 /*
399 * keywords.c
400 */
401 struct keywordlist_Tag {
402 int nkeywords;
403 int size;
404 tree234 *keys; /* sorted by `key' field */
405 word **looseends; /* non-keyword list element numbers */
406 int nlooseends;
407 int looseendssize;
408 };
409 struct keyword_Tag {
410 wchar_t *key; /* the keyword itself */
411 word *text; /* "Chapter 2", "Appendix Q"... */
412 /* (NB: filepos are not set) */
413 paragraph *para; /* the paragraph referenced */
414 };
415 keyword *kw_lookup(keywordlist *, wchar_t *);
416 keywordlist *get_keywords(paragraph *);
417 void free_keywords(keywordlist *);
418 void subst_keywords(paragraph *, keywordlist *);
419
420 /*
421 * index.c
422 */
423
424 /*
425 * Data structure to hold both sides of the index.
426 */
427 struct indexdata_Tag {
428 tree234 *tags; /* holds type `indextag' */
429 tree234 *entries; /* holds type `indexentry' */
430 };
431
432 /*
433 * Data structure to hold an index tag (LHS of index).
434 */
435 struct indextag_Tag {
436 wchar_t *name;
437 word *implicit_text;
438 filepos implicit_fpos;
439 word **explicit_texts;
440 filepos *explicit_fpos;
441 int nexplicit, explicit_size;
442 int nrefs;
443 indexentry **refs; /* array of entries referenced by tag */
444 };
445
446 /*
447 * Data structure to hold an index entry (RHS of index).
448 */
449 struct indexentry_Tag {
450 word *text;
451 void *backend_data; /* private to back end */
452 filepos fpos;
453 };
454
455 indexdata *make_index(void);
456 void cleanup_index(indexdata *);
457 /* index_merge takes responsibility for freeing arg 3 iff implicit; never
458 * takes responsibility for arg 2 */
459 void index_merge(indexdata *, int is_explicit, wchar_t *, word *, filepos *);
460 void build_index(indexdata *);
461 void index_debug(indexdata *);
462 indextag *index_findtag(indexdata *idx, wchar_t *name);
463
464 /*
465 * contents.c
466 */
467 numberstate *number_init(void);
468 void number_cfg(numberstate *, paragraph *);
469 word *number_mktext(numberstate *, paragraph *, wchar_t *, int *, int *);
470 void number_free(numberstate *);
471
472 /*
473 * biblio.c
474 */
475 void gen_citations(paragraph *, keywordlist *);
476
477 /*
478 * bk_text.c
479 */
480 void text_backend(paragraph *, keywordlist *, indexdata *, void *);
481 paragraph *text_config_filename(char *filename);
482
483 /*
484 * bk_html.c
485 */
486 void html_backend(paragraph *, keywordlist *, indexdata *, void *);
487 paragraph *html_config_filename(char *filename);
488
489 /*
490 * bk_whlp.c
491 */
492 void whlp_backend(paragraph *, keywordlist *, indexdata *, void *);
493 paragraph *whlp_config_filename(char *filename);
494
495 /*
496 * bk_man.c
497 */
498 void man_backend(paragraph *, keywordlist *, indexdata *, void *);
499 paragraph *man_config_filename(char *filename);
500
501 /*
502 * bk_info.c
503 */
504 void info_backend(paragraph *, keywordlist *, indexdata *, void *);
505 paragraph *info_config_filename(char *filename);
506
507 /*
508 * bk_paper.c
509 */
510 void *paper_pre_backend(paragraph *, keywordlist *, indexdata *);
511
512 /*
513 * bk_ps.c
514 */
515 void ps_backend(paragraph *, keywordlist *, indexdata *, void *);
516 paragraph *ps_config_filename(char *filename);
517
518 /*
519 * bk_pdf.c
520 */
521 void pdf_backend(paragraph *, keywordlist *, indexdata *, void *);
522 paragraph *pdf_config_filename(char *filename);
523
524 #endif