src/javacodegen.c

Tue, 21 Apr 2015 09:47:52 +0200

author
Mike Becker <universe@uap-core.de>
date
Tue, 21 Apr 2015 09:47:52 +0200
changeset 25
f82aa7afe872
parent 24
e43dee5892f4
child 26
05c3c6842aef
permissions
-rw-r--r--

more and better test cases + fixed memory leak introduced by changeset e43dee5892f4

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

mercurial