mdw@git.distorted.org.uk Git - sgt/halibut/blob - 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
   8 #ifdef __GNUC__
   9 #define NORETURN __attribute__((__noreturn__))
  10 #else
  11 #define NORETURN /* nothing */
  12 #endif
  13
  14 #ifndef TRUE
  15 #define TRUE 1
  16 #endif
  17 #ifndef FALSE
  18 #define FALSE 0
  19 #endif
  20
  21 /* For suppressing unused-parameter warnings */
  22 #define IGNORE(x) ( (x) = (x) )
  23
  24 #include "tree234.h"
  25
  26 /*
  27  * Structure tags
  28  */
  29 typedef struct input_Tag input;
  30 typedef struct filepos_Tag filepos;
  31 typedef struct paragraph_Tag paragraph;
  32 typedef struct word_Tag word;
  33 typedef struct keywordlist_Tag keywordlist;
  34 typedef struct keyword_Tag keyword;
  35 typedef struct userstyle_Tag userstyle;
  36 typedef struct numberstate_Tag numberstate;
  37 typedef struct indexdata_Tag indexdata;
  38 typedef struct indextag_Tag indextag;
  39 typedef struct indexentry_Tag indexentry;
  40 typedef struct macrostack_Tag macrostack;
  41
  42 /*
  43  * Data structure to hold a file name and index, a line and a
  44  * column number, for reporting errors
  45  */
  46 struct filepos_Tag {
  47     char *filename;
  48     int line, col;
  49 };
  50
  51 /*
  52  * Data structure to hold all the file names etc for input
  53  */
  54 typedef struct pushback_Tag {
  55     int chr;
  56     filepos pos;
  57 } pushback;
  58 struct input_Tag {
  59     char **filenames;                  /* complete list of input files */
  60     int nfiles;                        /* how many in the list */
  61     FILE *currfp;                      /* the currently open one */
  62     int currindex;                     /* which one is that in the list */
  63     pushback *pushback;                /* pushed-back input characters */
  64     int npushback, pushbacksize;
  65     filepos pos;
  66     int reportcols;                    /* report column numbers in errors */
  67     macrostack *stack;                 /* macro expansions in force */
  68 };
  69
  70 /*
  71  * Data structure to hold the input form of the source, ie a linked
  72  * list of paragraphs
  73  */
  74 struct paragraph_Tag {
  75     paragraph *next;
  76     int type;
  77     wchar_t *keyword;                  /* for most special paragraphs */
  78     word *words;                       /* list of words in paragraph */
  79     int aux;                           /* number, in a numbered paragraph
  80                                         * or subsection level
  81                                         */
  82     word *kwtext;                      /* chapter/section indication */
  83     word *kwtext2;                     /* numeric-only form of kwtext */
  84     filepos fpos;
  85
  86     paragraph *parent, *child, *sibling;   /* for hierarchy navigation */
  87
  88     void *private_data;                /* for temp use in backends */
  89 };
  90 enum {
  91     para_IM,                           /* index merge */
  92     para_BR,                           /* bibliography rewrite */
  93     para_Rule,                         /* random horizontal rule */
  94     para_Chapter,
  95     para_Appendix,
  96     para_UnnumberedChapter,
  97     para_Heading,
  98     para_Subsect,
  99     para_Normal,
 100     para_Biblio,                       /* causes no output unless turned ... */
 101     para_BiblioCited,                  /*  ... into this paragraph type */
 102     para_Bullet,
 103     para_NumberedList,
 104     para_DescribedThing,
 105     para_Description,
 106     para_Code,
 107     para_Copyright,
 108     para_Preamble,
 109     para_NoCite,
 110     para_Title,
 111     para_VersionID,
 112     para_Config,                       /* configuration directive */
 113     para_LcontPush,                    /* begin continuation of list item */
 114     para_LcontPop,                     /* end continuation of list item */
 115     para_QuotePush,                    /* begin block quote */
 116     para_QuotePop,                     /* end block quote */
 117     para_NotParaType                   /* placeholder value */
 118 };
 119
 120 /*
 121  * Data structure to hold an individual word
 122  */
 123 struct word_Tag {
 124     word *next, *alt;
 125     int type;
 126     int aux;
 127     int breaks;                        /* can a line break after it? */
 128     wchar_t *text;
 129     filepos fpos;
 130 };
 131 enum {
 132     /* ORDERING CONSTRAINT: these normal-word types ... */
 133     word_Normal,
 134     word_Emph,
 135     word_Code,                         /* monospaced; `quoted' in text */
 136     word_WeakCode,                     /* monospaced, normal in text */
 137     /* ... must be in the same order as these space types ... */
 138     word_WhiteSpace,                   /* text is NULL or ignorable */
 139     word_EmphSpace,                    /* WhiteSpace when emphasised */
 140     word_CodeSpace,                    /* WhiteSpace when code */
 141     word_WkCodeSpace,                  /* WhiteSpace when weak code */
 142     /* ... and must be in the same order as these quote types ... */
 143     word_Quote,                        /* text is NULL or ignorable */
 144     word_EmphQuote,                    /* Quote when emphasised */
 145     word_CodeQuote,                    /* (can't happen) */
 146     word_WkCodeQuote,                  /* (can't happen) */
 147     /* END ORDERING CONSTRAINT */
 148     word_internal_endattrs,
 149     word_UpperXref,                    /* \K */
 150     word_LowerXref,                    /* \k */
 151     word_XrefEnd,                      /* (invisible; no text) */
 152     word_IndexRef,                     /* (always an invisible one) */
 153     word_HyperLink,                    /* (invisible) */
 154     word_HyperEnd                      /* (also invisible; no text) */
 155 };
 156 /* aux values for attributed words */
 157 enum {
 158     attr_Only   = 0x0000,              /* a lone word with the attribute */
 159     attr_First  = 0x0001,              /* the first of a series */
 160     attr_Last   = 0x0002,              /* the last of a series */
 161     attr_Always = 0x0003,              /* any other part of a series */
 162     attr_mask   = 0x0003,
 163 };
 164 /* aux values for quote-type words */
 165 enum {
 166     quote_Open  = 0x0010,
 167     quote_Close = 0x0020,
 168     quote_mask  = 0x0030,
 169 };
 170 #define isattr(x) ( ( (x) > word_Normal && (x) < word_WhiteSpace ) || \
 171                     ( (x) > word_WhiteSpace && (x) < word_internal_endattrs ) )
 172 #define sameattr(x,y) ( (((x)-(y)) & 3) == 0 )
 173 #define towordstyle(x) ( word_Normal + ((x) & 3) )
 174 #define tospacestyle(x) ( word_WhiteSpace + ((x) & 3) )
 175 #define toquotestyle(x) ( word_Quote + ((x) & 3) )
 176 #define removeattr(x) ( word_Normal + ((x) &~ 3) )
 177
 178 #define attraux(x) ( (x) & attr_mask )
 179 #define quoteaux(x) ( (x) & quote_mask )
 180
 181 /*
 182  * error.c
 183  */
 184 void fatal(int code, ...) NORETURN;
 185 void error(int code, ...);
 186 enum {
 187     err_nomemory,                      /* out of memory */
 188     err_optnoarg,                      /* option `-%s' requires an argument */
 189     err_nosuchopt,                     /* unrecognised option `-%s' */
 190     err_noinput,                       /* no input files */
 191     err_cantopen,                      /* unable to open input file `%s' */
 192     err_nodata,                        /* no data in input files */
 193     err_brokencodepara,                /* line in codepara didn't begin `\c' */
 194     err_kwunclosed,                    /* expected `}' after keyword */
 195     err_kwillegal,                     /* paragraph type expects no keyword */
 196     err_kwexpected,                    /* paragraph type expects a keyword */
 197     err_kwtoomany,                     /* paragraph type expects only 1 */
 198     err_bodyillegal,                   /* paragraph type expects only kws! */
 199     err_badparatype,                   /* invalid command at start of para */
 200     err_badmidcmd,                     /* invalid command in mid-para */
 201     err_unexbrace,                     /* unexpected brace */
 202     err_explbr,                        /* expected `{' after command */
 203     err_commenteof,                    /* EOF inside braced comment */
 204     err_kwexprbr,                      /* expected `}' after cross-ref */
 205     err_missingrbrace,                 /* unclosed braces at end of para */
 206     err_missingrbrace2,                /* unclosed braces at end of file */
 207     err_nestedstyles,                  /* unable to nest text styles */
 208     err_nestedindex,                   /* unable to nest `\i' thingys */
 209     err_nosuchkw,                      /* unresolved cross-reference */
 210     err_multiBR,                       /* multiple \BRs on same keyword */
 211     err_nosuchidxtag,                  /* \IM on unknown index tag (warning) */
 212     err_cantopenw,                     /* can't open output file for write */
 213     err_macroexists,                   /* this macro already exists */
 214     err_sectjump,                      /* jump a heading level, eg \C -> \S */
 215     err_winhelp_ctxclash,              /* WinHelp context ID hash clash */
 216     err_multikw,                       /* keyword clash in sections */
 217     err_misplacedlcont,                /* \lcont not after a list item */
 218     err_sectmarkerinblock,             /* section marker appeared in block */
 219     err_whatever                       /* random error of another type */
 220 };
 221
 222 /*
 223  * malloc.c
 224  */
 225 #ifdef LOGALLOC
 226 void *smalloc(char *file, int line, int size);
 227 void *srealloc(char *file, int line, void *p, int size);
 228 void sfree(char *file, int line, void *p);
 229 #define smalloc(x) smalloc(__FILE__, __LINE__, x)
 230 #define srealloc(x, y) srealloc(__FILE__, __LINE__, x, y)
 231 #define sfree(x) sfree(__FILE__, __LINE__, x)
 232 #else
 233 void *smalloc(int size);
 234 void *srealloc(void *p, int size);
 235 void sfree(void *p);
 236 #endif
 237 void free_word_list(word *w);
 238 void free_para_list(paragraph *p);
 239 word *dup_word_list(word *w);
 240 char *dupstr(char *s);
 241
 242 #define mknew(type) ( (type *) smalloc (sizeof (type)) )
 243 #define mknewa(type, number) ( (type *) smalloc ((number) * sizeof (type)) )
 244 #define resize(array, len) ( srealloc ((array), (len) * sizeof (*(array))) )
 245 #define lenof(array) ( sizeof(array) / sizeof(*(array)) )
 246
 247 /*
 248  * ustring.c
 249  */
 250 wchar_t *ustrdup(wchar_t *s);
 251 char *ustrtoa(wchar_t *s, char *outbuf, int size);
 252 int ustrlen(wchar_t *s);
 253 wchar_t *uadv(wchar_t *s);
 254 wchar_t *ustrcpy(wchar_t *dest, wchar_t *source);
 255 wchar_t utolower(wchar_t);
 256 int ustrcmp(wchar_t *lhs, wchar_t *rhs);
 257 int ustricmp(wchar_t *lhs, wchar_t *rhs);
 258 int utoi(wchar_t *);
 259 int utob(wchar_t *);
 260 int uisdigit(wchar_t);
 261 wchar_t *ustrlow(wchar_t *s);
 262 wchar_t *ustrftime(wchar_t *fmt, struct tm *timespec);
 263
 264 /*
 265  * help.c
 266  */
 267 void help(void);
 268 void usage(void);
 269 void showversion(void);
 270
 271 /*
 272  * licence.c
 273  */
 274 void licence(void);
 275
 276 /*
 277  * version.c
 278  */
 279 const char *const version;
 280
 281 /*
 282  * misc.c
 283  */
 284 typedef struct stackTag *stack;
 285 stack stk_new(void);
 286 void stk_free(stack);
 287 void stk_push(stack, void *);
 288 void *stk_pop(stack);
 289 void *stk_top(stack);
 290
 291 typedef struct tagRdstring rdstring;
 292 struct tagRdstring {
 293     int pos, size;
 294     wchar_t *text;
 295 };
 296 typedef struct tagRdstringc rdstringc;
 297 struct tagRdstringc {
 298     int pos, size;
 299     char *text;
 300 };
 301 extern const rdstring empty_rdstring;
 302 extern const rdstringc empty_rdstringc;
 303 void rdadd(rdstring *rs, wchar_t c);
 304 void rdadds(rdstring *rs, wchar_t *p);
 305 wchar_t *rdtrim(rdstring *rs);
 306 void rdaddc(rdstringc *rs, char c);
 307 void rdaddsc(rdstringc *rs, char *p);
 308 char *rdtrimc(rdstringc *rs);
 309
 310 int compare_wordlists(word *a, word *b);
 311
 312 void mark_attr_ends(paragraph *sourceform);
 313
 314 typedef struct tagWrappedLine wrappedline;
 315 struct tagWrappedLine {
 316     wrappedline *next;
 317     word *begin, *end;                 /* first & last words of line */
 318     int nspaces;                       /* number of whitespaces in line */
 319     int shortfall;                     /* how much shorter than max width */
 320 };
 321 wrappedline *wrap_para(word *, int, int, int (*)(word *));
 322 void wrap_free(wrappedline *);
 323
 324 /*
 325  * input.c
 326  */
 327 paragraph *read_input(input *in, indexdata *idx);
 328
 329 /*
 330  * keywords.c
 331  */
 332 struct keywordlist_Tag {
 333     int nkeywords;
 334     int size;
 335     tree234 *keys;                     /* sorted by `key' field */
 336     word **looseends;                  /* non-keyword list element numbers */
 337     int nlooseends;
 338     int looseendssize;
 339 };
 340 struct keyword_Tag {
 341     wchar_t *key;                      /* the keyword itself */
 342     word *text;                        /* "Chapter 2", "Appendix Q"... */
 343                                        /* (NB: filepos are not set) */
 344     paragraph *para;                   /* the paragraph referenced */
 345 };
 346 keyword *kw_lookup(keywordlist *, wchar_t *);
 347 keywordlist *get_keywords(paragraph *);
 348 void free_keywords(keywordlist *);
 349 void subst_keywords(paragraph *, keywordlist *);
 350
 351 /*
 352  * index.c
 353  */
 354
 355 /*
 356  * Data structure to hold both sides of the index.
 357  */
 358 struct indexdata_Tag {
 359     tree234 *tags;                     /* holds type `indextag' */
 360     tree234 *entries;                  /* holds type `indexentry' */
 361 };
 362
 363 /*
 364  * Data structure to hold an index tag (LHS of index).
 365  */
 366 struct indextag_Tag {
 367     wchar_t *name;
 368     word *implicit_text;
 369     word **explicit_texts;
 370     int nexplicit, explicit_size;
 371     int nrefs;
 372     indexentry **refs;                 /* array of entries referenced by tag */
 373 };
 374
 375 /*
 376  * Data structure to hold an index entry (RHS of index).
 377  */
 378 struct indexentry_Tag {
 379     word *text;
 380     void *backend_data;                /* private to back end */
 381 };
 382
 383 indexdata *make_index(void);
 384 void cleanup_index(indexdata *);
 385 /* index_merge takes responsibility for freeing arg 3 iff implicit; never
 386  * takes responsibility for arg 2 */
 387 void index_merge(indexdata *, int is_explicit, wchar_t *, word *);
 388 void build_index(indexdata *);
 389 void index_debug(indexdata *);
 390 indextag *index_findtag(indexdata *idx, wchar_t *name);
 391
 392 /*
 393  * contents.c
 394  */
 395 numberstate *number_init(void);
 396 void number_cfg(numberstate *, paragraph *);
 397 word *number_mktext(numberstate *, paragraph *, wchar_t *, int *, int *);
 398 void number_free(numberstate *);
 399
 400 /*
 401  * biblio.c
 402  */
 403 void gen_citations(paragraph *, keywordlist *);
 404
 405 /*
 406  * style.c
 407  */
 408 struct userstyle_Tag {
 409 };
 410
 411 /*
 412  * bk_text.c
 413  */
 414 void text_backend(paragraph *, keywordlist *, indexdata *);
 415
 416 /*
 417  * bk_xhtml.c
 418  */
 419 void xhtml_backend(paragraph *, keywordlist *, indexdata *);
 420
 421 /*
 422  * bk_whlp.c
 423  */
 424 void whlp_backend(paragraph *, keywordlist *, indexdata *);
 425
 426 /*
 427  * bk_man.c
 428  */
 429 void man_backend(paragraph *, keywordlist *, indexdata *);
 430
 431 #endif