X-Git-Url: https://git.distorted.org.uk/~mdw/sgt/halibut/blobdiff_plain/50d6b4bd6bf28be2f31eb2b176911948163984f8..c5785c5369caeb24567503aeee2a0a19c7b67640:/bk_xhtml.c diff --git a/bk_xhtml.c b/bk_xhtml.c index 7614778..cad2e8e 100644 --- a/bk_xhtml.c +++ b/bk_xhtml.c @@ -39,7 +39,7 @@ * formatting directive, %% is a literal %). Formatting directives * are: * - * - %n is the section number, minus whitespace (`Chapter1.2'). + * - %n is the section type-plus-number, minus whitespace (`Chapter1.2'). * - %b is the section number on its own (`1.2'). * - %k is the section's _internal_ keyword. * - %N is the section's visible title in the output, again minus @@ -47,12 +47,17 @@ * * %n, %b and %k will all default to %N if the section is * unnumbered (`Bibliography' is often a good example). + * + * FRAGMENT_TEMPLATE is the same, but defines the + * markers used to cross-reference to particular subsections of a + * file. */ #define FILENAME_SINGLE "Manual.html" #define FILENAME_CONTENTS "Contents.html" #define FILENAME_INDEX "IndexPage.html" #define FILENAME_TEMPLATE "%n.html" +#define FRAGMENT_TEMPLATE "%b" struct xhtmlsection_Struct { struct xhtmlsection_Struct *next; /* next sibling (NULL if split across files) */ @@ -101,7 +106,7 @@ typedef struct { xhtmlheadfmt fchapter, *fsect; int nfsect; char *contents_filename, *index_filename; - char *single_filename, *template_filename; + char *single_filename, *template_filename, *template_fragment; } xhtmlconfig; /*static void xhtml_level(paragraph *, int); @@ -179,6 +184,7 @@ static xhtmlconfig xhtml_configure(paragraph *source) ret.single_filename = strdup(FILENAME_SINGLE); ret.index_filename = strdup(FILENAME_INDEX); ret.template_filename = strdup(FILENAME_TEMPLATE); + ret.template_fragment = strdup(FRAGMENT_TEMPLATE); for (; source; source = source->next) { @@ -196,6 +202,9 @@ static xhtmlconfig xhtml_configure(paragraph *source) } else if (!ustricmp(source->keyword, L"xhtml-template-filename")) { sfree(ret.template_filename); ret.template_filename = utoa_dup(uadv(source->keyword)); + } else if (!ustricmp(source->keyword, L"xhtml-template-fragment")) { + sfree(ret.template_fragment); + ret.template_fragment = utoa_dup(uadv(source->keyword)); } else if (!ustricmp(source->keyword, L"xhtml-contents-depth-0")) { ret.contents_depth[0] = utoi(uadv(source->keyword)); } else if (!ustricmp(source->keyword, L"xhtml-contents-depth-1")) { @@ -285,6 +294,57 @@ static xhtmlconfig xhtml_configure(paragraph *source) return ret; } +paragraph *xhtml_config_filename(char *filename) +{ + /* + * If the user passes in a single filename as a parameter to + * the `--html' command-line option, then we should assume it + * to imply _two_ config directives: + * \cfg{xhtml-single-filename}{whatever} and + * \cfg{xhtml-leaf-level}{0}; the rationale being that the user + * wants their output _in that file_. + */ + + paragraph *p[2]; + int i, len; + wchar_t *ufilename, *up; + + for (i = 0; i < 2; i++) { + p[i] = mknew(paragraph); + memset(p[i], 0, sizeof(*p[i])); + p[i]->type = para_Config; + p[i]->next = NULL; + p[i]->fpos.filename = ""; + p[i]->fpos.line = p[i]->fpos.col = -1; + } + + ufilename = ufroma_dup(filename); + len = ustrlen(ufilename) + 2 + lenof(L"xhtml-single-filename"); + p[0]->keyword = mknewa(wchar_t, len); + up = p[0]->keyword; + ustrcpy(up, L"xhtml-single-filename"); + up = uadv(up); + ustrcpy(up, ufilename); + up = uadv(up); + *up = L'\0'; + assert(up - p[0]->keyword < len); + sfree(ufilename); + + len = lenof(L"xhtml-leaf-level") + lenof(L"0") + 1; + p[1]->keyword = mknewa(wchar_t, len); + up = p[1]->keyword; + ustrcpy(up, L"xhtml-leaf-level"); + up = uadv(up); + ustrcpy(up, L"0"); + up = uadv(up); + *up = L'\0'; + assert(up - p[1]->keyword < len); + + p[0]->next = p[1]; + + return p[0]; +} + static xhtmlsection *xhtml_new_section(xhtmlsection *last) { xhtmlsection *ret = mknew(xhtmlsection); @@ -327,6 +387,62 @@ static xhtmlsection *xhtml_find_section(paragraph *p) return ret; } +static void xhtml_format(paragraph *p, char *template_string, rdstringc *r) +{ + char *c, *t; + word *w; + wchar_t *ws; + + t = template_string; + while (*t) { + if (*t == '%' && t[1]) { + int fmt; + + t++; + fmt = *t++; + + if (fmt == '%') { + rdaddc(r, fmt); + continue; + } + + w = NULL; + ws = NULL; + + if (p->kwtext && fmt == 'n') + w = p->kwtext; + else if (p->kwtext2 && fmt == 'b') + w = p->kwtext2; + else if (p->keyword && *p->keyword && fmt == 'k') + ws = p->keyword; + else + w = p->words; + + while (w) { + switch (removeattr(w->type)) + { + case word_Normal: + /*case word_Emph: + case word_Code: + case word_WeakCode:*/ + xhtml_utostr(w->text, &c); + rdaddsc(r,c); + sfree(c); + break; + } + w = w->next; + } + if (ws) { + xhtml_utostr(ws, &c); + rdaddsc(r,c); + sfree(c); + } + } else { + rdaddc(r, *t++); + } + } +} + static xhtmlfile *xhtml_new_file(xhtmlsection *sect) { xhtmlfile *ret = mknew(xhtmlfile); @@ -348,59 +464,7 @@ static xhtmlfile *xhtml_new_file(xhtmlsection *sect) } else { paragraph *p = sect->para; rdstringc fname_c = { 0, 0, NULL }; - char *c, *t; - word *w; - wchar_t *ws; - - t = conf.template_filename; - while (*t) { - if (*t == '%' && t[1]) { - int fmt; - - t++; - fmt = *t++; - - if (fmt == '%') { - rdaddc(&fname_c, fmt); - continue; - } - - w = NULL; - ws = NULL; - - if (p->kwtext && fmt == 'n') - w = p->kwtext; - else if (p->kwtext2 && fmt == 'b') - w = p->kwtext2; - else if (p->keyword && *p->keyword && fmt == 'k') - ws = p->keyword; - else - w = p->words; - - while (w) { - switch (removeattr(w->type)) - { - case word_Normal: - /*case word_Emph: - case word_Code: - case word_WeakCode:*/ - xhtml_utostr(w->text, &c); - rdaddsc(&fname_c,c); - sfree(c); - break; - } - w = w->next; - } - if (ws) { - xhtml_utostr(ws, &c); - rdaddsc(&fname_c,c); - sfree(c); - } - } else { - rdaddc(&fname_c, *t++); - } - } - + xhtml_format(p, conf.template_filename, &fname_c); ret->filename = rdtrimc(&fname_c); } /* printf(" ! new file '%s', is_leaf == %s\n", ret->filename, (ret->is_leaf)?("true"):("false"));*/ @@ -524,29 +588,14 @@ static void xhtml_ponder_layout(paragraph *p) if (level>0) /* actually a section */ { xhtmlsection *sect; - word *w; - char *c; - rdstringc fname_c = { 0, 0, NULL }; + rdstringc frag_c = { 0, 0, NULL }; sect = xhtml_new_section(lastsection); lastsection = sect; sect->para = p; - for (w=(p->kwtext2)?(p->kwtext2):(p->words); w; w=w->next) /* kwtext2 because we want numbers only! */ - { - switch (removeattr(w->type)) - { - case word_Normal: - /*case word_Emph: - case word_Code: - case word_WeakCode:*/ - xhtml_utostr(w->text, &c); - rdaddsc(&fname_c,c); - sfree(c); - break; - } - } -/* rdaddsc(&fname_c, ".html");*/ - sect->fragment = rdtrimc(&fname_c); + + xhtml_format(p, conf.template_fragment, &frag_c); + sect->fragment = rdtrimc(&frag_c); sect->level = level; /* printf(" ! adding para @ %p as sect %s, level %i\n", sect->para, sect->fragment, level);*/