src/c2html.c

Tue, 23 Aug 2016 15:55:02 +0200

author
Mike Becker <universe@uap-core.de>
date
Tue, 23 Aug 2016 15:55:02 +0200
changeset 46
534a4ef4143d
parent 45
1f3835182aeb
child 47
c39ecbbca7c0
permissions
-rw-r--r--

refactors highlighter_t and removes abstraction overhead

universe@23 1 /*
universe@23 2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
universe@23 3 *
universe@35 4 * Copyright 2016 Mike Becker. All rights reserved.
universe@23 5 *
universe@23 6 * Redistribution and use in source and binary forms, with or without
universe@23 7 * modification, are permitted provided that the following conditions are met:
universe@23 8 *
universe@23 9 * 1. Redistributions of source code must retain the above copyright
universe@23 10 * notice, this list of conditions and the following disclaimer.
universe@23 11 *
universe@23 12 * 2. Redistributions in binary form must reproduce the above copyright
universe@23 13 * notice, this list of conditions and the following disclaimer in the
universe@23 14 * documentation and/or other materials provided with the distribution.
universe@23 15 *
universe@23 16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
universe@23 17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
universe@23 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
universe@23 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
universe@23 20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
universe@23 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
universe@23 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
universe@23 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
universe@23 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
universe@23 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
universe@23 26 * POSSIBILITY OF SUCH DAMAGE.
universe@23 27 *
universe@23 28 */
universe@22 29 #include "c2html.h"
universe@1 30
universe@39 31 #include "ucx/buffer.h"
universe@39 32 #include "ucx/list.h"
universe@39 33 #include "ucx/utils.h"
universe@1 34
universe@1 35 void printhelp() {
universe@19 36 printf("Formats source code using HTML.\n\nUsage:\n"
universe@19 37 " c2html [Options] FILE\n\n"
universe@19 38 " Options:\n"
universe@19 39 " -h Prints this help message\n"
universe@19 40 " -j Highlight Java instead of C source code\n"
universe@19 41 " -o <output> Output file (stdout, if not specified)\n"
universe@22 42 " -H <header> Prepend header file\n"
universe@22 43 " -F <footer> Append footer file\n"
universe@19 44 " -p Disable highlighting (plain text)\n"
olaf@24 45 " -l Disable line numbers\n"
universe@37 46 " -V, -v Prints version and exits\n"
universe@19 47 "\n");
universe@1 48 }
universe@1 49
universe@45 50 /* TODO: remove this workaround after refactoring highlighter structure */
universe@46 51 static void plainparseline(char *src, UcxBuffer *dest, HighlighterData* hltr) {
universe@45 52 size_t dp = 0;
universe@45 53 char *buf = dest->space + dest->pos;
universe@45 54 while (*src && *src != '\n') {
universe@45 55 dp = writeescapedchar(buf, dp, *src);
universe@45 56 src++;
universe@45 57 }
universe@45 58 buf[dp++] = '\n';
universe@45 59 buf[dp] = '\0';
universe@45 60 dest->pos += dp;
universe@45 61 dest->size += dp;
universe@45 62 }
universe@45 63
universe@46 64 int formatlines(highlighter_func highlighter,
universe@46 65 UcxList *in, write_func out, void *stream, int showlineno) {
olaf@24 66
universe@44 67 /* compute width of line numbering */
universe@44 68 int lnw;
universe@44 69 if (showlineno) {
universe@44 70 size_t lines = ucx_list_size(in);
universe@44 71 lnw = 1;
universe@44 72 int p = 1;
universe@44 73 while ((p*=10) < lines) lnw++;
universe@44 74 }
universe@44 75
universe@44 76 /* allocate line buffer */
universe@39 77 UcxBuffer *line = ucx_buffer_new(NULL, 1024, UCX_BUFFER_AUTOEXTEND);
olaf@24 78 if(!line) {
olaf@24 79 return 1;
olaf@24 80 }
olaf@24 81
universe@44 82 /* start monospace formatting */
universe@44 83 out("<pre>\n", 1, 6, stream);
universe@39 84
universe@44 85 /* process lines */
universe@39 86 size_t lineno = 0;
universe@46 87 HighlighterData highlighter_data;
universe@46 88 memset(&highlighter_data, 0, sizeof(HighlighterData));
universe@46 89
universe@39 90 UCX_FOREACH(sourceline, in) {
universe@44 91 /* increase line number and clean line buffer */
universe@39 92 lineno++;
universe@44 93 ucx_buffer_clear(line);
universe@44 94
universe@44 95 /* write line number */
universe@44 96 if (showlineno) {
universe@44 97 ucx_bprintf(line, "<span class=\"c2html-lineno\">"
universe@44 98 "<a name=\"l%d\" href=\"#l%d\">%*d </a></span> ",
universe@44 99 lineno, lineno, lnw, lineno);
universe@44 100 }
universe@44 101
universe@45 102 /* process code line */
universe@46 103 highlighter(sourceline->data, line, &highlighter_data);
olaf@24 104
universe@44 105 /* write code line */
universe@44 106 out(line->space, 1, line->size, stream);
olaf@24 107 }
olaf@24 108
universe@44 109 /* end monospace formatting */
universe@44 110 out("</pre>\n", 1, 7, stream);
universe@44 111
universe@44 112 /* cleanup and return */
universe@39 113 ucx_buffer_free(line);
olaf@24 114 return 0;
olaf@24 115 }
olaf@24 116
universe@42 117 #define FILEBUF_SIZE 4096
universe@42 118
universe@39 119 enum source_type {
universe@39 120 SOURCE_C,
universe@39 121 SOURCE_JAVA,
universe@39 122 SOURCE_PLAIN
universe@39 123 };
universe@39 124
universe@1 125 int main(int argc, char** argv) {
universe@43 126
universe@43 127 /* Default settings */
universe@39 128 Settings settings;
universe@22 129 memset(&settings, 0, sizeof(settings));
olaf@24 130 settings.showlinenumbers = 1;
universe@39 131 enum source_type sourcetype = SOURCE_C;
universe@19 132
universe@43 133 /* Parse command line */
universe@19 134 char optc;
universe@37 135 while ((optc = getopt(argc, argv, "hljo:pH:F:vV")) != -1) {
universe@19 136 switch (optc) {
universe@19 137 case 'o':
universe@19 138 if (!(optarg[0] == '-' && optarg[1] == 0)) {
universe@19 139 settings.outfilename = optarg;
universe@19 140 }
universe@19 141 break;
universe@22 142 case 'F':
universe@22 143 settings.footerfile = optarg;
universe@22 144 break;
universe@22 145 case 'H':
universe@22 146 settings.headerfile = optarg;
universe@22 147 break;
universe@19 148 case 'j':
universe@39 149 sourcetype = SOURCE_JAVA;
universe@19 150 break;
universe@19 151 case 'p':
universe@39 152 sourcetype = SOURCE_PLAIN;
universe@19 153 break;
olaf@24 154 case 'l':
olaf@24 155 settings.showlinenumbers = 0;
olaf@24 156 break;
universe@19 157 case 'h':
universe@19 158 printhelp();
universe@38 159 return EXIT_SUCCESS;
universe@37 160 case 'v':
universe@37 161 case 'V':
universe@37 162 #ifdef VERSION_DEVELOP
universe@37 163 printf("%d.%d (unstable)\n", VERSION_MAJOR, VERSION_MINOR);
universe@37 164 #else
universe@37 165 printf("%d.%d\n", VERSION_MAJOR, VERSION_MINOR);
universe@37 166 #endif
universe@38 167 return EXIT_SUCCESS;
universe@19 168 default:
universe@38 169 return EXIT_FAILURE;
universe@11 170 }
universe@19 171 }
universe@19 172
universe@19 173 if (optind != argc-1) {
universe@11 174 printhelp();
universe@43 175 return EXIT_FAILURE;
universe@19 176 } else {
universe@43 177 /* Configure highlighter */
universe@46 178 highlighter_func hltr = NULL;
universe@39 179 switch (sourcetype) {
universe@39 180 case SOURCE_C:
universe@46 181 hltr = cparseline;
olaf@24 182 break;
universe@39 183 case SOURCE_JAVA:
universe@46 184 hltr = jparseline;
olaf@24 185 break;
universe@39 186 case SOURCE_PLAIN:
universe@46 187 hltr = plainparseline;
olaf@24 188 break;
universe@39 189 default: /* should be unreachable */
universe@39 190 fprintf(stderr, "error in enum source_type\n");
universe@43 191 return EXIT_FAILURE;
olaf@24 192 }
universe@42 193
universe@43 194 /* Open output file */
universe@43 195 settings.infilename = argv[optind];
universe@43 196 FILE *fout;
universe@43 197 if (settings.outfilename) {
universe@43 198 fout = fopen(settings.outfilename, "w");
universe@43 199 if (!fout) {
universe@43 200 perror("Error opening output file");
universe@43 201 return EXIT_FAILURE;
universe@43 202 }
universe@43 203 } else {
universe@43 204 fout = stdout;
universe@43 205 }
universe@43 206
universe@43 207 /* Allocate file buffer */
universe@43 208 char *filebuf = malloc(FILEBUF_SIZE);
universe@43 209 if (!filebuf) {
universe@43 210 perror("Error allocating file buffer");
universe@43 211 return EXIT_FAILURE;
universe@43 212 }
universe@43 213
universe@43 214 /* Prepend header file */
universe@42 215 {
universe@42 216 FILE *headerfile = fopen(settings.headerfile, "r");
universe@42 217 if (!headerfile) {
universe@42 218 perror("Error opening header file");
universe@43 219 if (fout != stdout) {
universe@43 220 fclose(fout);
universe@43 221 }
universe@43 222 return EXIT_FAILURE;
universe@42 223 }
universe@42 224 ucx_stream_copy(headerfile, fout,
universe@42 225 (read_func) fread, (write_func) fwrite,
universe@42 226 filebuf, FILEBUF_SIZE, (size_t)-1);
universe@42 227 fclose(headerfile);
universe@42 228 }
universe@19 229
universe@43 230 /* Process input file */
universe@39 231 FILE *inputfile = fopen(settings.infilename, "r");
universe@19 232 if (inputfile) {
universe@42 233 UcxBuffer *content = ucx_buffer_new(NULL,
universe@42 234 FILEBUF_SIZE*2, UCX_BUFFER_AUTOEXTEND);
universe@39 235 {
universe@42 236 ucx_stream_copy(inputfile, content, (read_func) fread,
universe@39 237 (write_func) ucx_buffer_write,
universe@42 238 filebuf, FILEBUF_SIZE, (size_t)-1);
universe@39 239 }
universe@39 240 fclose(inputfile);
universe@39 241
universe@42 242 UcxList *inputlines = ucx_list_append(NULL, content->space);
universe@42 243 for (size_t i = 1 ; i < content->size ; i++) {
universe@42 244 if (content->space[i] == '\r') {
universe@42 245 content->space[i] = '\n'; i++;
universe@39 246 }
universe@42 247 if (content->space[i] == '\n' && i+1 < content->size) {
universe@42 248 ucx_list_append(inputlines, content->space+i+1);
universe@39 249 }
universe@39 250 }
universe@39 251
universe@46 252 formatlines(hltr, inputlines,
universe@46 253 (write_func) fwrite, fout, settings.showlinenumbers);
universe@45 254
universe@42 255 ucx_buffer_free(content);
universe@22 256 } else {
universe@22 257 perror("Error opening input file");
universe@43 258 if (fout != stdout) {
universe@43 259 fclose(fout);
universe@43 260 }
universe@43 261 return EXIT_FAILURE;
olaf@24 262 }
olaf@24 263
universe@43 264 /* Append footer file */
universe@42 265 {
universe@42 266 FILE *footerfile = fopen(settings.footerfile, "r");
universe@42 267 if (!footerfile) {
universe@42 268 perror("Error opening footer file");
universe@43 269 if (fout != stdout) {
universe@43 270 fclose(fout);
universe@43 271 }
universe@43 272 return EXIT_FAILURE;
universe@42 273 }
universe@42 274 ucx_stream_copy(footerfile, fout,
universe@42 275 (read_func) fread, (write_func) fwrite,
universe@42 276 filebuf, FILEBUF_SIZE, (size_t)-1);
universe@42 277 fclose(footerfile);
universe@22 278 }
universe@43 279
universe@22 280
universe@42 281 free(filebuf);
universe@19 282
universe@43 283 return EXIT_SUCCESS;
universe@11 284 }
universe@1 285 }
universe@1 286

mercurial