asar coverage - build #310


src/asar/
File: src/asar/macro.cpp
Date: 2025-09-12 13:46:37
Lines:
236/248
95.2%
Functions:
10/10
100.0%
Branches:
345/549
62.8%

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 140 void startmacro(const char * line_)
22 {
23 140 thisone= nullptr;
24
2/6
✓ Branch 0 taken 140 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 140 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
140 if (!confirmqpar(line_)) throw_err_block(0, err_broken_macro_declaration);
25
2/3
✓ Branch 0 taken 70 times.
✓ Branch 1 taken 70 times.
✗ Branch 2 not taken.
140 string line=line_;
26
1/2
✓ Branch 0 taken 140 times.
✗ Branch 1 not taken.
140 line.qnormalize();
27
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 70 times.
140 char * startpar=(char *)strchr(line.data(), '(');
28
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 140 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
140 if (!startpar) throw_err_block(0, err_broken_macro_declaration);
29 140 *startpar=0;
30 140 startpar++;
31
2/6
✓ Branch 0 taken 140 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 140 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
140 if (!confirmname(line)) throw_err_block(0, err_invalid_macro_name);
32
1/2
✓ Branch 0 taken 140 times.
✗ Branch 1 not taken.
140 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 70 times.
140 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 70 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
140 if (*endpar != ')') throw_err_block(0, err_broken_macro_declaration);
36 140 *endpar=0;
37
4/4
✓ Branch 0 taken 389 times.
✓ Branch 1 taken 70 times.
✓ Branch 2 taken 389 times.
✓ Branch 3 taken 70 times.
918 for (int i=0;startpar[i];i++)
38 {
39 778 char c=startpar[i];
40
8/12
✓ Branch 0 taken 208 times.
✓ Branch 1 taken 570 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 778 times.
✗ Branch 10 not taken.
✗ Branch 11 not taken.
778 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 732 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 389 times.
✗ Branch 8 not taken.
✗ Branch 9 not taken.
✗ Branch 10 not taken.
778 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 70 times.
✓ Branch 2 taken 70 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 70 times.
✓ Branch 5 taken 70 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 70 times.
✓ Branch 8 taken 70 times.
✓ Branch 9 taken 140 times.
✗ Branch 10 not taken.
✗ Branch 11 not taken.
✗ Branch 12 not taken.
✓ Branch 13 taken 70 times.
✗ Branch 14 not taken.
✓ Branch 15 taken 70 times.
✗ Branch 16 not taken.
✗ Branch 17 not taken.
140 if (*startpar==',' || is_digit(*startpar) || strstr(startpar, ",,") || endpar[-1]==',') throw_err_block(0, err_broken_macro_declaration);
44
2/4
✓ Branch 0 taken 140 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 140 times.
140 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 140 thisone=(macrodata*)malloc(sizeof(macrodata));
53
4/8
✓ Branch 0 taken 70 times.
✓ Branch 1 taken 70 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 70 times.
✓ Branch 4 taken 70 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✗ Branch 7 not taken.
140 new(thisone) macrodata;
54
3/3
✓ Branch 0 taken 47 times.
✓ Branch 1 taken 70 times.
✓ Branch 2 taken 23 times.
140 if (*startpar)
55 {
56
2/4
✓ Branch 0 taken 47 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 47 times.
✗ Branch 3 not taken.
94 char **arguments = split(duplicate_string(startpar), ',', &thisone->numargs);
57 94 thisone->arguments_buffer = arguments[0];
58
4/4
✓ Branch 0 taken 70 times.
✓ Branch 1 taken 47 times.
✓ Branch 2 taken 70 times.
✓ Branch 3 taken 47 times.
234 for (int i=0;arguments[i];i++)
59 {
60 140 arguments[i] = strip_whitespace(arguments[i]);
61 }
62 94 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 140 thisone->variadic = false;
73
1/2
✓ Branch 0 taken 140 times.
✗ Branch 1 not taken.
140 thisone->fname= duplicate_string(get_current_file_name());
74
1/2
✓ Branch 0 taken 140 times.
✗ Branch 1 not taken.
140 thisone->startline=get_current_line();
75 140 thisone->parent_macro=current_macro;
76 140 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 44 times.
140 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 69 times.
✓ Branch 3 taken 69 times.
276 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 69 times.
✓ Branch 6 taken 26 times.
✓ Branch 7 taken 43 times.
✓ Branch 8 taken 25 times.
✓ Branch 9 taken 1 times.
138 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 44 times.
✓ Branch 5 taken 1 times.
✓ Branch 6 taken 43 times.
✓ Branch 7 taken 1 times.
✗ Branch 8 not taken.
88 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 43 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 43 times.
✗ Branch 7 not taken.
✗ Branch 8 not taken.
86 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 43 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 43 times.
✗ Branch 8 not taken.
✗ Branch 9 not taken.
86 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 68 times.
186 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 138 numlines=0;
91 209 }
92
93 858 void tomacro(string line)
94 {
95
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 858 times.
858 if (!thisone) return;
96 858 thisone->lines[numlines++]=std::move(line);
97 }
98
99 140 void endmacro(bool insert)
100 {
101
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 140 times.
140 if (!thisone) return;
102 140 thisone->numlines=numlines;
103
2/2
✓ Branch 0 taken 138 times.
✓ Branch 1 taken 2 times.
140 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 140 void freemacro(macrodata* & macro)
113 {
114 140 macro->lines.~autoarray();
115 140 cfree(macro->fname);
116 140 cfree(macro->arguments_buffer);
117 140 cfree(macro->arguments);
118 140 cfree(macro);
119 140 }
120 #undef cfree
121
122
123 522 void callmacro(const char * data)
124 {
125 522 int prev_numvarargs = numvarargs;
126 macrodata * thismacro;
127
2/6
✓ Branch 0 taken 522 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 522 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
522 if (!confirmqpar(data)) throw_err_block(0, err_broken_macro_usage);
128
2/3
✓ Branch 0 taken 261 times.
✓ Branch 1 taken 261 times.
✗ Branch 2 not taken.
522 string line=data;
129
1/2
✓ Branch 0 taken 522 times.
✗ Branch 1 not taken.
522 line.qnormalize();
130
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 261 times.
522 char * startpar=(char *)strchr(line.data(), '(');
131
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 522 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
522 if (!startpar) throw_err_block(0, err_broken_macro_usage);
132 522 *startpar=0;
133 522 startpar++;
134
2/6
✓ Branch 0 taken 522 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 522 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
522 if (!confirmname(line)) throw_err_block(0, err_broken_macro_usage);
135
2/6
✓ Branch 0 taken 522 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 522 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
522 if (!macros.exists(line)) throw_err_block(0, err_macro_not_found, line.data());
136
1/2
✓ Branch 0 taken 522 times.
✗ Branch 1 not taken.
522 thismacro = macros.find(line);
137
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 261 times.
522 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 261 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
522 if (*endpar != ')') throw_err_block(0, err_broken_macro_usage);
140 522 *endpar=0;
141 522 autoptr<const char * const*> args;
142 522 int numargs=0;
143
3/3
✓ Branch 0 taken 201 times.
✓ Branch 1 taken 261 times.
✓ Branch 2 taken 60 times.
522 if (*startpar) {
144
1/2
✓ Branch 0 taken 402 times.
✗ Branch 1 not taken.
402 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 402 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
402 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 261 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.
522 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 255 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.
522 if (numargs < thismacro->numargs - 1 && thismacro->variadic) throw_err_block(0, err_macro_wrong_min_params);
151
152 510 macrorecursion++;
153 510 inmacro=true;
154 510 int old_calledmacros = calledmacros;
155 510 calledmacros = reallycalledmacros++;
156 510 int startif=numif;
157
158
2/2
✓ Branch 0 taken 882 times.
✓ Branch 1 taken 510 times.
1392 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 441 times.
✗ Branch 3 not taken.
882 (*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 255 times.
✓ Branch 3 taken 90 times.
✓ Branch 4 taken 165 times.
510 if(thismacro->variadic) numvarargs = numargs-(thismacro->numargs-1);
166 330 else numvarargs = -1;
167
168 510 autoarray<int>* oldmacroposlabels = macroposlabels;
169 510 autoarray<int>* oldmacroneglabels = macroneglabels;
170 510 autoarray<string>* oldmacrosublabels = macrosublabels;
171
172 510 autoarray<int> newmacroposlabels;
173 510 autoarray<int> newmacroneglabels;
174 510 autoarray<string> newmacrosublabels;
175
176 510 macroposlabels = &newmacroposlabels;
177 510 macroneglabels = &newmacroneglabels;
178 510 macrosublabels = &newmacrosublabels;
179
180 510 macrodata* old_macro = current_macro;
181 510 const char* const* old_macro_args = current_macro_args;
182 510 int old_numargs = current_macro_numargs;
183 510 current_macro = thismacro;
184 510 current_macro_args = args;
185 510 current_macro_numargs = numargs;
186
187
2/3
✓ Branch 0 taken 255 times.
✓ Branch 1 taken 255 times.
✗ Branch 2 not taken.
510 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 255 times.
✗ Branch 3 not taken.
510 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 3537 times.
✓ Branch 3 taken 255 times.
7584 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 3537 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 3537 times.
✗ Branch 7 not taken.
7074 bool was_loop_end = do_line_logic(thismacro->lines[i], thismacro->fname, thismacro->startline+i+1);
195
196
12/12
✓ Branch 0 taken 714 times.
✓ Branch 1 taken 6360 times.
✓ Branch 2 taken 357 times.
✓ Branch 3 taken 357 times.
✓ Branch 4 taken 291 times.
✓ Branch 5 taken 66 times.
✓ Branch 6 taken 291 times.
✓ Branch 7 taken 3603 times.
✓ Branch 8 taken 291 times.
✓ Branch 9 taken 66 times.
✓ Branch 10 taken 291 times.
✓ Branch 11 taken 3246 times.
7074 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 510 }
202
203 510 macroposlabels = oldmacroposlabels;
204 510 macroneglabels = oldmacroneglabels;
205 510 macrosublabels = oldmacrosublabels;
206
207 510 current_macro = old_macro;
208 510 current_macro_args = old_macro_args;
209 510 current_macro_numargs = old_numargs;
210
211 510 macrorecursion--;
212 510 inmacro = macrorecursion;
213 510 numvarargs = prev_numvarargs;
214 510 calledmacros = old_calledmacros;
215
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 510 times.
510 if (numif!=startif)
216 {
217 numif=startif;
218 numtrue=startif;
219 throw_err_block(0, err_unclosed_if);
220 }
221 789 }
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
0/2
✗ Branch 0 not taken.
✗ Branch 1 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
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 2 times.
2 return ret;
263 }
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
0/2
✗ Branch 0 not taken.
✗ Branch 1 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
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 12 times.
12 return ret;
299 }
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 57261 string replace_macro_args(const string& line) {
307
4/4
✓ Branch 0 taken 25458 times.
✓ Branch 1 taken 31803 times.
✓ Branch 2 taken 25701 times.
✓ Branch 3 taken 3051 times.
57261 if(!inmacro)
308 {
309
1/2
✓ Branch 0 taken 51159 times.
✗ Branch 1 not taken.
51159 return line;
310 }
311 6102 string out;
312
4/4
✓ Branch 0 taken 40119 times.
✓ Branch 1 taken 3006 times.
✓ Branch 2 taken 40119 times.
✓ Branch 3 taken 3006 times.
86250 for (const char * in=line;*in;)
313 {
314
3/3
✓ Branch 0 taken 38982 times.
✓ Branch 1 taken 40119 times.
✓ Branch 2 taken 1137 times.
80238 if (*in != '<') {
315
2/4
✓ Branch 0 taken 38982 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 38982 times.
✗ Branch 3 not taken.
77964 out += *in++;
316 77964 continue;
317 }
318
319 2274 const char * end=in+1;
320 2274 int depth = 0;
321
3/3
✓ Branch 0 taken 93 times.
✓ Branch 1 taken 1230 times.
✓ Branch 2 taken 1137 times.
2460 for (; *end=='^'; end++) {
322 186 depth++;
323 }
324
325 2274 const char* name_start = end;
326 2274 bool is_variadic = false;
327
328
3/3
✓ Branch 0 taken 405 times.
✓ Branch 1 taken 1137 times.
✓ Branch 2 taken 732 times.
2274 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 2364 times.
✓ Branch 3 taken 405 times.
5538 while(is_ualnum(*end)) end++;
331
2/3
✗ Branch 0 not taken.
✓ Branch 1 taken 405 times.
✓ Branch 2 taken 405 times.
810 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 1332 times.
1494 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 1200 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 132 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 66 times.
1332 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 708 times.
1332 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 354 times.
✗ Branch 2 not taken.
708 string name(name_start, end - name_start);
385 708 bool found = false;
386
4/4
✓ Branch 0 taken 444 times.
✓ Branch 1 taken 18 times.
✓ Branch 2 taken 444 times.
✓ Branch 3 taken 18 times.
924 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 336 times.
✓ Branch 3 taken 108 times.
888 if(name == current_macro->arguments[j]) {
388 672 found = true;
389
2/4
✓ Branch 0 taken 336 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 336 times.
✗ Branch 3 not taken.
672 out += current_macro_args[j];
390 672 break;
391 }
392 }
393
2/2
✓ Branch 0 taken 36 times.
✓ Branch 1 taken 672 times.
708 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 708 }
399 1254 in = end+1;
400 }
401 6012 return out;
402 6102 }
403