source: trunk/NewView/unittests/cmdlineparameterunittests.pas@ 43

Last change on this file since 43 was 41, checked in by RBRi, 19 years ago

% updated commandlineparser test
% updated test framework
  • Property svn:eol-style set to native
File size: 73.8 KB
Line 
1Unit CmdLineParameterUnitTests;
2
3Interface
4
5uses
6 Classes,
7 TestAssert,
8 CmdLineParameterUnit;
9
10 FUNCTION getCmdLineParameterUnitTests : TList;
11
12
13Implementation
14
15 PROCEDURE testParseCmdLine_Empty;
16 VAR
17 tmpCmdLineString : String;
18 tmpCmdLineParameters : TCmdLineParameters;
19 BEGIN
20 tmpCmdLineString := '';
21 tmpCmdLineParameters := TCmdLineParameters.Create;
22 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
23
24 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getShowUsageFlag);
25 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getSearchFlag);
26 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
27 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getLanguage);
28 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getHelpManagerFlag);
29 assertEqualsInt('testParseCmdLine_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
30 assertEqualsInt('testParseCmdLine_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
31 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getWindowTitle);
32 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getFileNames);
33 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getSearchText);
34 END;
35
36 PROCEDURE testParseCmdLine_QuestionMark;
37 VAR
38 tmpCmdLineString : String;
39 tmpCmdLineParameters : TCmdLineParameters;
40 BEGIN
41 tmpCmdLineString := '-?';
42 tmpCmdLineParameters := TCmdLineParameters.Create;
43 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
44
45 assertTrue('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getShowUsageFlag);
46 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getSearchFlag);
47 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getGlobalSearchFlag);
48 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getLanguage);
49 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getHelpManagerFlag);
50 assertEqualsInt('testParseCmdLine_QuestionMark', 0, tmpCmdLineParameters.getHelpManagerWindow);
51 assertEqualsInt('testParseCmdLine_QuestionMark', 0, tmpCmdLineParameters.getOwnerWindow);
52 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getWindowTitle);
53 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getFileNames);
54 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getSearchText);
55 END;
56
57
58 PROCEDURE testParseCmdLine_lowerH;
59 VAR
60 tmpCmdLineString : String;
61 tmpCmdLineParameters : TCmdLineParameters;
62 BEGIN
63 tmpCmdLineString := '-h';
64 tmpCmdLineParameters := TCmdLineParameters.Create;
65 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
66
67 assertTrue('testParseCmdLine_lowerH', tmpCmdLineParameters.getShowUsageFlag);
68 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getSearchFlag);
69 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getGlobalSearchFlag);
70 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getLanguage);
71 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getHelpManagerFlag);
72 assertEqualsInt('testParseCmdLine_lowerH', 0, tmpCmdLineParameters.getHelpManagerWindow);
73 assertEqualsInt('testParseCmdLine_lowerH', 0, tmpCmdLineParameters.getOwnerWindow);
74 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getWindowTitle);
75 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getFileNames);
76 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getSearchText);
77 END;
78
79
80 PROCEDURE testParseCmdLine_upperH;
81 VAR
82 tmpCmdLineString : String;
83 tmpCmdLineParameters : TCmdLineParameters;
84 BEGIN
85 tmpCmdLineString := '-H';
86 tmpCmdLineParameters := TCmdLineParameters.Create;
87 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
88
89 assertTrue('testParseCmdLine_upperH', tmpCmdLineParameters.getShowUsageFlag);
90 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getSearchFlag);
91 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getGlobalSearchFlag);
92 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getLanguage);
93 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getHelpManagerFlag);
94 assertEqualsInt('testParseCmdLine_upperH', 0, tmpCmdLineParameters.getHelpManagerWindow);
95 assertEqualsInt('testParseCmdLine_upperH', 0, tmpCmdLineParameters.getOwnerWindow);
96 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getWindowTitle);
97 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getFileNames);
98 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getSearchText);
99 END;
100
101
102 PROCEDURE testParseCmdLine_lowerHelp;
103 VAR
104 tmpCmdLineString : String;
105 tmpCmdLineParameters : TCmdLineParameters;
106 BEGIN
107 tmpCmdLineString := '-help';
108 tmpCmdLineParameters := TCmdLineParameters.Create;
109 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
110
111 assertTrue('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getShowUsageFlag);
112 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getSearchFlag);
113 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getGlobalSearchFlag);
114 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getLanguage);
115 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getHelpManagerFlag);
116 assertEqualsInt('testParseCmdLine_lowerHelp', 0, tmpCmdLineParameters.getHelpManagerWindow);
117 assertEqualsInt('testParseCmdLine_lowerHelp', 0, tmpCmdLineParameters.getOwnerWindow);
118 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getWindowTitle);
119 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getFileNames);
120 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getSearchText);
121 END;
122
123
124 PROCEDURE testParseCmdLine_upperHELP;
125 VAR
126 tmpCmdLineString : String;
127 tmpCmdLineParameters : TCmdLineParameters;
128 BEGIN
129 tmpCmdLineString := '-HELP';
130 tmpCmdLineParameters := TCmdLineParameters.Create;
131 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
132
133 assertTrue('testParseCmdLine_upperHELP', tmpCmdLineParameters.getShowUsageFlag);
134 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getSearchFlag);
135 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getGlobalSearchFlag);
136 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getLanguage);
137 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getHelpManagerFlag);
138 assertEqualsInt('testParseCmdLine_upperHELP', 0, tmpCmdLineParameters.getHelpManagerWindow);
139 assertEqualsInt('testParseCmdLine_upperHELP', 0, tmpCmdLineParameters.getOwnerWindow);
140 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getWindowTitle);
141 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getFileNames);
142 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getSearchText);
143 END;
144
145
146 PROCEDURE testParseCmdLine_upperHE;
147 VAR
148 tmpCmdLineString : String;
149 tmpCmdLineParameters : TCmdLineParameters;
150 BEGIN
151 tmpCmdLineString := '-He';
152 tmpCmdLineParameters := TCmdLineParameters.Create;
153 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
154
155 assertTrue('testParseCmdLine_upperHE', tmpCmdLineParameters.getShowUsageFlag);
156 assertFalse('testParseCmdLine_upperHE', tmpCmdLineParameters.getSearchFlag);
157 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getGlobalSearchFlag);
158 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getLanguage);
159 assertFalse('testParseCmdLine_upperHE', tmpCmdLineParameters.getHelpManagerFlag);
160 assertEqualsInt('testParseCmdLine_upperHE', 0, tmpCmdLineParameters.getHelpManagerWindow);
161 assertEqualsInt('testParseCmdLine_upperHE', 0, tmpCmdLineParameters.getOwnerWindow);
162 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getWindowTitle);
163 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getFileNames);
164 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getSearchText);
165 END;
166
167
168 PROCEDURE testParseCmdLine_h_between;
169 VAR
170 tmpCmdLineString : String;
171 tmpCmdLineParameters : TCmdLineParameters;
172 BEGIN
173 tmpCmdLineString := '-s-h-title';
174 tmpCmdLineParameters := TCmdLineParameters.Create;
175 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
176
177 assertTrue('testParseCmdLine_h_between', tmpCmdLineParameters.getShowUsageFlag);
178 assertTrue('testParseCmdLine_h_between', tmpCmdLineParameters.getSearchFlag);
179 assertFalse('testParseCmdLine_h_between', tmpCmdLineParameters.getGlobalSearchFlag);
180 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getLanguage);
181 assertFalse('testParseCmdLine_h_between', tmpCmdLineParameters.getHelpManagerFlag);
182 assertEqualsInt('testParseCmdLine_h_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
183 assertEqualsInt('testParseCmdLine_h_between', 0, tmpCmdLineParameters.getOwnerWindow);
184 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getWindowTitle);
185 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getFileNames);
186 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getSearchText);
187 END;
188
189
190 PROCEDURE testParseCmdLine_h_between_withSpace;
191 VAR
192 tmpCmdLineString : String;
193 tmpCmdLineParameters : TCmdLineParameters;
194 BEGIN
195 tmpCmdLineString := '-s -h -title';
196 tmpCmdLineParameters := TCmdLineParameters.Create;
197 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
198
199 assertTrue('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
200 assertTrue('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getSearchFlag);
201 assertFalse('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
202 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getLanguage);
203 assertFalse('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
204 assertEqualsInt('testParseCmdLine_h_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
205 assertEqualsInt('testParseCmdLine_h_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
206 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
207 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getFileNames);
208 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getSearchText);
209 END;
210
211
212 PROCEDURE testParseCmdLine_lowerS;
213 VAR
214 tmpCmdLineString : String;
215 tmpCmdLineParameters : TCmdLineParameters;
216 BEGIN
217 tmpCmdLineString := '-s file search';
218 tmpCmdLineParameters := TCmdLineParameters.Create;
219 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
220
221 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getShowUsageFlag);
222 assertTrue('testParseCmdLine_lowerS', tmpCmdLineParameters.getSearchFlag);
223 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getGlobalSearchFlag);
224 assertEqualsString('testParseCmdLine_lowerS', '', tmpCmdLineParameters.getLanguage);
225 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getHelpManagerFlag);
226 assertEqualsInt('testParseCmdLine_lowerS', 0, tmpCmdLineParameters.getHelpManagerWindow);
227 assertEqualsInt('testParseCmdLine_lowerS', 0, tmpCmdLineParameters.getOwnerWindow);
228 assertEqualsString('testParseCmdLine_lowerS', '', tmpCmdLineParameters.getWindowTitle);
229 assertEqualsString('testParseCmdLine_lowerS', 'file', tmpCmdLineParameters.getFileNames);
230 assertEqualsString('testParseCmdLine_lowerS', 'search', tmpCmdLineParameters.getSearchText);
231 END;
232
233
234 PROCEDURE testParseCmdLine_upperS;
235 VAR
236 tmpCmdLineString : String;
237 tmpCmdLineParameters : TCmdLineParameters;
238 BEGIN
239 tmpCmdLineString := '-S file seArch';
240 tmpCmdLineParameters := TCmdLineParameters.Create;
241 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
242
243 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getShowUsageFlag);
244 assertTrue('testParseCmdLine_upperS', tmpCmdLineParameters.getSearchFlag);
245 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getGlobalSearchFlag);
246 assertEqualsString('testParseCmdLine_upperS', '', tmpCmdLineParameters.getLanguage);
247 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getHelpManagerFlag);
248 assertEqualsInt('testParseCmdLine_upperS', 0, tmpCmdLineParameters.getHelpManagerWindow);
249 assertEqualsInt('testParseCmdLine_upperS', 0, tmpCmdLineParameters.getOwnerWindow);
250 assertEqualsString('testParseCmdLine_upperS', '', tmpCmdLineParameters.getWindowTitle);
251 assertEqualsString('testParseCmdLine_upperS', 'file', tmpCmdLineParameters.getFileNames);
252 assertEqualsString('testParseCmdLine_upperS', 'seArch', tmpCmdLineParameters.getSearchText);
253 END;
254
255
256
257 PROCEDURE testParseCmdLine_upperS_withBlank;
258 VAR
259 tmpCmdLineString : String;
260 tmpCmdLineParameters : TCmdLineParameters;
261 BEGIN
262 tmpCmdLineString := '-S FilE seArch';
263 tmpCmdLineParameters := TCmdLineParameters.Create;
264 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
265
266 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getShowUsageFlag);
267 assertTrue('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getSearchFlag);
268 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getGlobalSearchFlag);
269 assertEqualsString('testParseCmdLine_upperS_withBlank', '', tmpCmdLineParameters.getLanguage);
270 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getHelpManagerFlag);
271 assertEqualsInt('testParseCmdLine_upperS_withBlank', 0, tmpCmdLineParameters.getHelpManagerWindow);
272 assertEqualsInt('testParseCmdLine_upperS_withBlank', 0, tmpCmdLineParameters.getOwnerWindow);
273 assertEqualsString('testParseCmdLine_upperS_withBlank', '', tmpCmdLineParameters.getWindowTitle);
274 assertEqualsString('testParseCmdLine_upperS_withBlank', 'FilE', tmpCmdLineParameters.getFileNames);
275 assertEqualsString('testParseCmdLine_upperS_withBlank', 'seArch', tmpCmdLineParameters.getSearchText);
276 END;
277
278
279 PROCEDURE testParseCmdLine_emptyS;
280 VAR
281 tmpCmdLineString : String;
282 tmpCmdLineParameters : TCmdLineParameters;
283 BEGIN
284 tmpCmdLineString := '-S';
285 tmpCmdLineParameters := TCmdLineParameters.Create;
286 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
287
288 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getShowUsageFlag);
289 assertTrue('testParseCmdLine_emptyS', tmpCmdLineParameters.getSearchFlag);
290 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getGlobalSearchFlag);
291 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getLanguage);
292 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getHelpManagerFlag);
293 assertEqualsInt('testParseCmdLine_emptyS', 0, tmpCmdLineParameters.getHelpManagerWindow);
294 assertEqualsInt('testParseCmdLine_emptyS', 0, tmpCmdLineParameters.getOwnerWindow);
295 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getWindowTitle);
296 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getFileNames);
297 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getSearchText);
298 END;
299
300
301 PROCEDURE testParseCmdLine_s_between;
302 VAR
303 tmpCmdLineString : String;
304 tmpCmdLineParameters : TCmdLineParameters;
305 BEGIN
306 tmpCmdLineString := '-h-s-h';
307 tmpCmdLineParameters := TCmdLineParameters.Create;
308 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
309
310 assertTrue('testParseCmdLine_s_between', tmpCmdLineParameters.getShowUsageFlag);
311 assertTrue('testParseCmdLine_s_between', tmpCmdLineParameters.getSearchFlag);
312 assertFalse('testParseCmdLine_s_between', tmpCmdLineParameters.getGlobalSearchFlag);
313 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getLanguage);
314 assertFalse('testParseCmdLine_s_between', tmpCmdLineParameters.getHelpManagerFlag);
315 assertEqualsInt('testParseCmdLine_s_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
316 assertEqualsInt('testParseCmdLine_s_between', 0, tmpCmdLineParameters.getOwnerWindow);
317 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getWindowTitle);
318 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getFileNames);
319 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getSearchText);
320 END;
321
322
323 PROCEDURE testParseCmdLine_s_between_withSpace;
324 VAR
325 tmpCmdLineString : String;
326 tmpCmdLineParameters : TCmdLineParameters;
327 BEGIN
328 tmpCmdLineString := '-h -s -h';
329 tmpCmdLineParameters := TCmdLineParameters.Create;
330 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
331
332 assertTrue('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
333 assertTrue('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getSearchFlag);
334 assertFalse('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
335 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getLanguage);
336 assertFalse('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
337 assertEqualsInt('testParseCmdLine_s_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
338 assertEqualsInt('testParseCmdLine_s_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
339 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
340 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getFileNames);
341 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getSearchText);
342 END;
343
344
345 PROCEDURE testParseCmdLine_help_and_s;
346 VAR
347 tmpCmdLineString : String;
348 tmpCmdLineParameters : TCmdLineParameters;
349 BEGIN
350 tmpCmdLineString := '-h -s file ';
351 tmpCmdLineParameters := TCmdLineParameters.Create;
352 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
353
354 assertTrue('testParseCmdLine_help_and_s', tmpCmdLineParameters.getShowUsageFlag);
355 assertTrue('testParseCmdLine_help_and_s', tmpCmdLineParameters.getSearchFlag);
356 assertFalse('testParseCmdLine_help_and_s', tmpCmdLineParameters.getGlobalSearchFlag);
357 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getLanguage);
358 assertFalse('testParseCmdLine_help_and_s', tmpCmdLineParameters.getHelpManagerFlag);
359 assertEqualsInt('testParseCmdLine_help_and_s', 0, tmpCmdLineParameters.getHelpManagerWindow);
360 assertEqualsInt('testParseCmdLine_help_and_s', 0, tmpCmdLineParameters.getOwnerWindow);
361 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getWindowTitle);
362 assertEqualsString('testParseCmdLine_help_and_s', 'file', tmpCmdLineParameters.getFileNames);
363 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getSearchText);
364 END;
365
366
367 PROCEDURE testParseCmdLine_s_and_help;
368 VAR
369 tmpCmdLineString : String;
370 tmpCmdLineParameters : TCmdLineParameters;
371 BEGIN
372 tmpCmdLineString := '-s -h file ';
373 tmpCmdLineParameters := TCmdLineParameters.Create;
374 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
375
376 assertTrue('testParseCmdLine_s_and_help', tmpCmdLineParameters.getShowUsageFlag);
377 assertTrue('testParseCmdLine_s_and_help', tmpCmdLineParameters.getSearchFlag);
378 assertFalse('testParseCmdLine_s_and_help', tmpCmdLineParameters.getGlobalSearchFlag);
379 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getLanguage);
380 assertFalse('testParseCmdLine_s_and_help', tmpCmdLineParameters.getHelpManagerFlag);
381 assertEqualsInt('testParseCmdLine_s_and_help', 0, tmpCmdLineParameters.getHelpManagerWindow);
382 assertEqualsInt('testParseCmdLine_s_and_help', 0, tmpCmdLineParameters.getOwnerWindow);
383 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getWindowTitle);
384 assertEqualsString('testParseCmdLine_s_and_help', 'file', tmpCmdLineParameters.getFileNames);
385 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getSearchText);
386 END;
387
388
389 PROCEDURE testParseCmdLine_help_and_s_without_blank;
390 VAR
391 tmpCmdLineString : String;
392 tmpCmdLineParameters : TCmdLineParameters;
393 BEGIN
394 tmpCmdLineString := '-s-h file';
395 tmpCmdLineParameters := TCmdLineParameters.Create;
396 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
397
398 assertTrue('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getShowUsageFlag);
399 assertTrue('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getSearchFlag);
400 assertFalse('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getGlobalSearchFlag);
401 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getLanguage);
402 assertFalse('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getHelpManagerFlag);
403 assertEqualsInt('testParseCmdLine_help_and_s_without_blank', 0, tmpCmdLineParameters.getHelpManagerWindow);
404 assertEqualsInt('testParseCmdLine_help_and_s_without_blank', 0, tmpCmdLineParameters.getOwnerWindow);
405 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getWindowTitle);
406 assertEqualsString('testParseCmdLine_help_and_s_without_blank', 'file', tmpCmdLineParameters.getFileNames);
407 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getSearchText);
408 END;
409
410
411
412 PROCEDURE testParseCmdLine_lowerG;
413 VAR
414 tmpCmdLineString : String;
415 tmpCmdLineParameters : TCmdLineParameters;
416 BEGIN
417 tmpCmdLineString := '-g file search';
418 tmpCmdLineParameters := TCmdLineParameters.Create;
419 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
420
421 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getShowUsageFlag);
422 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getSearchFlag);
423 assertTrue('testParseCmdLine_lowerG', tmpCmdLineParameters.getGlobalSearchFlag);
424 assertEqualsString('testParseCmdLine_lowerG', '', tmpCmdLineParameters.getLanguage);
425 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getHelpManagerFlag);
426 assertEqualsInt('testParseCmdLine_lowerG', 0, tmpCmdLineParameters.getHelpManagerWindow);
427 assertEqualsInt('testParseCmdLine_lowerG', 0, tmpCmdLineParameters.getOwnerWindow);
428 assertEqualsString('testParseCmdLine_lowerG', '', tmpCmdLineParameters.getWindowTitle);
429 assertEqualsString('testParseCmdLine_lowerG', 'file', tmpCmdLineParameters.getFileNames);
430 assertEqualsString('testParseCmdLine_lowerG', 'search', tmpCmdLineParameters.getSearchText);
431 END;
432
433
434 PROCEDURE testParseCmdLine_upperG;
435 VAR
436 tmpCmdLineString : String;
437 tmpCmdLineParameters : TCmdLineParameters;
438 BEGIN
439 tmpCmdLineString := '-G fiLe seArch';
440 tmpCmdLineParameters := TCmdLineParameters.Create;
441 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
442
443 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getShowUsageFlag);
444 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getSearchFlag);
445 assertTrue('testParseCmdLine_upperG', tmpCmdLineParameters.getGlobalSearchFlag);
446 assertEqualsString('testParseCmdLine_upperG', '', tmpCmdLineParameters.getLanguage);
447 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getHelpManagerFlag);
448 assertEqualsInt('testParseCmdLine_upperG', 0, tmpCmdLineParameters.getHelpManagerWindow);
449 assertEqualsInt('testParseCmdLine_upperG', 0, tmpCmdLineParameters.getOwnerWindow);
450 assertEqualsString('testParseCmdLine_upperG', '', tmpCmdLineParameters.getWindowTitle);
451 assertEqualsString('testParseCmdLine_upperG', 'fiLe', tmpCmdLineParameters.getFileNames);
452 assertEqualsString('testParseCmdLine_upperG', 'seArch', tmpCmdLineParameters.getSearchText);
453 END;
454
455
456 PROCEDURE testParseCmdLine_emptyG;
457 VAR
458 tmpCmdLineString : String;
459 tmpCmdLineParameters : TCmdLineParameters;
460 BEGIN
461 tmpCmdLineString := '-G';
462 tmpCmdLineParameters := TCmdLineParameters.Create;
463 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
464
465 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getShowUsageFlag);
466 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getSearchFlag);
467 assertTrue('testParseCmdLine_emptyG', tmpCmdLineParameters.getGlobalSearchFlag);
468 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getLanguage);
469 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getHelpManagerFlag);
470 assertEqualsInt('testParseCmdLine_emptyG', 0, tmpCmdLineParameters.getHelpManagerWindow);
471 assertEqualsInt('testParseCmdLine_emptyG', 0, tmpCmdLineParameters.getOwnerWindow);
472 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getWindowTitle);
473 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getFileNames);
474 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getSearchText);
475 END;
476
477
478 PROCEDURE testParseCmdLine_g_between;
479 VAR
480 tmpCmdLineString : String;
481 tmpCmdLineParameters : TCmdLineParameters;
482 BEGIN
483 tmpCmdLineString := '-h-G-s';
484 tmpCmdLineParameters := TCmdLineParameters.Create;
485 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
486
487 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getShowUsageFlag);
488 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getSearchFlag);
489 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getGlobalSearchFlag);
490 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getLanguage);
491 assertFalse('testParseCmdLine_g_between', tmpCmdLineParameters.getHelpManagerFlag);
492 assertEqualsInt('testParseCmdLine_g_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
493 assertEqualsInt('testParseCmdLine_g_between', 0, tmpCmdLineParameters.getOwnerWindow);
494 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getWindowTitle);
495 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getFileNames);
496 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getSearchText);
497 END;
498
499
500 PROCEDURE testParseCmdLine_g_between_withSpace;
501 VAR
502 tmpCmdLineString : String;
503 tmpCmdLineParameters : TCmdLineParameters;
504 BEGIN
505 tmpCmdLineString := '-h -G -s';
506 tmpCmdLineParameters := TCmdLineParameters.Create;
507 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
508
509 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
510 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getSearchFlag);
511 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
512 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getLanguage);
513 assertFalse('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
514 assertEqualsInt('testParseCmdLine_g_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
515 assertEqualsInt('testParseCmdLine_g_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
516 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
517 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getFileNames);
518 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getSearchText);
519 END;
520
521
522 PROCEDURE testParseCmdLine_Language;
523 VAR
524 tmpCmdLineString : String;
525 tmpCmdLineParameters : TCmdLineParameters;
526 BEGIN
527 tmpCmdLineString := '-lang:DE';
528 tmpCmdLineParameters := TCmdLineParameters.Create;
529 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
530
531 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getShowUsageFlag);
532 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getSearchFlag);
533 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getGlobalSearchFlag);
534 assertEqualsString('testParseCmdLine_Language', 'DE', tmpCmdLineParameters.getLanguage);
535 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getHelpManagerFlag);
536 assertEqualsInt('testParseCmdLine_Language', 0, tmpCmdLineParameters.getHelpManagerWindow);
537 assertEqualsInt('testParseCmdLine_Language', 0, tmpCmdLineParameters.getOwnerWindow);
538 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getWindowTitle);
539 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getFileNames);
540 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getSearchText);
541 END;
542
543
544 PROCEDURE testParseCmdLine_Language_Empty;
545 VAR
546 tmpCmdLineString : String;
547 tmpCmdLineParameters : TCmdLineParameters;
548 BEGIN
549 tmpCmdLineString := '-lang';
550 tmpCmdLineParameters := TCmdLineParameters.Create;
551 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
552
553 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getShowUsageFlag);
554 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getSearchFlag);
555 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
556 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getLanguage);
557 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getHelpManagerFlag);
558 assertEqualsInt('testParseCmdLine_Language_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
559 assertEqualsInt('testParseCmdLine_Language_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
560 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getWindowTitle);
561 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getFileNames);
562 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getSearchText);
563 END;
564
565
566 PROCEDURE testParseCmdLine_Language_Empty_WithColon;
567 VAR
568 tmpCmdLineString : String;
569 tmpCmdLineParameters : TCmdLineParameters;
570 BEGIN
571 tmpCmdLineString := '-lang:';
572 tmpCmdLineParameters := TCmdLineParameters.Create;
573 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
574
575 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getShowUsageFlag);
576 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getSearchFlag);
577 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getGlobalSearchFlag);
578 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getLanguage);
579 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getHelpManagerFlag);
580 assertEqualsInt('testParseCmdLine_Language_Empty_WithColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
581 assertEqualsInt('testParseCmdLine_Language_Empty_WithColon', 0, tmpCmdLineParameters.getOwnerWindow);
582 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getWindowTitle);
583 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getFileNames);
584 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getSearchText);
585 END;
586
587
588 PROCEDURE testParseCmdLine_Language_WithFile;
589 VAR
590 tmpCmdLineString : String;
591 tmpCmdLineParameters : TCmdLineParameters;
592 BEGIN
593 tmpCmdLineString := '-lang:DE filE';
594 tmpCmdLineParameters := TCmdLineParameters.Create;
595 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
596
597 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getShowUsageFlag);
598 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getSearchFlag);
599 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getGlobalSearchFlag);
600 assertEqualsString('testParseCmdLine_Language_WithFile', 'DE', tmpCmdLineParameters.getLanguage);
601 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getHelpManagerFlag);
602 assertEqualsInt('testParseCmdLine_Language_WithFile', 0, tmpCmdLineParameters.getHelpManagerWindow);
603 assertEqualsInt('testParseCmdLine_Language_WithFile', 0, tmpCmdLineParameters.getOwnerWindow);
604 assertEqualsString('testParseCmdLine_Language_WithFile', '', tmpCmdLineParameters.getWindowTitle);
605 assertEqualsString('testParseCmdLine_Language_WithFile', 'filE', tmpCmdLineParameters.getFileNames);
606 assertEqualsString('testParseCmdLine_Language_WithFile', '', tmpCmdLineParameters.getSearchText);
607 END;
608
609
610 PROCEDURE testParseCmdLine_Language_between;
611 VAR
612 tmpCmdLineString : String;
613 tmpCmdLineParameters : TCmdLineParameters;
614 BEGIN
615 tmpCmdLineString := '-s-lang:DE-h filE';
616 tmpCmdLineParameters := TCmdLineParameters.Create;
617 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
618
619 assertTrue('testParseCmdLine_Language_between', tmpCmdLineParameters.getShowUsageFlag);
620 assertTrue('testParseCmdLine_Language_between', tmpCmdLineParameters.getSearchFlag);
621 assertFalse('testParseCmdLine_Language_between', tmpCmdLineParameters.getGlobalSearchFlag);
622 assertEqualsString('testParseCmdLine_Language_between', 'DE', tmpCmdLineParameters.getLanguage);
623 assertFalse('testParseCmdLine_Language_between', tmpCmdLineParameters.getHelpManagerFlag);
624 assertEqualsInt('testParseCmdLine_Language_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
625 assertEqualsInt('testParseCmdLine_Language_between', 0, tmpCmdLineParameters.getOwnerWindow);
626 assertEqualsString('testParseCmdLine_Language_between', '', tmpCmdLineParameters.getWindowTitle);
627 assertEqualsString('testParseCmdLine_Language_between', 'filE', tmpCmdLineParameters.getFileNames);
628 assertEqualsString('testParseCmdLine_Language_between', '', tmpCmdLineParameters.getSearchText);
629 END;
630
631
632 PROCEDURE testParseCmdLine_Language_between_withSpace;
633 VAR
634 tmpCmdLineString : String;
635 tmpCmdLineParameters : TCmdLineParameters;
636 BEGIN
637 tmpCmdLineString := '-s-lang:DE-h filE';
638 tmpCmdLineParameters := TCmdLineParameters.Create;
639 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
640
641 assertTrue('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
642 assertTrue('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getSearchFlag);
643 assertFalse('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
644 assertEqualsString('testParseCmdLine_Language_between_withSpace', 'DE', tmpCmdLineParameters.getLanguage);
645 assertFalse('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
646 assertEqualsInt('testParseCmdLine_Language_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
647 assertEqualsInt('testParseCmdLine_Language_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
648 assertEqualsString('testParseCmdLine_Language_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
649 assertEqualsString('testParseCmdLine_Language_between_withSpace', 'filE', tmpCmdLineParameters.getFileNames);
650 assertEqualsString('testParseCmdLine_Language_between_withSpace', '', tmpCmdLineParameters.getSearchText);
651 END;
652
653
654 PROCEDURE testParseCmdLine_HelpManagerNumber;
655 VAR
656 tmpCmdLineString : String;
657 tmpCmdLineParameters : TCmdLineParameters;
658 BEGIN
659 tmpCmdLineString := '-Hm:123';
660 tmpCmdLineParameters := TCmdLineParameters.Create;
661 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
662
663 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getShowUsageFlag);
664 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getSearchFlag);
665 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getGlobalSearchFlag);
666 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getLanguage);
667 assertTrue('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getHelpManagerFlag);
668 assertEqualsInt('testParseCmdLine_HelpManagerNumber', 123, tmpCmdLineParameters.getHelpManagerWindow);
669 assertEqualsInt('testParseCmdLine_HelpManagerNumber', 0, tmpCmdLineParameters.getOwnerWindow);
670 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getWindowTitle);
671 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getFileNames);
672 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getSearchText);
673 END;
674
675
676 PROCEDURE testParseCmdLine_HelpManagerNumber_WithoutColon;
677 VAR
678 tmpCmdLineString : String;
679 tmpCmdLineParameters : TCmdLineParameters;
680 BEGIN
681 tmpCmdLineString := '-Hm123';
682 tmpCmdLineParameters := TCmdLineParameters.Create;
683 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
684
685 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
686 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getSearchFlag);
687 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
688 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getLanguage);
689 assertTrue('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
690 assertEqualsInt('testParseCmdLine_HelpManagerNumber_WithoutColon', 123, tmpCmdLineParameters.getHelpManagerWindow);
691 assertEqualsInt('testParseCmdLine_HelpManagerNumber_WithoutColon', 0, tmpCmdLineParameters.getOwnerWindow);
692 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getWindowTitle);
693 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getFileNames);
694 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getSearchText);
695 END;
696
697
698 PROCEDURE testParseCmdLine_HelpManagerNumber_Invalid;
699 VAR
700 tmpCmdLineString : String;
701 tmpCmdLineParameters : TCmdLineParameters;
702 BEGIN
703 tmpCmdLineString := '-Hm:12u3';
704 tmpCmdLineParameters := TCmdLineParameters.Create;
705 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
706
707 assertTrue('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getShowUsageFlag);
708 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getSearchFlag);
709 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getGlobalSearchFlag);
710 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getLanguage);
711 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getHelpManagerFlag);
712 assertEqualsInt('testParseCmdLine_HelpManagerNumber', 0, tmpCmdLineParameters.getHelpManagerWindow);
713 assertEqualsInt('testParseCmdLine_HelpManagerNumber', 0, tmpCmdLineParameters.getOwnerWindow);
714 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getWindowTitle);
715 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getFileNames);
716 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getSearchText);
717 END;
718
719
720 PROCEDURE testParseCmdLine_HelpManagerNumber_between;
721 VAR
722 tmpCmdLineString : String;
723 tmpCmdLineParameters : TCmdLineParameters;
724 BEGIN
725 tmpCmdLineString := '-s-Hm:12-h';
726 tmpCmdLineParameters := TCmdLineParameters.Create;
727 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
728
729 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getShowUsageFlag);
730 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getSearchFlag);
731 assertFalse('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getGlobalSearchFlag);
732 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getLanguage);
733 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getHelpManagerFlag);
734 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between', 12, tmpCmdLineParameters.getHelpManagerWindow);
735 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between', 0, tmpCmdLineParameters.getOwnerWindow);
736 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getWindowTitle);
737 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getFileNames);
738 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getSearchText);
739 END;
740
741
742 PROCEDURE testParseCmdLine_HelpManagerNumber_between_withSpace;
743 VAR
744 tmpCmdLineString : String;
745 tmpCmdLineParameters : TCmdLineParameters;
746 BEGIN
747 tmpCmdLineString := '-s -Hm:12 -h';
748 tmpCmdLineParameters := TCmdLineParameters.Create;
749 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
750
751 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
752 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getSearchFlag);
753 assertFalse('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
754 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getLanguage);
755 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
756 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between_withSpace', 12, tmpCmdLineParameters.getHelpManagerWindow);
757 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
758 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
759 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getFileNames);
760 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getSearchText);
761 END;
762
763
764 PROCEDURE testParseCmdLine_OwnerNumber;
765 VAR
766 tmpCmdLineString : String;
767 tmpCmdLineParameters : TCmdLineParameters;
768 BEGIN
769 tmpCmdLineString := '-owNer:1234';
770 tmpCmdLineParameters := TCmdLineParameters.Create;
771 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
772
773 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getShowUsageFlag);
774 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getSearchFlag);
775 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getGlobalSearchFlag);
776 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getLanguage);
777 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getHelpManagerFlag);
778 assertEqualsInt('testParseCmdLine_OwnerNumber', 0, tmpCmdLineParameters.getHelpManagerWindow);
779 assertEqualsInt('testParseCmdLine_OwnerNumber', 1234, tmpCmdLineParameters.getOwnerWindow);
780 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getWindowTitle);
781 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getFileNames);
782 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getSearchText);
783 END;
784
785
786 PROCEDURE testParseCmdLine_OwnerNumber_WithoutColon;
787 VAR
788 tmpCmdLineString : String;
789 tmpCmdLineParameters : TCmdLineParameters;
790 BEGIN
791 tmpCmdLineString := '-OWNER134';
792 tmpCmdLineParameters := TCmdLineParameters.Create;
793 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
794
795 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
796 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getSearchFlag);
797 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
798 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getLanguage);
799 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
800 assertEqualsInt('testParseCmdLine_OwnerNumber_WithoutColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
801 assertEqualsInt('testParseCmdLine_OwnerNumber_WithoutColon', 134, tmpCmdLineParameters.getOwnerWindow);
802 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getWindowTitle);
803 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getFileNames);
804 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getSearchText);
805 END;
806
807
808 PROCEDURE testParseCmdLine_OwnerNumber_Invalid;
809 VAR
810 tmpCmdLineString : String;
811 tmpCmdLineParameters : TCmdLineParameters;
812 BEGIN
813 tmpCmdLineString := '-owner:12x34';
814 tmpCmdLineParameters := TCmdLineParameters.Create;
815 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
816
817 assertTrue('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getShowUsageFlag);
818 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getSearchFlag);
819 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getGlobalSearchFlag);
820 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getLanguage);
821 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getHelpManagerFlag);
822 assertEqualsInt('testParseCmdLine_OwnerNumber_Invalid', 0, tmpCmdLineParameters.getHelpManagerWindow);
823 assertEqualsInt('testParseCmdLine_OwnerNumber_Invalid', 0, tmpCmdLineParameters.getOwnerWindow);
824 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getWindowTitle);
825 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getFileNames);
826 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getSearchText);
827 END;
828
829
830 PROCEDURE testParseCmdLine_OwnerNumber_between;
831 VAR
832 tmpCmdLineString : String;
833 tmpCmdLineParameters : TCmdLineParameters;
834 BEGIN
835 tmpCmdLineString := '-g-owner:14-s';
836 tmpCmdLineParameters := TCmdLineParameters.Create;
837 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
838
839 assertFalse('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getShowUsageFlag);
840 assertTrue('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getSearchFlag);
841 assertTrue('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getGlobalSearchFlag);
842 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getLanguage);
843 assertFalse('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getHelpManagerFlag);
844 assertEqualsInt('testParseCmdLine_OwnerNumber_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
845 assertEqualsInt('testParseCmdLine_OwnerNumber_between', 14, tmpCmdLineParameters.getOwnerWindow);
846 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getWindowTitle);
847 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getFileNames);
848 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getSearchText);
849 END;
850
851
852 PROCEDURE testParseCmdLine_OwnerNumber_between_withSpace;
853 VAR
854 tmpCmdLineString : String;
855 tmpCmdLineParameters : TCmdLineParameters;
856 BEGIN
857 tmpCmdLineString := '-g -owner:14 -s';
858 tmpCmdLineParameters := TCmdLineParameters.Create;
859 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
860
861 assertFalse('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
862 assertTrue('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getSearchFlag);
863 assertTrue('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
864 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getLanguage);
865 assertFalse('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
866 assertEqualsInt('testParseCmdLine_OwnerNumber_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
867 assertEqualsInt('testParseCmdLine_OwnerNumber_between_withSpace', 14, tmpCmdLineParameters.getOwnerWindow);
868 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
869 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getFileNames);
870 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getSearchText);
871 END;
872
873
874 PROCEDURE testParseCmdLine_Title;
875 VAR
876 tmpCmdLineString : String;
877 tmpCmdLineParameters : TCmdLineParameters;
878 BEGIN
879 tmpCmdLineString := '-Title:Test';
880 tmpCmdLineParameters := TCmdLineParameters.Create;
881 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
882
883 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getShowUsageFlag);
884 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getSearchFlag);
885 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getGlobalSearchFlag);
886 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getLanguage);
887 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getHelpManagerFlag);
888 assertEqualsInt('testParseCmdLine_Title', 0, tmpCmdLineParameters.getHelpManagerWindow);
889 assertEqualsInt('testParseCmdLine_Title', 0, tmpCmdLineParameters.getOwnerWindow);
890 assertEqualsString('testParseCmdLine_Title', 'Test', tmpCmdLineParameters.getWindowTitle);
891 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getFileNames);
892 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getSearchText);
893 END;
894
895
896 PROCEDURE testParseCmdLine_Title_WithoutColon;
897 VAR
898 tmpCmdLineString : String;
899 tmpCmdLineParameters : TCmdLineParameters;
900 BEGIN
901 tmpCmdLineString := '-titletitlE';
902 tmpCmdLineParameters := TCmdLineParameters.Create;
903 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
904
905 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
906 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getSearchFlag);
907 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
908 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getLanguage);
909 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
910 assertEqualsInt('testParseCmdLine_Title_WithoutColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
911 assertEqualsInt('testParseCmdLine_Title_WithoutColon', 0, tmpCmdLineParameters.getOwnerWindow);
912 assertEqualsString('testParseCmdLine_Title_WithoutColon', 'titlE', tmpCmdLineParameters.getWindowTitle);
913 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getFileNames);
914 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getSearchText);
915 END;
916
917
918 PROCEDURE testParseCmdLine_Title_Empty;
919 VAR
920 tmpCmdLineString : String;
921 tmpCmdLineParameters : TCmdLineParameters;
922 BEGIN
923 tmpCmdLineString := '-TITLE:';
924 tmpCmdLineParameters := TCmdLineParameters.Create;
925 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
926
927 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getShowUsageFlag);
928 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getSearchFlag);
929 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
930 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getLanguage);
931 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getHelpManagerFlag);
932 assertEqualsInt('testParseCmdLine_Title_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
933 assertEqualsInt('testParseCmdLine_Title_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
934 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getWindowTitle);
935 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getFileNames);
936 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getSearchText);
937 END;
938
939
940 PROCEDURE testParseCmdLine_Title_between;
941 VAR
942 tmpCmdLineString : String;
943 tmpCmdLineParameters : TCmdLineParameters;
944 BEGIN
945 tmpCmdLineString := '-h-TITLE:tItlE-s';
946 tmpCmdLineParameters := TCmdLineParameters.Create;
947 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
948
949 assertTrue('testParseCmdLine_Title_between', tmpCmdLineParameters.getShowUsageFlag);
950 assertTrue('testParseCmdLine_Title_between', tmpCmdLineParameters.getSearchFlag);
951 assertFalse('testParseCmdLine_Title_between', tmpCmdLineParameters.getGlobalSearchFlag);
952 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getLanguage);
953 assertFalse('testParseCmdLine_Title_between', tmpCmdLineParameters.getHelpManagerFlag);
954 assertEqualsInt('testParseCmdLine_Title_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
955 assertEqualsInt('testParseCmdLine_Title_between', 0, tmpCmdLineParameters.getOwnerWindow);
956 assertEqualsString('testParseCmdLine_Title_between', 'tItlE', tmpCmdLineParameters.getWindowTitle);
957 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getFileNames);
958 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getSearchText);
959 END;
960
961
962 PROCEDURE testParseCmdLine_Title_between_withSpace;
963 VAR
964 tmpCmdLineString : String;
965 tmpCmdLineParameters : TCmdLineParameters;
966 BEGIN
967 tmpCmdLineString := '-h-TITLE:tItlE-s';
968 tmpCmdLineParameters := TCmdLineParameters.Create;
969 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
970
971 assertTrue('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
972 assertTrue('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getSearchFlag);
973 assertFalse('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
974 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getLanguage);
975 assertFalse('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
976 assertEqualsInt('testParseCmdLine_Title_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
977 assertEqualsInt('testParseCmdLine_Title_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
978 assertEqualsString('testParseCmdLine_Title_between_withSpace', 'tItlE', tmpCmdLineParameters.getWindowTitle);
979 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getFileNames);
980 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getSearchText);
981 END;
982
983
984 // can't test start profile
985
986 PROCEDURE testParseCmdLine_WindowPos;
987 VAR
988 tmpCmdLineString : String;
989 tmpCmdLineParameters : TCmdLineParameters;
990 tmpWindowPosition : TWindowPosition;
991 BEGIN
992 tmpCmdLineString := '-pos:20,40,60,80';
993 tmpCmdLineParameters := TCmdLineParameters.Create;
994 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
995
996 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getShowUsageFlag);
997 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getSearchFlag);
998 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getGlobalSearchFlag);
999 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getLanguage);
1000 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getHelpManagerFlag);
1001 assertEqualsInt('testParseCmdLine_WindowPos', 0, tmpCmdLineParameters.getHelpManagerWindow);
1002 assertEqualsInt('testParseCmdLine_WindowPos', 0, tmpCmdLineParameters.getOwnerWindow);
1003 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getWindowTitle);
1004 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getFileNames);
1005 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getSearchText);
1006
1007 assertTrue('testParseCmdLine_WindowPos', tmpCmdLineParameters.getWindowPositionFlag);
1008 tmpWindowPosition := tmpCmdLineParameters.getWindowPosition;
1009 assertEqualsInt('testParseCmdLine_WindowPos', 20, tmpWindowPosition.left);
1010 assertEqualsInt('testParseCmdLine_WindowPos', 40, tmpWindowPosition.bottom);
1011 assertEqualsInt('testParseCmdLine_WindowPos', 60, tmpWindowPosition.width);
1012 assertEqualsInt('testParseCmdLine_WindowPos', 80, tmpWindowPosition.height);
1013 END;
1014
1015
1016
1017 PROCEDURE testParseCmdLine_WindowPosPercentage;
1018 VAR
1019 tmpCmdLineString : String;
1020 tmpCmdLineParameters : TCmdLineParameters;
1021 tmpWindowPosition : TWindowPosition;
1022 BEGIN
1023 tmpCmdLineString := '-pos:100p,100p,50p,50p';
1024 tmpCmdLineParameters := TCmdLineParameters.Create;
1025 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1026
1027 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getShowUsageFlag);
1028 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getSearchFlag);
1029 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getGlobalSearchFlag);
1030 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getLanguage);
1031 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getHelpManagerFlag);
1032 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 0, tmpCmdLineParameters.getHelpManagerWindow);
1033 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 0, tmpCmdLineParameters.getOwnerWindow);
1034 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getWindowTitle);
1035 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getFileNames);
1036 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getSearchText);
1037
1038 assertTrue('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getWindowPositionFlag);
1039 tmpWindowPosition := tmpCmdLineParameters.getWindowPosition;
1040 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 1280, tmpWindowPosition.left);
1041 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 1024, tmpWindowPosition.bottom);
1042 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 640, tmpWindowPosition.width);
1043 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 512, tmpWindowPosition.height);
1044 END;
1045
1046
1047 PROCEDURE testParseCmdLine_Topic;
1048 VAR
1049 tmpCmdLineString : String;
1050 tmpCmdLineParameters : TCmdLineParameters;
1051 BEGIN
1052 tmpCmdLineString := 'file topi1 topi2';
1053 tmpCmdLineParameters := TCmdLineParameters.Create;
1054 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1055
1056 assertFalse('testParseCmdLine_Topic->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1057 assertFalse('testParseCmdLine_Topic->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1058 assertFalse('testParseCmdLine_Topic->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1059 assertEqualsString('testParseCmdLine_Topic', '', tmpCmdLineParameters.getLanguage);
1060 assertFalse('testParseCmdLine_Topic', tmpCmdLineParameters.getHelpManagerFlag);
1061 assertEqualsInt('testParseCmdLine_Topic', 0, tmpCmdLineParameters.getHelpManagerWindow);
1062 assertEqualsInt('testParseCmdLine_Topic', 0, tmpCmdLineParameters.getOwnerWindow);
1063 assertEqualsString('testParseCmdLine_Topic', '', tmpCmdLineParameters.getWindowTitle);
1064 assertEqualsString('testParseCmdLine_Topic', 'file', tmpCmdLineParameters.getFileNames);
1065 assertEqualsString('testParseCmdLine_Topic', 'topi1 topi2', tmpCmdLineParameters.getSearchText);
1066 END;
1067
1068
1069 PROCEDURE testParseCmdLine_file;
1070 VAR
1071 tmpCmdLineString : String;
1072 tmpCmdLineParameters : TCmdLineParameters;
1073 BEGIN
1074 tmpCmdLineString := 'file';
1075 tmpCmdLineParameters := TCmdLineParameters.Create;
1076 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1077
1078 assertFalse('testParseCmdLine_file->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1079 assertFalse('testParseCmdLine_file->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1080 assertFalse('testParseCmdLine_file->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1081 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getLanguage);
1082 assertFalse('testParseCmdLine_file', tmpCmdLineParameters.getHelpManagerFlag);
1083 assertEqualsInt('testParseCmdLine_file', 0, tmpCmdLineParameters.getHelpManagerWindow);
1084 assertEqualsInt('testParseCmdLine_file', 0, tmpCmdLineParameters.getOwnerWindow);
1085 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getWindowTitle);
1086 assertEqualsString('testParseCmdLine_file', 'file', tmpCmdLineParameters.getFileNames);
1087 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getSearchText);
1088 END;
1089
1090
1091 PROCEDURE testParseCmdLine_fileLeadingBlanks;
1092 VAR
1093 tmpCmdLineString : String;
1094 tmpCmdLineParameters : TCmdLineParameters;
1095 BEGIN
1096 tmpCmdLineString := ' file';
1097 tmpCmdLineParameters := TCmdLineParameters.Create;
1098 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1099
1100 assertFalse('testParseCmdLine_fileLeadingBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1101 assertFalse('testParseCmdLine_fileLeadingBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1102 assertFalse('testParseCmdLine_fileLeadingBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1103 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getLanguage);
1104 assertFalse('testParseCmdLine_fileLeadingBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1105 assertEqualsInt('testParseCmdLine_fileLeadingBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1106 assertEqualsInt('testParseCmdLine_fileLeadingBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1107 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getWindowTitle);
1108 assertEqualsString('testParseCmdLine_fileLeadingBlanks', 'file', tmpCmdLineParameters.getFileNames);
1109 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getSearchText);
1110 END;
1111
1112
1113 PROCEDURE testParseCmdLine_fileTrailingBlanks;
1114 VAR
1115 tmpCmdLineString : String;
1116 tmpCmdLineParameters : TCmdLineParameters;
1117 BEGIN
1118 tmpCmdLineString := 'file ';
1119 tmpCmdLineParameters := TCmdLineParameters.Create;
1120 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1121
1122 assertFalse('testParseCmdLine_fileTrailingBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1123 assertFalse('testParseCmdLine_fileTrailingBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1124 assertFalse('testParseCmdLine_fileTrailingBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1125 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getLanguage);
1126 assertFalse('testParseCmdLine_fileTrailingBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1127 assertEqualsInt('testParseCmdLine_fileTrailingBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1128 assertEqualsInt('testParseCmdLine_fileTrailingBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1129 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getWindowTitle);
1130 assertEqualsString('testParseCmdLine_fileTrailingBlanks', 'file', tmpCmdLineParameters.getFileNames);
1131 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getSearchText);
1132 END;
1133
1134
1135 PROCEDURE testParseCmdLine_fileQuoted;
1136 VAR
1137 tmpCmdLineString : String;
1138 tmpCmdLineParameters : TCmdLineParameters;
1139 BEGIN
1140 tmpCmdLineString := '"fi -h le"';
1141 tmpCmdLineParameters := TCmdLineParameters.Create;
1142 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1143
1144 assertFalse('testParseCmdLine_fileQuoted->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1145 assertFalse('testParseCmdLine_fileQuoted->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1146 assertFalse('testParseCmdLine_fileQuoted->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1147 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getLanguage);
1148 assertFalse('testParseCmdLine_fileQuoted', tmpCmdLineParameters.getHelpManagerFlag);
1149 assertEqualsInt('testParseCmdLine_fileQuoted', 0, tmpCmdLineParameters.getHelpManagerWindow);
1150 assertEqualsInt('testParseCmdLine_fileQuoted', 0, tmpCmdLineParameters.getOwnerWindow);
1151 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getWindowTitle);
1152 assertEqualsString('testParseCmdLine_fileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames);
1153 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getSearchText);
1154 END;
1155
1156
1157 PROCEDURE testParseCmdLine_fileQuotedMissingClosedQuote;
1158 VAR
1159 tmpCmdLineString : String;
1160 tmpCmdLineParameters : TCmdLineParameters;
1161 BEGIN
1162 tmpCmdLineString := '"fi -h le';
1163 tmpCmdLineParameters := TCmdLineParameters.Create;
1164 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1165
1166 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1167 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1168 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1169 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getLanguage);
1170 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote', tmpCmdLineParameters.getHelpManagerFlag);
1171 assertEqualsInt('testParseCmdLine_fileQuotedMissingClosedQuote', 0, tmpCmdLineParameters.getHelpManagerWindow);
1172 assertEqualsInt('testParseCmdLine_fileQuotedMissingClosedQuote', 0, tmpCmdLineParameters.getOwnerWindow);
1173 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getWindowTitle);
1174 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', 'fi -h le', tmpCmdLineParameters.getFileNames);
1175 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getSearchText);
1176 END;
1177
1178
1179 PROCEDURE testParseCmdLine_fileQuotedAndText;
1180 VAR
1181 tmpCmdLineString : String;
1182 tmpCmdLineParameters : TCmdLineParameters;
1183 BEGIN
1184 tmpCmdLineString := '"fi -h le" serachText';
1185 tmpCmdLineParameters := TCmdLineParameters.Create;
1186 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1187
1188 assertFalse('testParseCmdLine_fileQuotedAndText->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1189 assertFalse('testParseCmdLine_fileQuotedAndText->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1190 assertFalse('testParseCmdLine_fileQuotedAndText->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1191 assertEqualsString('testParseCmdLine_fileQuotedAndText', '', tmpCmdLineParameters.getLanguage);
1192 assertFalse('testParseCmdLine_fileQuotedAndText', tmpCmdLineParameters.getHelpManagerFlag);
1193 assertEqualsInt('testParseCmdLine_fileQuotedAndText', 0, tmpCmdLineParameters.getHelpManagerWindow);
1194 assertEqualsInt('testParseCmdLine_fileQuotedAndText', 0, tmpCmdLineParameters.getOwnerWindow);
1195 assertEqualsString('testParseCmdLine_fileQuotedAndText', '', tmpCmdLineParameters.getWindowTitle);
1196 assertEqualsString('testParseCmdLine_fileQuotedAndText', 'fi -h le', tmpCmdLineParameters.getFileNames);
1197 assertEqualsString('testParseCmdLine_fileQuotedAndText', 'serachText', tmpCmdLineParameters.getSearchText);
1198 END;
1199
1200
1201 PROCEDURE testParseCmdLine_fileQuotedAndTextManyBlanks;
1202 VAR
1203 tmpCmdLineString : String;
1204 tmpCmdLineParameters : TCmdLineParameters;
1205 BEGIN
1206 tmpCmdLineString := '"fi -h le" serachText ';
1207 tmpCmdLineParameters := TCmdLineParameters.Create;
1208 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1209
1210 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1211 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1212 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1213 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', '', tmpCmdLineParameters.getLanguage);
1214 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1215 assertEqualsInt('testParseCmdLine_fileQuotedAndTextManyBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1216 assertEqualsInt('testParseCmdLine_fileQuotedAndTextManyBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1217 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', '', tmpCmdLineParameters.getWindowTitle);
1218 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', 'fi -h le', tmpCmdLineParameters.getFileNames);
1219 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', 'serachText', tmpCmdLineParameters.getSearchText);
1220 END;
1221
1222
1223 PROCEDURE testParseCmdLine_fileQuotedInside;
1224 VAR
1225 tmpCmdLineString : String;
1226 tmpCmdLineParameters : TCmdLineParameters;
1227 BEGIN
1228 tmpCmdLineString := 'test"fi -h le"tes serachText';
1229 tmpCmdLineParameters := TCmdLineParameters.Create;
1230 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1231
1232 assertFalse('testParseCmdLine_fileQuotedInside->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1233 assertFalse('testParseCmdLine_fileQuotedInside->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1234 assertFalse('testParseCmdLine_fileQuotedInside->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1235 assertEqualsString('testParseCmdLine_fileQuotedInside', '', tmpCmdLineParameters.getLanguage);
1236 assertFalse('testParseCmdLine_fileQuotedInside', tmpCmdLineParameters.getHelpManagerFlag);
1237 assertEqualsInt('testParseCmdLine_fileQuotedInside', 0, tmpCmdLineParameters.getHelpManagerWindow);
1238 assertEqualsInt('testParseCmdLine_fileQuotedInside', 0, tmpCmdLineParameters.getOwnerWindow);
1239 assertEqualsString('testParseCmdLine_fileQuotedInside', '', tmpCmdLineParameters.getWindowTitle);
1240 assertEqualsString('testParseCmdLine_fileQuotedInside', 'testfi -h letes', tmpCmdLineParameters.getFileNames);
1241 assertEqualsString('testParseCmdLine_fileQuotedInside', 'serachText', tmpCmdLineParameters.getSearchText);
1242 END;
1243
1244
1245 PROCEDURE testParseCmdLine_SwitchAndFileQuoted;
1246 VAR
1247 tmpCmdLineString : String;
1248 tmpCmdLineParameters : TCmdLineParameters;
1249 BEGIN
1250 tmpCmdLineString := '-s "fi -h le" serachText';
1251 tmpCmdLineParameters := TCmdLineParameters.Create;
1252 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1253
1254 assertFalse('testParseCmdLine_SwitchAndFileQuoted->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1255 assertTrue('testParseCmdLine_SwitchAndFileQuoted->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1256 assertFalse('testParseCmdLine_SwitchAndFileQuoted->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1257 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', '', tmpCmdLineParameters.getLanguage);
1258 assertFalse('testParseCmdLine_SwitchAndFileQuoted', tmpCmdLineParameters.getHelpManagerFlag);
1259 assertEqualsInt('testParseCmdLine_SwitchAndFileQuoted', 0, tmpCmdLineParameters.getHelpManagerWindow);
1260 assertEqualsInt('testParseCmdLine_SwitchAndFileQuoted', 0, tmpCmdLineParameters.getOwnerWindow);
1261 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', '', tmpCmdLineParameters.getWindowTitle);
1262 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames);
1263 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', 'serachText', tmpCmdLineParameters.getSearchText);
1264 END;
1265
1266
1267 FUNCTION getCmdLineParameterUnitTests : TList;
1268 BEGIN
1269 result := TList.Create;
1270
1271 result.add(@testParseCmdLine_Empty);
1272
1273 result.add(@testParseCmdLine_QuestionMark);
1274 result.add(@testParseCmdLine_lowerH);
1275 result.add(@testParseCmdLine_upperH);
1276 result.add(@testParseCmdLine_lowerHelp);
1277 result.add(@testParseCmdLine_upperHELP);
1278 result.add(@testParseCmdLine_upperHE);
1279 result.add(@testParseCmdLine_h_between);
1280 result.add(@testParseCmdLine_h_between_withSpace);
1281
1282 result.add(@testParseCmdLine_lowerS);
1283 result.add(@testParseCmdLine_upperS);
1284 result.add(@testParseCmdLine_upperS_withBlank);
1285 result.add(@testParseCmdLine_emptyS);
1286
1287 result.add(@testParseCmdLine_s_between);
1288 result.add(@testParseCmdLine_s_between_withSpace);
1289 result.add(@testParseCmdLine_help_and_s);
1290 result.add(@testParseCmdLine_s_and_help);
1291 result.add(@testParseCmdLine_help_and_s_without_blank);
1292
1293 result.add(@testParseCmdLine_lowerG);
1294 result.add(@testParseCmdLine_upperG);
1295 result.add(@testParseCmdLine_emptyG);
1296 result.add(@testParseCmdLine_g_between);
1297 result.add(@testParseCmdLine_g_between_withSpace);
1298
1299 result.add(@testParseCmdLine_Language);
1300
1301 result.add(@testParseCmdLine_Language_Empty);
1302 result.add(@testParseCmdLine_Language_Empty_WithColon);
1303 result.add(@testParseCmdLine_Language_WithFile);
1304 result.add(@testParseCmdLine_Language_between);
1305 result.add(@testParseCmdLine_Language_between_withSpace);
1306
1307 result.add(@testParseCmdLine_HelpManagerNumber);
1308 result.add(@testParseCmdLine_HelpManagerNumber_WithoutColon);
1309 result.add(@testParseCmdLine_HelpManagerNumber_Invalid);
1310 result.add(@testParseCmdLine_HelpManagerNumber_between);
1311 result.add(@testParseCmdLine_HelpManagerNumber_between_withSpace);
1312
1313 result.add(@testParseCmdLine_OwnerNumber);
1314 result.add(@testParseCmdLine_OwnerNumber_WithoutColon);
1315 result.add(@testParseCmdLine_OwnerNumber_Invalid);
1316 result.add(@testParseCmdLine_OwnerNumber_between);
1317 result.add(@testParseCmdLine_OwnerNumber_between_withSpace);
1318
1319
1320 result.add(@testParseCmdLine_Title);
1321 result.add(@testParseCmdLine_Title_WithoutColon);
1322 result.add(@testParseCmdLine_Title_Empty);
1323 result.add(@testParseCmdLine_Title_between);
1324 result.add(@testParseCmdLine_Title_between_withSpace);
1325
1326 result.add(@testParseCmdLine_WindowPos);
1327 result.add(@testParseCmdLine_WindowPosPercentage);
1328
1329 result.add(@testParseCmdLine_Topic);
1330
1331 result.add(@testParseCmdLine_file);
1332 result.add(@testParseCmdLine_fileLeadingBlanks);
1333 result.add(@testParseCmdLine_fileTrailingBlanks);
1334 result.add(@testParseCmdLine_fileQuoted);
1335 result.add(@testParseCmdLine_fileQuotedMissingClosedQuote);
1336 result.add(@testParseCmdLine_fileQuotedAndText);
1337 result.add(@testParseCmdLine_fileQuotedAndTextManyBlanks);
1338 result.add(@testParseCmdLine_fileQuotedInside);
1339 result.add(@testParseCmdLine_SwitchAndFileQuoted);
1340 END;
1341
1342END.
Note: See TracBrowser for help on using the repository browser.