| line |
true |
false |
branch |
|
162
|
274 |
182 |
if (not defined $reread and keys %$options) |
|
168
|
90 |
92 |
unless (defined $command_line_options) |
|
171
|
2430 |
810 |
if ($all_options{$_}) { } |
|
188
|
6552 |
0 |
unless defined $$tainted_options{$option} |
|
192
|
116 |
66 |
if ($$tainted_options{'config_file'}) |
|
197
|
5554 |
998 |
unless defined $$tainted_options{$option} |
|
198
|
182 |
0 |
unless defined $$tainted_options{'token'} |
|
202
|
66 |
116 |
unless defined $$tainted_options{'wait_time'} |
|
203
|
66 |
116 |
unless defined $$tainted_options{'end_time'} |
|
204
|
15 |
167 |
unless defined $$tainted_options{'once_only'} |
|
205
|
66 |
116 |
unless defined $$tainted_options{'verbose'} |
|
206
|
66 |
116 |
unless defined $$tainted_options{'collapse'} |
|
207
|
66 |
116 |
unless defined $$tainted_options{'chained'} |
|
208
|
53 |
129 |
unless defined $$tainted_options{'log'} |
|
209
|
66 |
116 |
unless defined $$tainted_options{'log_threshold'} |
|
210
|
66 |
116 |
unless defined $$tainted_options{'log_file'} |
|
211
|
66 |
116 |
unless defined $$tainted_options{'err_file'} |
|
212
|
66 |
116 |
unless defined $$tainted_options{'log_status'} |
|
213
|
63 |
119 |
unless defined $$tainted_options{'ignore_regex'} |
|
214
|
182 |
0 |
unless defined $$tainted_options{'default_time_zone'} |
|
215
|
182 |
0 |
unless defined $$tainted_options{'date'} |
|
216
|
66 |
116 |
unless defined $$tainted_options{'token'} |
|
217
|
66 |
116 |
unless defined $$tainted_options{'smtp_server'} |
|
218
|
66 |
116 |
unless defined $$tainted_options{'smtp_port'} |
|
219
|
66 |
116 |
unless defined $$tainted_options{'smtp_timeout'} |
|
220
|
182 |
0 |
unless defined $$tainted_options{'smtp_sender'} |
|
221
|
66 |
116 |
unless defined $$tainted_options{'mail_from'} |
|
222
|
66 |
116 |
unless defined $$tainted_options{'mail_reply_to'} |
|
223
|
66 |
116 |
unless defined $$tainted_options{'mail_return_path'} |
|
224
|
182 |
0 |
unless defined $$tainted_options{'num_retries'} |
|
225
|
182 |
0 |
unless defined $$tainted_options{'retry_sleep'} |
|
226
|
66 |
116 |
unless defined $$tainted_options{'email'} |
|
227
|
66 |
116 |
unless defined $$tainted_options{'instructions_dir'} |
|
228
|
66 |
116 |
unless defined $$tainted_options{'retry_email'} |
|
229
|
66 |
116 |
unless defined $$tainted_options{'no_retry_email'} |
|
230
|
66 |
116 |
unless defined $$tainted_options{'retry_success_email'} |
|
231
|
66 |
116 |
unless defined $$tainted_options{'no_retry_success_email'} |
|
234
|
0 |
182 |
if ($$tainted_options{'help'}) |
|
242
|
10 |
718 |
unless ($$tainted_options{$req}) |
|
246
|
4 |
178 |
if (@missing) |
|
254
|
167 |
11 |
if ($$tainted_options{'once_only'}) { } |
|
255
|
116 |
62 |
if ($$tainted_options{'collapse'}) { } |
|
256
|
0 |
178 |
if ($$tainted_options{'verbose'}) { } |
|
257
|
116 |
62 |
if ($$tainted_options{'chained'}) { } |
|
258
|
128 |
50 |
if ($$tainted_options{'log'}) { } |
|
263
|
116 |
62 |
if ($$tainted_options{'email'}) |
|
264
|
116 |
0 |
if ($$tainted_options{'email'} =~ /^([a-z0-9\-_:\.\@\+]+)/i) { } |
|
266
|
178 |
0 |
if (defined $$tainted_options{'run_wrapper'}) |
|
267
|
178 |
0 |
if ($$tainted_options{'run_wrapper'} =~ m[^([a-z0-9/_:\\\.\-]+)]i) { } |
|
269
|
178 |
0 |
if (defined $$tainted_options{'family_dir'}) |
|
270
|
178 |
0 |
if ($$tainted_options{'family_dir'} =~ m[^([a-z0-9/_:\\\.\-]+)]i) { } |
|
272
|
178 |
0 |
if (defined $$tainted_options{'job_dir'}) |
|
273
|
178 |
0 |
if ($$tainted_options{'job_dir'} =~ m[^([a-z0-9/_:\\\.\-]+)]i) { } |
|
275
|
178 |
0 |
if (defined $$tainted_options{'log_dir'}) |
|
276
|
178 |
0 |
if ($$tainted_options{'log_dir'} =~ m[^([a-z0-9/_:\\\.\-]+)]i) { } |
|
278
|
178 |
0 |
if (defined $$tainted_options{'end_time'}) |
|
279
|
178 |
0 |
if ($$tainted_options{'end_time'} =~ /(\d{2}:?\d{2})/) { } |
|
282
|
178 |
0 |
if (defined $$tainted_options{'wait_time'}) |
|
283
|
178 |
0 |
if ($$tainted_options{'wait_time'} =~ /^(\d+)$/) { } |
|
285
|
178 |
0 |
if (defined $$tainted_options{'log_threshold'}) |
|
286
|
178 |
0 |
if ($$tainted_options{'log_threshold'} =~ /^([a-z0-9_:\.\@]+)/i) { } |
|
288
|
178 |
0 |
if (defined $$tainted_options{'log_file'}) |
|
289
|
178 |
0 |
if ($$tainted_options{'log_file'} =~ /^([a-z0-9_:\.\-]+)/i) { } |
|
291
|
178 |
0 |
if (defined $$tainted_options{'err_file'}) |
|
292
|
178 |
0 |
if ($$tainted_options{'err_file'} =~ /^([a-z0-9_:\.\-]+)/i) { } |
|
294
|
178 |
0 |
if (defined $$tainted_options{'ignore_regex'}) |
|
297
|
178 |
0 |
if (defined $$tainted_options{'default_time_zone'}) |
|
298
|
178 |
0 |
if ($$tainted_options{'default_time_zone'} =~ m[^([a-z0-9\/\_]+)]i) { } |
|
300
|
0 |
178 |
if ($$tainted_options{'date'}) |
|
301
|
0 |
0 |
if ($$tainted_options{'date'} =~ /^(\d{8})$/i) { } |
|
303
|
178 |
0 |
if ($$tainted_options{'token'}) |
|
305
|
580 |
0 |
if ($r =~ /^([a-z0-9_\.\-]+)/i) { } |
|
316
|
116 |
62 |
if (defined $$tainted_options{'calendar_dir'}) |
|
317
|
116 |
0 |
if ($$tainted_options{'calendar_dir'} =~ m[^([a-z0-9/_:\\\.\-]*)]i) { } |
|
319
|
116 |
62 |
if ($$tainted_options{'instructions_dir'}) |
|
320
|
116 |
0 |
if ($$tainted_options{'instructions_dir'} =~ m[^([a-z0-9/_:\\\.\-]*)]i) { } |
|
322
|
116 |
62 |
if ($$tainted_options{'smtp_server'}) |
|
323
|
116 |
0 |
if ($$tainted_options{'smtp_server'} =~ /^([a-z0-9_\-\.]*)/i) { } |
|
325
|
0 |
178 |
if ($$tainted_options{'smtp_sender'}) |
|
326
|
0 |
0 |
if ($$tainted_options{'smtp_sender'} =~ /^([a-z0-9_:\-\.\@\+]*)/i) { } |
|
328
|
116 |
62 |
if ($$tainted_options{'mail_from'}) |
|
329
|
116 |
0 |
if ($$tainted_options{'mail_from'} =~ /^([a-z0-9_:\-\.\@\+]*)/i) { } |
|
331
|
116 |
62 |
if ($$tainted_options{'mail_reply_to'}) |
|
332
|
116 |
0 |
if ($$tainted_options{'mail_reply_to'} =~ /^([a-z0-9_:\-\.\@\+]*)/i) { } |
|
334
|
116 |
62 |
if ($$tainted_options{'mail_return_path'}) |
|
335
|
116 |
0 |
if ($$tainted_options{'mail_return_path'} =~ /^([a-z0-9_:\-\.\@\+]*)/i) { } |
|
337
|
178 |
0 |
if (defined $$tainted_options{'smtp_port'}) |
|
338
|
178 |
0 |
if ($$tainted_options{'smtp_port'} =~ /^(\d+)/i) { } |
|
340
|
178 |
0 |
if (defined $$tainted_options{'smtp_timeout'}) |
|
341
|
178 |
0 |
if ($$tainted_options{'smtp_timeout'} =~ /^(\d+)/i) { } |
|
343
|
178 |
0 |
if (defined $$tainted_options{'num_retries'}) |
|
344
|
178 |
0 |
if ($$tainted_options{'num_retries'} =~ /^(\d+)/i) { } |
|
346
|
178 |
0 |
if (defined $$tainted_options{'retry_sleep'}) |
|
347
|
178 |
0 |
if ($$tainted_options{'retry_sleep'} =~ /^(\d+)/i) { } |
|
349
|
116 |
62 |
if ($$tainted_options{'retry_email'}) |
|
350
|
116 |
0 |
if ($$tainted_options{'retry_email'} =~ /^([a-z0-9\-_:\.\@\+]*)/i) { } |
|
352
|
0 |
178 |
if ($$tainted_options{'no_retry_email'}) { } |
|
353
|
116 |
62 |
if ($$tainted_options{'retry_success_email'}) |
|
354
|
116 |
0 |
if ($$tainted_options{'retry_success_email'} =~ /^([a-z0-9\-_:\.\@\+]*)/i) { } |
|
356
|
0 |
178 |
if ($$tainted_options{'no_retry_success_email'}) { } |
|
359
|
88 |
90 |
if (%$options) |
|
363
|
3 |
2553 |
if ($$new_options{$_} ne $$options{$_} and not ref $$new_options{$_}) |
|
372
|
0 |
178 |
if $$options{'verbose'} |