asar coverage - build #299

src/asar/
File: src/asar/macro.cpp
Date: 2025-03-15 23:40:07
Lines:
238/248
96.0%
Functions:
10/10
100.0%
Branches:
345/544
63.4%
Line Branch Exec Source
1 #include "asar.h"
2 #include "assembleblock.h"
3 #include "macro.h"
4 #include "asar_math.h"
5
6 assocarr<macrodata*> macros;
7 static string defining_macro_name;
8 static macrodata * thisone;
9 static int numlines;
10
11 int calledmacros;
12 int reallycalledmacros;
13 int macrorecursion;
14 bool inmacro;
15 int numvarargs;
16
17 static macrodata* current_macro;
18 static const char* const* current_macro_args;
19 static int current_macro_numargs;
20
21 142 void startmacro(const char * line_)
22 {
23 142 thisone= nullptr;
24
2/6
✓ Branch 0 taken 142 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 142 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
 142 if (!confirmqpar(line_)) throw_err_block(0, err_broken_macro_declaration);
25
2/3
✓ Branch 0 taken 70 times.
✓ Branch 1 taken 72 times.
✗ Branch 2 not taken.
 142 string line=line_;
26
1/2
✓ Branch 0 taken 142 times.
✗ Branch 1 not taken.
 142 line.qnormalize();
27
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 72 times.
 142 char * startpar=(char *)strchr(line.data(), '(');
28
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 142 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
 142 if (!startpar) throw_err_block(0, err_broken_macro_declaration);
29 142 *startpar=0;
30 142 startpar++;
31
2/6
✓ Branch 0 taken 142 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 142 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
 142 if (!confirmname(line)) throw_err_block(0, err_invalid_macro_name);
32
1/2
✓ Branch 0 taken 142 times.
✗ Branch 1 not taken.
 142 defining_macro_name=(const char*)line; // force strcpy, line's .length() is wrong right now
33
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 72 times.
 142 char * endpar=startpar+strlen(startpar)-1;
34 //confirmqpar requires that all parentheses are matched, and a starting one exists, therefore it is harmless to not check for nullptrs
35
2/6
✗ Branch 0 not taken.
✓ Branch 1 taken 70 times.
✓ Branch 2 taken 72 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
 142 if (*endpar != ')') throw_err_block(0, err_broken_macro_declaration);
36 142 *endpar=0;
37
4/4
✓ Branch 0 taken 389 times.
✓ Branch 1 taken 70 times.
✓ Branch 2 taken 391 times.
✓ Branch 3 taken 72 times.
 922 for (int i=0;startpar[i];i++)
38 {
39 780 char c=startpar[i];
40
8/12
✓ Branch 0 taken 208 times.
✓ Branch 1 taken 572 times.
✓ Branch 2 taken 162 times.
✓ Branch 3 taken 46 times.
✓ Branch 4 taken 6 times.
✓ Branch 5 taken 156 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 6 times.
✗ Branch 8 not taken.
✓ Branch 9 taken 780 times.
✗ Branch 10 not taken.
✗ Branch 11 not taken.
 780 if (!is_ualnum(c)&& c!=','&& c!='.'&& c!=' ') throw_err_block(0, err_broken_macro_declaration);
41
5/11
✓ Branch 0 taken 46 times.
✓ Branch 1 taken 734 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 23 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 412 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 391 times.
✗ Branch 8 not taken.
✗ Branch 9 not taken.
✗ Branch 10 not taken.
 780 if (c==',' && is_digit(startpar[i+1])) throw_err_block(0, err_broken_macro_declaration);
42 }
43
10/18
✓ Branch 0 taken 70 times.
✓ Branch 1 taken 72 times.
✓ Branch 2 taken 70 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 70 times.
✓ Branch 5 taken 72 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 70 times.
✓ Branch 8 taken 72 times.
✓ Branch 9 taken 142 times.
✗ Branch 10 not taken.
✗ Branch 11 not taken.
✗ Branch 12 not taken.
✓ Branch 13 taken 72 times.
✗ Branch 14 not taken.
✓ Branch 15 taken 72 times.
✗ Branch 16 not taken.
✗ Branch 17 not taken.
 142 if (*startpar==',' || is_digit(*startpar) || strstr(startpar, ",,") || endpar[-1]==',') throw_err_block(0, err_broken_macro_declaration);
44
2/4
✓ Branch 0 taken 142 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 142 times.
 142 if (macros.exists(defining_macro_name))
45 {
46 ✗ const auto macro = macros[defining_macro_name];
47 // i think theoretically it would be "more correct" to print the entire
48 // callstack here, but this should be good enough for an error message.
49 // needs +1 because startline is 0-indexed
50 ✗ throw_err_block(0, err_macro_redefined, defining_macro_name.data(), macro->fname, macro->startline + 1);
51 }
52 142 thisone=(macrodata*)malloc(sizeof(macrodata));
53
2/5
✓ Branch 0 taken 70 times.
✓ Branch 1 taken 72 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
 142 new(thisone) macrodata;
54
3/3
✓ Branch 0 taken 47 times.
✓ Branch 1 taken 72 times.
✓ Branch 2 taken 23 times.
 142 if (*startpar)
55 {
56
2/4
✓ Branch 0 taken 47 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 49 times.
✗ Branch 3 not taken.
 96 char **arguments = split(duplicate_string(startpar), ',', &thisone->numargs);
57 96 thisone->arguments_buffer = arguments[0];
58
4/4
✓ Branch 0 taken 70 times.
✓ Branch 1 taken 47 times.
✓ Branch 2 taken 72 times.
✓ Branch 3 taken 49 times.
 238 for (int i=0;arguments[i];i++)
59 {
60 142 arguments[i] = strip_whitespace(arguments[i]);
61 }
62 96 thisone->arguments=(const char* const*)arguments;
63 }
64 else
65 {
66 46 const char ** noargs=(const char**)malloc(sizeof(const char**));
67 46 *noargs=nullptr;
68 46 thisone->arguments=noargs;
69 46 thisone->arguments_buffer = nullptr;
70 46 thisone->numargs=0;
71 }
72 142 thisone->variadic = false;
73
1/2
✓ Branch 0 taken 142 times.
✗ Branch 1 not taken.
 142 thisone->fname= duplicate_string(get_current_file_name());
74
1/2
✓ Branch 0 taken 142 times.
✗ Branch 1 not taken.
 142 thisone->startline=get_current_line();
75 142 thisone->parent_macro=current_macro;
76 142 thisone->parent_macro_num_varargs=0;
77 // RPG Hacker: -1 to take the ... into account, which is also being counted.
78
4/4
✓ Branch 0 taken 26 times.
✓ Branch 1 taken 44 times.
✓ Branch 2 taken 26 times.
✓ Branch 3 taken 46 times.
 142 if (thisone->parent_macro != nullptr) thisone->parent_macro_num_varargs = current_macro_numargs-(current_macro->numargs-1);
79
4/4
✓ Branch 0 taken 69 times.
✓ Branch 1 taken 69 times.
✓ Branch 2 taken 71 times.
✓ Branch 3 taken 71 times.
 280 for (int i=0;thisone->arguments[i];i++)
80 {
81
9/10
✓ Branch 0 taken 26 times.
✓ Branch 1 taken 43 times.
✓ Branch 2 taken 25 times.
✓ Branch 3 taken 1 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 71 times.
✓ Branch 6 taken 26 times.
✓ Branch 7 taken 45 times.
✓ Branch 8 taken 25 times.
✓ Branch 9 taken 1 times.
 140 if(!strcmp(thisone->arguments[i], "...") && !thisone->arguments[i+1]) thisone->variadic = true;
82
7/9
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 43 times.
✓ Branch 2 taken 1 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 46 times.
✓ Branch 5 taken 1 times.
✓ Branch 6 taken 45 times.
✓ Branch 7 taken 1 times.
✗ Branch 8 not taken.
 90 else if(!strcmp(thisone->arguments[i], "...")) throw_err_block(0, err_vararg_must_be_last);
83
3/9
✗ Branch 0 not taken.
✓ Branch 1 taken 43 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
✓ Branch 4 taken 45 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 45 times.
✗ Branch 7 not taken.
✗ Branch 8 not taken.
 88 else if(strchr(thisone->arguments[i], '.')) throw_err_block(0, err_invalid_macro_param_name);
84
4/10
✓ Branch 0 taken 43 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 43 times.
✓ Branch 4 taken 45 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 45 times.
✗ Branch 8 not taken.
✗ Branch 9 not taken.
 88 else if (!confirmname(thisone->arguments[i])) throw_err_block(0, err_invalid_macro_param_name);
85
4/4
✓ Branch 0 taken 25 times.
✓ Branch 1 taken 68 times.
✓ Branch 2 taken 25 times.
✓ Branch 3 taken 70 times.
 188 for (int j=i+1;thisone->arguments[j];j++)
86 {
87
4/12
✗ Branch 0 not taken.
✓ Branch 1 taken 25 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 25 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 25 times.
✗ Branch 8 not taken.
✓ Branch 9 taken 25 times.
✗ Branch 10 not taken.
✗ Branch 11 not taken.
 50 if (!strcmp(thisone->arguments[i], thisone->arguments[j])) throw_err_block(0, err_macro_param_redefined, thisone->arguments[i]);
88 }
89 }
90 140 numlines=0;
91 213 }
92
93 860 void tomacro(string line)
94 {
95
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 860 times.
 860 if (!thisone) return;
96 860 thisone->lines[numlines++]=std::move(line);
97 }
98
99 142 void endmacro(bool insert)
100 {
101
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 142 times.
 142 if (!thisone) return;
102 142 thisone->numlines=numlines;
103
2/2
✓ Branch 0 taken 140 times.
✓ Branch 1 taken 2 times.
 142 if (insert) macros.create(defining_macro_name) = thisone;
104 else
105 {
106 2 freemacro(thisone);
107 2 thisone=nullptr;
108 }
109 }
110
111 #define cfree(x) free((void*)x)
112 142 void freemacro(macrodata* & macro)
113 {
114 142 macro->lines.~autoarray();
115 142 cfree(macro->fname);
116 142 cfree(macro->arguments_buffer);
117 142 cfree(macro->arguments);
118 142 cfree(macro);
119 142 }
120 #undef cfree
121
122
123 534 void callmacro(const char * data)
124 {
125 534 int prev_numvarargs = numvarargs;
126 macrodata * thismacro;
127
2/6
✓ Branch 0 taken 534 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 534 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
 534 if (!confirmqpar(data)) throw_err_block(0, err_broken_macro_usage);
128
2/3
✓ Branch 0 taken 261 times.
✓ Branch 1 taken 273 times.
✗ Branch 2 not taken.
 534 string line=data;
129
1/2
✓ Branch 0 taken 534 times.
✗ Branch 1 not taken.
 534 line.qnormalize();
130
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 273 times.
 534 char * startpar=(char *)strchr(line.data(), '(');
131
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 534 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
 534 if (!startpar) throw_err_block(0, err_broken_macro_usage);
132 534 *startpar=0;
133 534 startpar++;
134
2/6
✓ Branch 0 taken 534 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 534 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
 534 if (!confirmname(line)) throw_err_block(0, err_broken_macro_usage);
135
2/6
✓ Branch 0 taken 534 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 534 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
 534 if (!macros.exists(line)) throw_err_block(0, err_macro_not_found, line.data());
136
1/2
✓ Branch 0 taken 534 times.
✗ Branch 1 not taken.
 534 thismacro = macros.find(line);
137
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 273 times.
 534 char * endpar=startpar+strlen(startpar)-1;
138 //confirmqpar requires that all parentheses are matched, and a starting one exists, therefore it is harmless to not check for nullptrs
139
2/6
✗ Branch 0 not taken.
✓ Branch 1 taken 261 times.
✓ Branch 2 taken 273 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
 534 if (*endpar != ')') throw_err_block(0, err_broken_macro_usage);
140 534 *endpar=0;
141 534 autoptr<const char * const*> args;
142 534 int numargs=0;
143
3/3
✓ Branch 0 taken 201 times.
✓ Branch 1 taken 273 times.
✓ Branch 2 taken 60 times.
 534 if (*startpar) {
144
1/2
✓ Branch 0 taken 414 times.
✗ Branch 1 not taken.
 414 args=(const char* const*)qpsplit(startpar, ',', &numargs);
145 // qpsplit returns a nullptr when the input is broken, e.g. closing paren before opening or whatnot
146
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 414 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
 414 if(args == nullptr) throw_err_block(0, err_broken_macro_usage);
147 }
148
6/10
✓ Branch 0 taken 66 times.
✓ Branch 1 taken 195 times.
✓ Branch 2 taken 66 times.
✓ Branch 3 taken 273 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 66 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 66 times.
✗ Branch 8 not taken.
✗ Branch 9 not taken.
 534 if (numargs != thismacro->numargs && !thismacro->variadic) throw_err_block(0, err_macro_wrong_num_params);
149 // RPG Hacker: -1, because the ... is also counted as an argument, yet we want it to be entirely optional.
150
8/10
✓ Branch 0 taken 6 times.
✓ Branch 1 taken 255 times.
✓ Branch 2 taken 12 times.
✓ Branch 3 taken 267 times.
✓ Branch 4 taken 6 times.
✓ Branch 5 taken 6 times.
✓ Branch 6 taken 6 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 6 times.
✗ Branch 9 not taken.
 534 if (numargs < thismacro->numargs - 1 && thismacro->variadic) throw_err_block(0, err_macro_wrong_min_params);
151
152 522 macrorecursion++;
153 522 inmacro=true;
154 522 int old_calledmacros = calledmacros;
155 522 calledmacros = reallycalledmacros++;
156 522 int startif=numif;
157
158
2/2
✓ Branch 0 taken 894 times.
✓ Branch 1 taken 522 times.
 1416 for (int i = 0; i < numargs; ++i)
159 {
160 // RPG Hacker: These casts make me feel very nasty.
161
2/4
✓ Branch 0 taken 441 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 453 times.
✗ Branch 3 not taken.
 894 (*reinterpret_cast<autoptr<const char**>*>(&args))[i] = safedequote(strip_whitespace((char*)args[i]));
162 }
163
164 // RPG Hacker: -1 to take the ... into account, which is also being counted.
165
5/5
✓ Branch 0 taken 90 times.
✓ Branch 1 taken 165 times.
✓ Branch 2 taken 267 times.
✓ Branch 3 taken 90 times.
✓ Branch 4 taken 177 times.
 522 if(thismacro->variadic) numvarargs = numargs-(thismacro->numargs-1);
166 342 else numvarargs = -1;
167
168 522 autoarray<int>* oldmacroposlabels = macroposlabels;
169 522 autoarray<int>* oldmacroneglabels = macroneglabels;
170 522 autoarray<string>* oldmacrosublabels = macrosublabels;
171
172 522 autoarray<int> newmacroposlabels;
173 522 autoarray<int> newmacroneglabels;
174 522 autoarray<string> newmacrosublabels;
175
176 522 macroposlabels = &newmacroposlabels;
177 522 macroneglabels = &newmacroneglabels;
178 522 macrosublabels = &newmacrosublabels;
179
180 522 macrodata* old_macro = current_macro;
181 522 const char* const* old_macro_args = current_macro_args;
182 522 int old_numargs = current_macro_numargs;
183 522 current_macro = thismacro;
184 522 current_macro_args = args;
185 522 current_macro_numargs = numargs;
186
187
2/3
✓ Branch 0 taken 255 times.
✓ Branch 1 taken 267 times.
✗ Branch 2 not taken.
 522 callstack_push cs_push(callstack_entry_type::MACRO_CALL, data);
188
189 {
190
2/4
✓ Branch 0 taken 255 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 267 times.
✗ Branch 3 not taken.
 522 callstack_push cs_push(callstack_entry_type::FILE, thismacro->fname);
191
192
4/4
✓ Branch 0 taken 3537 times.
✓ Branch 1 taken 255 times.
✓ Branch 2 taken 3549 times.
✓ Branch 3 taken 267 times.
 7608 for (int i=0;i<thismacro->numlines;i++)
193 {
194
4/8
✓ Branch 0 taken 3537 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 3537 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 3549 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 3549 times.
✗ Branch 7 not taken.
 7086 bool was_loop_end = do_line_logic(thismacro->lines[i], thismacro->fname, thismacro->startline+i+1);
195
196
12/12
✓ Branch 0 taken 1220 times.
✓ Branch 1 taken 5866 times.
✓ Branch 2 taken 610 times.
✓ Branch 3 taken 610 times.
✓ Branch 4 taken 291 times.
✓ Branch 5 taken 319 times.
✓ Branch 6 taken 291 times.
✓ Branch 7 taken 3856 times.
✓ Branch 8 taken 291 times.
✓ Branch 9 taken 319 times.
✓ Branch 10 taken 291 times.
✓ Branch 11 taken 3258 times.
 7086 if (was_loop_end && whilestatus[numif].cond)
197 // RPG Hacker: -1 to compensate for the i++, and another -1
198 // because ->lines doesn't include the macro header.
199
2/3
✓ Branch 0 taken 291 times.
✓ Branch 1 taken 291 times.
✗ Branch 2 not taken.
 582 i = whilestatus[numif].startline - thismacro->startline - 2;
200 }
201 522 }
202
203 522 macroposlabels = oldmacroposlabels;
204 522 macroneglabels = oldmacroneglabels;
205 522 macrosublabels = oldmacrosublabels;
206
207 522 current_macro = old_macro;
208 522 current_macro_args = old_macro_args;
209 522 current_macro_numargs = old_numargs;
210
211 522 macrorecursion--;
212 522 inmacro = macrorecursion;
213 522 numvarargs = prev_numvarargs;
214 522 calledmacros = old_calledmacros;
215
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 522 times.
 522 if (numif!=startif)
216 {
217 ✗ numif=startif;
218 ✗ numtrue=startif;
219 ✗ throw_err_block(0, err_unclosed_if);
220 }
221 813 }
222
223 56 static string generate_macro_arg_string(const char* named_arg, int depth)
224 {
225 56 string ret="<";
226
2/2
✓ Branch 0 taken 60 times.
✓ Branch 1 taken 56 times.
 116 for (int i = 0; i < depth;++i)
227 {
228
1/2
✓ Branch 0 taken 60 times.
✗ Branch 1 not taken.
 60 ret += '^';
229 }
230
1/2
✓ Branch 0 taken 56 times.
✗ Branch 1 not taken.
 56 ret += named_arg;
231
1/2
✓ Branch 0 taken 56 times.
✗ Branch 1 not taken.
 56 ret += ">";
232 56 return ret;
233 ✗ }
234
235 42 static string generate_macro_arg_string(int var_arg, int depth)
236 {
237 42 string ret="<";
238
2/2
✓ Branch 0 taken 18 times.
✓ Branch 1 taken 42 times.
 60 for (int i = 0; i < depth;++i)
239 {
240
1/2
✓ Branch 0 taken 18 times.
✗ Branch 1 not taken.
 18 ret += '^';
241 }
242
1/2
✓ Branch 0 taken 42 times.
✗ Branch 1 not taken.
 42 ret += "...[";
243
4/7
✓ Branch 0 taken 21 times.
✓ Branch 1 taken 21 times.
✓ Branch 2 taken 21 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 21 times.
✗ Branch 6 not taken.
 42 ret += dec(var_arg);
244
1/2
✓ Branch 0 taken 42 times.
✗ Branch 1 not taken.
 42 ret += "]>";
245 42 return ret;
246 ✗ }
247
248 76 static string generate_macro_hint_string(const char* named_arg, const macrodata* thismacro, int desired_depth, int current_depth=0)
249 {
250 // RPG Hacker: This only work when the incorrectly used parameter
251 // is inside the macro that is currently being defined. Not great,
252 // but still better than nothing.
253
4/4
✓ Branch 0 taken 36 times.
✓ Branch 1 taken 40 times.
✓ Branch 2 taken 12 times.
✓ Branch 3 taken 24 times.
 76 if (current_depth == 0 && thisone != nullptr)
254 {
255
4/4
✓ Branch 0 taken 10 times.
✓ Branch 1 taken 5 times.
✓ Branch 2 taken 10 times.
✓ Branch 3 taken 5 times.
 30 for (int j=0;thisone->arguments[j];j++)
256 {
257
6/8
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 9 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 10 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 10 times.
✓ Branch 6 taken 1 times.
✓ Branch 7 taken 9 times.
 20 if (!strcmp(named_arg, thisone->arguments[j]))
258 {
259
2/3
✓ Branch 0 taken 1 times.
✓ Branch 1 taken 1 times.
✗ Branch 2 not taken.
 2 string ret=" Did you mean: '";
260
4/8
✓ Branch 0 taken 1 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 1 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 1 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 1 times.
✗ Branch 7 not taken.
 2 ret += generate_macro_arg_string(thisone->arguments[j], 0);
261
1/2
✓ Branch 0 taken 2 times.
✗ Branch 1 not taken.
 2 ret += "'?";
262 2 return ret;
263 2 }
264 }
265 }
266
267 // RPG Hacker: Technically, we could skip a level here and go straight
268 // to the parent, but maybe at some point we'll want to expand this to
269 // also look for similar args in the current level, so I'll leave it
270 // like this, just in case.
271
2/2
✓ Branch 0 taken 58 times.
✓ Branch 1 taken 16 times.
 74 if (thismacro != nullptr)
272 {
273
4/4
✓ Branch 0 taken 46 times.
✓ Branch 1 taken 20 times.
✓ Branch 2 taken 46 times.
✓ Branch 3 taken 20 times.
 132 for (int j=0;thismacro->arguments[j];j++)
274 {
275
6/8
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 37 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 46 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 46 times.
✓ Branch 6 taken 9 times.
✓ Branch 7 taken 37 times.
 92 if (!strcmp(named_arg, thismacro->arguments[j]))
276 {
277
2/3
✓ Branch 0 taken 9 times.
✓ Branch 1 taken 9 times.
✗ Branch 2 not taken.
 18 string ret=" Did you mean: '";
278
4/8
✓ Branch 0 taken 9 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 9 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 9 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 9 times.
✗ Branch 7 not taken.
 18 ret += generate_macro_arg_string(thismacro->arguments[j], desired_depth+current_depth);
279
1/2
✓ Branch 0 taken 18 times.
✗ Branch 1 not taken.
 18 ret += "'?";
280 18 return ret;
281 18 }
282 }
283 40 return generate_macro_hint_string(named_arg, thismacro->parent_macro, desired_depth, current_depth+1);
284 }
285
286 16 return "";
287 }
288
289 42 static string generate_macro_hint_string(int var_arg, const macrodata* thismacro, int desired_depth, int current_depth=0)
290 {
291
2/2
✓ Branch 0 taken 30 times.
✓ Branch 1 taken 12 times.
 42 if (thismacro != nullptr)
292 {
293
4/4
✓ Branch 0 taken 6 times.
✓ Branch 1 taken 9 times.
✓ Branch 2 taken 6 times.
✓ Branch 3 taken 9 times.
 30 if (thismacro->parent_macro_num_varargs > var_arg)
294 {
295
2/3
✓ Branch 0 taken 6 times.
✓ Branch 1 taken 6 times.
✗ Branch 2 not taken.
 12 string ret=" Did you mean: '";
296
4/7
✓ Branch 0 taken 6 times.
✓ Branch 1 taken 6 times.
✓ Branch 2 taken 6 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 6 times.
✗ Branch 6 not taken.
 12 ret += generate_macro_arg_string(var_arg, desired_depth+current_depth+1);
297
1/2
✓ Branch 0 taken 12 times.
✗ Branch 1 not taken.
 12 ret += "'?";
298 12 return ret;
299 12 }
300 18 return generate_macro_hint_string(var_arg, thismacro->parent_macro, desired_depth, current_depth+1);
301 }
302
303 12 return "";
304 }
305
306 57327 string replace_macro_args(const string& line) {
307
4/4
✓ Branch 0 taken 25455 times.
✓ Branch 1 taken 31872 times.
✓ Branch 2 taken 25758 times.
✓ Branch 3 taken 3063 times.
 57327 if(!inmacro)
308 {
309
1/2
✓ Branch 0 taken 51213 times.
✗ Branch 1 not taken.
 51213 return line;
310 }
311 6114 string out;
312
4/4
✓ Branch 0 taken 40119 times.
✓ Branch 1 taken 3006 times.
✓ Branch 2 taken 40239 times.
✓ Branch 3 taken 3018 times.
 86382 for (const char * in=line;*in;)
313 {
314
3/3
✓ Branch 0 taken 38982 times.
✓ Branch 1 taken 40227 times.
✓ Branch 2 taken 1149 times.
 80358 if (*in != '<') {
315
2/4
✓ Branch 0 taken 38982 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 39090 times.
✗ Branch 3 not taken.
 78072 out += *in++;
316 78072 continue;
317 }
318
319 2286 const char * end=in+1;
320 2286 int depth = 0;
321
3/3
✓ Branch 0 taken 93 times.
✓ Branch 1 taken 1230 times.
✓ Branch 2 taken 1149 times.
 2472 for (; *end=='^'; end++) {
322 186 depth++;
323 }
324
325 2286 const char* name_start = end;
326 2286 bool is_variadic = false;
327
328
3/3
✓ Branch 0 taken 405 times.
✓ Branch 1 taken 1149 times.
✓ Branch 2 taken 732 times.
 2286 if(is_ualpha(*end)) {
329 // must be a named arg ref
330
4/4
✓ Branch 0 taken 2364 times.
✓ Branch 1 taken 405 times.
✓ Branch 2 taken 2376 times.
✓ Branch 3 taken 417 times.
 5562 while(is_ualnum(*end)) end++;
331
2/3
✗ Branch 0 not taken.
✓ Branch 1 taken 405 times.
✓ Branch 2 taken 417 times.
 822 if(*end != '>') {
332 // not a valid param ref
333 ✗ out += *in++;
334 ✗ continue;
335 }
336
8/12
✓ Branch 0 taken 345 times.
✓ Branch 1 taken 732 times.
✓ Branch 2 taken 732 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 345 times.
✓ Branch 5 taken 345 times.
✓ Branch 6 taken 345 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 345 times.
✗ Branch 9 not taken.
✓ Branch 10 taken 345 times.
✗ Branch 11 not taken.
 1464 } else if(end[0] == '.' && end[1] == '.' && end[2] == '.' && end[3] == '[') {
337 // must be a <...[something]>
338 690 end += 4;
339
1/2
✓ Branch 0 taken 690 times.
✗ Branch 1 not taken.
 690 end = strqpchr(end, ']');
340
6/9
✓ Branch 0 taken 684 times.
✓ Branch 1 taken 6 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 342 times.
✓ Branch 4 taken 3 times.
✓ Branch 5 taken 342 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 3 times.
✗ Branch 8 not taken.
 690 if(!end || end[1] != '>') throw_err_line(0, err_unclosed_vararg);
341 684 end++;
342 684 is_variadic = true;
343 } else {
344 // not a macro param
345
2/4
✓ Branch 0 taken 387 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 387 times.
✗ Branch 3 not taken.
 774 out += *in++;
346 774 continue;
347 }
348
349 // end is now pointing at '>'
350
2/2
✓ Branch 0 taken 162 times.
✓ Branch 1 taken 1344 times.
 1506 if (depth != in_macro_def)
351 {
352
4/4
✓ Branch 0 taken 18 times.
✓ Branch 1 taken 144 times.
✓ Branch 2 taken 6 times.
✓ Branch 3 taken 12 times.
 162 if (depth > in_macro_def && in_macro_def > 0) {
353
1/2
✓ Branch 0 taken 6 times.
✗ Branch 1 not taken.
 6 throw_err_line(0, err_invalid_depth_resolve, "macro parameter", "macro parameter", depth, in_macro_def-1);
354 }
355 // valid param ref, but not meant to be resolved at this depth.
356 // copy it over in its entirety (including the last '>')
357
2/3
✓ Branch 0 taken 78 times.
✓ Branch 1 taken 78 times.
✗ Branch 2 not taken.
 156 out.append(in, 0, end + 1 - in);
358 156 in = end + 1;
359 156 continue;
360 }
361
362
4/6
✓ Branch 0 taken 132 times.
✓ Branch 1 taken 1212 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 132 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 66 times.
 1344 if (depth > 0 && !inmacro) {
363 ✗ throw_err_line(0, err_invalid_depth_resolve, "macro parameter", "macro parameter", depth, in_macro_def-1);
364 }
365
366
2/2
✓ Branch 0 taken 624 times.
✓ Branch 1 taken 720 times.
 1344 if(is_variadic) {
367
6/7
✓ Branch 0 taken 3 times.
✓ Branch 1 taken 309 times.
✓ Branch 2 taken 315 times.
✓ Branch 3 taken 3 times.
✓ Branch 4 taken 309 times.
✓ Branch 5 taken 3 times.
✗ Branch 6 not taken.
 624 if(!current_macro->variadic) throw_err_block(0, err_macro_not_varadic, "<...[math]>");
368 618 const char* num_start = name_start + 4;
369 618 const char* num_end = end - 1;
370
2/3
✓ Branch 0 taken 309 times.
✓ Branch 1 taken 309 times.
✗ Branch 2 not taken.
 618 string num_str(num_start, num_end - num_start);
371 618 string num_resolved;
372
1/2
✓ Branch 0 taken 618 times.
✗ Branch 1 not taken.
 618 resolvedefines(num_resolved, num_str);
373
7/10
✓ Branch 0 taken 309 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 615 times.
✓ Branch 3 taken 3 times.
✓ Branch 4 taken 306 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 306 times.
✓ Branch 7 taken 3 times.
✓ Branch 8 taken 306 times.
✗ Branch 9 not taken.
 627 int arg_num = parse_math_expr(num_resolved)->evaluate_static().get_integer();
374
2/2
✓ Branch 0 taken 6 times.
✓ Branch 1 taken 606 times.
 612 if (arg_num < 0) {
375
4/7
✓ Branch 0 taken 3 times.
✓ Branch 1 taken 3 times.
✓ Branch 2 taken 3 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 3 times.
✗ Branch 6 not taken.
 12 throw_err_block(0, err_vararg_out_of_bounds, generate_macro_arg_string(arg_num, depth).data(), "");
376 }
377
4/4
✓ Branch 0 taken 12 times.
✓ Branch 1 taken 291 times.
✓ Branch 2 taken 12 times.
✓ Branch 3 taken 291 times.
 606 if (arg_num > current_macro_numargs-current_macro->numargs) {
378
2/3
✓ Branch 0 taken 12 times.
✓ Branch 1 taken 12 times.
✗ Branch 2 not taken.
 24 string argstr = generate_macro_arg_string(arg_num, depth);
379
2/3
✓ Branch 0 taken 12 times.
✓ Branch 1 taken 12 times.
✗ Branch 2 not taken.
 24 string hintstr = generate_macro_hint_string(arg_num, current_macro, depth);
380
1/2
✓ Branch 0 taken 24 times.
✗ Branch 1 not taken.
 24 throw_err_block(0, err_vararg_out_of_bounds, argstr.data(), hintstr.data());
381 48 }
382
2/4
✓ Branch 0 taken 291 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 291 times.
✗ Branch 3 not taken.
 582 out += current_macro_args[arg_num + current_macro->numargs - 1];
383 654 } else {
384
2/3
✓ Branch 0 taken 354 times.
✓ Branch 1 taken 366 times.
✗ Branch 2 not taken.
 720 string name(name_start, end - name_start);
385 720 bool found = false;
386
4/4
✓ Branch 0 taken 444 times.
✓ Branch 1 taken 18 times.
✓ Branch 2 taken 456 times.
✓ Branch 3 taken 18 times.
 936 for (int j=0; current_macro->arguments[j]; j++) {
387
4/4
✓ Branch 0 taken 336 times.
✓ Branch 1 taken 108 times.
✓ Branch 2 taken 348 times.
✓ Branch 3 taken 108 times.
 900 if(name == current_macro->arguments[j]) {
388 684 found = true;
389
2/4
✓ Branch 0 taken 336 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 348 times.
✗ Branch 3 not taken.
 684 out += current_macro_args[j];
390 684 break;
391 }
392 }
393
2/2
✓ Branch 0 taken 36 times.
✓ Branch 1 taken 684 times.
 720 if (!found) {
394
2/3
✓ Branch 0 taken 18 times.
✓ Branch 1 taken 18 times.
✗ Branch 2 not taken.
 36 string argstr = generate_macro_arg_string(name, depth);
395
2/3
✓ Branch 0 taken 18 times.
✓ Branch 1 taken 18 times.
✗ Branch 2 not taken.
 36 string hintstr = generate_macro_hint_string(name, current_macro, depth);
396
1/2
✓ Branch 0 taken 36 times.
✗ Branch 1 not taken.
 36 throw_err_block(0, err_macro_param_not_found, argstr.data(), hintstr.data());
397 72 }
398 720 }
399 1266 in = end+1;
400 }
401 6024 return out;
402 6114 }
403