version 1.86, 2009/11/14 12:00:24 |
version 1.93, 2010/01/29 14:39:37 |
|
|
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
*/ |
*/ |
|
#ifdef HAVE_CONFIG_H |
|
#include "config.h" |
|
#endif |
|
|
#include <sys/types.h> |
#include <sys/types.h> |
|
|
#include <assert.h> |
#include <assert.h> |
|
|
|
|
#define UNCONST(a) ((void *)(uintptr_t)(const void *)(a)) |
#define UNCONST(a) ((void *)(uintptr_t)(const void *)(a)) |
|
|
#define DOCTYPE "-//W3C//DTD HTML 4.01//EN" |
|
#define DTD "http://www.w3.org/TR/html4/strict.dtd" |
|
|
|
struct htmldata { |
struct htmldata { |
const char *name; |
const char *name; |
int flags; |
int flags; |
#define HTML_CLRLINE (1 << 0) |
#define HTML_CLRLINE (1 << 0) |
#define HTML_NOSTACK (1 << 1) |
#define HTML_NOSTACK (1 << 1) |
|
#define HTML_AUTOCLOSE (1 << 2) /* Tag has auto-closure. */ |
}; |
}; |
|
|
static const struct htmldata htmltags[TAG_MAX] = { |
static const struct htmldata htmltags[TAG_MAX] = { |
{"html", HTML_CLRLINE}, /* TAG_HTML */ |
{"html", HTML_CLRLINE}, /* TAG_HTML */ |
{"head", HTML_CLRLINE}, /* TAG_HEAD */ |
{"head", HTML_CLRLINE}, /* TAG_HEAD */ |
{"body", HTML_CLRLINE}, /* TAG_BODY */ |
{"body", HTML_CLRLINE}, /* TAG_BODY */ |
{"meta", HTML_CLRLINE | HTML_NOSTACK}, /* TAG_META */ |
{"meta", HTML_CLRLINE | HTML_NOSTACK | HTML_AUTOCLOSE}, /* TAG_META */ |
{"title", HTML_CLRLINE}, /* TAG_TITLE */ |
{"title", HTML_CLRLINE}, /* TAG_TITLE */ |
{"div", HTML_CLRLINE}, /* TAG_DIV */ |
{"div", HTML_CLRLINE}, /* TAG_DIV */ |
{"h1", 0}, /* TAG_H1 */ |
{"h1", 0}, /* TAG_H1 */ |
{"h2", 0}, /* TAG_H2 */ |
{"h2", 0}, /* TAG_H2 */ |
{"p", HTML_CLRLINE}, /* TAG_P */ |
|
{"span", 0}, /* TAG_SPAN */ |
{"span", 0}, /* TAG_SPAN */ |
{"link", HTML_CLRLINE | HTML_NOSTACK}, /* TAG_LINK */ |
{"link", HTML_CLRLINE | HTML_NOSTACK}, /* TAG_LINK */ |
{"br", HTML_CLRLINE | HTML_NOSTACK}, /* TAG_LINK */ |
{"br", HTML_CLRLINE | HTML_NOSTACK | HTML_AUTOCLOSE}, /* TAG_BR */ |
{"a", 0}, /* TAG_A */ |
{"a", 0}, /* TAG_A */ |
{"table", HTML_CLRLINE}, /* TAG_TABLE */ |
{"table", HTML_CLRLINE}, /* TAG_TABLE */ |
{"col", HTML_CLRLINE | HTML_NOSTACK}, /* TAG_COL */ |
{"col", HTML_CLRLINE | HTML_NOSTACK | HTML_AUTOCLOSE}, /* TAG_COL */ |
{"tr", HTML_CLRLINE}, /* TAG_TR */ |
{"tr", HTML_CLRLINE}, /* TAG_TR */ |
{"td", HTML_CLRLINE}, /* TAG_TD */ |
{"td", HTML_CLRLINE}, /* TAG_TD */ |
{"li", HTML_CLRLINE}, /* TAG_LI */ |
{"li", HTML_CLRLINE}, /* TAG_LI */ |
{"ul", HTML_CLRLINE}, /* TAG_UL */ |
{"ul", HTML_CLRLINE}, /* TAG_UL */ |
{"ol", HTML_CLRLINE}, /* TAG_OL */ |
{"ol", HTML_CLRLINE}, /* TAG_OL */ |
{"base", HTML_CLRLINE | HTML_NOSTACK}, /* TAG_BASE */ |
|
}; |
}; |
|
|
|
static const char *const htmlfonts[HTMLFONT_MAX] = { |
|
"roman", |
|
"bold", |
|
"italic" |
|
}; |
|
|
static const char *const htmlattrs[ATTR_MAX] = { |
static const char *const htmlattrs[ATTR_MAX] = { |
"http-equiv", |
"http-equiv", |
"content", |
"content", |
Line 83 static const char *const htmlattrs[ATTR_MAX] = { |
|
Line 89 static const char *const htmlattrs[ATTR_MAX] = { |
|
"summary", |
"summary", |
}; |
}; |
|
|
#ifdef __linux__ |
|
extern int getsubopt(char **, char * const *, char **); |
|
#endif |
|
|
|
|
|
static void print_spec(struct html *, const char *, size_t); |
static void print_spec(struct html *, const char *, size_t); |
static void print_res(struct html *, const char *, size_t); |
static void print_res(struct html *, const char *, size_t); |
static void print_ctag(struct html *, enum htmltag); |
static void print_ctag(struct html *, enum htmltag); |
static int print_encode(struct html *, const char *); |
static void print_doctype(struct html *); |
|
static void print_xmltype(struct html *); |
|
static int print_encode(struct html *, const char *, int); |
|
static void print_metaf(struct html *, enum roffdeco); |
|
static void *ml_alloc(char *, enum htmltype); |
|
|
|
|
void * |
static void * |
html_alloc(char *outopts) |
ml_alloc(char *outopts, enum htmltype type) |
{ |
{ |
struct html *h; |
struct html *h; |
const char *toks[4]; |
const char *toks[4]; |
Line 112 html_alloc(char *outopts) |
|
Line 117 html_alloc(char *outopts) |
|
exit(EXIT_FAILURE); |
exit(EXIT_FAILURE); |
} |
} |
|
|
|
h->type = type; |
h->tags.head = NULL; |
h->tags.head = NULL; |
h->ords.head = NULL; |
h->ords.head = NULL; |
h->symtab = chars_init(CHARS_HTML); |
h->symtab = chars_init(CHARS_HTML); |
Line 134 html_alloc(char *outopts) |
|
Line 140 html_alloc(char *outopts) |
|
return(h); |
return(h); |
} |
} |
|
|
|
void * |
|
html_alloc(char *outopts) |
|
{ |
|
|
|
return(ml_alloc(outopts, HTML_HTML_4_01_STRICT)); |
|
} |
|
|
|
|
|
void * |
|
xhtml_alloc(char *outopts) |
|
{ |
|
|
|
return(ml_alloc(outopts, HTML_XHTML_1_0_STRICT)); |
|
} |
|
|
|
|
void |
void |
html_free(void *p) |
html_free(void *p) |
{ |
{ |
Line 220 print_res(struct html *h, const char *p, size_t len) |
|
Line 241 print_res(struct html *h, const char *p, size_t len) |
|
} |
} |
|
|
|
|
|
struct tag * |
|
print_ofont(struct html *h, enum htmlfont font) |
|
{ |
|
struct htmlpair tag; |
|
|
|
h->metal = h->metac; |
|
h->metac = font; |
|
|
|
/* FIXME: DECO_ROMAN should just close out preexisting. */ |
|
|
|
if (h->metaf && h->tags.head == h->metaf) |
|
print_tagq(h, h->metaf); |
|
|
|
PAIR_CLASS_INIT(&tag, htmlfonts[font]); |
|
h->metaf = print_otag(h, TAG_SPAN, 1, &tag); |
|
return(h->metaf); |
|
} |
|
|
|
|
|
static void |
|
print_metaf(struct html *h, enum roffdeco deco) |
|
{ |
|
enum htmlfont font; |
|
|
|
switch (deco) { |
|
case (DECO_PREVIOUS): |
|
font = h->metal; |
|
break; |
|
case (DECO_ITALIC): |
|
font = HTMLFONT_ITALIC; |
|
break; |
|
case (DECO_BOLD): |
|
font = HTMLFONT_BOLD; |
|
break; |
|
case (DECO_ROMAN): |
|
font = HTMLFONT_NONE; |
|
break; |
|
default: |
|
abort(); |
|
/* NOTREACHED */ |
|
} |
|
|
|
(void)print_ofont(h, font); |
|
} |
|
|
|
|
static int |
static int |
print_encode(struct html *h, const char *p) |
print_encode(struct html *h, const char *p, int norecurse) |
{ |
{ |
size_t sz; |
size_t sz; |
int len, nospace; |
int len, nospace; |
Line 259 print_encode(struct html *h, const char *p) |
|
Line 326 print_encode(struct html *h, const char *p) |
|
case (DECO_SPECIAL): |
case (DECO_SPECIAL): |
print_spec(h, seq, sz); |
print_spec(h, seq, sz); |
break; |
break; |
|
case (DECO_PREVIOUS): |
|
/* FALLTHROUGH */ |
|
case (DECO_BOLD): |
|
/* FALLTHROUGH */ |
|
case (DECO_ITALIC): |
|
/* FALLTHROUGH */ |
|
case (DECO_ROMAN): |
|
if (norecurse) |
|
break; |
|
print_metaf(h, deco); |
|
break; |
default: |
default: |
break; |
break; |
} |
} |
Line 300 print_otag(struct html *h, enum htmltag tag, |
|
Line 378 print_otag(struct html *h, enum htmltag tag, |
|
for (i = 0; i < sz; i++) { |
for (i = 0; i < sz; i++) { |
printf(" %s=\"", htmlattrs[p[i].key]); |
printf(" %s=\"", htmlattrs[p[i].key]); |
assert(p->val); |
assert(p->val); |
(void)print_encode(h, p[i].val); |
(void)print_encode(h, p[i].val, 1); |
putchar('\"'); |
putchar('\"'); |
} |
} |
|
|
|
if (HTML_AUTOCLOSE & htmltags[tag].flags) |
|
switch (h->type) { |
|
case (HTML_XHTML_1_0_STRICT): |
|
putchar('/'); |
|
break; |
|
default: |
|
break; |
|
} |
|
|
putchar('>'); |
putchar('>'); |
|
|
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
if (HTML_CLRLINE & htmltags[tag].flags) |
|
h->flags |= HTML_NEWLINE; |
|
else |
|
h->flags &= ~HTML_NEWLINE; |
|
|
|
return(t); |
return(t); |
} |
} |
|
|
|
|
/* ARGSUSED */ |
|
static void |
static void |
print_ctag(struct html *h, enum htmltag tag) |
print_ctag(struct html *h, enum htmltag tag) |
{ |
{ |
Line 323 print_ctag(struct html *h, enum htmltag tag) |
|
Line 405 print_ctag(struct html *h, enum htmltag tag) |
|
printf("</%s>", htmltags[tag].name); |
printf("</%s>", htmltags[tag].name); |
if (HTML_CLRLINE & htmltags[tag].flags) { |
if (HTML_CLRLINE & htmltags[tag].flags) { |
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NOSPACE; |
h->flags |= HTML_NEWLINE; |
|
putchar('\n'); |
putchar('\n'); |
} else |
} |
h->flags &= ~HTML_NEWLINE; |
|
} |
} |
|
|
|
|
/* ARGSUSED */ |
|
void |
void |
print_gen_doctype(struct html *h) |
print_gen_decls(struct html *h) |
{ |
{ |
|
|
printf("<!DOCTYPE HTML PUBLIC \"%s\" \"%s\">", DOCTYPE, DTD); |
print_xmltype(h); |
|
print_doctype(h); |
} |
} |
|
|
|
|
|
static void |
|
print_xmltype(struct html *h) |
|
{ |
|
const char *decl; |
|
|
|
switch (h->type) { |
|
case (HTML_XHTML_1_0_STRICT): |
|
decl = "<?xml version=\"1.0\" encoding=\"UTF-8\"?>"; |
|
break; |
|
default: |
|
decl = NULL; |
|
break; |
|
} |
|
|
|
if (NULL == decl) |
|
return; |
|
|
|
printf("%s\n", decl); |
|
} |
|
|
|
|
|
static void |
|
print_doctype(struct html *h) |
|
{ |
|
const char *doctype; |
|
const char *dtd; |
|
|
|
switch (h->type) { |
|
case (HTML_HTML_4_01_STRICT): |
|
doctype = "-//W3C//DTD HTML 4.01//EN"; |
|
dtd = "http://www.w3.org/TR/html4/strict.dtd"; |
|
break; |
|
default: |
|
doctype = "-//W3C//DTD XHTML 1.0 Strict//EN"; |
|
dtd = "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"; |
|
break; |
|
} |
|
|
|
printf("<!DOCTYPE HTML PUBLIC \"%s\" \"%s\">\n", doctype, dtd); |
|
} |
|
|
|
|
void |
void |
print_text(struct html *h, const char *p) |
print_text(struct html *h, const char *p) |
{ |
{ |
Line 372 print_text(struct html *h, const char *p) |
|
Line 494 print_text(struct html *h, const char *p) |
|
if ( ! (h->flags & HTML_NOSPACE)) |
if ( ! (h->flags & HTML_NOSPACE)) |
putchar(' '); |
putchar(' '); |
|
|
h->flags &= ~HTML_NEWLINE; |
|
|
|
assert(p); |
assert(p); |
if ( ! print_encode(h, p)) |
if ( ! print_encode(h, p, 0)) |
h->flags &= ~HTML_NOSPACE; |
h->flags &= ~HTML_NOSPACE; |
|
|
if (*p && 0 == *(p + 1)) |
if (*p && 0 == *(p + 1)) |
Line 399 print_tagq(struct html *h, const struct tag *until) |
|
Line 519 print_tagq(struct html *h, const struct tag *until) |
|
struct tag *tag; |
struct tag *tag; |
|
|
while ((tag = h->tags.head) != NULL) { |
while ((tag = h->tags.head) != NULL) { |
|
if (tag == h->metaf) |
|
h->metaf = NULL; |
print_ctag(h, tag->tag); |
print_ctag(h, tag->tag); |
h->tags.head = tag->next; |
h->tags.head = tag->next; |
free(tag); |
free(tag); |
Line 416 print_stagq(struct html *h, const struct tag *suntil) |
|
Line 538 print_stagq(struct html *h, const struct tag *suntil) |
|
while ((tag = h->tags.head) != NULL) { |
while ((tag = h->tags.head) != NULL) { |
if (suntil && tag == suntil) |
if (suntil && tag == suntil) |
return; |
return; |
|
if (tag == h->metaf) |
|
h->metaf = NULL; |
print_ctag(h, tag->tag); |
print_ctag(h, tag->tag); |
h->tags.head = tag->next; |
h->tags.head = tag->next; |
free(tag); |
free(tag); |