source: branches/2.20_branch/unittests/CmdLineParameterUnitTests.pas@ 443

Last change on this file since 443 was 352, checked in by RBRi, 16 years ago

fix tests for current environment
File size: 120.6 KB
Line 
1Unit CmdLineParameterUnitTests;
2
3// NewView - a new OS/2 Help Viewer
4// Copyright 2006-2009 Ronald Brill (rbri at rbri dot de)
5// This software is released under the GNU Public License - see readme.txt
6
7// UnitTests for CmdLineParameterUnit
8
9Interface
10
11uses
12 Classes,
13 TestAssert,
14 CmdLineParameterUnit;
15
16 FUNCTION getCmdLineParameterUnitTests : TList;
17
18
19Implementation
20
21 PROCEDURE testParseCmdLine_Empty;
22 VAR
23 tmpCmdLineString : String;
24 tmpCmdLineParameters : TCmdLineParameters;
25 BEGIN
26 tmpCmdLineString := '';
27 tmpCmdLineParameters := TCmdLineParameters.Create;
28 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
29
30 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getShowUsageFlag);
31 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getSearchFlag);
32 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
33 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getLanguage);
34 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getShowIndexFlag);
35 assertFalse('testParseCmdLine_Empty', tmpCmdLineParameters.getHelpManagerFlag);
36 assertEqualsInt('testParseCmdLine_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
37 assertEqualsInt('testParseCmdLine_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
38 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getWindowTitle);
39 assertEqualsString('testParseCmdLine_Empty', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
40 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getFileNames(false));
41 assertEqualsString('testParseCmdLine_Empty', '', tmpCmdLineParameters.getSearchText);
42 END;
43
44
45 PROCEDURE testParseCmdLine_QuestionMark;
46 VAR
47 tmpCmdLineString : String;
48 tmpCmdLineParameters : TCmdLineParameters;
49 BEGIN
50 tmpCmdLineString := '-?';
51 tmpCmdLineParameters := TCmdLineParameters.Create;
52 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
53
54 assertTrue('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getShowUsageFlag);
55 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getSearchFlag);
56 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getGlobalSearchFlag);
57 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getLanguage);
58 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getShowIndexFlag);
59 assertFalse('testParseCmdLine_QuestionMark', tmpCmdLineParameters.getHelpManagerFlag);
60 assertEqualsInt('testParseCmdLine_QuestionMark', 0, tmpCmdLineParameters.getHelpManagerWindow);
61 assertEqualsInt('testParseCmdLine_QuestionMark', 0, tmpCmdLineParameters.getOwnerWindow);
62 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getWindowTitle);
63 assertEqualsString('testParseCmdLine_QuestionMark', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
64 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getFileNames(false));
65 assertEqualsString('testParseCmdLine_QuestionMark', '', tmpCmdLineParameters.getSearchText);
66 END;
67
68
69 PROCEDURE testParseCmdLine_QuotedQuestionMark;
70 VAR
71 tmpCmdLineString : String;
72 tmpCmdLineParameters : TCmdLineParameters;
73 BEGIN
74 tmpCmdLineString := '"-?"';
75 tmpCmdLineParameters := TCmdLineParameters.Create;
76 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
77
78 assertTrue('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getShowUsageFlag);
79 assertFalse('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getSearchFlag);
80 assertFalse('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getGlobalSearchFlag);
81 assertEqualsString('testParseCmdLine_QuotedQuestionMark', '', tmpCmdLineParameters.getLanguage);
82 assertFalse('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getShowIndexFlag);
83 assertFalse('testParseCmdLine_QuotedQuestionMark', tmpCmdLineParameters.getHelpManagerFlag);
84 assertEqualsInt('testParseCmdLine_QuotedQuestionMark', 0, tmpCmdLineParameters.getHelpManagerWindow);
85 assertEqualsInt('testParseCmdLine_QuotedQuestionMark', 0, tmpCmdLineParameters.getOwnerWindow);
86 assertEqualsString('testParseCmdLine_QuotedQuestionMark', '', tmpCmdLineParameters.getWindowTitle);
87 assertEqualsString('testParseCmdLine_QuotedQuestionMark', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
88 assertEqualsString('testParseCmdLine_QuotedQuestionMark', '', tmpCmdLineParameters.getFileNames(false));
89 assertEqualsString('testParseCmdLine_QuotedQuestionMark', '', tmpCmdLineParameters.getSearchText);
90 END;
91
92
93 PROCEDURE testParseCmdLine_lowerH;
94 VAR
95 tmpCmdLineString : String;
96 tmpCmdLineParameters : TCmdLineParameters;
97 BEGIN
98 tmpCmdLineString := '-h';
99 tmpCmdLineParameters := TCmdLineParameters.Create;
100 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
101
102 assertTrue('testParseCmdLine_lowerH', tmpCmdLineParameters.getShowUsageFlag);
103 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getSearchFlag);
104 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getGlobalSearchFlag);
105 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getLanguage);
106 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getShowIndexFlag);
107 assertFalse('testParseCmdLine_lowerH', tmpCmdLineParameters.getHelpManagerFlag);
108 assertEqualsInt('testParseCmdLine_lowerH', 0, tmpCmdLineParameters.getHelpManagerWindow);
109 assertEqualsInt('testParseCmdLine_lowerH', 0, tmpCmdLineParameters.getOwnerWindow);
110 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getWindowTitle);
111 assertEqualsString('testParseCmdLine_lowerH', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
112 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getFileNames(false));
113 assertEqualsString('testParseCmdLine_lowerH', '', tmpCmdLineParameters.getSearchText);
114 END;
115
116
117 PROCEDURE testParseCmdLine_upperH;
118 VAR
119 tmpCmdLineString : String;
120 tmpCmdLineParameters : TCmdLineParameters;
121 BEGIN
122 tmpCmdLineString := '-H';
123 tmpCmdLineParameters := TCmdLineParameters.Create;
124 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
125
126 assertTrue('testParseCmdLine_upperH', tmpCmdLineParameters.getShowUsageFlag);
127 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getSearchFlag);
128 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getGlobalSearchFlag);
129 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getLanguage);
130 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getShowIndexFlag);
131 assertFalse('testParseCmdLine_upperH', tmpCmdLineParameters.getHelpManagerFlag);
132 assertEqualsInt('testParseCmdLine_upperH', 0, tmpCmdLineParameters.getHelpManagerWindow);
133 assertEqualsInt('testParseCmdLine_upperH', 0, tmpCmdLineParameters.getOwnerWindow);
134 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getWindowTitle);
135 assertEqualsString('testParseCmdLine_upperH', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
136 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getFileNames(false));
137 assertEqualsString('testParseCmdLine_upperH', '', tmpCmdLineParameters.getSearchText);
138 END;
139
140
141 PROCEDURE testParseCmdLine_lowerHelp;
142 VAR
143 tmpCmdLineString : String;
144 tmpCmdLineParameters : TCmdLineParameters;
145 BEGIN
146 tmpCmdLineString := '-help';
147 tmpCmdLineParameters := TCmdLineParameters.Create;
148 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
149
150 assertTrue('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getShowUsageFlag);
151 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getSearchFlag);
152 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getGlobalSearchFlag);
153 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getLanguage);
154 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getShowIndexFlag);
155 assertFalse('testParseCmdLine_lowerHelp', tmpCmdLineParameters.getHelpManagerFlag);
156 assertEqualsInt('testParseCmdLine_lowerHelp', 0, tmpCmdLineParameters.getHelpManagerWindow);
157 assertEqualsInt('testParseCmdLine_lowerHelp', 0, tmpCmdLineParameters.getOwnerWindow);
158 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getWindowTitle);
159 assertEqualsString('testParseCmdLine_lowerHelp', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
160 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getFileNames(false));
161 assertEqualsString('testParseCmdLine_lowerHelp', '', tmpCmdLineParameters.getSearchText);
162 END;
163
164
165 PROCEDURE testParseCmdLine_upperHELP;
166 VAR
167 tmpCmdLineString : String;
168 tmpCmdLineParameters : TCmdLineParameters;
169 BEGIN
170 tmpCmdLineString := '-HELP';
171 tmpCmdLineParameters := TCmdLineParameters.Create;
172 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
173
174 assertTrue('testParseCmdLine_upperHELP', tmpCmdLineParameters.getShowUsageFlag);
175 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getSearchFlag);
176 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getGlobalSearchFlag);
177 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getLanguage);
178 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getShowIndexFlag);
179 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getHelpManagerFlag);
180 assertEqualsInt('testParseCmdLine_upperHELP', 0, tmpCmdLineParameters.getHelpManagerWindow);
181 assertEqualsInt('testParseCmdLine_upperHELP', 0, tmpCmdLineParameters.getOwnerWindow);
182 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getWindowTitle);
183 assertEqualsString('testParseCmdLine_upperHELP', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
184 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getFileNames(false));
185 assertEqualsString('testParseCmdLine_upperHELP', '', tmpCmdLineParameters.getSearchText);
186 END;
187
188
189 PROCEDURE testParseCmdLine_upperHE;
190 VAR
191 tmpCmdLineString : String;
192 tmpCmdLineParameters : TCmdLineParameters;
193 BEGIN
194 tmpCmdLineString := '-He';
195 tmpCmdLineParameters := TCmdLineParameters.Create;
196 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
197
198 assertTrue('testParseCmdLine_upperHE', tmpCmdLineParameters.getShowUsageFlag);
199 assertFalse('testParseCmdLine_upperHE', tmpCmdLineParameters.getSearchFlag);
200 assertFalse('testParseCmdLine_upperHELP', tmpCmdLineParameters.getGlobalSearchFlag);
201 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getLanguage);
202 assertFalse('testParseCmdLine_upperHE', tmpCmdLineParameters.getShowIndexFlag);
203 assertFalse('testParseCmdLine_upperHE', tmpCmdLineParameters.getHelpManagerFlag);
204 assertEqualsInt('testParseCmdLine_upperHE', 0, tmpCmdLineParameters.getHelpManagerWindow);
205 assertEqualsInt('testParseCmdLine_upperHE', 0, tmpCmdLineParameters.getOwnerWindow);
206 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getWindowTitle);
207 assertEqualsString('testParseCmdLine_upperHE', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
208 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getFileNames(false));
209 assertEqualsString('testParseCmdLine_upperHE', '', tmpCmdLineParameters.getSearchText);
210 END;
211
212
213 PROCEDURE testParseCmdLine_h_between;
214 VAR
215 tmpCmdLineString : String;
216 tmpCmdLineParameters : TCmdLineParameters;
217 BEGIN
218 tmpCmdLineString := '-s-h-title';
219 tmpCmdLineParameters := TCmdLineParameters.Create;
220 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
221
222 assertTrue('testParseCmdLine_h_between', tmpCmdLineParameters.getShowUsageFlag);
223 assertTrue('testParseCmdLine_h_between', tmpCmdLineParameters.getSearchFlag);
224 assertFalse('testParseCmdLine_h_between', tmpCmdLineParameters.getGlobalSearchFlag);
225 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getLanguage);
226 assertFalse('testParseCmdLine_h_between', tmpCmdLineParameters.getShowIndexFlag);
227 assertFalse('testParseCmdLine_h_between', tmpCmdLineParameters.getHelpManagerFlag);
228 assertEqualsInt('testParseCmdLine_h_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
229 assertEqualsInt('testParseCmdLine_h_between', 0, tmpCmdLineParameters.getOwnerWindow);
230 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getWindowTitle);
231 assertEqualsString('testParseCmdLine_h_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
232 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getFileNames(false));
233 assertEqualsString('testParseCmdLine_h_between', '', tmpCmdLineParameters.getSearchText);
234 END;
235
236
237 PROCEDURE testParseCmdLine_h_between_withSpace;
238 VAR
239 tmpCmdLineString : String;
240 tmpCmdLineParameters : TCmdLineParameters;
241 BEGIN
242 tmpCmdLineString := '-s -h -title';
243 tmpCmdLineParameters := TCmdLineParameters.Create;
244 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
245
246 assertTrue('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
247 assertTrue('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getSearchFlag);
248 assertFalse('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
249 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getLanguage);
250 assertFalse('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getShowIndexFlag);
251 assertFalse('testParseCmdLine_h_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
252 assertEqualsInt('testParseCmdLine_h_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
253 assertEqualsInt('testParseCmdLine_h_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
254 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
255 assertEqualsString('testParseCmdLine_h_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
256 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
257 assertEqualsString('testParseCmdLine_h_between_withSpace', '', tmpCmdLineParameters.getSearchText);
258 END;
259
260
261 PROCEDURE testParseCmdLine_lowerS;
262 VAR
263 tmpCmdLineString : String;
264 tmpCmdLineParameters : TCmdLineParameters;
265 BEGIN
266 tmpCmdLineString := '-s file search';
267 tmpCmdLineParameters := TCmdLineParameters.Create;
268 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
269
270 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getShowUsageFlag);
271 assertTrue('testParseCmdLine_lowerS', tmpCmdLineParameters.getSearchFlag);
272 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getGlobalSearchFlag);
273 assertEqualsString('testParseCmdLine_lowerS', '', tmpCmdLineParameters.getLanguage);
274 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getShowIndexFlag);
275 assertFalse('testParseCmdLine_lowerS', tmpCmdLineParameters.getHelpManagerFlag);
276 assertEqualsInt('testParseCmdLine_lowerS', 0, tmpCmdLineParameters.getHelpManagerWindow);
277 assertEqualsInt('testParseCmdLine_lowerS', 0, tmpCmdLineParameters.getOwnerWindow);
278 assertEqualsString('testParseCmdLine_lowerS', '', tmpCmdLineParameters.getWindowTitle);
279 assertEqualsString('testParseCmdLine_lowerS', 'file', tmpCmdLineParameters.getFileNames(true));
280 assertEqualsString('testParseCmdLine_lowerS', 'file', tmpCmdLineParameters.getFileNames(false));
281 assertEqualsString('testParseCmdLine_lowerS', 'search', tmpCmdLineParameters.getSearchText);
282 END;
283
284
285 PROCEDURE testParseCmdLine_upperS;
286 VAR
287 tmpCmdLineString : String;
288 tmpCmdLineParameters : TCmdLineParameters;
289 BEGIN
290 tmpCmdLineString := '-S file seArch';
291 tmpCmdLineParameters := TCmdLineParameters.Create;
292 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
293
294 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getShowUsageFlag);
295 assertTrue('testParseCmdLine_upperS', tmpCmdLineParameters.getSearchFlag);
296 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getGlobalSearchFlag);
297 assertEqualsString('testParseCmdLine_upperS', '', tmpCmdLineParameters.getLanguage);
298 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getShowIndexFlag);
299 assertFalse('testParseCmdLine_upperS', tmpCmdLineParameters.getHelpManagerFlag);
300 assertEqualsInt('testParseCmdLine_upperS', 0, tmpCmdLineParameters.getHelpManagerWindow);
301 assertEqualsInt('testParseCmdLine_upperS', 0, tmpCmdLineParameters.getOwnerWindow);
302 assertEqualsString('testParseCmdLine_upperS', '', tmpCmdLineParameters.getWindowTitle);
303 assertEqualsString('testParseCmdLine_upperS', 'file', tmpCmdLineParameters.getFileNames(true));
304 assertEqualsString('testParseCmdLine_upperS', 'file', tmpCmdLineParameters.getFileNames(false));
305 assertEqualsString('testParseCmdLine_upperS', 'seArch', tmpCmdLineParameters.getSearchText);
306 END;
307
308
309
310 PROCEDURE testParseCmdLine_upperS_withBlank;
311 VAR
312 tmpCmdLineString : String;
313 tmpCmdLineParameters : TCmdLineParameters;
314 BEGIN
315 tmpCmdLineString := '-S FilE seArch';
316 tmpCmdLineParameters := TCmdLineParameters.Create;
317 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
318
319 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getShowUsageFlag);
320 assertTrue('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getSearchFlag);
321 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getGlobalSearchFlag);
322 assertEqualsString('testParseCmdLine_upperS_withBlank', '', tmpCmdLineParameters.getLanguage);
323 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getShowIndexFlag);
324 assertFalse('testParseCmdLine_upperS_withBlank', tmpCmdLineParameters.getHelpManagerFlag);
325 assertEqualsInt('testParseCmdLine_upperS_withBlank', 0, tmpCmdLineParameters.getHelpManagerWindow);
326 assertEqualsInt('testParseCmdLine_upperS_withBlank', 0, tmpCmdLineParameters.getOwnerWindow);
327 assertEqualsString('testParseCmdLine_upperS_withBlank', '', tmpCmdLineParameters.getWindowTitle);
328 assertEqualsString('testParseCmdLine_upperS_withBlank', 'FilE', tmpCmdLineParameters.getFileNames(true));
329 assertEqualsString('testParseCmdLine_upperS_withBlank', 'FilE', tmpCmdLineParameters.getFileNames(false));
330 assertEqualsString('testParseCmdLine_upperS_withBlank', 'seArch', tmpCmdLineParameters.getSearchText);
331 END;
332
333
334 PROCEDURE testParseCmdLine_QuotedS;
335 VAR
336 tmpCmdLineString : String;
337 tmpCmdLineParameters : TCmdLineParameters;
338 BEGIN
339 tmpCmdLineString := '"-S" FilE seArch';
340 tmpCmdLineParameters := TCmdLineParameters.Create;
341 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
342
343 assertFalse('testParseCmdLine_QuotedS', tmpCmdLineParameters.getShowUsageFlag);
344 assertTrue('testParseCmdLine_QuotedS', tmpCmdLineParameters.getSearchFlag);
345 assertFalse('testParseCmdLine_QuotedS', tmpCmdLineParameters.getGlobalSearchFlag);
346 assertEqualsString('testParseCmdLine_QuotedS', '', tmpCmdLineParameters.getLanguage);
347 assertFalse('testParseCmdLine_QuotedS', tmpCmdLineParameters.getShowIndexFlag);
348 assertFalse('testParseCmdLine_QuotedS', tmpCmdLineParameters.getHelpManagerFlag);
349 assertEqualsInt('testParseCmdLine_QuotedS', 0, tmpCmdLineParameters.getHelpManagerWindow);
350 assertEqualsInt('testParseCmdLine_QuotedS', 0, tmpCmdLineParameters.getOwnerWindow);
351 assertEqualsString('testParseCmdLine_QuotedS', '', tmpCmdLineParameters.getWindowTitle);
352 assertEqualsString('testParseCmdLine_QuotedS', 'FilE', tmpCmdLineParameters.getFileNames(true));
353 assertEqualsString('testParseCmdLine_QuotedS', 'FilE', tmpCmdLineParameters.getFileNames(false));
354 assertEqualsString('testParseCmdLine_QuotedS', 'seArch', tmpCmdLineParameters.getSearchText);
355 END;
356
357
358 PROCEDURE testParseCmdLine_emptyS;
359 VAR
360 tmpCmdLineString : String;
361 tmpCmdLineParameters : TCmdLineParameters;
362 BEGIN
363 tmpCmdLineString := '-S';
364 tmpCmdLineParameters := TCmdLineParameters.Create;
365 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
366
367 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getShowUsageFlag);
368 assertTrue('testParseCmdLine_emptyS', tmpCmdLineParameters.getSearchFlag);
369 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getGlobalSearchFlag);
370 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getLanguage);
371 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getShowIndexFlag);
372 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getHelpManagerFlag);
373 assertEqualsInt('testParseCmdLine_emptyS', 0, tmpCmdLineParameters.getHelpManagerWindow);
374 assertEqualsInt('testParseCmdLine_emptyS', 0, tmpCmdLineParameters.getOwnerWindow);
375 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getWindowTitle);
376 assertEqualsString('testParseCmdLine_emptyS', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
377 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getFileNames(false));
378 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getSearchText);
379 END;
380
381
382 PROCEDURE testParseCmdLine_s_between;
383 VAR
384 tmpCmdLineString : String;
385 tmpCmdLineParameters : TCmdLineParameters;
386 BEGIN
387 tmpCmdLineString := '-h-s-h';
388 tmpCmdLineParameters := TCmdLineParameters.Create;
389 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
390
391 assertTrue('testParseCmdLine_s_between', tmpCmdLineParameters.getShowUsageFlag);
392 assertTrue('testParseCmdLine_s_between', tmpCmdLineParameters.getSearchFlag);
393 assertFalse('testParseCmdLine_s_between', tmpCmdLineParameters.getGlobalSearchFlag);
394 assertEqualsString('testParseCmdLine_emptyS', '', tmpCmdLineParameters.getLanguage);
395 assertFalse('testParseCmdLine_emptyS', tmpCmdLineParameters.getShowIndexFlag);
396 assertFalse('testParseCmdLine_s_between', tmpCmdLineParameters.getHelpManagerFlag);
397 assertEqualsInt('testParseCmdLine_s_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
398 assertEqualsInt('testParseCmdLine_s_between', 0, tmpCmdLineParameters.getOwnerWindow);
399 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getWindowTitle);
400 assertEqualsString('testParseCmdLine_s_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
401 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getFileNames(false));
402 assertEqualsString('testParseCmdLine_s_between', '', tmpCmdLineParameters.getSearchText);
403 END;
404
405
406 PROCEDURE testParseCmdLine_s_between_withSpace;
407 VAR
408 tmpCmdLineString : String;
409 tmpCmdLineParameters : TCmdLineParameters;
410 BEGIN
411 tmpCmdLineString := '-h -s -h';
412 tmpCmdLineParameters := TCmdLineParameters.Create;
413 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
414
415 assertTrue('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
416 assertTrue('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getSearchFlag);
417 assertFalse('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
418 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getLanguage);
419 assertFalse('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getShowIndexFlag);
420 assertFalse('testParseCmdLine_s_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
421 assertEqualsInt('testParseCmdLine_s_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
422 assertEqualsInt('testParseCmdLine_s_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
423 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
424 assertEqualsString('testParseCmdLine_s_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
425 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
426 assertEqualsString('testParseCmdLine_s_between_withSpace', '', tmpCmdLineParameters.getSearchText);
427 END;
428
429
430 PROCEDURE testParseCmdLine_help_and_s;
431 VAR
432 tmpCmdLineString : String;
433 tmpCmdLineParameters : TCmdLineParameters;
434 BEGIN
435 tmpCmdLineString := '-h -s file ';
436 tmpCmdLineParameters := TCmdLineParameters.Create;
437 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
438
439 assertTrue('testParseCmdLine_help_and_s', tmpCmdLineParameters.getShowUsageFlag);
440 assertTrue('testParseCmdLine_help_and_s', tmpCmdLineParameters.getSearchFlag);
441 assertFalse('testParseCmdLine_help_and_s', tmpCmdLineParameters.getGlobalSearchFlag);
442 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getLanguage);
443 assertFalse('testParseCmdLine_help_and_s', tmpCmdLineParameters.getShowIndexFlag);
444 assertFalse('testParseCmdLine_help_and_s', tmpCmdLineParameters.getHelpManagerFlag);
445 assertEqualsInt('testParseCmdLine_help_and_s', 0, tmpCmdLineParameters.getHelpManagerWindow);
446 assertEqualsInt('testParseCmdLine_help_and_s', 0, tmpCmdLineParameters.getOwnerWindow);
447 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getWindowTitle);
448 assertEqualsString('testParseCmdLine_help_and_s', 'file', tmpCmdLineParameters.getFileNames(true));
449 assertEqualsString('testParseCmdLine_help_and_s', 'file', tmpCmdLineParameters.getFileNames(false));
450 assertEqualsString('testParseCmdLine_help_and_s', '', tmpCmdLineParameters.getSearchText);
451 END;
452
453
454 PROCEDURE testParseCmdLine_s_and_help;
455 VAR
456 tmpCmdLineString : String;
457 tmpCmdLineParameters : TCmdLineParameters;
458 BEGIN
459 tmpCmdLineString := '-s -h file ';
460 tmpCmdLineParameters := TCmdLineParameters.Create;
461 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
462
463 assertTrue('testParseCmdLine_s_and_help', tmpCmdLineParameters.getShowUsageFlag);
464 assertTrue('testParseCmdLine_s_and_help', tmpCmdLineParameters.getSearchFlag);
465 assertFalse('testParseCmdLine_s_and_help', tmpCmdLineParameters.getGlobalSearchFlag);
466 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getLanguage);
467 assertFalse('testParseCmdLine_s_and_help', tmpCmdLineParameters.getShowIndexFlag);
468 assertFalse('testParseCmdLine_s_and_help', tmpCmdLineParameters.getHelpManagerFlag);
469 assertEqualsInt('testParseCmdLine_s_and_help', 0, tmpCmdLineParameters.getHelpManagerWindow);
470 assertEqualsInt('testParseCmdLine_s_and_help', 0, tmpCmdLineParameters.getOwnerWindow);
471 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getWindowTitle);
472 assertEqualsString('testParseCmdLine_s_and_help', 'file', tmpCmdLineParameters.getFileNames(true));
473 assertEqualsString('testParseCmdLine_s_and_help', 'file', tmpCmdLineParameters.getFileNames(false));
474 assertEqualsString('testParseCmdLine_s_and_help', '', tmpCmdLineParameters.getSearchText);
475 END;
476
477
478 PROCEDURE testParseCmdLine_help_and_s_without_blank;
479 VAR
480 tmpCmdLineString : String;
481 tmpCmdLineParameters : TCmdLineParameters;
482 BEGIN
483 tmpCmdLineString := '-s-h file';
484 tmpCmdLineParameters := TCmdLineParameters.Create;
485 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
486
487 assertTrue('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getShowUsageFlag);
488 assertTrue('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getSearchFlag);
489 assertFalse('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getGlobalSearchFlag);
490 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getLanguage);
491 assertFalse('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getShowIndexFlag);
492 assertFalse('testParseCmdLine_help_and_s_without_blank', tmpCmdLineParameters.getHelpManagerFlag);
493 assertEqualsInt('testParseCmdLine_help_and_s_without_blank', 0, tmpCmdLineParameters.getHelpManagerWindow);
494 assertEqualsInt('testParseCmdLine_help_and_s_without_blank', 0, tmpCmdLineParameters.getOwnerWindow);
495 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getWindowTitle);
496 assertEqualsString('testParseCmdLine_help_and_s_without_blank', 'file', tmpCmdLineParameters.getFileNames(true));
497 assertEqualsString('testParseCmdLine_help_and_s_without_blank', 'file', tmpCmdLineParameters.getFileNames(false));
498 assertEqualsString('testParseCmdLine_help_and_s_without_blank', '', tmpCmdLineParameters.getSearchText);
499 END;
500
501
502
503 PROCEDURE testParseCmdLine_lowerG;
504 VAR
505 tmpCmdLineString : String;
506 tmpCmdLineParameters : TCmdLineParameters;
507 BEGIN
508 tmpCmdLineString := '-g file search';
509 tmpCmdLineParameters := TCmdLineParameters.Create;
510 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
511
512 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getShowUsageFlag);
513 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getSearchFlag);
514 assertTrue('testParseCmdLine_lowerG', tmpCmdLineParameters.getGlobalSearchFlag);
515 assertEqualsString('testParseCmdLine_lowerG', '', tmpCmdLineParameters.getLanguage);
516 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getShowIndexFlag);
517 assertFalse('testParseCmdLine_lowerG', tmpCmdLineParameters.getHelpManagerFlag);
518 assertEqualsInt('testParseCmdLine_lowerG', 0, tmpCmdLineParameters.getHelpManagerWindow);
519 assertEqualsInt('testParseCmdLine_lowerG', 0, tmpCmdLineParameters.getOwnerWindow);
520 assertEqualsString('testParseCmdLine_lowerG', '', tmpCmdLineParameters.getWindowTitle);
521 assertEqualsString('testParseCmdLine_lowerG', 'file', tmpCmdLineParameters.getFileNames(true));
522 assertEqualsString('testParseCmdLine_lowerG', 'file', tmpCmdLineParameters.getFileNames(false));
523 assertEqualsString('testParseCmdLine_lowerG', 'search', tmpCmdLineParameters.getSearchText);
524 END;
525
526
527 PROCEDURE testParseCmdLine_upperG;
528 VAR
529 tmpCmdLineString : String;
530 tmpCmdLineParameters : TCmdLineParameters;
531 BEGIN
532 tmpCmdLineString := '-G fiLe seArch';
533 tmpCmdLineParameters := TCmdLineParameters.Create;
534 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
535
536 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getShowUsageFlag);
537 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getSearchFlag);
538 assertTrue('testParseCmdLine_upperG', tmpCmdLineParameters.getGlobalSearchFlag);
539 assertEqualsString('testParseCmdLine_upperG', '', tmpCmdLineParameters.getLanguage);
540 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getShowIndexFlag);
541 assertFalse('testParseCmdLine_upperG', tmpCmdLineParameters.getHelpManagerFlag);
542 assertEqualsInt('testParseCmdLine_upperG', 0, tmpCmdLineParameters.getHelpManagerWindow);
543 assertEqualsInt('testParseCmdLine_upperG', 0, tmpCmdLineParameters.getOwnerWindow);
544 assertEqualsString('testParseCmdLine_upperG', '', tmpCmdLineParameters.getWindowTitle);
545 assertEqualsString('testParseCmdLine_upperG', 'fiLe', tmpCmdLineParameters.getFileNames(true));
546 assertEqualsString('testParseCmdLine_upperG', 'fiLe', tmpCmdLineParameters.getFileNames(false));
547 assertEqualsString('testParseCmdLine_upperG', 'seArch', tmpCmdLineParameters.getSearchText);
548 END;
549
550
551 PROCEDURE testParseCmdLine_QuotedG;
552 VAR
553 tmpCmdLineString : String;
554 tmpCmdLineParameters : TCmdLineParameters;
555 BEGIN
556 tmpCmdLineString := '"-G" seArch';
557 tmpCmdLineParameters := TCmdLineParameters.Create;
558 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
559
560 assertFalse('testParseCmdLine_QuotedG', tmpCmdLineParameters.getShowUsageFlag);
561 assertFalse('testParseCmdLine_QuotedG', tmpCmdLineParameters.getSearchFlag);
562 assertTrue('testParseCmdLine_QuotedG', tmpCmdLineParameters.getGlobalSearchFlag);
563 assertEqualsString('testParseCmdLine_QuotedG', '', tmpCmdLineParameters.getLanguage);
564 assertFalse('testParseCmdLine_QuotedG', tmpCmdLineParameters.getShowIndexFlag);
565 assertFalse('testParseCmdLine_QuotedG', tmpCmdLineParameters.getHelpManagerFlag);
566 assertEqualsInt('testParseCmdLine_QuotedG', 0, tmpCmdLineParameters.getHelpManagerWindow);
567 assertEqualsInt('testParseCmdLine_QuotedG', 0, tmpCmdLineParameters.getOwnerWindow);
568 assertEqualsString('testParseCmdLine_QuotedG', '', tmpCmdLineParameters.getWindowTitle);
569 assertEqualsString('testParseCmdLine_QuotedG', '', tmpCmdLineParameters.getFileNames(true));
570 assertEqualsString('testParseCmdLine_QuotedG', '', tmpCmdLineParameters.getFileNames(false));
571 assertEqualsString('testParseCmdLine_QuotedG', 'seArch', tmpCmdLineParameters.getSearchText);
572 END;
573
574
575 PROCEDURE testParseCmdLine_emptyG;
576 VAR
577 tmpCmdLineString : String;
578 tmpCmdLineParameters : TCmdLineParameters;
579 BEGIN
580 tmpCmdLineString := '-G';
581 tmpCmdLineParameters := TCmdLineParameters.Create;
582 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
583
584 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getShowUsageFlag);
585 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getSearchFlag);
586 assertTrue('testParseCmdLine_emptyG', tmpCmdLineParameters.getGlobalSearchFlag);
587 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getLanguage);
588 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getShowIndexFlag);
589 assertFalse('testParseCmdLine_emptyG', tmpCmdLineParameters.getHelpManagerFlag);
590 assertEqualsInt('testParseCmdLine_emptyG', 0, tmpCmdLineParameters.getHelpManagerWindow);
591 assertEqualsInt('testParseCmdLine_emptyG', 0, tmpCmdLineParameters.getOwnerWindow);
592 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getWindowTitle);
593 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getFileNames(true));
594 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getFileNames(false));
595 assertEqualsString('testParseCmdLine_emptyG', '', tmpCmdLineParameters.getSearchText);
596 END;
597
598
599 PROCEDURE testParseCmdLine_g_between;
600 VAR
601 tmpCmdLineString : String;
602 tmpCmdLineParameters : TCmdLineParameters;
603 BEGIN
604 tmpCmdLineString := '-h-G-s';
605 tmpCmdLineParameters := TCmdLineParameters.Create;
606 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
607
608 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getShowUsageFlag);
609 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getSearchFlag);
610 assertTrue('testParseCmdLine_g_between', tmpCmdLineParameters.getGlobalSearchFlag);
611 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getLanguage);
612 assertFalse('testParseCmdLine_g_between', tmpCmdLineParameters.getShowIndexFlag);
613 assertFalse('testParseCmdLine_g_between', tmpCmdLineParameters.getHelpManagerFlag);
614 assertEqualsInt('testParseCmdLine_g_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
615 assertEqualsInt('testParseCmdLine_g_between', 0, tmpCmdLineParameters.getOwnerWindow);
616 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getWindowTitle);
617 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getFileNames(true));
618 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getFileNames(false));
619 assertEqualsString('testParseCmdLine_g_between', '', tmpCmdLineParameters.getSearchText);
620 END;
621
622
623 PROCEDURE testParseCmdLine_g_between_withSpace;
624 VAR
625 tmpCmdLineString : String;
626 tmpCmdLineParameters : TCmdLineParameters;
627 BEGIN
628 tmpCmdLineString := '-h -G -s';
629 tmpCmdLineParameters := TCmdLineParameters.Create;
630 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
631
632 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
633 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getSearchFlag);
634 assertTrue('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
635 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getLanguage);
636 assertFalse('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getShowIndexFlag);
637 assertFalse('testParseCmdLine_g_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
638 assertEqualsInt('testParseCmdLine_g_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
639 assertEqualsInt('testParseCmdLine_g_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
640 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
641 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getFileNames(true));
642 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
643 assertEqualsString('testParseCmdLine_g_between_withSpace', '', tmpCmdLineParameters.getSearchText);
644 END;
645
646
647 PROCEDURE testParseCmdLine_lowerI;
648 VAR
649 tmpCmdLineString : String;
650 tmpCmdLineParameters : TCmdLineParameters;
651 BEGIN
652 tmpCmdLineString := '-i file';
653 tmpCmdLineParameters := TCmdLineParameters.Create;
654 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
655
656 assertFalse('testParseCmdLine_lowerI', tmpCmdLineParameters.getShowUsageFlag);
657 assertFalse('testParseCmdLine_lowerI', tmpCmdLineParameters.getSearchFlag);
658 assertFalse('testParseCmdLine_lowerI', tmpCmdLineParameters.getGlobalSearchFlag);
659 assertEqualsString('testParseCmdLine_lowerI', '', tmpCmdLineParameters.getLanguage);
660 assertTrue('testParseCmdLine_lowerI', tmpCmdLineParameters.getShowIndexFlag);
661 assertFalse('testParseCmdLine_lowerI', tmpCmdLineParameters.getHelpManagerFlag);
662 assertEqualsInt('testParseCmdLine_lowerI', 0, tmpCmdLineParameters.getHelpManagerWindow);
663 assertEqualsInt('testParseCmdLine_lowerI', 0, tmpCmdLineParameters.getOwnerWindow);
664 assertEqualsString('testParseCmdLine_lowerI', '', tmpCmdLineParameters.getWindowTitle);
665 assertEqualsString('testParseCmdLine_lowerI', 'file', tmpCmdLineParameters.getFileNames(true));
666 assertEqualsString('testParseCmdLine_lowerI', 'file', tmpCmdLineParameters.getFileNames(false));
667 assertEqualsString('testParseCmdLine_lowerI', '', tmpCmdLineParameters.getSearchText);
668 END;
669
670
671 PROCEDURE testParseCmdLine_upperI;
672 VAR
673 tmpCmdLineString : String;
674 tmpCmdLineParameters : TCmdLineParameters;
675 BEGIN
676 tmpCmdLineString := '-I fiLe seArch';
677 tmpCmdLineParameters := TCmdLineParameters.Create;
678 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
679
680 assertFalse('testParseCmdLine_upperI', tmpCmdLineParameters.getShowUsageFlag);
681 assertFalse('testParseCmdLine_upperI', tmpCmdLineParameters.getSearchFlag);
682 assertFalse('testParseCmdLine_upperI', tmpCmdLineParameters.getGlobalSearchFlag);
683 assertEqualsString('testParseCmdLine_upperI', '', tmpCmdLineParameters.getLanguage);
684 assertTrue('testParseCmdLine_upperI', tmpCmdLineParameters.getShowIndexFlag);
685 assertFalse('testParseCmdLine_upperI', tmpCmdLineParameters.getHelpManagerFlag);
686 assertEqualsInt('testParseCmdLine_upperI', 0, tmpCmdLineParameters.getHelpManagerWindow);
687 assertEqualsInt('testParseCmdLine_upperI', 0, tmpCmdLineParameters.getOwnerWindow);
688 assertEqualsString('testParseCmdLine_upperI', '', tmpCmdLineParameters.getWindowTitle);
689 assertEqualsString('testParseCmdLine_upperI', 'fiLe', tmpCmdLineParameters.getFileNames(true));
690 assertEqualsString('testParseCmdLine_upperI', 'fiLe', tmpCmdLineParameters.getFileNames(false));
691 assertEqualsString('testParseCmdLine_upperI', 'seArch', tmpCmdLineParameters.getSearchText);
692 END;
693
694
695 PROCEDURE testParseCmdLine_QuotedI;
696 VAR
697 tmpCmdLineString : String;
698 tmpCmdLineParameters : TCmdLineParameters;
699 BEGIN
700 tmpCmdLineString := '"-I" seArch';
701 tmpCmdLineParameters := TCmdLineParameters.Create;
702 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
703
704 assertFalse('testParseCmdLine_QuotedI', tmpCmdLineParameters.getShowUsageFlag);
705 assertFalse('testParseCmdLine_QuotedI', tmpCmdLineParameters.getSearchFlag);
706 assertFalse('testParseCmdLine_QuotedI', tmpCmdLineParameters.getGlobalSearchFlag);
707 assertEqualsString('testParseCmdLine_QuotedI', '', tmpCmdLineParameters.getLanguage);
708 assertTrue('testParseCmdLine_QuotedI', tmpCmdLineParameters.getShowIndexFlag);
709 assertFalse('testParseCmdLine_QuotedI', tmpCmdLineParameters.getHelpManagerFlag);
710 assertEqualsInt('testParseCmdLine_QuotedI', 0, tmpCmdLineParameters.getHelpManagerWindow);
711 assertEqualsInt('testParseCmdLine_QuotedI', 0, tmpCmdLineParameters.getOwnerWindow);
712 assertEqualsString('testParseCmdLine_QuotedI getWindowTitle', '', tmpCmdLineParameters.getWindowTitle);
713 assertEqualsString('testParseCmdLine_QuotedI getFileNames(true)', 'seArch', tmpCmdLineParameters.getFileNames(true));
714 assertEqualsString('testParseCmdLine_QuotedI getFileNames(false)', 'seArch', tmpCmdLineParameters.getFileNames(false));
715 assertEqualsString('testParseCmdLine_QuotedI getSearchText', '', tmpCmdLineParameters.getSearchText);
716 END;
717
718
719 PROCEDURE testParseCmdLine_emptyI;
720 VAR
721 tmpCmdLineString : String;
722 tmpCmdLineParameters : TCmdLineParameters;
723 BEGIN
724 tmpCmdLineString := '-I';
725 tmpCmdLineParameters := TCmdLineParameters.Create;
726 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
727
728 assertFalse('testParseCmdLine_emptyI', tmpCmdLineParameters.getShowUsageFlag);
729 assertFalse('testParseCmdLine_emptyI', tmpCmdLineParameters.getSearchFlag);
730 assertFalse('testParseCmdLine_emptyI', tmpCmdLineParameters.getGlobalSearchFlag);
731 assertEqualsString('testParseCmdLine_emptyI', '', tmpCmdLineParameters.getLanguage);
732 assertTrue('testParseCmdLine_emptyI', tmpCmdLineParameters.getShowIndexFlag);
733 assertFalse('testParseCmdLine_emptyI', tmpCmdLineParameters.getHelpManagerFlag);
734 assertEqualsInt('testParseCmdLine_emptyI', 0, tmpCmdLineParameters.getHelpManagerWindow);
735 assertEqualsInt('testParseCmdLine_emptyI', 0, tmpCmdLineParameters.getOwnerWindow);
736 assertEqualsString('testParseCmdLine_emptyI getWindowTitle', '', tmpCmdLineParameters.getWindowTitle);
737 assertEqualsString('testParseCmdLine_emptyI getFileNames(true)', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
738 assertEqualsString('testParseCmdLine_emptyI getFileNames(false)', '', tmpCmdLineParameters.getFileNames(false));
739 assertEqualsString('testParseCmdLine_emptyI getSearchText', '', tmpCmdLineParameters.getSearchText);
740 END;
741
742
743 PROCEDURE testParseCmdLine_i_between;
744 VAR
745 tmpCmdLineString : String;
746 tmpCmdLineParameters : TCmdLineParameters;
747 BEGIN
748 tmpCmdLineString := '-h-i-s';
749 tmpCmdLineParameters := TCmdLineParameters.Create;
750 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
751
752 assertTrue('testParseCmdLine_i_between', tmpCmdLineParameters.getShowUsageFlag);
753 assertTrue('testParseCmdLine_i_between', tmpCmdLineParameters.getSearchFlag);
754 assertFalse('testParseCmdLine_i_between', tmpCmdLineParameters.getGlobalSearchFlag);
755 assertEqualsString('testParseCmdLine_i_between', '', tmpCmdLineParameters.getLanguage);
756 assertTrue('testParseCmdLine_i_between', tmpCmdLineParameters.getShowIndexFlag);
757 assertFalse('testParseCmdLine_i_between', tmpCmdLineParameters.getHelpManagerFlag);
758 assertEqualsInt('testParseCmdLine_i_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
759 assertEqualsInt('testParseCmdLine_i_between', 0, tmpCmdLineParameters.getOwnerWindow);
760 assertEqualsString('testParseCmdLine_i_between', '', tmpCmdLineParameters.getWindowTitle);
761 assertEqualsString('testParseCmdLine_i_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
762 assertEqualsString('testParseCmdLine_i_between', '', tmpCmdLineParameters.getFileNames(false));
763 assertEqualsString('testParseCmdLine_i_between', '', tmpCmdLineParameters.getSearchText);
764 END;
765
766
767 PROCEDURE testParseCmdLine_i_between_withSpace;
768 VAR
769 tmpCmdLineString : String;
770 tmpCmdLineParameters : TCmdLineParameters;
771 BEGIN
772 tmpCmdLineString := '-h -I -s';
773 tmpCmdLineParameters := TCmdLineParameters.Create;
774 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
775
776 assertTrue('testParseCmdLine_i_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
777 assertTrue('testParseCmdLine_i_between_withSpace', tmpCmdLineParameters.getSearchFlag);
778 assertFalse('testParseCmdLine_i_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
779 assertEqualsString('testParseCmdLine_i_between_withSpace', '', tmpCmdLineParameters.getLanguage);
780 assertTrue('testParseCmdLine_i_between_withSpace', tmpCmdLineParameters.getShowIndexFlag);
781 assertFalse('testParseCmdLine_i_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
782 assertEqualsInt('testParseCmdLine_i_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
783 assertEqualsInt('testParseCmdLine_i_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
784 assertEqualsString('testParseCmdLine_i_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
785 assertEqualsString('testParseCmdLine_i_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
786 assertEqualsString('testParseCmdLine_i_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
787 assertEqualsString('testParseCmdLine_i_between_withSpace', '', tmpCmdLineParameters.getSearchText);
788 END;
789
790
791 PROCEDURE testParseCmdLine_Language;
792 VAR
793 tmpCmdLineString : String;
794 tmpCmdLineParameters : TCmdLineParameters;
795 BEGIN
796 tmpCmdLineString := '-lang:DE';
797 tmpCmdLineParameters := TCmdLineParameters.Create;
798 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
799
800 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getShowUsageFlag);
801 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getSearchFlag);
802 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getGlobalSearchFlag);
803 assertEqualsString('testParseCmdLine_Language', 'DE', tmpCmdLineParameters.getLanguage);
804 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getShowIndexFlag);
805 assertFalse('testParseCmdLine_Language', tmpCmdLineParameters.getHelpManagerFlag);
806 assertEqualsInt('testParseCmdLine_Language', 0, tmpCmdLineParameters.getHelpManagerWindow);
807 assertEqualsInt('testParseCmdLine_Language', 0, tmpCmdLineParameters.getOwnerWindow);
808 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getWindowTitle);
809 assertEqualsString('testParseCmdLine_Language', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
810 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getFileNames(false));
811 assertEqualsString('testParseCmdLine_Language', '', tmpCmdLineParameters.getSearchText);
812 END;
813
814
815 PROCEDURE testParseCmdLine_Language_Empty;
816 VAR
817 tmpCmdLineString : String;
818 tmpCmdLineParameters : TCmdLineParameters;
819 BEGIN
820 tmpCmdLineString := '-lang';
821 tmpCmdLineParameters := TCmdLineParameters.Create;
822 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
823
824 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getShowUsageFlag);
825 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getSearchFlag);
826 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
827 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getLanguage);
828 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getShowIndexFlag);
829 assertFalse('testParseCmdLine_Language_Empty', tmpCmdLineParameters.getHelpManagerFlag);
830 assertEqualsInt('testParseCmdLine_Language_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
831 assertEqualsInt('testParseCmdLine_Language_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
832 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getWindowTitle);
833 assertEqualsString('testParseCmdLine_Language_Empty', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
834 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getFileNames(false));
835 assertEqualsString('testParseCmdLine_Language_Empty', '', tmpCmdLineParameters.getSearchText);
836 END;
837
838
839 PROCEDURE testParseCmdLine_Language_Empty_WithColon;
840 VAR
841 tmpCmdLineString : String;
842 tmpCmdLineParameters : TCmdLineParameters;
843 BEGIN
844 tmpCmdLineString := '-lang:';
845 tmpCmdLineParameters := TCmdLineParameters.Create;
846 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
847
848 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getShowUsageFlag);
849 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getSearchFlag);
850 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getGlobalSearchFlag);
851 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getLanguage);
852 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getShowIndexFlag);
853 assertFalse('testParseCmdLine_Language_Empty_WithColon', tmpCmdLineParameters.getHelpManagerFlag);
854 assertEqualsInt('testParseCmdLine_Language_Empty_WithColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
855 assertEqualsInt('testParseCmdLine_Language_Empty_WithColon', 0, tmpCmdLineParameters.getOwnerWindow);
856 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getWindowTitle);
857 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
858 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getFileNames(false));
859 assertEqualsString('testParseCmdLine_Language_Empty_WithColon', '', tmpCmdLineParameters.getSearchText);
860 END;
861
862
863 PROCEDURE testParseCmdLine_Language_WithFile;
864 VAR
865 tmpCmdLineString : String;
866 tmpCmdLineParameters : TCmdLineParameters;
867 BEGIN
868 tmpCmdLineString := '-lang:DE filE';
869 tmpCmdLineParameters := TCmdLineParameters.Create;
870 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
871
872 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getShowUsageFlag);
873 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getSearchFlag);
874 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getGlobalSearchFlag);
875 assertEqualsString('testParseCmdLine_Language_WithFile', 'DE', tmpCmdLineParameters.getLanguage);
876 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getShowIndexFlag);
877 assertFalse('testParseCmdLine_Language_WithFile', tmpCmdLineParameters.getHelpManagerFlag);
878 assertEqualsInt('testParseCmdLine_Language_WithFile', 0, tmpCmdLineParameters.getHelpManagerWindow);
879 assertEqualsInt('testParseCmdLine_Language_WithFile', 0, tmpCmdLineParameters.getOwnerWindow);
880 assertEqualsString('testParseCmdLine_Language_WithFile', '', tmpCmdLineParameters.getWindowTitle);
881 assertEqualsString('testParseCmdLine_Language_WithFile', 'filE', tmpCmdLineParameters.getFileNames(true));
882 assertEqualsString('testParseCmdLine_Language_WithFile', 'filE', tmpCmdLineParameters.getFileNames(false));
883 assertEqualsString('testParseCmdLine_Language_WithFile', '', tmpCmdLineParameters.getSearchText);
884 END;
885
886
887 PROCEDURE testParseCmdLine_QuotedLanguage;
888 VAR
889 tmpCmdLineString : String;
890 tmpCmdLineParameters : TCmdLineParameters;
891 BEGIN
892 tmpCmdLineString := '"-lang:DE" filE';
893 tmpCmdLineParameters := TCmdLineParameters.Create;
894 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
895
896 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getShowUsageFlag);
897 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getSearchFlag);
898 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getGlobalSearchFlag);
899 assertEqualsString('testParseCmdLine_QuotedLanguage', 'DE', tmpCmdLineParameters.getLanguage);
900 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getShowIndexFlag);
901 assertFalse('testParseCmdLine_QuotedLanguage', tmpCmdLineParameters.getHelpManagerFlag);
902 assertEqualsInt('testParseCmdLine_QuotedLanguage', 0, tmpCmdLineParameters.getHelpManagerWindow);
903 assertEqualsInt('testParseCmdLine_QuotedLanguage', 0, tmpCmdLineParameters.getOwnerWindow);
904 assertEqualsString('testParseCmdLine_QuotedLanguage', '', tmpCmdLineParameters.getWindowTitle);
905 assertEqualsString('testParseCmdLine_QuotedLanguage', 'filE', tmpCmdLineParameters.getFileNames(true));
906 assertEqualsString('testParseCmdLine_QuotedLanguage', 'filE', tmpCmdLineParameters.getFileNames(false));
907 assertEqualsString('testParseCmdLine_QuotedLanguage', '', tmpCmdLineParameters.getSearchText);
908 END;
909
910
911 PROCEDURE testParseCmdLine_QuotedLanguage2;
912 VAR
913 tmpCmdLineString : String;
914 tmpCmdLineParameters : TCmdLineParameters;
915 BEGIN
916 tmpCmdLineString := '-lang:"DE" filE';
917 tmpCmdLineParameters := TCmdLineParameters.Create;
918 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
919
920 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getShowUsageFlag);
921 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getSearchFlag);
922 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getGlobalSearchFlag);
923 assertEqualsString('testParseCmdLine_QuotedLanguage2', 'DE', tmpCmdLineParameters.getLanguage);
924 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getShowIndexFlag);
925 assertFalse('testParseCmdLine_QuotedLanguage2', tmpCmdLineParameters.getHelpManagerFlag);
926 assertEqualsInt('testParseCmdLine_QuotedLanguage2', 0, tmpCmdLineParameters.getHelpManagerWindow);
927 assertEqualsInt('testParseCmdLine_QuotedLanguage2', 0, tmpCmdLineParameters.getOwnerWindow);
928 assertEqualsString('testParseCmdLine_QuotedLanguage2', '', tmpCmdLineParameters.getWindowTitle);
929 assertEqualsString('testParseCmdLine_QuotedLanguage2', 'filE', tmpCmdLineParameters.getFileNames(true));
930 assertEqualsString('testParseCmdLine_QuotedLanguage2', 'filE', tmpCmdLineParameters.getFileNames(false));
931 assertEqualsString('testParseCmdLine_QuotedLanguage2', '', tmpCmdLineParameters.getSearchText);
932 END;
933
934
935 PROCEDURE testParseCmdLine_Language_between;
936 VAR
937 tmpCmdLineString : String;
938 tmpCmdLineParameters : TCmdLineParameters;
939 BEGIN
940 tmpCmdLineString := '-s-lang:DE-h filE';
941 tmpCmdLineParameters := TCmdLineParameters.Create;
942 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
943
944 assertTrue('testParseCmdLine_Language_between', tmpCmdLineParameters.getShowUsageFlag);
945 assertTrue('testParseCmdLine_Language_between', tmpCmdLineParameters.getSearchFlag);
946 assertFalse('testParseCmdLine_Language_between', tmpCmdLineParameters.getGlobalSearchFlag);
947 assertEqualsString('testParseCmdLine_Language_between', 'DE', tmpCmdLineParameters.getLanguage);
948 assertFalse('testParseCmdLine_Language_between', tmpCmdLineParameters.getShowIndexFlag);
949 assertFalse('testParseCmdLine_Language_between', tmpCmdLineParameters.getHelpManagerFlag);
950 assertEqualsInt('testParseCmdLine_Language_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
951 assertEqualsInt('testParseCmdLine_Language_between', 0, tmpCmdLineParameters.getOwnerWindow);
952 assertEqualsString('testParseCmdLine_Language_between', '', tmpCmdLineParameters.getWindowTitle);
953 assertEqualsString('testParseCmdLine_Language_between', 'filE', tmpCmdLineParameters.getFileNames(true));
954 assertEqualsString('testParseCmdLine_Language_between', 'filE', tmpCmdLineParameters.getFileNames(false));
955 assertEqualsString('testParseCmdLine_Language_between', '', tmpCmdLineParameters.getSearchText);
956 END;
957
958
959 PROCEDURE testParseCmdLine_Language_between_withSpace;
960 VAR
961 tmpCmdLineString : String;
962 tmpCmdLineParameters : TCmdLineParameters;
963 BEGIN
964 tmpCmdLineString := '-s-lang:DE-h filE';
965 tmpCmdLineParameters := TCmdLineParameters.Create;
966 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
967
968 assertTrue('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
969 assertTrue('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getSearchFlag);
970 assertFalse('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
971 assertEqualsString('testParseCmdLine_Language_between_withSpace', 'DE', tmpCmdLineParameters.getLanguage);
972 assertFalse('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getShowIndexFlag);
973 assertFalse('testParseCmdLine_Language_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
974 assertEqualsInt('testParseCmdLine_Language_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
975 assertEqualsInt('testParseCmdLine_Language_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
976 assertEqualsString('testParseCmdLine_Language_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
977 assertEqualsString('testParseCmdLine_Language_between_withSpace', 'filE', tmpCmdLineParameters.getFileNames(true));
978 assertEqualsString('testParseCmdLine_Language_between_withSpace', 'filE', tmpCmdLineParameters.getFileNames(false));
979 assertEqualsString('testParseCmdLine_Language_between_withSpace', '', tmpCmdLineParameters.getSearchText);
980 END;
981
982
983 PROCEDURE testParseCmdLine_HelpManagerNumber;
984 VAR
985 tmpCmdLineString : String;
986 tmpCmdLineParameters : TCmdLineParameters;
987 BEGIN
988 tmpCmdLineString := '-Hm:123';
989 tmpCmdLineParameters := TCmdLineParameters.Create;
990 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
991
992 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getShowUsageFlag);
993 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getSearchFlag);
994 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getGlobalSearchFlag);
995 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getLanguage);
996 assertFalse('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getShowIndexFlag);
997 assertTrue('testParseCmdLine_HelpManagerNumber', tmpCmdLineParameters.getHelpManagerFlag);
998 assertEqualsInt('testParseCmdLine_HelpManagerNumber', 123, tmpCmdLineParameters.getHelpManagerWindow);
999 assertEqualsInt('testParseCmdLine_HelpManagerNumber', 0, tmpCmdLineParameters.getOwnerWindow);
1000 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getWindowTitle);
1001 assertEqualsString('testParseCmdLine_HelpManagerNumber', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1002 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getFileNames(false));
1003 assertEqualsString('testParseCmdLine_HelpManagerNumber', '', tmpCmdLineParameters.getSearchText);
1004 END;
1005
1006
1007 PROCEDURE testParseCmdLine_HelpManagerBigNumber;
1008 VAR
1009 tmpCmdLineString : String;
1010 tmpCmdLineParameters : TCmdLineParameters;
1011 BEGIN
1012 tmpCmdLineString := '-Hm:2147484546';
1013 tmpCmdLineParameters := TCmdLineParameters.Create;
1014 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1015
1016 assertFalse('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getShowUsageFlag);
1017 assertFalse('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getSearchFlag);
1018 assertFalse('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getGlobalSearchFlag);
1019 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', '', tmpCmdLineParameters.getLanguage);
1020 assertFalse('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getShowIndexFlag);
1021 assertTrue('testParseCmdLine_HelpManagerBigNumber', tmpCmdLineParameters.getHelpManagerFlag);
1022 assertEqualsInt('testParseCmdLine_HelpManagerBigNumber', 2147484546, tmpCmdLineParameters.getHelpManagerWindow);
1023 assertEqualsInt('testParseCmdLine_HelpManagerBigNumber', 0, tmpCmdLineParameters.getOwnerWindow);
1024 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', '', tmpCmdLineParameters.getWindowTitle);
1025 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1026 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', '', tmpCmdLineParameters.getFileNames(false));
1027 assertEqualsString('testParseCmdLine_HelpManagerBigNumber', '', tmpCmdLineParameters.getSearchText);
1028 END;
1029
1030
1031 PROCEDURE testParseCmdLine_HelpManagerNumber_WithoutColon;
1032 VAR
1033 tmpCmdLineString : String;
1034 tmpCmdLineParameters : TCmdLineParameters;
1035 BEGIN
1036 tmpCmdLineString := '-Hm123';
1037 tmpCmdLineParameters := TCmdLineParameters.Create;
1038 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1039
1040 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
1041 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getSearchFlag);
1042 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
1043 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getLanguage);
1044 assertFalse('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getShowIndexFlag);
1045 assertTrue('testParseCmdLine_HelpManagerNumber_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
1046 assertEqualsInt('testParseCmdLine_HelpManagerNumber_WithoutColon', 123, tmpCmdLineParameters.getHelpManagerWindow);
1047 assertEqualsInt('testParseCmdLine_HelpManagerNumber_WithoutColon', 0, tmpCmdLineParameters.getOwnerWindow);
1048 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getWindowTitle);
1049 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1050 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getFileNames(false));
1051 assertEqualsString('testParseCmdLine_HelpManagerNumber_WithoutColon', '', tmpCmdLineParameters.getSearchText);
1052 END;
1053
1054
1055 PROCEDURE testParseCmdLine_HelpManagerNumber_Invalid;
1056 VAR
1057 tmpCmdLineString : String;
1058 tmpCmdLineParameters : TCmdLineParameters;
1059 BEGIN
1060 tmpCmdLineString := '-Hm:12u3';
1061 tmpCmdLineParameters := TCmdLineParameters.Create;
1062 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1063
1064 assertTrue('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getShowUsageFlag);
1065 assertFalse('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getSearchFlag);
1066 assertFalse('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getGlobalSearchFlag);
1067 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', '', tmpCmdLineParameters.getLanguage);
1068 assertFalse('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getShowIndexFlag);
1069 assertFalse('testParseCmdLine_HelpManagerNumber_Invalid', tmpCmdLineParameters.getHelpManagerFlag);
1070 assertEqualsInt('testParseCmdLine_HelpManagerNumber_Invalid', 0, tmpCmdLineParameters.getHelpManagerWindow);
1071 assertEqualsInt('testParseCmdLine_HelpManagerNumber_Invalid', 0, tmpCmdLineParameters.getOwnerWindow);
1072 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', '', tmpCmdLineParameters.getWindowTitle);
1073 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1074 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', '', tmpCmdLineParameters.getFileNames(false));
1075 assertEqualsString('testParseCmdLine_HelpManagerNumber_Invalid', '', tmpCmdLineParameters.getSearchText);
1076 END;
1077
1078
1079 PROCEDURE testParseCmdLine_HelpManagerNumber_between;
1080 VAR
1081 tmpCmdLineString : String;
1082 tmpCmdLineParameters : TCmdLineParameters;
1083 BEGIN
1084 tmpCmdLineString := '-s-Hm:12-h';
1085 tmpCmdLineParameters := TCmdLineParameters.Create;
1086 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1087
1088 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getShowUsageFlag);
1089 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getSearchFlag);
1090 assertFalse('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getGlobalSearchFlag);
1091 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getLanguage);
1092 assertFalse('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getShowIndexFlag);
1093 assertTrue('testParseCmdLine_HelpManagerNumber_between', tmpCmdLineParameters.getHelpManagerFlag);
1094 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between', 12, tmpCmdLineParameters.getHelpManagerWindow);
1095 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between', 0, tmpCmdLineParameters.getOwnerWindow);
1096 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getWindowTitle);
1097 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1098 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getFileNames(false));
1099 assertEqualsString('testParseCmdLine_HelpManagerNumber_between', '', tmpCmdLineParameters.getSearchText);
1100 END;
1101
1102
1103 PROCEDURE testParseCmdLine_HelpManagerNumber_between_withSpace;
1104 VAR
1105 tmpCmdLineString : String;
1106 tmpCmdLineParameters : TCmdLineParameters;
1107 BEGIN
1108 tmpCmdLineString := '-s -Hm:12 -h';
1109 tmpCmdLineParameters := TCmdLineParameters.Create;
1110 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1111
1112 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
1113 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getSearchFlag);
1114 assertFalse('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
1115 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getLanguage);
1116 assertFalse('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getShowIndexFlag);
1117 assertTrue('testParseCmdLine_HelpManagerNumber_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
1118 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between_withSpace', 12, tmpCmdLineParameters.getHelpManagerWindow);
1119 assertEqualsInt('testParseCmdLine_HelpManagerNumber_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
1120 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
1121 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1122 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
1123 assertEqualsString('testParseCmdLine_HelpManagerNumber_between_withSpace', '', tmpCmdLineParameters.getSearchText);
1124 END;
1125
1126
1127 PROCEDURE testParseCmdLine_OwnerNumber;
1128 VAR
1129 tmpCmdLineString : String;
1130 tmpCmdLineParameters : TCmdLineParameters;
1131 BEGIN
1132 tmpCmdLineString := '-owNer:1234';
1133 tmpCmdLineParameters := TCmdLineParameters.Create;
1134 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1135
1136 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getShowUsageFlag);
1137 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getSearchFlag);
1138 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getGlobalSearchFlag);
1139 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getLanguage);
1140 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getShowIndexFlag);
1141 assertFalse('testParseCmdLine_OwnerNumber', tmpCmdLineParameters.getHelpManagerFlag);
1142 assertEqualsInt('testParseCmdLine_OwnerNumber', 0, tmpCmdLineParameters.getHelpManagerWindow);
1143 assertEqualsInt('testParseCmdLine_OwnerNumber', 1234, tmpCmdLineParameters.getOwnerWindow);
1144 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getWindowTitle);
1145 assertEqualsString('testParseCmdLine_OwnerNumber', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1146 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getFileNames(false));
1147 assertEqualsString('testParseCmdLine_OwnerNumber', '', tmpCmdLineParameters.getSearchText);
1148 END;
1149
1150
1151 PROCEDURE testParseCmdLine_OwnerNumber_WithoutColon;
1152 VAR
1153 tmpCmdLineString : String;
1154 tmpCmdLineParameters : TCmdLineParameters;
1155 BEGIN
1156 tmpCmdLineString := '-OWNER134';
1157 tmpCmdLineParameters := TCmdLineParameters.Create;
1158 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1159
1160 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
1161 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getSearchFlag);
1162 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
1163 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getLanguage);
1164 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getShowIndexFlag);
1165 assertFalse('testParseCmdLine_OwnerNumber_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
1166 assertEqualsInt('testParseCmdLine_OwnerNumber_WithoutColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
1167 assertEqualsInt('testParseCmdLine_OwnerNumber_WithoutColon', 134, tmpCmdLineParameters.getOwnerWindow);
1168 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getWindowTitle);
1169 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1170 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getFileNames(false));
1171 assertEqualsString('testParseCmdLine_OwnerNumber_WithoutColon', '', tmpCmdLineParameters.getSearchText);
1172 END;
1173
1174
1175 PROCEDURE testParseCmdLine_OwnerNumber_Invalid;
1176 VAR
1177 tmpCmdLineString : String;
1178 tmpCmdLineParameters : TCmdLineParameters;
1179 BEGIN
1180 tmpCmdLineString := '-owner:12x34';
1181 tmpCmdLineParameters := TCmdLineParameters.Create;
1182 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1183
1184 assertTrue('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getShowUsageFlag);
1185 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getSearchFlag);
1186 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getGlobalSearchFlag);
1187 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getLanguage);
1188 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getShowIndexFlag);
1189 assertFalse('testParseCmdLine_OwnerNumber_Invalid', tmpCmdLineParameters.getHelpManagerFlag);
1190 assertEqualsInt('testParseCmdLine_OwnerNumber_Invalid', 0, tmpCmdLineParameters.getHelpManagerWindow);
1191 assertEqualsInt('testParseCmdLine_OwnerNumber_Invalid', 0, tmpCmdLineParameters.getOwnerWindow);
1192 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getWindowTitle);
1193 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1194 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getFileNames(false));
1195 assertEqualsString('testParseCmdLine_OwnerNumber_Invalid', '', tmpCmdLineParameters.getSearchText);
1196 END;
1197
1198
1199 PROCEDURE testParseCmdLine_OwnerNumber_between;
1200 VAR
1201 tmpCmdLineString : String;
1202 tmpCmdLineParameters : TCmdLineParameters;
1203 BEGIN
1204 tmpCmdLineString := '-g-owner:14-s';
1205 tmpCmdLineParameters := TCmdLineParameters.Create;
1206 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1207
1208 assertFalse('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getShowUsageFlag);
1209 assertTrue('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getSearchFlag);
1210 assertTrue('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getGlobalSearchFlag);
1211 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getLanguage);
1212 assertFalse('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getShowIndexFlag);
1213 assertFalse('testParseCmdLine_OwnerNumber_between', tmpCmdLineParameters.getHelpManagerFlag);
1214 assertEqualsInt('testParseCmdLine_OwnerNumber_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
1215 assertEqualsInt('testParseCmdLine_OwnerNumber_between', 14, tmpCmdLineParameters.getOwnerWindow);
1216 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getWindowTitle);
1217 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getFileNames(true));
1218 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getFileNames(false));
1219 assertEqualsString('testParseCmdLine_OwnerNumber_between', '', tmpCmdLineParameters.getSearchText);
1220 END;
1221
1222
1223 PROCEDURE testParseCmdLine_OwnerNumber_between_withSpace;
1224 VAR
1225 tmpCmdLineString : String;
1226 tmpCmdLineParameters : TCmdLineParameters;
1227 BEGIN
1228 tmpCmdLineString := '-g -owner:14 -s';
1229 tmpCmdLineParameters := TCmdLineParameters.Create;
1230 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1231
1232 assertFalse('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
1233 assertTrue('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getSearchFlag);
1234 assertTrue('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
1235 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getLanguage);
1236 assertFalse('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getShowIndexFlag);
1237 assertFalse('testParseCmdLine_OwnerNumber_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
1238 assertEqualsInt('testParseCmdLine_OwnerNumber_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
1239 assertEqualsInt('testParseCmdLine_OwnerNumber_between_withSpace', 14, tmpCmdLineParameters.getOwnerWindow);
1240 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getWindowTitle);
1241 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getFileNames(true));
1242 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
1243 assertEqualsString('testParseCmdLine_OwnerNumber_between_withSpace', '', tmpCmdLineParameters.getSearchText);
1244 END;
1245
1246
1247 PROCEDURE testParseCmdLine_Title;
1248 VAR
1249 tmpCmdLineString : String;
1250 tmpCmdLineParameters : TCmdLineParameters;
1251 BEGIN
1252 tmpCmdLineString := '-Title:Test';
1253 tmpCmdLineParameters := TCmdLineParameters.Create;
1254 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1255
1256 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getShowUsageFlag);
1257 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getSearchFlag);
1258 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getGlobalSearchFlag);
1259 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getLanguage);
1260 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getShowIndexFlag);
1261 assertFalse('testParseCmdLine_Title', tmpCmdLineParameters.getHelpManagerFlag);
1262 assertEqualsInt('testParseCmdLine_Title', 0, tmpCmdLineParameters.getHelpManagerWindow);
1263 assertEqualsInt('testParseCmdLine_Title', 0, tmpCmdLineParameters.getOwnerWindow);
1264 assertEqualsString('testParseCmdLine_Title', 'Test', tmpCmdLineParameters.getWindowTitle);
1265 assertEqualsString('testParseCmdLine_Title', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1266 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getFileNames(false));
1267 assertEqualsString('testParseCmdLine_Title', '', tmpCmdLineParameters.getSearchText);
1268 END;
1269
1270
1271 PROCEDURE testParseCmdLine_Title_WithoutColon;
1272 VAR
1273 tmpCmdLineString : String;
1274 tmpCmdLineParameters : TCmdLineParameters;
1275 BEGIN
1276 tmpCmdLineString := '-titletitlE';
1277 tmpCmdLineParameters := TCmdLineParameters.Create;
1278 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1279
1280 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getShowUsageFlag);
1281 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getSearchFlag);
1282 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getGlobalSearchFlag);
1283 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getLanguage);
1284 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getShowIndexFlag);
1285 assertFalse('testParseCmdLine_Title_WithoutColon', tmpCmdLineParameters.getHelpManagerFlag);
1286 assertEqualsInt('testParseCmdLine_Title_WithoutColon', 0, tmpCmdLineParameters.getHelpManagerWindow);
1287 assertEqualsInt('testParseCmdLine_Title_WithoutColon', 0, tmpCmdLineParameters.getOwnerWindow);
1288 assertEqualsString('testParseCmdLine_Title_WithoutColon', 'titlE', tmpCmdLineParameters.getWindowTitle);
1289 assertEqualsString('testParseCmdLine_Title_WithoutColon', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1290 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getFileNames(false));
1291 assertEqualsString('testParseCmdLine_Title_WithoutColon', '', tmpCmdLineParameters.getSearchText);
1292 END;
1293
1294
1295 PROCEDURE testParseCmdLine_Title_Empty;
1296 VAR
1297 tmpCmdLineString : String;
1298 tmpCmdLineParameters : TCmdLineParameters;
1299 BEGIN
1300 tmpCmdLineString := '-TITLE:';
1301 tmpCmdLineParameters := TCmdLineParameters.Create;
1302 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1303
1304 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getShowUsageFlag);
1305 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getSearchFlag);
1306 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getGlobalSearchFlag);
1307 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getLanguage);
1308 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getShowIndexFlag);
1309 assertFalse('testParseCmdLine_Title_Empty', tmpCmdLineParameters.getHelpManagerFlag);
1310 assertEqualsInt('testParseCmdLine_Title_Empty', 0, tmpCmdLineParameters.getHelpManagerWindow);
1311 assertEqualsInt('testParseCmdLine_Title_Empty', 0, tmpCmdLineParameters.getOwnerWindow);
1312 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getWindowTitle);
1313 assertEqualsString('testParseCmdLine_Title_Empty', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1314 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getFileNames(false));
1315 assertEqualsString('testParseCmdLine_Title_Empty', '', tmpCmdLineParameters.getSearchText);
1316 END;
1317
1318
1319 PROCEDURE testParseCmdLine_QuotedTitle;
1320 VAR
1321 tmpCmdLineString : String;
1322 tmpCmdLineParameters : TCmdLineParameters;
1323 BEGIN
1324 tmpCmdLineString := '"-Title:Test Title"';
1325 tmpCmdLineParameters := TCmdLineParameters.Create;
1326 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1327
1328 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getShowUsageFlag);
1329 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getSearchFlag);
1330 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getGlobalSearchFlag);
1331 assertEqualsString('testParseCmdLine_QuotedTitle', '', tmpCmdLineParameters.getLanguage);
1332 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getShowIndexFlag);
1333 assertFalse('testParseCmdLine_QuotedTitle', tmpCmdLineParameters.getHelpManagerFlag);
1334 assertEqualsInt('testParseCmdLine_QuotedTitle', 0, tmpCmdLineParameters.getHelpManagerWindow);
1335 assertEqualsInt('testParseCmdLine_QuotedTitle', 0, tmpCmdLineParameters.getOwnerWindow);
1336 assertEqualsString('testParseCmdLine_QuotedTitle', 'Test Title', tmpCmdLineParameters.getWindowTitle);
1337 assertEqualsString('testParseCmdLine_QuotedTitle', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1338 assertEqualsString('testParseCmdLine_QuotedTitle', '', tmpCmdLineParameters.getFileNames(false));
1339 assertEqualsString('testParseCmdLine_QuotedTitle', '', tmpCmdLineParameters.getSearchText);
1340 END;
1341
1342
1343 PROCEDURE testParseCmdLine_QuotedTitle2;
1344 VAR
1345 tmpCmdLineString : String;
1346 tmpCmdLineParameters : TCmdLineParameters;
1347 BEGIN
1348 tmpCmdLineString := '-Title:"Test Title"';
1349 tmpCmdLineParameters := TCmdLineParameters.Create;
1350 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1351
1352 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getShowUsageFlag);
1353 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getSearchFlag);
1354 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getGlobalSearchFlag);
1355 assertEqualsString('testParseCmdLine_QuotedTitle2', '', tmpCmdLineParameters.getLanguage);
1356 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getShowIndexFlag);
1357 assertFalse('testParseCmdLine_QuotedTitle2', tmpCmdLineParameters.getHelpManagerFlag);
1358 assertEqualsInt('testParseCmdLine_QuotedTitle2', 0, tmpCmdLineParameters.getHelpManagerWindow);
1359 assertEqualsInt('testParseCmdLine_QuotedTitle2', 0, tmpCmdLineParameters.getOwnerWindow);
1360 assertEqualsString('testParseCmdLine_QuotedTitle2', 'Test Title', tmpCmdLineParameters.getWindowTitle);
1361 assertEqualsString('testParseCmdLine_QuotedTitle2', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1362 assertEqualsString('testParseCmdLine_QuotedTitle2', '', tmpCmdLineParameters.getFileNames(false));
1363 assertEqualsString('testParseCmdLine_QuotedTitle2', '', tmpCmdLineParameters.getSearchText);
1364 END;
1365
1366
1367 PROCEDURE testParseCmdLine_QuotedTitle_AfterFile;
1368 VAR
1369 tmpCmdLineString : String;
1370 tmpCmdLineParameters : TCmdLineParameters;
1371 BEGIN
1372 tmpCmdLineString := 'cmdref "-Title:Test Title"';
1373 tmpCmdLineParameters := TCmdLineParameters.Create;
1374 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1375
1376 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getShowUsageFlag);
1377 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getSearchFlag);
1378 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getGlobalSearchFlag);
1379 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', '', tmpCmdLineParameters.getLanguage);
1380 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getShowIndexFlag);
1381 assertFalse('testParseCmdLine_QuotedTitle_AfterFile', tmpCmdLineParameters.getHelpManagerFlag);
1382 assertEqualsInt('testParseCmdLine_QuotedTitle_AfterFile', 0, tmpCmdLineParameters.getHelpManagerWindow);
1383 assertEqualsInt('testParseCmdLine_QuotedTitle_AfterFile', 0, tmpCmdLineParameters.getOwnerWindow);
1384 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', 'Test Title', tmpCmdLineParameters.getWindowTitle);
1385 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', 'cmdref', tmpCmdLineParameters.getFileNames(true));
1386 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', 'cmdref', tmpCmdLineParameters.getFileNames(false));
1387 assertEqualsString('testParseCmdLine_QuotedTitle_AfterFile', '', tmpCmdLineParameters.getSearchText);
1388 END;
1389
1390
1391 PROCEDURE testParseCmdLine_Title_between;
1392 VAR
1393 tmpCmdLineString : String;
1394 tmpCmdLineParameters : TCmdLineParameters;
1395 BEGIN
1396 tmpCmdLineString := '-h-TITLE:tItlE-s';
1397 tmpCmdLineParameters := TCmdLineParameters.Create;
1398 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1399
1400 assertTrue('testParseCmdLine_Title_between', tmpCmdLineParameters.getShowUsageFlag);
1401 assertTrue('testParseCmdLine_Title_between', tmpCmdLineParameters.getSearchFlag);
1402 assertFalse('testParseCmdLine_Title_between', tmpCmdLineParameters.getGlobalSearchFlag);
1403 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getLanguage);
1404 assertFalse('testParseCmdLine_Title_between', tmpCmdLineParameters.getShowIndexFlag);
1405 assertFalse('testParseCmdLine_Title_between', tmpCmdLineParameters.getHelpManagerFlag);
1406 assertEqualsInt('testParseCmdLine_Title_between', 0, tmpCmdLineParameters.getHelpManagerWindow);
1407 assertEqualsInt('testParseCmdLine_Title_between', 0, tmpCmdLineParameters.getOwnerWindow);
1408 assertEqualsString('testParseCmdLine_Title_between', 'tItlE', tmpCmdLineParameters.getWindowTitle);
1409 assertEqualsString('testParseCmdLine_Title_between', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1410 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getFileNames(false));
1411 assertEqualsString('testParseCmdLine_Title_between', '', tmpCmdLineParameters.getSearchText);
1412 END;
1413
1414
1415 PROCEDURE testParseCmdLine_Title_between_withSpace;
1416 VAR
1417 tmpCmdLineString : String;
1418 tmpCmdLineParameters : TCmdLineParameters;
1419 BEGIN
1420 tmpCmdLineString := '-h-TITLE:tItlE-s';
1421 tmpCmdLineParameters := TCmdLineParameters.Create;
1422 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1423
1424 assertTrue('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getShowUsageFlag);
1425 assertTrue('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getSearchFlag);
1426 assertFalse('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getGlobalSearchFlag);
1427 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getLanguage);
1428 assertFalse('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getShowIndexFlag);
1429 assertFalse('testParseCmdLine_Title_between_withSpace', tmpCmdLineParameters.getHelpManagerFlag);
1430 assertEqualsInt('testParseCmdLine_Title_between_withSpace', 0, tmpCmdLineParameters.getHelpManagerWindow);
1431 assertEqualsInt('testParseCmdLine_Title_between_withSpace', 0, tmpCmdLineParameters.getOwnerWindow);
1432 assertEqualsString('testParseCmdLine_Title_between_withSpace', 'tItlE', tmpCmdLineParameters.getWindowTitle);
1433 assertEqualsString('testParseCmdLine_Title_between_withSpace', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1434 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getFileNames(false));
1435 assertEqualsString('testParseCmdLine_Title_between_withSpace', '', tmpCmdLineParameters.getSearchText);
1436 END;
1437
1438
1439 // can't test start profile
1440
1441 PROCEDURE testParseCmdLine_WindowPos;
1442 VAR
1443 tmpCmdLineString : String;
1444 tmpCmdLineParameters : TCmdLineParameters;
1445 tmpWindowPosition : TWindowPosition;
1446 BEGIN
1447 tmpCmdLineString := '-pos:20,40,60,80';
1448 tmpCmdLineParameters := TCmdLineParameters.Create;
1449 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1450
1451 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getShowUsageFlag);
1452 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getSearchFlag);
1453 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getGlobalSearchFlag);
1454 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getLanguage);
1455 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getShowIndexFlag);
1456 assertFalse('testParseCmdLine_WindowPos', tmpCmdLineParameters.getHelpManagerFlag);
1457 assertEqualsInt('testParseCmdLine_WindowPos', 0, tmpCmdLineParameters.getHelpManagerWindow);
1458 assertEqualsInt('testParseCmdLine_WindowPos', 0, tmpCmdLineParameters.getOwnerWindow);
1459 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getWindowTitle);
1460 assertEqualsString('testParseCmdLine_WindowPos', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1461 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getFileNames(false));
1462 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getSearchText);
1463
1464 assertTrue('testParseCmdLine_WindowPos', tmpCmdLineParameters.getWindowPositionFlag);
1465 tmpWindowPosition := tmpCmdLineParameters.getWindowPosition;
1466 assertEqualsInt('testParseCmdLine_WindowPos', 20, tmpWindowPosition.left);
1467 assertEqualsInt('testParseCmdLine_WindowPos', 40, tmpWindowPosition.bottom);
1468 assertEqualsInt('testParseCmdLine_WindowPos', 60, tmpWindowPosition.width);
1469 assertEqualsInt('testParseCmdLine_WindowPos', 80, tmpWindowPosition.height);
1470 END;
1471
1472
1473
1474 PROCEDURE testParseCmdLine_WindowPosPercentage;
1475 VAR
1476 tmpCmdLineString : String;
1477 tmpCmdLineParameters : TCmdLineParameters;
1478 tmpWindowPosition : TWindowPosition;
1479 BEGIN
1480 tmpCmdLineString := '-pos:100p,100p,50p,50p';
1481 tmpCmdLineParameters := TCmdLineParameters.Create;
1482 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1483
1484 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getShowUsageFlag);
1485 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getSearchFlag);
1486 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getGlobalSearchFlag);
1487 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getShowIndexFlag);
1488 assertEqualsString('testParseCmdLine_WindowPos', '', tmpCmdLineParameters.getLanguage);
1489 assertFalse('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getHelpManagerFlag);
1490 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 0, tmpCmdLineParameters.getHelpManagerWindow);
1491 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 0, tmpCmdLineParameters.getOwnerWindow);
1492 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getWindowTitle);
1493 assertEqualsString('testParseCmdLine_WindowPosPercentage', 'C:\ecs\help\NewView.hlp', tmpCmdLineParameters.getFileNames(true));
1494 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getFileNames(false));
1495 assertEqualsString('testParseCmdLine_WindowPosPercentage', '', tmpCmdLineParameters.getSearchText);
1496
1497 assertTrue('testParseCmdLine_WindowPosPercentage', tmpCmdLineParameters.getWindowPositionFlag);
1498 tmpWindowPosition := tmpCmdLineParameters.getWindowPosition;
1499 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 1920, tmpWindowPosition.left);
1500 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 1200, tmpWindowPosition.bottom);
1501 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 960, tmpWindowPosition.width);
1502 assertEqualsInt('testParseCmdLine_WindowPosPercentage', 600, tmpWindowPosition.height);
1503 END;
1504
1505
1506 PROCEDURE testParseCmdLine_Topic;
1507 VAR
1508 tmpCmdLineString : String;
1509 tmpCmdLineParameters : TCmdLineParameters;
1510 BEGIN
1511 tmpCmdLineString := 'file topi1 topi2';
1512 tmpCmdLineParameters := TCmdLineParameters.Create;
1513 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1514
1515 assertFalse('testParseCmdLine_Topic->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1516 assertFalse('testParseCmdLine_Topic->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1517 assertFalse('testParseCmdLine_Topic->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1518 assertEqualsString('testParseCmdLine_Topic', '', tmpCmdLineParameters.getLanguage);
1519 assertFalse('testParseCmdLine_Topic', tmpCmdLineParameters.getShowIndexFlag);
1520 assertFalse('testParseCmdLine_Topic', tmpCmdLineParameters.getHelpManagerFlag);
1521 assertEqualsInt('testParseCmdLine_Topic', 0, tmpCmdLineParameters.getHelpManagerWindow);
1522 assertEqualsInt('testParseCmdLine_Topic', 0, tmpCmdLineParameters.getOwnerWindow);
1523 assertEqualsString('testParseCmdLine_Topic', '', tmpCmdLineParameters.getWindowTitle);
1524 assertEqualsString('testParseCmdLine_Topic', 'file', tmpCmdLineParameters.getFileNames(true));
1525 assertEqualsString('testParseCmdLine_Topic', 'file', tmpCmdLineParameters.getFileNames(false));
1526 assertEqualsString('testParseCmdLine_Topic', 'topi1 topi2', tmpCmdLineParameters.getSearchText);
1527 END;
1528
1529
1530 PROCEDURE testParseCmdLine_QuotedTopic;
1531 VAR
1532 tmpCmdLineString : String;
1533 tmpCmdLineParameters : TCmdLineParameters;
1534 BEGIN
1535 tmpCmdLineString := 'file "topi1"';
1536 tmpCmdLineParameters := TCmdLineParameters.Create;
1537 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1538
1539 assertFalse('testParseCmdLine_QuotedTopic->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1540 assertFalse('testParseCmdLine_QuotedTopic->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1541 assertFalse('testParseCmdLine_QuotedTopic->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1542 assertEqualsString('testParseCmdLine_QuotedTopic', '', tmpCmdLineParameters.getLanguage);
1543 assertFalse('testParseCmdLine_QuotedTopic', tmpCmdLineParameters.getShowIndexFlag);
1544 assertFalse('testParseCmdLine_QuotedTopic', tmpCmdLineParameters.getHelpManagerFlag);
1545 assertEqualsInt('testParseCmdLine_QuotedTopic', 0, tmpCmdLineParameters.getHelpManagerWindow);
1546 assertEqualsInt('testParseCmdLine_QuotedTopic', 0, tmpCmdLineParameters.getOwnerWindow);
1547 assertEqualsString('testParseCmdLine_QuotedTopic', '', tmpCmdLineParameters.getWindowTitle);
1548 assertEqualsString('testParseCmdLine_QuotedTopic', 'file', tmpCmdLineParameters.getFileNames(true));
1549 assertEqualsString('testParseCmdLine_QuotedTopic', 'file', tmpCmdLineParameters.getFileNames(false));
1550 assertEqualsString('testParseCmdLine_QuotedTopic', 'topi1', tmpCmdLineParameters.getSearchText);
1551 END;
1552
1553
1554 PROCEDURE testParseCmdLine_file;
1555 VAR
1556 tmpCmdLineString : String;
1557 tmpCmdLineParameters : TCmdLineParameters;
1558 BEGIN
1559 tmpCmdLineString := 'file';
1560 tmpCmdLineParameters := TCmdLineParameters.Create;
1561 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1562
1563 assertFalse('testParseCmdLine_file->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1564 assertFalse('testParseCmdLine_file->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1565 assertFalse('testParseCmdLine_file->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1566 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getLanguage);
1567 assertFalse('testParseCmdLine_file', tmpCmdLineParameters.getShowIndexFlag);
1568 assertFalse('testParseCmdLine_file', tmpCmdLineParameters.getHelpManagerFlag);
1569 assertEqualsInt('testParseCmdLine_file', 0, tmpCmdLineParameters.getHelpManagerWindow);
1570 assertEqualsInt('testParseCmdLine_file', 0, tmpCmdLineParameters.getOwnerWindow);
1571 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getWindowTitle);
1572 assertEqualsString('testParseCmdLine_file', 'file', tmpCmdLineParameters.getFileNames(true));
1573 assertEqualsString('testParseCmdLine_file', 'file', tmpCmdLineParameters.getFileNames(false));
1574 assertEqualsString('testParseCmdLine_file', '', tmpCmdLineParameters.getSearchText);
1575 END;
1576
1577
1578 PROCEDURE testParseCmdLine_fileLeadingBlanks;
1579 VAR
1580 tmpCmdLineString : String;
1581 tmpCmdLineParameters : TCmdLineParameters;
1582 BEGIN
1583 tmpCmdLineString := ' file';
1584 tmpCmdLineParameters := TCmdLineParameters.Create;
1585 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1586
1587 assertFalse('testParseCmdLine_fileLeadingBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1588 assertFalse('testParseCmdLine_fileLeadingBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1589 assertFalse('testParseCmdLine_fileLeadingBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1590 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getLanguage);
1591 assertFalse('testParseCmdLine_fileLeadingBlanks', tmpCmdLineParameters.getShowIndexFlag);
1592 assertFalse('testParseCmdLine_fileLeadingBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1593 assertEqualsInt('testParseCmdLine_fileLeadingBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1594 assertEqualsInt('testParseCmdLine_fileLeadingBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1595 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getWindowTitle);
1596 assertEqualsString('testParseCmdLine_fileLeadingBlanks', 'file', tmpCmdLineParameters.getFileNames(true));
1597 assertEqualsString('testParseCmdLine_fileLeadingBlanks', 'file', tmpCmdLineParameters.getFileNames(false));
1598 assertEqualsString('testParseCmdLine_fileLeadingBlanks', '', tmpCmdLineParameters.getSearchText);
1599 END;
1600
1601
1602 PROCEDURE testParseCmdLine_fileTrailingBlanks;
1603 VAR
1604 tmpCmdLineString : String;
1605 tmpCmdLineParameters : TCmdLineParameters;
1606 BEGIN
1607 tmpCmdLineString := 'file ';
1608 tmpCmdLineParameters := TCmdLineParameters.Create;
1609 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1610
1611 assertFalse('testParseCmdLine_fileTrailingBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1612 assertFalse('testParseCmdLine_fileTrailingBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1613 assertFalse('testParseCmdLine_fileTrailingBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1614 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getLanguage);
1615 assertFalse('testParseCmdLine_fileTrailingBlanks', tmpCmdLineParameters.getShowIndexFlag);
1616 assertFalse('testParseCmdLine_fileTrailingBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1617 assertEqualsInt('testParseCmdLine_fileTrailingBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1618 assertEqualsInt('testParseCmdLine_fileTrailingBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1619 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getWindowTitle);
1620 assertEqualsString('testParseCmdLine_fileTrailingBlanks', 'file', tmpCmdLineParameters.getFileNames(true));
1621 assertEqualsString('testParseCmdLine_fileTrailingBlanks', 'file', tmpCmdLineParameters.getFileNames(false));
1622 assertEqualsString('testParseCmdLine_fileTrailingBlanks', '', tmpCmdLineParameters.getSearchText);
1623 END;
1624
1625
1626 PROCEDURE testParseCmdLine_fileQuoted;
1627 VAR
1628 tmpCmdLineString : String;
1629 tmpCmdLineParameters : TCmdLineParameters;
1630 BEGIN
1631 tmpCmdLineString := '"fi -h le"';
1632 tmpCmdLineParameters := TCmdLineParameters.Create;
1633 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1634
1635 assertFalse('testParseCmdLine_fileQuoted->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1636 assertFalse('testParseCmdLine_fileQuoted->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1637 assertFalse('testParseCmdLine_fileQuoted->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1638 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getLanguage);
1639 assertFalse('testParseCmdLine_fileQuoted', tmpCmdLineParameters.getShowIndexFlag);
1640 assertFalse('testParseCmdLine_fileQuoted', tmpCmdLineParameters.getHelpManagerFlag);
1641 assertEqualsInt('testParseCmdLine_fileQuoted', 0, tmpCmdLineParameters.getHelpManagerWindow);
1642 assertEqualsInt('testParseCmdLine_fileQuoted', 0, tmpCmdLineParameters.getOwnerWindow);
1643 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getWindowTitle);
1644 assertEqualsString('testParseCmdLine_fileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1645 assertEqualsString('testParseCmdLine_fileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1646 assertEqualsString('testParseCmdLine_fileQuoted', '', tmpCmdLineParameters.getSearchText);
1647 END;
1648
1649
1650 PROCEDURE testParseCmdLine_fileQuotedMissingClosedQuote;
1651 VAR
1652 tmpCmdLineString : String;
1653 tmpCmdLineParameters : TCmdLineParameters;
1654 BEGIN
1655 tmpCmdLineString := '"fi -h le';
1656 tmpCmdLineParameters := TCmdLineParameters.Create;
1657 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1658
1659 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1660 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1661 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1662 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getLanguage);
1663 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote', tmpCmdLineParameters.getShowIndexFlag);
1664 assertFalse('testParseCmdLine_fileQuotedMissingClosedQuote', tmpCmdLineParameters.getHelpManagerFlag);
1665 assertEqualsInt('testParseCmdLine_fileQuotedMissingClosedQuote', 0, tmpCmdLineParameters.getHelpManagerWindow);
1666 assertEqualsInt('testParseCmdLine_fileQuotedMissingClosedQuote', 0, tmpCmdLineParameters.getOwnerWindow);
1667 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getWindowTitle);
1668 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1669 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1670 assertEqualsString('testParseCmdLine_fileQuotedMissingClosedQuote', '', tmpCmdLineParameters.getSearchText);
1671 END;
1672
1673
1674 PROCEDURE testParseCmdLine_fileQuotedAndText;
1675 VAR
1676 tmpCmdLineString : String;
1677 tmpCmdLineParameters : TCmdLineParameters;
1678 BEGIN
1679 tmpCmdLineString := '"fi -h le" searchText';
1680 tmpCmdLineParameters := TCmdLineParameters.Create;
1681 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1682
1683 assertFalse('testParseCmdLine_fileQuotedAndText->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1684 assertFalse('testParseCmdLine_fileQuotedAndText->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1685 assertFalse('testParseCmdLine_fileQuotedAndText->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1686 assertEqualsString('testParseCmdLine_fileQuotedAndText', '', tmpCmdLineParameters.getLanguage);
1687 assertFalse('testParseCmdLine_fileQuotedAndText', tmpCmdLineParameters.getShowIndexFlag);
1688 assertFalse('testParseCmdLine_fileQuotedAndText', tmpCmdLineParameters.getHelpManagerFlag);
1689 assertEqualsInt('testParseCmdLine_fileQuotedAndText', 0, tmpCmdLineParameters.getHelpManagerWindow);
1690 assertEqualsInt('testParseCmdLine_fileQuotedAndText', 0, tmpCmdLineParameters.getOwnerWindow);
1691 assertEqualsString('testParseCmdLine_fileQuotedAndText', '', tmpCmdLineParameters.getWindowTitle);
1692 assertEqualsString('testParseCmdLine_fileQuotedAndText', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1693 assertEqualsString('testParseCmdLine_fileQuotedAndText', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1694 assertEqualsString('testParseCmdLine_fileQuotedAndText', 'searchText', tmpCmdLineParameters.getSearchText);
1695 END;
1696
1697
1698 PROCEDURE testParseCmdLine_fileQuotedAndTextManyBlanks;
1699 VAR
1700 tmpCmdLineString : String;
1701 tmpCmdLineParameters : TCmdLineParameters;
1702 BEGIN
1703 tmpCmdLineString := '"fi -h le" searchText ';
1704 tmpCmdLineParameters := TCmdLineParameters.Create;
1705 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1706
1707 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1708 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1709 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1710 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', '', tmpCmdLineParameters.getLanguage);
1711 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks', tmpCmdLineParameters.getShowIndexFlag);
1712 assertFalse('testParseCmdLine_fileQuotedAndTextManyBlanks', tmpCmdLineParameters.getHelpManagerFlag);
1713 assertEqualsInt('testParseCmdLine_fileQuotedAndTextManyBlanks', 0, tmpCmdLineParameters.getHelpManagerWindow);
1714 assertEqualsInt('testParseCmdLine_fileQuotedAndTextManyBlanks', 0, tmpCmdLineParameters.getOwnerWindow);
1715 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', '', tmpCmdLineParameters.getWindowTitle);
1716 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1717 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1718 assertEqualsString('testParseCmdLine_fileQuotedAndTextManyBlanks', 'searchText', tmpCmdLineParameters.getSearchText);
1719 END;
1720
1721
1722 PROCEDURE testParseCmdLine_fileQuotedInside;
1723 VAR
1724 tmpCmdLineString : String;
1725 tmpCmdLineParameters : TCmdLineParameters;
1726 BEGIN
1727 tmpCmdLineString := 'test"fi -h le"tes searchText';
1728 tmpCmdLineParameters := TCmdLineParameters.Create;
1729 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1730
1731 assertFalse('testParseCmdLine_fileQuotedInside->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1732 assertFalse('testParseCmdLine_fileQuotedInside->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1733 assertFalse('testParseCmdLine_fileQuotedInside->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1734 assertEqualsString('testParseCmdLine_fileQuotedInside', '', tmpCmdLineParameters.getLanguage);
1735 assertFalse('testParseCmdLine_fileQuotedInside', tmpCmdLineParameters.getShowIndexFlag);
1736 assertFalse('testParseCmdLine_fileQuotedInside', tmpCmdLineParameters.getHelpManagerFlag);
1737 assertEqualsInt('testParseCmdLine_fileQuotedInside', 0, tmpCmdLineParameters.getHelpManagerWindow);
1738 assertEqualsInt('testParseCmdLine_fileQuotedInside', 0, tmpCmdLineParameters.getOwnerWindow);
1739 assertEqualsString('testParseCmdLine_fileQuotedInside', '', tmpCmdLineParameters.getWindowTitle);
1740 assertEqualsString('testParseCmdLine_fileQuotedInside', 'testfi -h letes', tmpCmdLineParameters.getFileNames(true));
1741 assertEqualsString('testParseCmdLine_fileQuotedInside', 'testfi -h letes', tmpCmdLineParameters.getFileNames(false));
1742 assertEqualsString('testParseCmdLine_fileQuotedInside', 'searchText', tmpCmdLineParameters.getSearchText);
1743 END;
1744
1745
1746 PROCEDURE testParseCmdLine_SwitchAndFileQuoted;
1747 VAR
1748 tmpCmdLineString : String;
1749 tmpCmdLineParameters : TCmdLineParameters;
1750 BEGIN
1751 tmpCmdLineString := '-s "fi -h le" searchText';
1752 tmpCmdLineParameters := TCmdLineParameters.Create;
1753 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1754
1755 assertFalse('testParseCmdLine_SwitchAndFileQuoted->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1756 assertTrue('testParseCmdLine_SwitchAndFileQuoted->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1757 assertFalse('testParseCmdLine_SwitchAndFileQuoted->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1758 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', '', tmpCmdLineParameters.getLanguage);
1759 assertFalse('testParseCmdLine_SwitchAndFileQuoted', tmpCmdLineParameters.getShowIndexFlag);
1760 assertFalse('testParseCmdLine_SwitchAndFileQuoted', tmpCmdLineParameters.getHelpManagerFlag);
1761 assertEqualsInt('testParseCmdLine_SwitchAndFileQuoted', 0, tmpCmdLineParameters.getHelpManagerWindow);
1762 assertEqualsInt('testParseCmdLine_SwitchAndFileQuoted', 0, tmpCmdLineParameters.getOwnerWindow);
1763 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', '', tmpCmdLineParameters.getWindowTitle);
1764 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames(true));
1765 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', 'fi -h le', tmpCmdLineParameters.getFileNames(false));
1766 assertEqualsString('testParseCmdLine_SwitchAndFileQuoted', 'searchText', tmpCmdLineParameters.getSearchText);
1767 END;
1768
1769
1770 PROCEDURE testParseCmdLine_SwitchAndFileAndTextQuoted;
1771 VAR
1772 tmpCmdLineString : String;
1773 tmpCmdLineParameters : TCmdLineParameters;
1774 BEGIN
1775 tmpCmdLineString := '-s file "search text"';
1776 tmpCmdLineParameters := TCmdLineParameters.Create;
1777 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1778
1779 assertFalse('testParseCmdLine_SwitchAndFileAndTextQuoted->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1780 assertTrue('testParseCmdLine_SwitchAndFileAndTextQuoted->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1781 assertFalse('testParseCmdLine_SwitchAndFileAndTextQuoted->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1782 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', '', tmpCmdLineParameters.getLanguage);
1783 assertFalse('testParseCmdLine_SwitchAndFileAndTextQuoted', tmpCmdLineParameters.getShowIndexFlag);
1784 assertFalse('testParseCmdLine_SwitchAndFileAndTextQuoted', tmpCmdLineParameters.getHelpManagerFlag);
1785 assertEqualsInt('testParseCmdLine_SwitchAndFileAndTextQuoted', 0, tmpCmdLineParameters.getHelpManagerWindow);
1786 assertEqualsInt('testParseCmdLine_SwitchAndFileAndTextQuoted', 0, tmpCmdLineParameters.getOwnerWindow);
1787 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', '', tmpCmdLineParameters.getWindowTitle);
1788 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', 'file', tmpCmdLineParameters.getFileNames(true));
1789 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', 'file', tmpCmdLineParameters.getFileNames(false));
1790 assertEqualsString('testParseCmdLine_SwitchAndFileAndTextQuoted', '"search text"', tmpCmdLineParameters.getSearchText);
1791 END;
1792
1793
1794 PROCEDURE testParseCmdLine_ReallyLong;
1795 VAR
1796 tmpCmdLineString : AnsiString;
1797 tmpCmdLineParameters : TCmdLineParameters;
1798 i : integer;
1799 BEGIN
1800 tmpCmdLineString := '-s ';
1801
1802 // long file name
1803 tmpCmdLineString := tmpCmdLineString + 'LongFileName';
1804 for i := 1 to 30 do
1805 begin
1806 tmpCmdLineString := tmpCmdLineString + '0123456789';
1807 end;
1808
1809 // long search text
1810 tmpCmdLineString := tmpCmdLineString + ' LongSearchText';
1811 for i := 1 to 30 do
1812 begin
1813 tmpCmdLineString := tmpCmdLineString + '0123456789';
1814 end;
1815
1816 tmpCmdLineParameters := TCmdLineParameters.Create;
1817 tmpCmdLineParameters.parseCmdLine(tmpCmdLineString);
1818
1819 assertFalse('testParseCmdLine_ReallyLong->ShowUsageFlag', tmpCmdLineParameters.getShowUsageFlag);
1820 assertTrue('testParseCmdLine_ReallyLong->SearchFlag', tmpCmdLineParameters.getSearchFlag);
1821 assertFalse('testParseCmdLine_ReallyLong->GlobalSearchFlag', tmpCmdLineParameters.getGlobalSearchFlag);
1822 assertEqualsString('testParseCmdLine_ReallyLong', '', tmpCmdLineParameters.getLanguage);
1823 assertFalse('testParseCmdLine_ReallyLong', tmpCmdLineParameters.getShowIndexFlag);
1824 assertFalse('testParseCmdLine_ReallyLong', tmpCmdLineParameters.getHelpManagerFlag);
1825 assertEqualsInt('testParseCmdLine_ReallyLong', 0, tmpCmdLineParameters.getHelpManagerWindow);
1826 assertEqualsInt('testParseCmdLine_ReallyLong', 0, tmpCmdLineParameters.getOwnerWindow);
1827 assertEqualsString('testParseCmdLine_ReallyLong', '', tmpCmdLineParameters.getWindowTitle);
1828
1829 assertEqualsInt('testParseCmdLine_ReallyLong', 312, Length(tmpCmdLineParameters.getFileNames(true)));
1830 assertEqualsInt('testParseCmdLine_ReallyLong', 312, Length(tmpCmdLineParameters.getFileNames(false)));
1831 assertEqualsInt('testParseCmdLine_ReallyLong', 314, Length(tmpCmdLineParameters.getSearchText));
1832 END;
1833
1834
1835 // ----------------------------------------------------------
1836
1837
1838 PROCEDURE testParseAndExpandFileNames_EmptyString;
1839 VAR
1840 tmpFileNamesString : String;
1841 tmpFileNamesList: TStringList;
1842 BEGIN
1843 tmpFileNamesString := '';
1844
1845 tmpFileNamesList := TStringList.Create;
1846 ParseAndExpandFileNames(tmpFileNamesString, tmpFileNamesList);
1847
1848 assertEqualsInt('testParseAndExpandFileNames_EmptyString', 0, tmpFileNamesList.Count);
1849
1850 tmpFileNamesList.Destroy;
1851 END;
1852
1853
1854 PROCEDURE testParseAndExpandFileNames_OneFile;
1855 VAR
1856 tmpFileNamesString : String;
1857 tmpFileNamesList: TStringList;
1858 BEGIN
1859 tmpFileNamesString := 'cmdref';
1860
1861 tmpFileNamesList := TStringList.Create;
1862 ParseAndExpandFileNames(tmpFileNamesString, tmpFileNamesList);
1863
1864 assertEqualsInt('testParseAndExpandFileNames_OneFile', 1, tmpFileNamesList.Count);
1865 assertEqualsString('testParseAndExpandFileNames_OneFile', 'cmdref', tmpFileNamesList[0]);
1866
1867 tmpFileNamesList.Destroy;
1868 END;
1869
1870
1871 PROCEDURE testParseAndExpandFileNames_TwoFiles;
1872 VAR
1873 tmpFileNamesString : String;
1874 tmpFileNamesList: TStringList;
1875 BEGIN
1876 tmpFileNamesString := 'cmdref+second';
1877
1878 tmpFileNamesList := TStringList.Create;
1879 ParseAndExpandFileNames(tmpFileNamesString, tmpFileNamesList);
1880
1881 assertEqualsInt('testParseAndExpandFileNames_TwoFiles', 2, tmpFileNamesList.Count);
1882 assertEqualsString('testParseAndExpandFileNames_TwoFiles', 'cmdref', tmpFileNamesList[0]);
1883 assertEqualsString('testParseAndExpandFileNames_TwoFiles', 'second', tmpFileNamesList[1]);
1884
1885 tmpFileNamesList.Destroy;
1886 END;
1887
1888
1889 PROCEDURE testParseAndExpandFileNames_PlusAtEnd;
1890 VAR
1891 tmpFileNamesString : String;
1892 tmpFileNamesList: TStringList;
1893 BEGIN
1894 tmpFileNamesString := 'cmdref+second+';
1895
1896 tmpFileNamesList := TStringList.Create;
1897 ParseAndExpandFileNames(tmpFileNamesString, tmpFileNamesList);
1898
1899 assertEqualsInt('testParseAndExpandFileNames_PlusAtEnd', 2, tmpFileNamesList.Count);
1900 assertEqualsString('testParseAndExpandFileNames_PlusAtEnd', 'cmdref', tmpFileNamesList[0]);
1901 assertEqualsString('testParseAndExpandFileNames_PlusAtEnd', 'second', tmpFileNamesList[1]);
1902
1903 tmpFileNamesList.Destroy;
1904 END;
1905
1906
1907 PROCEDURE testParseAndExpandFileNames_GLOSSARY;
1908 VAR
1909 tmpFileNamesString : String;
1910 tmpFileNamesList: TStringList;
1911 BEGIN
1912 tmpFileNamesString := 'GLOSSARY';
1913
1914 tmpFileNamesList := TStringList.Create;
1915 ParseAndExpandFileNames(tmpFileNamesString, tmpFileNamesList);
1916
1917 assertEqualsInt('testParseAndExpandFileNames_GLOSSARY', 1, tmpFileNamesList.Count);
1918 assertEqualsString('testParseAndExpandFileNames_GLOSSARY', 'C:\OS2\HELP\GLOSS\WPGLOSS.HLP', tmpFileNamesList[0]);
1919
1920 tmpFileNamesList.Destroy;
1921 END;
1922
1923
1924 PROCEDURE testParseAndExpandFileNames_GlossaryMixedCase;
1925 VAR
1926 tmpFileNamesString : String;
1927 tmpFileNamesList: TStringList;
1928 BEGIN
1929 tmpFileNamesString := 'Glossary';
1930
1931 tmpFileNamesList := TStringList.Create;
1932 ParseAndExpandFileNames(tmpFileNamesString, tmpFileNamesList);
1933
1934 assertEqualsInt('testParseAndExpandFileNames_GlossaryMixedCase', 1, tmpFileNamesList.Count);
1935 assertEqualsString('testParseAndExpandFileNames_GlossaryMixedCase', 'Glossary', tmpFileNamesList[0]);
1936
1937 tmpFileNamesList.Destroy;
1938 END;
1939
1940
1941 PROCEDURE testParseAndExpandFileNames_HELP;
1942 VAR
1943 tmpFileNamesString : String;
1944 tmpFileNamesList: TStringList;
1945 BEGIN
1946 tmpFileNamesString := 'HELP';
1947
1948 tmpFileNamesList := TStringList.Create;
1949 ParseAndExpandFileNames(tmpFileNamesString, tmpFileNamesList);
1950
1951 assertEqualsInt('testParseAndExpandFileNames_HELP', 116, tmpFileNamesList.Count);
1952 assertEqualsString('testParseAndExpandFileNames_HELP', 'D:\progs\develop\watcom_18\BINP\HELP\ide.hlp', tmpFileNamesList[0]);
1953 assertEqualsString('testParseAndExpandFileNames_HELP', 'D:\progs\develop\watcom_18\BINP\HELP\wbrw.hlp', tmpFileNamesList[1]);
1954 assertEqualsString('testParseAndExpandFileNames_HELP', 'D:\progs\develop\watcom_18\BINP\HELP\wccerrs.hlp', tmpFileNamesList[2]);
1955 assertEqualsString('testParseAndExpandFileNames_HELP', 'D:\progs\develop\watcom_18\BINP\HELP\wd.hlp', tmpFileNamesList[3]);
1956 assertEqualsString('testParseAndExpandFileNames_HELP', 'D:\progs\develop\watcom_18\BINP\HELP\wpperrs.hlp', tmpFileNamesList[4]);
1957 assertEqualsString('testParseAndExpandFileNames_HELP', 'D:\progs\develop\watcom_18\BINP\HELP\wprof.hlp', tmpFileNamesList[5]);
1958 assertEqualsString('testParseAndExpandFileNames_HELP', 'C:\MPTN\ddccmst.hlp', tmpFileNamesList[6]);
1959 assertEqualsString('testParseAndExpandFileNames_HELP', 'C:\MPTN\dhcamst.hlp', tmpFileNamesList[7]);
1960 assertEqualsString('testParseAndExpandFileNames_HELP', 'C:\MPTN\dhcmmst.hlp', tmpFileNamesList[8]);
1961 assertEqualsString('testParseAndExpandFileNames_HELP', 'C:\MPTN\dipamst.hlp', tmpFileNamesList[9]);
1962 assertEqualsString('testParseAndExpandFileNames_HELP', 'C:\ecs\help\ae.hlp', tmpFileNamesList[10]);
1963
1964 assertEqualsString('testParseAndExpandFileNames_HELP', 'C:\MMOS2\HELP\wepmplus.hlp', tmpFileNamesList[115]);
1965
1966 tmpFileNamesList.Destroy;
1967 END;
1968
1969
1970 // ----------------------------------------------------------
1971
1972
1973 FUNCTION getCmdLineParameterUnitTests : TList;
1974 BEGIN
1975 result := TList.Create;
1976
1977 result.add(@testParseCmdLine_Empty);
1978
1979 result.add(@testParseCmdLine_QuestionMark);
1980 result.add(@testParseCmdLine_QuotedQuestionMark);
1981 result.add(@testParseCmdLine_lowerH);
1982 result.add(@testParseCmdLine_upperH);
1983 result.add(@testParseCmdLine_lowerHelp);
1984 result.add(@testParseCmdLine_upperHELP);
1985 result.add(@testParseCmdLine_upperHE);
1986 result.add(@testParseCmdLine_h_between);
1987 result.add(@testParseCmdLine_h_between_withSpace);
1988
1989 result.add(@testParseCmdLine_lowerS);
1990 result.add(@testParseCmdLine_upperS);
1991 result.add(@testParseCmdLine_upperS_withBlank);
1992 result.add(@testParseCmdLine_QuotedS);
1993 result.add(@testParseCmdLine_emptyS);
1994
1995 result.add(@testParseCmdLine_s_between);
1996 result.add(@testParseCmdLine_s_between_withSpace);
1997 result.add(@testParseCmdLine_help_and_s);
1998 result.add(@testParseCmdLine_s_and_help);
1999 result.add(@testParseCmdLine_help_and_s_without_blank);
2000
2001 result.add(@testParseCmdLine_lowerG);
2002 result.add(@testParseCmdLine_upperG);
2003 result.add(@testParseCmdLine_QuotedG);
2004 result.add(@testParseCmdLine_emptyG);
2005 result.add(@testParseCmdLine_g_between);
2006 result.add(@testParseCmdLine_g_between_withSpace);
2007
2008 result.add(@testParseCmdLine_lowerI);
2009 result.add(@testParseCmdLine_upperI);
2010 result.add(@testParseCmdLine_QuotedI);
2011 result.add(@testParseCmdLine_emptyI);
2012 result.add(@testParseCmdLine_i_between);
2013 result.add(@testParseCmdLine_i_between_withSpace);
2014
2015 result.add(@testParseCmdLine_Language);
2016
2017 result.add(@testParseCmdLine_Language_Empty);
2018 result.add(@testParseCmdLine_Language_Empty_WithColon);
2019 result.add(@testParseCmdLine_Language_WithFile);
2020 result.add(@testParseCmdLine_QuotedLanguage);
2021 result.add(@testParseCmdLine_QuotedLanguage2);
2022 result.add(@testParseCmdLine_Language_between);
2023 result.add(@testParseCmdLine_Language_between_withSpace);
2024
2025 result.add(@testParseCmdLine_HelpManagerNumber);
2026 result.add(@testParseCmdLine_HelpManagerBigNumber);
2027 result.add(@testParseCmdLine_HelpManagerNumber_WithoutColon);
2028 result.add(@testParseCmdLine_HelpManagerNumber_Invalid);
2029 result.add(@testParseCmdLine_HelpManagerNumber_between);
2030 result.add(@testParseCmdLine_HelpManagerNumber_between_withSpace);
2031
2032 result.add(@testParseCmdLine_OwnerNumber);
2033 result.add(@testParseCmdLine_OwnerNumber_WithoutColon);
2034 result.add(@testParseCmdLine_OwnerNumber_Invalid);
2035 result.add(@testParseCmdLine_OwnerNumber_between);
2036 result.add(@testParseCmdLine_OwnerNumber_between_withSpace);
2037
2038
2039 result.add(@testParseCmdLine_Title);
2040 result.add(@testParseCmdLine_Title_WithoutColon);
2041 result.add(@testParseCmdLine_Title_Empty);
2042 result.add(@testParseCmdLine_QuotedTitle);
2043 result.add(@testParseCmdLine_QuotedTitle2);
2044 result.add(@testParseCmdLine_QuotedTitle_AfterFile);
2045 result.add(@testParseCmdLine_Title_between);
2046 result.add(@testParseCmdLine_Title_between_withSpace);
2047
2048 result.add(@testParseCmdLine_WindowPos);
2049 result.add(@testParseCmdLine_WindowPosPercentage);
2050
2051 result.add(@testParseCmdLine_Topic);
2052 result.add(@testParseCmdLine_QuotedTopic);
2053
2054 result.add(@testParseCmdLine_file);
2055 result.add(@testParseCmdLine_fileLeadingBlanks);
2056 result.add(@testParseCmdLine_fileTrailingBlanks);
2057 result.add(@testParseCmdLine_fileQuoted);
2058 result.add(@testParseCmdLine_fileQuotedMissingClosedQuote);
2059 result.add(@testParseCmdLine_fileQuotedAndText);
2060 result.add(@testParseCmdLine_fileQuotedAndTextManyBlanks);
2061 result.add(@testParseCmdLine_fileQuotedInside);
2062
2063 result.add(@testParseCmdLine_SwitchAndFileQuoted);
2064 result.add(@testParseCmdLine_SwitchAndFileAndTextQuoted);
2065
2066 result.add(@testParseCmdLine_ReallyLong);
2067
2068 result.add(@testParseAndExpandFileNames_EmptyString);
2069 result.add(@testParseAndExpandFileNames_OneFile);
2070 result.add(@testParseAndExpandFileNames_TwoFiles);
2071 result.add(@testParseAndExpandFileNames_PlusAtEnd);
2072 result.add(@testParseAndExpandFileNames_GLOSSARY);
2073 result.add(@testParseAndExpandFileNames_GlossaryMixedCase);
2074 result.add(@testParseAndExpandFileNames_HELP);
2075
2076 END;
2077
2078END.
Note: See TracBrowser for help on using the repository browser.