diff -r ebbf0776c1bc -r 537aec525835 src/ccodegen.c --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/src/ccodegen.c Thu Jan 23 09:19:37 2014 +0100 @@ -0,0 +1,198 @@ +/* + * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER. + * + * Copyright 2014 Mike Becker. All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions are met: + * + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" + * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE + * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + * POSSIBILITY OF SUCH DAMAGE. + * + */ + +#include "ccodegen.h" +#include +#include + +const char* ckeywords[] = { + "auto", "break", "case", "char", "const", "continue", "default", "do", + "double", "else", "enum", "extern", "float", "for", "goto", "if", "int", + "long", "register", "return", "short", "signed", "sizeof", "static", + "struct", "switch", "typedef", "union", "unsigned", "void", "volatile", + "while", NULL +}; + +int isctype(char *word, size_t len) { + return (word[len-2] == '_' && word[len-1] == 't'); +} + +int iscdirective(char *word) { + return (word[0] == '#'); +} + +void cparseline(char *src, char *dest, highlighter_t *hltr) { + size_t sp = 0, dp = 0; + /* indent */ + while (isspace(src[sp])) { + dest[dp++] = src[sp++]; + } + + memset(hltr->word, 0, WORDBUF_SIZE); + size_t wp = 0, ifp = 0; + int isstring = 0, iscomment = 0, isinclude = 0, parseinclude = 0; + int isescaping = 0; + + if (hltr->iscommentml) { + iscomment = 1; + memcpy(&(dest[dp]), "", 29); + dp += 29; + } + + for (char c = src[sp] ; c ; c=src[++sp]) { + /* comments */ + if (c == '/') { + if (hltr->iscommentml && sp > 0 && src[sp-1] == '*') { + iscomment = 0; + hltr->iscommentml = 0; + memcpy(&(dest[dp]), "/", 8); + dp += 8; + continue; + } else if (!iscomment && (src[sp+1] == '/' || src[sp+1] == '*')) { + iscomment = 1; + hltr->iscommentml = (src[sp+1] == '*'); + memcpy(&(dest[dp]), "", 29); + dp += 29; + } + } + + if (iscomment) { + if (c == '\n') { + memcpy(&(dest[dp]), "", 7); + dp += 7; + } + dp = writeescapedchar(dest, dp, c); + } else if (isinclude) { + if (c == '<') { + memcpy(&(dest[dp]), "", 32); + dp += 32; + dp = writeescapedchar(dest, dp, c); + } else if (c == '\"') { + if (parseinclude) { + dest[dp++] = '\"'; + dest[dp++] = '>'; + memcpy(&(dest[dp]), hltr->includefile, ifp); + dp += ifp; + + dp = writeescapedchar(dest, dp, c); + memcpy(&(dest[dp]), "", 4); + dp += 4; + parseinclude = 0; + } else { + memcpy(&(dest[dp]), + "') { + dp = writeescapedchar(dest, dp, c); + memcpy(&(dest[dp]), "", 7); + dp += 7; + } else { + if (parseinclude) { + hltr->includefile[ifp++] = c; + } + dp = writeescapedchar(dest, dp, c); + } + } else { + /* strings */ + if (!isescaping && (c == '\'' || c == '\"')) { + isstring ^= 1; + if (isstring) { + memcpy(&(dest[dp]), "", 28); + dp += 28; + dp = writeescapedchar(dest, dp, c); + } else { + dp = writeescapedchar(dest, dp, c); + memcpy(&(dest[dp]), "", 7); + dp += 7; + } + } else { + if (isstring) { + dp = writeescapedchar(dest, dp, c); + } else if (!iswordcharacter(c)) { + /* interpret word int_t */ + if (wp > 0 && wp < WORDBUF_SIZE) { + int closespan = 1; + if (iskeyword(hltr->word, hltr->keywords)) { + memcpy(&(dest[dp]), + "", 29); + dp += 29; + } else if (hltr->istype(hltr->word, wp)) { + memcpy(&(dest[dp]), + "", 26); + dp += 26; + } else if (hltr->isdirective(hltr->word)) { + isinclude = !strncmp( + "#include", hltr->word, WORDBUF_SIZE); + memcpy(&(dest[dp]), + "", 31); + dp += 31; + } else if (iscapsonly(hltr->word, wp)) { + memcpy(&(dest[dp]), + "", 32); + dp += 32; + } else { + closespan = 0; + } + for (int i = 0 ; i < wp ; i++) { + dp = writeescapedchar(dest, dp, hltr->word[i]); + } + if (closespan) { + memcpy(&(dest[dp]), "", 7); + dp += 7; + } + } + memset(hltr->word, 0, WORDBUF_SIZE); + wp = 0; + dp = writeescapedchar(dest, dp, c); + } else { + /* read word */ + if (wp < WORDBUF_SIZE) { + hltr->word[wp++] = c; + } else if (wp == WORDBUF_SIZE) { + for (int i = 0 ; i < WORDBUF_SIZE ; i++) { + dp = writeescapedchar(dest, dp, hltr->word[i]); + } + wp++; + dp = writeescapedchar(dest, dp, c); + } else { + dp = writeescapedchar(dest, dp, c); + } + } + } + + isescaping = !isescaping & (c == '\\'); + } + } + dest[dp] = 0; +}