granicus.if.org Git - strace/blob - tests/match.awk

   1 #!/bin/gawk
   2 #
   3 # Copyright (c) 2014-2015 Dmitry V. Levin <ldv@altlinux.org>
   4 # All rights reserved.
   5 #
   6 # Redistribution and use in source and binary forms, with or without
   7 # modification, are permitted provided that the following conditions
   8 # are met:
   9 # 1. Redistributions of source code must retain the above copyright
  10 #    notice, this list of conditions and the following disclaimer.
  11 # 2. Redistributions in binary form must reproduce the above copyright
  12 #    notice, this list of conditions and the following disclaimer in the
  13 #    documentation and/or other materials provided with the distribution.
  14 # 3. The name of the author may not be used to endorse or promote products
  15 #    derived from this software without specific prior written permission.
  16 #
  17 # THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18 # IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19 # OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20 # IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21 # INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22 # NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23 # DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24 # THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25 # (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26 # THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27
  28 # s[] is array of match strings
  29 # r[] is array of match patterns
  30
  31 NR > lines { next }
  32
  33 {
  34         if (s[NR]) {
  35                 if ($0 == s[NR])
  36                         next
  37                 print "Line " NR " does not match expected string: " s[NR]
  38         } else {
  39                 if (match($0, r[NR]))
  40                         next
  41                 print "Line " NR " does not match expected pattern: " r[NR]
  42         }
  43
  44         fail = 1
  45 }
  46
  47 END {
  48         if (fail == 0 && NR != lines) {
  49                 fail = 1
  50                 print "Expected " lines " lines, found " NR " line(s)."
  51         }
  52         exit fail
  53 }