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