varnish-cache/bin/varnishtest/vtc_logexp.c
1
/*-
2
 * Copyright (c) 2008-2015 Varnish Software AS
3
 * All rights reserved.
4
 *
5
 * Author: Martin Blix Grydeland <martin@varnish-software.com>
6
 *
7
 * Redistribution and use in source and binary forms, with or without
8
 * modification, are permitted provided that the following conditions
9
 * are met:
10
 * 1. Redistributions of source code must retain the above copyright
11
 *    notice, this list of conditions and the following disclaimer.
12
 * 2. Redistributions in binary form must reproduce the above copyright
13
 *    notice, this list of conditions and the following disclaimer in the
14
 *    documentation and/or other materials provided with the distribution.
15
 *
16
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19
 * ARE DISCLAIMED.  IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
20
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26
 * SUCH DAMAGE.
27
 */
28
29
#ifdef VTEST_WITH_VTC_LOGEXPECT
30
31
/* SECTION: logexpect logexpect
32
 *
33
 * Reads the VSL and looks for records matching a given specification. It will
34
 * process records trying to match the first pattern, and when done, will
35
 * continue processing, trying to match the following pattern. If a pattern
36
 * isn't matched, the test will fail.
37
 *
38
 * logexpect threads are declared this way::
39
 *
40
 *         logexpect lNAME -v <id> [-g <grouping>] [-d 0|1] [-q query] \
41
 *                 [vsl arguments] {
42
 *                         expect <skip> <vxid> <tag> <regex>
43
 *                         expect <skip> <vxid> <tag> <regex>
44
 *                         ...
45
 *                 } [-start|-wait]
46
 *
47
 * And once declared, you can start them, or wait on them::
48
 *
49
 *         logexpect lNAME <-start|-wait>
50
 *
51
 * With:
52
 *
53
 * lNAME
54
 *         Name the logexpect thread, it must start with 'l'.
55
 *
56
 * \-v id
57
 *         Specify the varnish instance to use (most of the time, id=v1).
58
 *
59
 * \-g <session|request|vxid|raw
60
 *         Decide how records are grouped, see -g in ``man varnishlog`` for more
61
 *         information.
62
 *
63
 * \-d <0|1>
64
 *         Start processing log records at the head of the log instead of the
65
 *         tail.
66
 *
67
 * \-q query
68
 *         Filter records using a query expression, see ``man vsl-query`` for
69
 *         more information.
70
 * \-m
71
 *         Also emit log records for misses (only for debugging)
72
 *
73
 * \-start
74
 *         Start the logexpect thread in the background.
75
 *
76
 * \-wait
77
 *         Wait for the logexpect thread to finish
78
 *
79
 * VSL arguments (similar to the varnishlog options):
80
 *
81
 * \-b|-c
82
 *         Process only backend/client records.
83
 *
84
 * \-C
85
 *         Use caseless regex
86
 *
87
 * \-i <taglist>
88
 *         Include tags
89
 *
90
 * \-I <[taglist:]regex>
91
 *         Include by regex
92
 *
93
 * \-T <seconds>
94
 *         Transaction end timeout
95
 *
96
 * And the arguments of the specifications lines are:
97
 *
98
 * skip: [uint|*]
99
 *         Max number of record to skip
100
 *
101
 * vxid: [uint|*|=]
102
 *         vxid to match
103
 *
104
 * tag:  [tagname|*|=]
105
 *         Tag to match against
106
 *
107
 * regex:
108
 *         regular expression to match against (optional)
109
 *
110
 * For skip, vxid and tag, '*' matches anything, '=' expects the value of the
111
 * previous matched record.
112
 */
113
114
#include "config.h"
115
116
#include <stdlib.h>
117
#include <stdio.h>
118
#include <string.h>
119
#include <stdint.h>
120
121
#include "vapi/vsm.h"
122
#include "vapi/vsl.h"
123
124
#include "vtc.h"
125
126
#include "vtim.h"
127
#include "vre.h"
128
129
#define LE_ANY  (-1)
130
#define LE_LAST (-2)
131
132
struct logexp_test {
133
        unsigned                        magic;
134
#define LOGEXP_TEST_MAGIC               0x6F62B350
135
        VTAILQ_ENTRY(logexp_test)       list;
136
137
        struct vsb                      *str;
138
        int                             vxid;
139
        int                             tag;
140
        vre_t                           *vre;
141
        int                             skip_max;
142
};
143
144
struct logexp {
145
        unsigned                        magic;
146
#define LOGEXP_MAGIC                    0xE81D9F1B
147
        VTAILQ_ENTRY(logexp)            list;
148
149
        char                            *name;
150
        char                            *vname;
151
        struct vtclog                   *vl;
152
        char                            run;
153
        VTAILQ_HEAD(,logexp_test)       tests;
154
155
        struct logexp_test              *test;
156
        int                             skip_cnt;
157
        int                             vxid_last;
158
        int                             tag_last;
159
160
        int                             m_arg;
161
        int                             d_arg;
162
        enum VSL_grouping_e             g_arg;
163
        char                            *query;
164
165
        struct vsm                      *vsm;
166
        struct VSL_data                 *vsl;
167
        struct VSLQ                     *vslq;
168
        pthread_t                       tp;
169
};
170
171
static VTAILQ_HEAD(, logexp)            logexps =
172
        VTAILQ_HEAD_INITIALIZER(logexps);
173
174
static void
175 1172
logexp_delete_tests(struct logexp *le)
176
{
177
        struct logexp_test *test;
178
179 1172
        CHECK_OBJ_NOTNULL(le, LOGEXP_MAGIC);
180 4916
        while (!VTAILQ_EMPTY(&le->tests)) {
181 3744
                test = VTAILQ_FIRST(&le->tests);
182 3744
                CHECK_OBJ_NOTNULL(test, LOGEXP_TEST_MAGIC);
183 3744
                VTAILQ_REMOVE(&le->tests, test, list);
184 3744
                VSB_destroy(&test->str);
185 3744
                if (test->vre)
186 3300
                        VRE_free(&test->vre);
187 3744
                FREE_OBJ(test);
188
        }
189 1172
}
190
191
static void
192 480
logexp_delete(struct logexp *le)
193
{
194 480
        CHECK_OBJ_NOTNULL(le, LOGEXP_MAGIC);
195 480
        AZ(le->run);
196 480
        AN(le->vsl);
197 480
        VSL_Delete(le->vsl);
198 480
        AZ(le->vslq);
199 480
        logexp_delete_tests(le);
200 480
        free(le->name);
201 480
        free(le->vname);
202 480
        free(le->query);
203 480
        VSM_Destroy(&le->vsm);
204 480
        vtc_logclose(le->vl);
205 480
        FREE_OBJ(le);
206 480
}
207
208
static struct logexp *
209 480
logexp_new(const char *name, const char *varg)
210
{
211
        struct logexp *le;
212
        struct vsb *n_arg;
213
214 480
        ALLOC_OBJ(le, LOGEXP_MAGIC);
215 480
        AN(le);
216 480
        REPLACE(le->name, name);
217 480
        le->vl = vtc_logopen(name);
218 480
        VTAILQ_INIT(&le->tests);
219
220 480
        le->d_arg = 0;
221 480
        le->g_arg = VSL_g_vxid;
222 480
        le->vsm = VSM_New();
223 480
        le->vsl = VSL_New();
224 480
        AN(le->vsm);
225 480
        AN(le->vsl);
226
227 480
        VTAILQ_INSERT_TAIL(&logexps, le, list);
228
229 480
        REPLACE(le->vname, varg);
230
231 480
        n_arg = macro_expandf(le->vl, "${tmpdir}/%s", varg);
232 480
        if (n_arg == NULL)
233 0
                vtc_fatal(le->vl, "-v argument problems");
234 480
        if (VSM_Arg(le->vsm, 'n', VSB_data(n_arg)) <= 0)
235 0
                vtc_fatal(le->vl, "-v argument error: %s",
236 0
                    VSM_Error(le->vsm));
237 480
        VSB_destroy(&n_arg);
238 480
        if (VSM_Attach(le->vsm, -1))
239 0
                vtc_fatal(le->vl, "VSM_Attach: %s", VSM_Error(le->vsm));
240 480
        return (le);
241
}
242
243
static void
244 4444
logexp_next(struct logexp *le)
245
{
246 4444
        CHECK_OBJ_NOTNULL(le, LOGEXP_MAGIC);
247
248 4444
        if (le->test) {
249 3744
                CHECK_OBJ_NOTNULL(le->test, LOGEXP_TEST_MAGIC);
250 3744
                le->test = VTAILQ_NEXT(le->test, list);
251 3744
        } else
252 700
                le->test = VTAILQ_FIRST(&le->tests);
253
254 4444
        CHECK_OBJ_ORNULL(le->test, LOGEXP_TEST_MAGIC);
255 4444
        if (le->test)
256 3744
                vtc_log(le->vl, 3, "expecting| %s", VSB_data(le->test->str));
257 4444
}
258
259
static int v_matchproto_(VSLQ_dispatch_f)
260 17280
logexp_dispatch(struct VSL_data *vsl, struct VSL_transaction * const pt[],
261
    void *priv)
262
{
263
        struct logexp *le;
264
        struct VSL_transaction *t;
265
        int i;
266
        int ok, skip;
267
        int vxid, tag, type, len;
268
        const char *legend, *data;
269
270 17280
        CAST_OBJ_NOTNULL(le, priv, LOGEXP_MAGIC);
271
272 34080
        for (i = 0; (t = pt[i]) != NULL; i++) {
273 71073
                while (1 == VSL_Next(t->c)) {
274 54282
                        if (!VSL_Match(vsl, t->c))
275 60
                                continue;
276
277 54217
                        CHECK_OBJ_NOTNULL(le->test, LOGEXP_TEST_MAGIC);
278 54219
                        AN(t->c->rec.ptr);
279 54222
                        vxid = VSL_ID(t->c->rec.ptr);
280 54222
                        tag = VSL_TAG(t->c->rec.ptr);
281 54222
                        data = VSL_CDATA(t->c->rec.ptr);
282 54222
                        len = VSL_LEN(t->c->rec.ptr) - 1;
283
284 54222
                        if (tag == SLT__Batch)
285 0
                                continue;
286
287 54228
                        ok = 1;
288 54228
                        if (le->test->vxid == LE_LAST) {
289 12860
                                if (le->vxid_last != vxid)
290 532
                                        ok = 0;
291 54233
                        } else if (le->test->vxid >= 0) {
292 22135
                                if (le->test->vxid != vxid)
293 15842
                                        ok = 0;
294 22141
                        }
295 54227
                        if (le->test->tag == LE_LAST) {
296 0
                                if (le->tag_last != tag)
297 0
                                        ok = 0;
298 54226
                        } else if (le->test->tag >= 0) {
299 54220
                                if (le->test->tag != tag)
300 49440
                                        ok = 0;
301 54227
                        }
302 58536
                        if (le->test->vre &&
303 45045
                            le->test->tag >= 0 &&
304 45029
                            le->test->tag == tag &&
305 8620
                            VRE_ERROR_NOMATCH == VRE_exec(le->test->vre, data,
306 4310
                                len, 0, 0, NULL, 0, NULL))
307 986
                                ok = 0;
308
309 54224
                        skip = 0;
310 54224
                        if (!ok && (le->test->skip_max == LE_ANY ||
311 20
                                le->test->skip_max > le->skip_cnt))
312 50474
                                skip = 1;
313
314 54218
                        if (ok)
315 3744
                                legend = "match";
316 50469
                        else if (skip && le->m_arg)
317 0
                                legend = "miss";
318 50476
                        else if (skip)
319 50476
                                legend = NULL;
320
                        else
321 0
                                legend = "err";
322 54217
                        type = VSL_CLIENT(t->c->rec.ptr) ? 'c' :
323 16360
                            VSL_BACKEND(t->c->rec.ptr) ? 'b' : '-';
324
325 54223
                        if (legend != NULL)
326 7488
                                vtc_log(le->vl, 4, "%-5s| %10u %-15s %c %.*s",
327 3744
                                    legend, vxid, VSL_tags[tag], type, len,
328 3744
                                    data);
329
330 54215
                        if (ok) {
331 3744
                                le->vxid_last = vxid;
332 3744
                                le->tag_last = tag;
333 3744
                                le->skip_cnt = 0;
334 3744
                                logexp_next(le);
335 3744
                                if (le->test == NULL)
336
                                        /* End of test script */
337 692
                                        return (1);
338 53523
                        } else if (skip)
339 50463
                                le->skip_cnt++;
340
                        else {
341
                                /* Signal fail */
342 0
                                return (2);
343
                        }
344
                }
345 16800
        }
346
347 16587
        return (0);
348 17279
}
349
350
static void *
351 700
logexp_thread(void *priv)
352
{
353
        struct logexp *le;
354
        int i;
355
356 700
        CAST_OBJ_NOTNULL(le, priv, LOGEXP_MAGIC);
357 700
        AN(le->run);
358 700
        AN(le->vsm);
359 700
        AN(le->vslq);
360
361 700
        AZ(le->test);
362 700
        vtc_log(le->vl, 4, "begin|");
363 700
        if (le->query != NULL)
364 240
                vtc_log(le->vl, 4, "qry| %s", le->query);
365 700
        logexp_next(le);
366 62577
        while (le->test) {
367 61876
                i = VSLQ_Dispatch(le->vslq, logexp_dispatch, le);
368 61876
                if (i == 2)
369 0
                        vtc_fatal(le->vl, "bad| expectation failed");
370 61873
                else if (i < 0)
371 0
                        vtc_fatal(le->vl, "bad| dispatch failed (%d)", i);
372 61876
                else if (i == 0 && le->test)
373 30086
                        VTIM_sleep(0.01);
374
        }
375 700
        vtc_log(le->vl, 4, "end|");
376
377 700
        return (NULL);
378
}
379
380
static void
381 700
logexp_close(struct logexp *le)
382
{
383
384 700
        CHECK_OBJ_NOTNULL(le, LOGEXP_MAGIC);
385 700
        AN(le->vsm);
386 700
        if (le->vslq)
387 700
                VSLQ_Delete(&le->vslq);
388 700
        AZ(le->vslq);
389 700
}
390
391
static void
392 700
logexp_start(struct logexp *le)
393
{
394
        struct VSL_cursor *c;
395
396 700
        CHECK_OBJ_NOTNULL(le, LOGEXP_MAGIC);
397 700
        AN(le->vsl);
398 700
        AZ(le->vslq);
399
400 700
        AN(le->vsl);
401 700
        (void)VSM_Status(le->vsm);
402 1400
        c = VSL_CursorVSM(le->vsl, le->vsm,
403 700
            (le->d_arg ? 0 : VSL_COPT_TAIL) | VSL_COPT_BATCH);
404 700
        if (c == NULL)
405 0
                vtc_fatal(le->vl, "VSL_CursorVSM: %s", VSL_Error(le->vsl));
406 700
        le->vslq = VSLQ_New(le->vsl, &c, le->g_arg, le->query);
407 700
        if (le->vslq == NULL) {
408 0
                VSL_DeleteCursor(c);
409 0
                vtc_fatal(le->vl, "VSLQ_New: %s", VSL_Error(le->vsl));
410
        }
411 700
        AZ(c);
412
413 700
        le->test = NULL;
414 700
        le->skip_cnt = 0;
415 700
        le->vxid_last = le->tag_last = -1;
416 700
        le->run = 1;
417 700
        AZ(pthread_create(&le->tp, NULL, logexp_thread, le));
418 700
}
419
420
static void
421 700
logexp_wait(struct logexp *le)
422
{
423
        void *res;
424
425 700
        CHECK_OBJ_NOTNULL(le, LOGEXP_MAGIC);
426 700
        vtc_log(le->vl, 2, "Waiting for logexp");
427 700
        AZ(pthread_join(le->tp, &res));
428 700
        logexp_close(le);
429 700
        if (res != NULL && !vtc_stop)
430 0
                vtc_fatal(le->vl, "logexp returned \"%p\"", (char *)res);
431 700
        le->run = 0;
432 700
}
433
434
static void
435 3744
cmd_logexp_expect(CMD_ARGS)
436
{
437
        struct logexp *le;
438
        int skip_max;
439
        int vxid;
440
        int tag;
441
        vre_t *vre;
442
        const char *err;
443
        int pos;
444
        struct logexp_test *test;
445
        char *end;
446
447 3744
        (void)cmd;
448 3744
        CAST_OBJ_NOTNULL(le, priv, LOGEXP_MAGIC);
449 3744
        if (av[1] == NULL || av[2] == NULL || av[3] == NULL)
450 0
                vtc_fatal(vl, "Syntax error");
451
452 3744
        if (av[4] != NULL && av[5] != NULL)
453 0
                vtc_fatal(vl, "Syntax error");
454
455 3744
        if (!strcmp(av[1], "*"))
456 1820
                skip_max = LE_ANY;
457
        else {
458 1924
                skip_max = (int)strtol(av[1], &end, 10);
459 1924
                if (*end != '\0' || skip_max < 0)
460 0
                        vtc_fatal(vl, "Not a positive integer: '%s'", av[1]);
461
        }
462 3744
        if (!strcmp(av[2], "*"))
463 572
                vxid = LE_ANY;
464 3172
        else if (!strcmp(av[2], "="))
465 1488
                vxid = LE_LAST;
466
        else {
467 1684
                vxid = (int)strtol(av[2], &end, 10);
468 1684
                if (*end != '\0' || vxid < 0)
469 0
                        vtc_fatal(vl, "Not a positive integer: '%s'", av[2]);
470
        }
471 3744
        if (!strcmp(av[3], "*"))
472 0
                tag = LE_ANY;
473 3744
        else if (!strcmp(av[3], "="))
474 0
                tag = LE_LAST;
475
        else {
476 3744
                tag = VSL_Name2Tag(av[3], strlen(av[3]));
477 3744
                if (tag < 0)
478 0
                        vtc_fatal(vl, "Unknown tag name: '%s'", av[3]);
479
        }
480 3744
        vre = NULL;
481 3744
        if (av[4]) {
482 3300
                vre = VRE_compile(av[4], 0, &err, &pos);
483 3300
                if (vre == NULL)
484 0
                        vtc_fatal(vl, "Regex error (%s): '%s' pos %d",
485 0
                            err, av[4], pos);
486 3300
        }
487
488 3744
        ALLOC_OBJ(test, LOGEXP_TEST_MAGIC);
489 3744
        AN(test);
490 3744
        test->str = VSB_new_auto();
491 3744
        AN(test->str);
492 3744
        AZ(VSB_printf(test->str, "%s %s %s %s ", av[0], av[1], av[2], av[3]));
493 3744
        if (av[4])
494 3300
                VSB_quote(test->str, av[4], -1, 0);
495 3744
        AZ(VSB_finish(test->str));
496 3744
        test->skip_max = skip_max;
497 3744
        test->vxid = vxid;
498 3744
        test->tag = tag;
499 3744
        test->vre = vre;
500 3744
        VTAILQ_INSERT_TAIL(&le->tests, test, list);
501 3744
}
502
503
static const struct cmds logexp_cmds[] = {
504
        { "expect",             cmd_logexp_expect },
505
        { NULL,                 NULL },
506
};
507
508
static void
509 692
logexp_spec(struct logexp *le, const char *spec)
510
{
511 692
        CHECK_OBJ_NOTNULL(le, LOGEXP_MAGIC);
512
513 692
        logexp_delete_tests(le);
514
515 692
        parse_string(spec, logexp_cmds, le, le->vl);
516 692
}
517
518
void
519 4408
cmd_logexpect(CMD_ARGS)
520
{
521
        struct logexp *le, *le2;
522
        int i;
523
524 4408
        (void)priv;
525 4408
        (void)cmd;
526
527 4408
        if (av == NULL) {
528
                /* Reset and free */
529 3664
                VTAILQ_FOREACH_SAFE(le, &logexps, list, le2) {
530 480
                        CHECK_OBJ_NOTNULL(le, LOGEXP_MAGIC);
531 480
                        VTAILQ_REMOVE(&logexps, le, list);
532 480
                        if (le->run) {
533 4
                                (void)pthread_cancel(le->tp);
534 4
                                logexp_wait(le);
535 4
                        }
536 480
                        logexp_delete(le);
537 480
                }
538 3184
                return;
539
        }
540
541 1224
        AZ(strcmp(av[0], "logexpect"));
542 1224
        av++;
543
544 1224
        VTC_CHECK_NAME(vl, av[0], "Logexpect", 'l');
545 1472
        VTAILQ_FOREACH(le, &logexps, list) {
546 992
                if (!strcmp(le->name, av[0]))
547 744
                        break;
548 248
        }
549 1224
        if (le == NULL) {
550 480
                if (strcmp(av[1], "-v") || av[2] == NULL)
551 0
                        vtc_fatal(vl, "new logexp lacks -v");
552 480
                le = logexp_new(av[0], av[2]);
553 480
                av += 2;
554 480
        }
555 1224
        av++;
556
557 4380
        for (; *av != NULL; av++) {
558 3156
                if (vtc_error)
559 0
                        break;
560 3156
                if (!strcmp(*av, "-wait")) {
561 516
                        if (!le->run)
562 0
                                vtc_fatal(le->vl, "logexp not -started '%s'",
563 0
                                        *av);
564 516
                        logexp_wait(le);
565 516
                        continue;
566
                }
567
568
                /*
569
                 * We do an implict -wait if people muck about with a
570
                 * running logexp.
571
                 */
572 2640
                if (le->run)
573 0
                        logexp_wait(le);
574 2640
                AZ(le->run);
575
576 2640
                if (!strcmp(*av, "-v")) {
577 104
                        if (av[1] == NULL || strcmp(av[1], le->vname))
578 0
                                vtc_fatal(le->vl, "-v argument cannot change");
579 104
                        av++;
580 104
                        continue;
581
                }
582 2536
                if (!strcmp(*av, "-d")) {
583 272
                        if (av[1] == NULL)
584 0
                                vtc_fatal(le->vl, "Missing -d argument");
585 272
                        le->d_arg = atoi(av[1]);
586 272
                        av++;
587 272
                        continue;
588
                }
589 2264
                if (!strcmp(*av, "-g")) {
590 616
                        if (av[1] == NULL)
591 0
                                vtc_fatal(le->vl, "Missing -g argument");
592 616
                        i = VSLQ_Name2Grouping(av[1], strlen(av[1]));
593 616
                        if (i < 0)
594 0
                                vtc_fatal(le->vl, "Unknown grouping '%s'",
595 0
                                    av[1]);
596 616
                        le->g_arg = (enum VSL_grouping_e)i;
597 616
                        av++;
598 616
                        continue;
599
                }
600 1648
                if (!strcmp(*av, "-q")) {
601 240
                        if (av[1] == NULL)
602 0
                                vtc_fatal(le->vl, "Missing -q argument");
603 240
                        REPLACE(le->query, av[1]);
604 240
                        av++;
605 240
                        continue;
606
                }
607 1408
                if (!strcmp(*av, "-m")) {
608 0
                        le->m_arg = !le->m_arg;
609 0
                        continue;
610
                }
611 1408
                if (!strcmp(*av, "-start")) {
612 520
                        logexp_start(le);
613 520
                        continue;
614
                }
615 888
                if (!strcmp(*av, "-run")) {
616 180
                        logexp_start(le);
617 180
                        logexp_wait(le);
618 180
                        continue;
619
                }
620 708
                if (**av == '-') {
621 16
                        if (av[1] != NULL) {
622 16
                                if (VSL_Arg(le->vsl, av[0][1], av[1])) {
623 16
                                        av++;
624 16
                                        continue;
625
                                }
626 0
                                vtc_fatal(le->vl, "%s", VSL_Error(le->vsl));
627
                        }
628 0
                        vtc_fatal(le->vl, "Unknown logexp argument: %s", *av);
629
                }
630 692
                logexp_spec(le, *av);
631 692
        }
632 4408
}
633
634
#endif /* VTEST_WITH_VTC_LOGEXPECT */