/* $Id: html.c,v 2.0.1.11 2000/02/25 04:15:39 greyham Exp greyham $ * functions for html style output. */ #include "c2man.h" #include "manpage.h" #include "output.h" #include "semantic.h" #include static int html_in_code = 0; void html_terse_sep(); void html_description _((const char *text)); void html_char(c) const int c; { switch (c) { case '<': put_string("<"); break; case '>': put_string(">"); break; case '&': put_string("&"); break; case '"': put_string("""); break; default: putchar(c); break; } } void html_text(text) const char *text; { while(*text) { html_char(*text++); } } void html_comment() { put_string("\n"); put_string(""); html_text(name); html_terse_sep(); html_text(terse); put_string("\n"); put_string("\n"); put_string("\n"); } void html_file_end() { put_string("\n\n"); } void html_dash() { put_string("-"); } void html_section(name) const char *name; { put_string("

"); html_text(name); put_string("

\n"); } void html_sub_section(name) const char *name; { put_string("

"); html_text(name); put_string("

"); } void html_break_line() { if (!html_in_code) { put_string("
\n"); } } void html_blank_line() { if (!html_in_code) { put_string("

\n"); } else { putchar('\n'); } } void html_code_start() { put_string("

");
  html_in_code = 1;
}

void html_code_end()
{
  put_string("
\n"); html_in_code = 0; } void html_code(text) const char *text; { html_code_start(); html_text(text); html_code_end(); } void html_tag_list_start() { put_string("
"); } void html_tag_list_end() { put_string("
\n"); } void html_tag_entry_start() { put_string("
\n"); } void html_tag_entry_start_extra() { put_string("
\n"); } void html_tag_entry_end() { put_string("
\n"); } void html_tag_entry_end_extra(text) const char *text; { put_string(" "); put_string(text); put_string(")"); put_string("
\n"); } void html_table_start(longestag) const char *longestag; { put_string(""); } void html_indent() { put_string("\t"); } void html_list_start() { put_string(""); } void html_list_entry(name) const char *name; { put_string("
  • "); put_string(name); put_string("\n"); } void html_list_separator() { put_string(",\n"); } void html_include(filename) const char *filename; { printf(".so %s\n", filename); } void html_name(name) const char *name; { if (name) html_text(name); else html_section("NAME"); } void html_terse_sep() { html_char(' '); html_dash(); html_char(' '); } void html_reference(name) const char *name; { put_string(""); put_string(name); put_string("\n"); } void html_emphasized(text) const char *text; { put_string(""); put_string(text); put_string(""); } /* ideally, this should be made aware of embedded html commands */ void html_description(text) const char *text; { enum { TEXT, PERIOD, CAPITALISE } state = CAPITALISE; boolean new_line = TRUE; /* correct punctuation a bit as it goes out */ for (;*text;text++) { int c = *text; if (new_line && html_in_code && c != '\t') { html_code_end(); } if (new_line && c == '\t') { if (!html_in_code) { html_code_start(); state = TEXT; } } else if (new_line && (c == '-' || c == '*' || c == '\n' || is_numbered(text))) { output->break_line(); state = CAPITALISE; } else if (new_line && c == '\n') { /* Two newlines - Paragraph break */ output->blank_line(); } else if (c == '.') state = PERIOD; else if (isspace(c) && state == PERIOD) state = CAPITALISE; else if (isalnum(c) || ispunct(c)) { if (islower(c) && state == CAPITALISE && !html_in_code) c = toupper(c); state = TEXT; } output->character(c); new_line = c == '\n'; } if ( html_in_code ) { /* end verbatim section at end of comments */ html_code_end(); } else /* no extra point after verbatim section */ /* do a full stop if there wasn't one */ if (state == TEXT) output->character('.'); } /* ideally, this should be made aware of embedded html commands */ void html_returns(comment) const char *comment; { enum { TEXT, PERIOD, CAPITALISE } state = CAPITALISE; char lastchar = '\n'; boolean tag_list_started = FALSE; /* for each line... */ while (*comment) { boolean tagged = FALSE; { const char *c = comment; /* search along until the end of a word */ while (*c && *c != ':' && !isspace(*c)) c++; /* skip all spaces or tabs after the first word */ while (*c && *c != '\n') { if (*c == '\t' || *c == ':') { tagged = TRUE; break; } else if (!isspace(*c)) break; c++; } } /* is it tagged?; explicitly reject dot commands */ if (tagged) { /* output lingering newline if necessary */ if (lastchar != '\n') { if (state == TEXT && !ispunct(lastchar)) output->character('.'); output->character(lastchar = '\n'); } if (!tag_list_started) { output->tag_list_start(); tag_list_started = TRUE; } /* output the taggy bit */ output->tag_entry_start(); while (*comment && *comment != ':' && !isspace(*comment)) output->character(*comment++); output->tag_entry_end(); /* skip any extra tabs or spaces */ while (*comment == ':' || (isspace(*comment) && *comment != '\n')) comment++; state = CAPITALISE; } /* terminate the previous line if necessary */ if (lastchar != '\n') output->character(lastchar = '\n'); /* correct punctuation a bit as the line goes out */ for (;*comment && *comment != '\n'; comment++) { char c = *comment; if (c == '.') state = PERIOD; else if (isspace(c) && state == PERIOD) state = CAPITALISE; else if (isalnum(c)) { if (islower(c) && state == CAPITALISE && fixup_comments) c = toupper(c); state = TEXT; } output->character(lastchar = c); } /* if it ended in punctuation, just output the nl straight away. */ if (ispunct(lastchar)) { if (lastchar == '.') state = CAPITALISE; output->character(lastchar = '\n'); } if (*comment) comment++; } /* output lingering newline if necessary */ if (lastchar != '\n') { if (state == TEXT && !ispunct(lastchar) && fixup_comments) output->character('.'); output->character('\n'); } if (tag_list_started) output->tag_list_end(); } struct Output html_output = { html_comment, html_header, html_dash, html_section, html_sub_section, html_break_line, html_blank_line, html_code_start, html_code_end, html_code, html_tag_list_start, html_tag_list_end, html_tag_entry_start, html_tag_entry_start_extra, html_tag_entry_end, html_tag_entry_end_extra, html_table_start, html_table_entry, html_table_end, html_indent, html_list_start, html_list_entry, html_list_separator, html_list_end, html_include, html_file_end, html_text, html_char, NULL, /* html_parse_option */ dummy, /* html_print_options */ html_name, html_terse_sep, html_reference, html_emphasized, html_description, html_returns };