src/javacodegen.c

changeset 21
537aec525835
child 24
e43dee5892f4
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/javacodegen.c	Thu Jan 23 09:19:37 2014 +0100
@@ -0,0 +1,165 @@
+/*
+ * 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 "javacodegen.h"
+#include <string.h>
+#include <ctype.h>
+
+const char* jkeywords[] = {
+    "abstract", "continue", "for", "new", "switch", "assert", "default", "goto",
+    "package", "synchronized", "boolean", "do", "if", "private", "this",
+    "break", "double", "implements", "protected", "throw", "byte", "else",
+    "import", "public", "throws", "case", "enum", "instanceof", "return",
+    "transient", "catch", "extends", "int", "short", "try", "char", "final",
+    "interface", "static", "void", "class", "finally", "long", "strictfp",
+    "volatile", "const", "float", "native", "super", "while", NULL
+};
+
+int isjtype(char *word, size_t len) {
+    return isupper(word[0]);
+}
+
+int isjdirective(char *word) {
+    return word[0] == '@';
+}
+
+void jparseline(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;
+    int isstring = 0, iscomment = 0, isimport = 0;
+    int isescaping = 0;
+
+    if (hltr->iscommentml) {
+        iscomment = 1;
+        memcpy(&(dest[dp]), "<span class=\"c2html-comment\">", 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]), "/</span>", 8);
+                dp += 8;
+                continue;
+            } else if (!iscomment && (src[sp+1] == '/' || src[sp+1] == '*')) {
+                iscomment = 1;
+                hltr->iscommentml = (src[sp+1] == '*');
+                memcpy(&(dest[dp]), "<span class=\"c2html-comment\">", 29);
+                dp += 29;
+            }
+        }
+
+        if (iscomment) {
+            if (c == '\n') {
+                memcpy(&(dest[dp]), "</span>", 7);
+                dp += 7;
+            }
+            dp = writeescapedchar(dest, dp, c);
+        } else if (isimport) {
+            // TODO: local imports
+        } else {
+            /* strings */
+            if (!isescaping && (c == '\'' || c == '\"')) {
+                isstring ^= 1;
+                if (isstring) {
+                    memcpy(&(dest[dp]), "<span class=\"c2html-string\">", 28);
+                    dp += 28;
+                    dp = writeescapedchar(dest, dp, c);
+                } else {
+                    dp = writeescapedchar(dest, dp, c);
+                    memcpy(&(dest[dp]), "</span>", 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]),
+                                "<span class=\"c2html-keyword\">", 29);
+                            dp += 29;
+                        } else if (hltr->istype(hltr->word, wp)) {
+                            memcpy(&(dest[dp]),
+                                "<span class=\"c2html-type\">", 26);
+                            dp += 26;
+                        } else if (hltr->isdirective(hltr->word)) {
+                            memcpy(&(dest[dp]),
+                                "<span class=\"c2html-directive\">", 31);
+                            dp += 31;
+                        } else if (iscapsonly(hltr->word, wp)) {
+                            memcpy(&(dest[dp]),
+                                "<span class=\"c2html-macroconst\">", 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]), "</span>", 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;
+}

mercurial