granicus.if.org Git - strace/blob - maint/syscallent.sh

   1 #!/bin/sh
   2 # Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
   3 # Copyright (c) 1996-2017 The strace developers.
   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 cat ${1+"$@"} |
  29         sed -n 's/^#[   ]*define[       ][      ]*SYS_\([^      ]*\)[   ]*[^0-9]*\([0-9]*\).*$/\1 \2/p
  30 s/^#[   ]*define[       ][      ]*__NR_\([^     ]*\)[   ]*[^0-9]*\([0-9]*\).*$/\1 \2/p
  31 s/^#[ ]*define[ ][ ]*__NR_\([^ ]*\)[ ]*[^0-9()]*(__NR_Linux + \([0-9]*\))$/\1 \2/p' |
  32         sort -k2n | uniq |
  33         awk '
  34         BEGIN {
  35                 tabs = "\t\t\t\t\t\t\t\t"
  36                 call = -1;
  37         }
  38         {
  39                 while (++call < $2) {
  40                         f = "printargs"
  41                         n = "SYS_" call
  42                         s = "\t{ MA,\t0,\t"
  43                         s = s f ","
  44                         s = s substr(tabs, 1, 24/8 - int((length(f) + 1)/8))
  45                         s = s "\"" n "\""
  46                         s = s substr(tabs, 1, 16/8 - int((length(n) + 2)/8))
  47                         s = s "}, /* " call " */"
  48                         print s
  49                 }
  50                 f = "sys_" $1
  51                 n = $1
  52                 s = "\t{ MA,\t0,\t"
  53                 s = s f ","
  54                 s = s substr(tabs, 1, 24/8 - int((length(f) + 1)/8))
  55                 s = s "\"" n "\""
  56                 s = s substr(tabs, 1, 16/8 - int((length(n) + 2)/8))
  57                 s = s "}, /* " call " */"
  58                 print s
  59         }
  60         END {
  61                 limit = call + 100
  62                 while (++call < limit) {
  63                         f = "printargs"
  64                         n = "SYS_" call
  65                         s = "\t{ MA,\t0,\t"
  66                         s = s f ","
  67                         s = s substr(tabs, 1, 24/8 - int((length(f) + 1)/8))
  68                         s = s "\"" n "\""
  69                         s = s substr(tabs, 1, 16/8 - int((length(n) + 2)/8))
  70                         s = s "}, /* " call " */"
  71                         print s
  72                 }
  73         }
  74         '