diff options
author | June McEnroe <june@causal.agency> | 2019-02-09 16:50:41 -0500 |
---|---|---|
committer | June McEnroe <june@causal.agency> | 2019-02-09 16:50:41 -0500 |
commit | d82d1577dd0e8bbd8cc67962841ad77144ce2fb1 (patch) | |
tree | 8363cbcc118860d29b92b547027548070a5b9c64 /bin | |
parent | Combine all Keyword patterns (diff) | |
download | src-d82d1577dd0e8bbd8cc67962841ad77144ce2fb1.tar.gz src-d82d1577dd0e8bbd8cc67962841ad77144ce2fb1.zip |
Add css and inline HTML options to hi
Diffstat (limited to '')
-rw-r--r-- | bin/hi.c | 68 | ||||
-rw-r--r-- | bin/man1/hi.1 | 26 |
2 files changed, 64 insertions, 30 deletions
diff --git a/bin/hi.c b/bin/hi.c index 0ce34a74..ecb4758f 100644 --- a/bin/hi.c +++ b/bin/hi.c @@ -285,8 +285,10 @@ static void check(void) { #define ENUM_OPTION \ X(Monospace, "monospace") \ - X(Document, "document") \ - X(Title, "title") + X(Document, "document") \ + X(Title, "title") \ + X(CSS, "css") \ + X(Inline, "inline") enum Option { #define X(option, _) option, @@ -446,6 +448,7 @@ static void htmlEscape(const char *str, size_t len) { size_t run = strcspn(str, "&<>"); if (run > len) run = len; switch (str[0]) { + break; case '"': run = 1; printf("""); break; case '&': run = 1; printf("&"); break; case '<': run = 1; printf("<"); break; case '>': run = 1; printf(">"); @@ -456,24 +459,40 @@ static void htmlEscape(const char *str, size_t len) { } } +static const char *ClassName[ClassLen] = { +#define X(class) [class] = #class, + ENUM_CLASS +#undef X +}; + +static const char *HTMLStyle[ClassLen] = { + [Keyword] = "color: dimgray;", + [Macro] = "color: green;", + [String] = "color: teal;", + [Format] = "color: teal; font-weight: bold;", + [Interp] = "color: green;", + [Comment] = "color: navy;", + [Todo] = "color: navy; font-weight: bold;", +}; + static void htmlHeader(const char *opts[]) { - if (opts[Document]) { - printf("<!DOCTYPE html>\n<title>"); - if (opts[Title]) htmlEscape(opts[Title], strlen(opts[Title])); - printf("</title>\n"); - printf( - "<style>\n" - ".hi.Keyword { color: dimgray; }\n" - ".hi.Macro { color: green; }\n" - ".hi.String { color: teal; }\n" - ".hi.Escape { color: black; }\n" - ".hi.Format { color: teal; font-weight: bold }\n" - ".hi.Interp { color: green; }\n" - ".hi.Comment { color: navy; }\n" - ".hi.Todo { color: navy; font-weight: bold }\n" - "</style>\n" - ); + if (!opts[Document]) goto pre; + printf("<!DOCTYPE html>\n<title>"); + if (opts[Title]) htmlEscape(opts[Title], strlen(opts[Title])); + printf("</title>\n"); + if (opts[CSS]) { + printf("<link rel=\"stylesheet\" href=\""); + htmlEscape(opts[CSS], strlen(opts[CSS])); + printf("\">\n"); + } else if (!opts[Inline]) { + printf("<style>\n"); + for (enum Class class = 0; class < ClassLen; ++class) { + if (!HTMLStyle[class]) continue; + printf(".hi.%s { %s }\n", ClassName[class], HTMLStyle[class]); + } + printf("</style>\n"); } +pre: printf("<pre class=\"hi\">"); } @@ -482,16 +501,13 @@ static void htmlFooter(const char *opts[]) { printf("</pre>\n"); } -static const char *ClassName[ClassLen] = { -#define X(class) [class] = #class, - ENUM_CLASS -#undef X -}; - static void htmlOutput(const char *opts[], enum Class class, const char *str, size_t len) { - (void)opts; - printf("<span class=\"hi %s\">", ClassName[class]); + if (opts[Inline]) { + printf("<span style=\"%s\">", HTMLStyle[class] ? HTMLStyle[class] : ""); + } else { + printf("<span class=\"hi %s\">", ClassName[class]); + } htmlEscape(str, len); printf("</span>"); } diff --git a/bin/man1/hi.1 b/bin/man1/hi.1 index e1ab5b5b..befb1a69 100644 --- a/bin/man1/hi.1 +++ b/bin/man1/hi.1 @@ -1,4 +1,4 @@ -.Dd February 7, 2019 +.Dd February 9, 2019 .Dt HI 1 .Os . @@ -72,13 +72,31 @@ classes. The options are as follows: .Bl -tag -width "title=..." .It Cm document -Output an HTML document -with inline CSS. +Output an HTML document. .It Cm title Ns = Ns Ar ... -Set the title of the HTML document. +With +.Cm document , +set the +.Sy <title> +element text. The default title is the .Ar file name. +.It Cm css Ns = Ns Ar url +With +.Cm document , +output a +.Sy <link> +element for the external stylesheet +.Ar url . +If unset, +output default styles in a +.Sy <style> +element. +.It Cm inline +Output inline +.Sy style +attributes rather than classes. .El .El . |