universe@21: /* universe@21: * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER. universe@21: * universe@35: * Copyright 2016 Mike Becker. All rights reserved. universe@21: * universe@21: * Redistribution and use in source and binary forms, with or without universe@21: * modification, are permitted provided that the following conditions are met: universe@21: * universe@21: * 1. Redistributions of source code must retain the above copyright universe@21: * notice, this list of conditions and the following disclaimer. universe@21: * universe@21: * 2. Redistributions in binary form must reproduce the above copyright universe@21: * notice, this list of conditions and the following disclaimer in the universe@21: * documentation and/or other materials provided with the distribution. universe@21: * universe@21: * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" universe@21: * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE universe@21: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE universe@21: * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE universe@21: * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR universe@21: * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF universe@21: * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS universe@21: * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN universe@21: * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) universe@21: * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE universe@21: * POSSIBILITY OF SUCH DAMAGE. universe@21: * universe@21: */ universe@21: universe@21: #include "ccodegen.h" universe@21: universe@21: const char* ckeywords[] = { universe@21: "auto", "break", "case", "char", "const", "continue", "default", "do", universe@21: "double", "else", "enum", "extern", "float", "for", "goto", "if", "int", universe@21: "long", "register", "return", "short", "signed", "sizeof", "static", universe@21: "struct", "switch", "typedef", "union", "unsigned", "void", "volatile", universe@21: "while", NULL universe@21: }; universe@21: universe@51: void c_highlighter(char *src, UcxBuffer *dest, HighlighterData *hd) { universe@51: /* reset buffers without clearing them */ universe@51: hd->primary_buffer->size = hd->primary_buffer->pos = 0; universe@51: hd->secondary_buffer->size = hd->secondary_buffer->pos = 0; universe@47: universe@51: /* alias the buffers for better handling */ universe@51: UcxBuffer *wbuf = hd->primary_buffer; universe@51: UcxBuffer *ifilebuf = hd->secondary_buffer; universe@47: universe@51: /* local information */ universe@48: size_t sp = (size_t)-1; universe@21: int isstring = 0, iscomment = 0, isinclude = 0, parseinclude = 0; universe@28: char quote = '\0'; universe@21: int isescaping = 0; universe@31: universe@31: /* continue a multi line comment highlighting */ universe@51: if (hd->multiline_comment) { universe@21: iscomment = 1; universe@48: ucx_buffer_puts(dest, ""); universe@21: } universe@21: universe@39: char c; universe@39: do { universe@39: c = src[++sp]; universe@39: if (!c) break; universe@39: universe@21: /* comments */ universe@26: if (!isstring && c == '/') { universe@51: if (hd->multiline_comment && sp > 0 && src[sp-1] == '*') { universe@21: iscomment = 0; universe@51: hd->multiline_comment = 0; universe@48: ucx_buffer_puts(dest, "/"); universe@21: continue; universe@21: } else if (!iscomment && (src[sp+1] == '/' || src[sp+1] == '*')) { universe@21: iscomment = 1; universe@51: hd->multiline_comment = (src[sp+1] == '*'); universe@48: ucx_buffer_puts(dest, ""); universe@21: } universe@21: } universe@21: universe@21: if (iscomment) { universe@21: if (c == '\n') { universe@48: ucx_buffer_puts(dest, "\n"); universe@48: } else { universe@48: put_htmlescaped(dest, c); universe@21: } universe@21: } else if (isinclude) { universe@21: if (c == '<') { universe@48: ucx_buffer_puts(dest, universe@48: "<"); universe@21: } else if (c == '\"') { universe@21: if (parseinclude) { universe@51: ucx_buffer_puts(dest, "\">"); universe@51: ucx_buffer_write(ifilebuf->space, 1, ifilebuf->size, dest); universe@51: ucx_buffer_puts(dest, "\""); universe@21: parseinclude = 0; universe@21: } else { universe@48: ucx_buffer_puts(dest, universe@48: "') { universe@48: ucx_buffer_puts(dest, ">"); universe@21: } else { universe@21: if (parseinclude) { universe@51: ucx_buffer_putc(ifilebuf, c); universe@21: } universe@48: put_htmlescaped(dest, c); universe@21: } universe@21: } else { universe@21: /* strings */ universe@21: if (!isescaping && (c == '\'' || c == '\"')) { universe@21: if (isstring) { universe@48: put_htmlescaped(dest, c); universe@28: if (c == quote) { universe@28: isstring = 0; universe@48: ucx_buffer_puts(dest, ""); universe@28: } else { universe@48: put_htmlescaped(dest, c); universe@28: } universe@21: } else { universe@28: isstring = 1; universe@28: quote = c; universe@48: ucx_buffer_puts(dest, ""); universe@48: put_htmlescaped(dest, c); universe@21: } universe@21: } else { universe@21: if (isstring) { universe@48: put_htmlescaped(dest, c); universe@51: } else if (!isalnum(c) && c!='_' && c!='#') { universe@51: /* write buffered word, if any */ universe@51: if (wbuf->size > 0) { universe@51: sstr_t word = sstrn(wbuf->space, wbuf->size); universe@21: int closespan = 1; universe@47: sstr_t typesuffix = ST("_t"); universe@47: if (check_keyword(word, ckeywords)) { universe@48: ucx_buffer_puts(dest, universe@48: ""); universe@47: } else if (sstrsuffix(word, typesuffix)) { universe@48: ucx_buffer_puts(dest, universe@29: ""); universe@47: } else if (word.ptr[0] == '#') { universe@47: isinclude = !sstrcmp(word, S("#include")); universe@48: ucx_buffer_puts(dest, universe@29: ""); universe@47: } else if (check_capsonly(word)) { universe@48: ucx_buffer_puts(dest, universe@29: ""); universe@21: } else { universe@21: closespan = 0; universe@21: } universe@48: put_htmlescapedstr(dest, word); universe@21: if (closespan) { universe@48: ucx_buffer_puts(dest, ""); universe@21: } universe@21: } universe@51: wbuf->pos = wbuf->size = 0; /* reset word buffer */ universe@51: universe@51: /* write current character */ universe@48: put_htmlescaped(dest, c); universe@21: } else { universe@51: /* buffer the current word */ universe@51: ucx_buffer_putc(wbuf, c); universe@21: } universe@21: } universe@21: universe@21: isescaping = !isescaping & (c == '\\'); universe@21: } universe@39: } while (c != '\n'); universe@21: }