src/javacodegen.c

Tue, 23 Aug 2016 15:28:56 +0200

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

changes signature of parser functions to use a UcxBuffer - the functions itself don't use the API yet

universe@21 1 /*
universe@21 2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
universe@21 3 *
universe@35 4 * Copyright 2016 Mike Becker. All rights reserved.
universe@21 5 *
universe@21 6 * Redistribution and use in source and binary forms, with or without
universe@21 7 * modification, are permitted provided that the following conditions are met:
universe@21 8 *
universe@21 9 * 1. Redistributions of source code must retain the above copyright
universe@21 10 * notice, this list of conditions and the following disclaimer.
universe@21 11 *
universe@21 12 * 2. Redistributions in binary form must reproduce the above copyright
universe@21 13 * notice, this list of conditions and the following disclaimer in the
universe@21 14 * documentation and/or other materials provided with the distribution.
universe@21 15 *
universe@21 16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
universe@21 17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
universe@21 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
universe@21 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
universe@21 20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
universe@21 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
universe@21 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
universe@21 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
universe@21 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
universe@21 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
universe@21 26 * POSSIBILITY OF SUCH DAMAGE.
universe@21 27 *
universe@21 28 */
universe@21 29
universe@21 30 #include "javacodegen.h"
universe@21 31 #include <string.h>
universe@21 32 #include <ctype.h>
universe@21 33
universe@21 34 const char* jkeywords[] = {
universe@21 35 "abstract", "continue", "for", "new", "switch", "assert", "default", "goto",
universe@21 36 "package", "synchronized", "boolean", "do", "if", "private", "this",
universe@21 37 "break", "double", "implements", "protected", "throw", "byte", "else",
universe@21 38 "import", "public", "throws", "case", "enum", "instanceof", "return",
universe@21 39 "transient", "catch", "extends", "int", "short", "try", "char", "final",
universe@21 40 "interface", "static", "void", "class", "finally", "long", "strictfp",
universe@21 41 "volatile", "const", "float", "native", "super", "while", NULL
universe@21 42 };
universe@21 43
universe@36 44 int check_jtype(char *word, size_t len) {
universe@21 45 return isupper(word[0]);
universe@21 46 }
universe@21 47
universe@36 48 int check_jdirective(char *word) {
universe@21 49 return word[0] == '@';
universe@21 50 }
universe@21 51
universe@29 52 #define memcpy_const(darr,doff,str) memcpy(&(darr[doff]), str, sizeof(str)-1); \
universe@29 53 dp += sizeof(str)-1
universe@29 54
universe@45 55 void jparseline(char *src, UcxBuffer *destbuf, highlighter_t *hltr) {
universe@45 56 /* TODO: workaround for using old code with UcxBuffer */
universe@45 57 char *dest = destbuf->space + destbuf->pos;
universe@45 58
universe@21 59 memset(hltr->word, 0, WORDBUF_SIZE);
universe@39 60 size_t wp = 0, sp = (size_t)-1, dp = 0;
universe@21 61 int isstring = 0, iscomment = 0, isimport = 0;
universe@28 62 char quote = '\0';
universe@21 63 int isescaping = 0;
universe@21 64
universe@21 65 if (hltr->iscommentml) {
universe@21 66 iscomment = 1;
universe@29 67 memcpy_const(dest, dp, "<span class=\"c2html-comment\">");
universe@21 68 }
universe@21 69
universe@39 70 char c;
universe@39 71 do {
universe@39 72 c = src[++sp];
universe@39 73 if (!c) break;
universe@39 74
universe@21 75 /* comments */
universe@26 76 if (!isstring && c == '/') {
universe@21 77 if (hltr->iscommentml && sp > 0 && src[sp-1] == '*') {
universe@21 78 iscomment = 0;
universe@21 79 hltr->iscommentml = 0;
universe@29 80 memcpy_const(dest, dp, "/</span>");
universe@21 81 continue;
universe@21 82 } else if (!iscomment && (src[sp+1] == '/' || src[sp+1] == '*')) {
universe@21 83 iscomment = 1;
universe@21 84 hltr->iscommentml = (src[sp+1] == '*');
universe@29 85 memcpy_const(dest, dp, "<span class=\"c2html-comment\">");
universe@21 86 }
universe@21 87 }
universe@21 88
universe@21 89 if (iscomment) {
universe@21 90 if (c == '\n') {
universe@21 91 memcpy(&(dest[dp]), "</span>", 7);
universe@21 92 dp += 7;
universe@21 93 }
universe@21 94 dp = writeescapedchar(dest, dp, c);
universe@21 95 } else if (isimport) {
universe@21 96 // TODO: local imports
universe@21 97 } else {
universe@21 98 /* strings */
universe@21 99 if (!isescaping && (c == '\'' || c == '\"')) {
universe@21 100 if (isstring) {
universe@29 101 dp = writeescapedchar(dest, dp, c);
universe@28 102 if (c == quote) {
universe@28 103 isstring = 0;
universe@29 104 memcpy_const(dest, dp, "</span>");
universe@28 105 } else {
universe@28 106 dp = writeescapedchar(dest, dp, c);
universe@28 107 }
universe@21 108 } else {
universe@28 109 isstring = 1;
universe@28 110 quote = c;
universe@29 111 memcpy_const(dest, dp,
universe@29 112 "<span class=\"c2html-string\">");
universe@21 113 dp = writeescapedchar(dest, dp, c);
universe@21 114 }
universe@21 115 } else {
universe@21 116 if (isstring) {
universe@21 117 dp = writeescapedchar(dest, dp, c);
universe@21 118 } else if (!iswordcharacter(c)) {
universe@21 119 /* interpret word int_t */
universe@21 120 if (wp > 0 && wp < WORDBUF_SIZE) {
universe@21 121 int closespan = 1;
universe@36 122 if (check_keyword(hltr->word, hltr->keywords)) {
universe@29 123 memcpy_const(dest, dp,
universe@29 124 "<span class=\"c2html-keyword\">");
universe@21 125 } else if (hltr->istype(hltr->word, wp)) {
universe@29 126 memcpy_const(dest, dp,
universe@29 127 "<span class=\"c2html-type\">");
universe@21 128 } else if (hltr->isdirective(hltr->word)) {
universe@29 129 memcpy_const(dest, dp,
universe@29 130 "<span class=\"c2html-directive\">");
universe@36 131 } else if (check_capsonly(hltr->word, wp)) {
universe@29 132 memcpy_const(dest, dp,
universe@29 133 "<span class=\"c2html-macroconst\">");
universe@21 134 } else {
universe@21 135 closespan = 0;
universe@21 136 }
universe@21 137 for (int i = 0 ; i < wp ; i++) {
universe@21 138 dp = writeescapedchar(dest, dp, hltr->word[i]);
universe@21 139 }
universe@21 140 if (closespan) {
universe@29 141 memcpy_const(dest, dp, "</span>");
universe@21 142 }
universe@21 143 }
universe@21 144 memset(hltr->word, 0, WORDBUF_SIZE);
universe@21 145 wp = 0;
universe@21 146 dp = writeescapedchar(dest, dp, c);
universe@21 147 } else {
universe@21 148 /* read word */
universe@21 149 if (wp < WORDBUF_SIZE) {
universe@21 150 hltr->word[wp++] = c;
universe@21 151 } else if (wp == WORDBUF_SIZE) {
universe@21 152 for (int i = 0 ; i < WORDBUF_SIZE ; i++) {
universe@21 153 dp = writeescapedchar(dest, dp, hltr->word[i]);
universe@21 154 }
universe@21 155 wp++;
universe@21 156 dp = writeescapedchar(dest, dp, c);
universe@21 157 } else {
universe@21 158 dp = writeescapedchar(dest, dp, c);
universe@21 159 }
universe@21 160 }
universe@21 161 }
universe@21 162
universe@21 163 isescaping = !isescaping & (c == '\\');
universe@21 164 }
universe@39 165 } while (c != '\n');
universe@21 166 dest[dp] = 0;
universe@45 167
universe@45 168 /* TODO: workaround */
universe@45 169 destbuf->pos += dp;
universe@45 170 destbuf->size += dp;
universe@21 171 }

mercurial