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 "ccodegen.h" | |
31 | #include <string.h> | |
32 | #include <ctype.h> | |
33 | ||
34 | const char* ckeywords[] = { | |
35 | "auto", "break", "case", "char", "const", "continue", "default", "do", | |
36 | "double", "else", "enum", "extern", "float", "for", "goto", "if", "int", | |
37 | "long", "register", "return", "short", "signed", "sizeof", "static", | |
38 | "struct", "switch", "typedef", "union", "unsigned", "void", "volatile", | |
39 | "while", NULL | |
40 | }; | |
41 | ||
36
be60c22cddfe
fixed possible naming conflicts with is.* functions
Mike Becker <universe@uap-core.de>
parents:
35
diff
changeset
|
42 | int check_ctype(char *word, size_t len) { |
21 | 43 | return (word[len-2] == '_' && word[len-1] == 't'); |
44 | } | |
45 | ||
36
be60c22cddfe
fixed possible naming conflicts with is.* functions
Mike Becker <universe@uap-core.de>
parents:
35
diff
changeset
|
46 | int check_cdirective(char *word) { |
21 | 47 | return (word[0] == '#'); |
48 | } | |
49 | ||
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
50 | #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
|
51 | 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
|
52 | |
21 | 53 | void cparseline(char *src, char *dest, highlighter_t *hltr) { |
54 | ||
55 | 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
|
56 | size_t wp = 0, ifp = 0, sp = (size_t)-1, dp = 0; |
21 | 57 | int isstring = 0, iscomment = 0, isinclude = 0, parseinclude = 0; |
28
1be8ea902ef4
fixed string highlighting when different quote symbol is in string
Mike Becker <universe@uap-core.de>
parents:
26
diff
changeset
|
58 | char quote = '\0'; |
21 | 59 | int isescaping = 0; |
31
50ae611a785c
fixed corrupted multi line comments, when a blank line (containing only white spaces) is present in the comment
universe
parents:
29
diff
changeset
|
60 | |
50ae611a785c
fixed corrupted multi line comments, when a blank line (containing only white spaces) is present in the comment
universe
parents:
29
diff
changeset
|
61 | /* continue a multi line comment highlighting */ |
21 | 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') { | |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
88 | memcpy_const(dest, dp, "</span>"); |
21 | 89 | } |
90 | dp = writeescapedchar(dest, dp, c); | |
91 | } else if (isinclude) { | |
92 | if (c == '<') { | |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
93 | memcpy_const(dest, dp, "<span class=\"c2html-stdinclude\">"); |
21 | 94 | dp = writeescapedchar(dest, dp, c); |
95 | } else if (c == '\"') { | |
96 | if (parseinclude) { | |
97 | dest[dp++] = '\"'; | |
98 | dest[dp++] = '>'; | |
99 | memcpy(&(dest[dp]), hltr->includefile, ifp); | |
100 | dp += ifp; | |
101 | ||
102 | dp = writeescapedchar(dest, dp, c); | |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
103 | memcpy_const(dest, dp, "</a>"); |
21 | 104 | parseinclude = 0; |
105 | } else { | |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
106 | 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
|
107 | "<a class=\"c2html-userinclude\" href="); |
21 | 108 | dp = writeescapedchar(dest, dp, c); |
109 | ifp = 0; | |
110 | hltr->includefile[ifp++] = '\"'; | |
111 | parseinclude = 1; | |
112 | } | |
113 | } else if (c == '>') { | |
114 | dp = writeescapedchar(dest, dp, c); | |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
115 | memcpy_const(dest, dp, "</span>"); |
21 | 116 | } else { |
117 | if (parseinclude) { | |
118 | hltr->includefile[ifp++] = c; | |
119 | } | |
120 | dp = writeescapedchar(dest, dp, c); | |
121 | } | |
122 | } else { | |
123 | /* strings */ | |
124 | if (!isescaping && (c == '\'' || c == '\"')) { | |
125 | if (isstring) { | |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
126 | 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
|
127 | if (c == quote) { |
1be8ea902ef4
fixed string highlighting when different quote symbol is in string
Mike Becker <universe@uap-core.de>
parents:
26
diff
changeset
|
128 | isstring = 0; |
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, "</span>"); |
28
1be8ea902ef4
fixed string highlighting when different quote symbol is in string
Mike Becker <universe@uap-core.de>
parents:
26
diff
changeset
|
130 | } else { |
1be8ea902ef4
fixed string highlighting when different quote symbol is in string
Mike Becker <universe@uap-core.de>
parents:
26
diff
changeset
|
131 | 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
|
132 | } |
21 | 133 | } else { |
28
1be8ea902ef4
fixed string highlighting when different quote symbol is in string
Mike Becker <universe@uap-core.de>
parents:
26
diff
changeset
|
134 | isstring = 1; |
1be8ea902ef4
fixed string highlighting when different quote symbol is in string
Mike Becker <universe@uap-core.de>
parents:
26
diff
changeset
|
135 | quote = c; |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
136 | 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
|
137 | "<span class=\"c2html-string\">"); |
21 | 138 | dp = writeescapedchar(dest, dp, c); |
139 | } | |
140 | } else { | |
141 | if (isstring) { | |
142 | dp = writeescapedchar(dest, dp, c); | |
143 | } else if (!iswordcharacter(c)) { | |
144 | /* interpret word int_t */ | |
145 | if (wp > 0 && wp < WORDBUF_SIZE) { | |
146 | int closespan = 1; | |
36
be60c22cddfe
fixed possible naming conflicts with is.* functions
Mike Becker <universe@uap-core.de>
parents:
35
diff
changeset
|
147 | 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
|
148 | 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
|
149 | "<span class=\"c2html-keyword\">"); |
21 | 150 | } 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
|
151 | 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
|
152 | "<span class=\"c2html-type\">"); |
21 | 153 | } else if (hltr->isdirective(hltr->word)) { |
154 | isinclude = !strncmp( | |
155 | "#include", hltr->word, WORDBUF_SIZE); | |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
156 | 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
|
157 | "<span class=\"c2html-directive\">"); |
36
be60c22cddfe
fixed possible naming conflicts with is.* functions
Mike Becker <universe@uap-core.de>
parents:
35
diff
changeset
|
158 | } 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
|
159 | 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
|
160 | "<span class=\"c2html-macroconst\">"); |
21 | 161 | } else { |
162 | closespan = 0; | |
163 | } | |
164 | for (int i = 0 ; i < wp ; i++) { | |
165 | dp = writeescapedchar(dest, dp, hltr->word[i]); | |
166 | } | |
167 | if (closespan) { | |
29
ec6e97454e64
introduced macro for constant string memcpy + fixed string highlight fix
Mike Becker <universe@uap-core.de>
parents:
28
diff
changeset
|
168 | memcpy_const(dest, dp, "</span>"); |
21 | 169 | } |
170 | } | |
171 | memset(hltr->word, 0, WORDBUF_SIZE); | |
172 | wp = 0; | |
173 | dp = writeescapedchar(dest, dp, c); | |
174 | } else { | |
175 | /* read word */ | |
176 | if (wp < WORDBUF_SIZE) { | |
177 | hltr->word[wp++] = c; | |
178 | } else if (wp == WORDBUF_SIZE) { | |
179 | for (int i = 0 ; i < WORDBUF_SIZE ; i++) { | |
180 | dp = writeescapedchar(dest, dp, hltr->word[i]); | |
181 | } | |
182 | wp++; | |
183 | dp = writeescapedchar(dest, dp, c); | |
184 | } else { | |
185 | dp = writeescapedchar(dest, dp, c); | |
186 | } | |
187 | } | |
188 | } | |
189 | ||
190 | isescaping = !isescaping & (c == '\\'); | |
191 | } | |
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
|
192 | } while (c != '\n'); |
21 | 193 | dest[dp] = 0; |
194 | } |