summaryrefslogtreecommitdiff
path: root/gen-reportcode-list.sh
blob: cb166190c86f52861114218d8c9f28ae337ca68b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
#!/bin/sh

echo Backends - report codes
echo =======================

for i in *.pl.in *-conf.in
do
  name=`echo $i | cut -d - -f 1`
  let j=`echo $name | wc -c`
  cap=`echo $name | cut -c 1 | tr a-z A-Z`
  name=$cap`echo $name | cut -c 2-64`

  echo
  echo
  echo $name

  while let j=$[j - 1]
  do
    echo -n -
  done

  echo
  echo

  grep xst_report_info $i | sed "s/.*xst_report_info *[(] *//" | \
    sed "s/, *\"/ /" | sed "s/\" *[)]\;.*//" | \
    ( while read line;
    do
      if test x = x`echo $line | cut -d ' ' -f 1 | sed s/[0-9]//g`
      then
        code=$[200 + `echo $line | cut -d ' ' -f 1`]
        desc=`echo $line | cut -d ' ' -f 2-`
      else
        code="2??"
        desc=$line
      fi
      echo $code $desc
    done ) | sort

  grep xst_report_warning $i | sed "s/.*xst_report_warning *[(] *//" | \
    sed "s/, *\"/ /" | sed "s/\" *[)]\;.*//" | \
    ( while read line;
    do
      if test x = x`echo $line | cut -d ' ' -f 1 | sed s/[0-9]//g`
      then
        code=$[300 + `echo $line | cut -d ' ' -f 1`]
        desc=`echo $line | cut -d ' ' -f 2-`
      else
        code="3??"
        desc=$line
      fi
      echo $code $desc
    done ) | sort

  grep xst_report_error $i | sed "s/.*xst_report_error *[(] *//" | \
    sed "s/, *\"/ /" | sed "s/\" *[)]\;.*//" | \
    ( while read line;
    do
      if test x = x`echo $line | cut -d ' ' -f 1 | sed s/[0-9]//g`
      then
        code=$[400 + `echo $line | cut -d ' ' -f 1`]
        desc=`echo $line | cut -d ' ' -f 2-`
      else
        code="4??"
        desc=$line
      fi
      echo $code $desc
    done ) | sort

  grep xst_report_fatal $i | sed "s/.*xst_report_fatal *[(] *//" | \
    sed "s/, *\"/ /" | sed "s/\" *[)]\;.*//" | \
    ( while read line;
    do
      if test x = x`echo $line | cut -d ' ' -f 1 | sed s/[0-9]//g`
      then
        code=$[500 + `echo $line | cut -d ' ' -f 1`]
        desc=`echo $line | cut -d ' ' -f 2-`
      else
        code="5??"
        desc=$line
      fi
      echo $code $desc
    done ) | sort
done