Return to Idgrab CVS log

Up to [XINU] / xinu / sys

Annotation of xinu/sys/Idgrab, revision 1.1.1.1

1.1       root        1: for i in $*
                      2: do sed 's/^[ \t][ \t]*//;/^\/\*/d;/^$/d;s/\/\*.*//;s/[ \t]*$//' < $i   | \
                      3:    awk '$1 == "#define"                {print $2}
                      4: 
                      5:        $1 == "unsigned"        {if ($2 == "int") print $3
                      6:                                 else print $2}
                      7: 
                      8:        $1 == "extern"          {if ($2 == "int") print $3
                      9:                                 if ($2 == "short") print $3
                     10:                                 if ($2 == "char") print $3
                     11:                                 if ($2 == "Bool") print $3
                     12:                                 if ($2 == "struct") print $3, $4 }
                     13: 
                     14:        $1 == "struct"          {print $2, $3}
                     15: 
                     16:        $1 == "typedef"         {print $3}
                     17: 
                     18:        $1 == "int"     ||              \
                     19:        $1 == "char"    ||              \
                     20:        $1 == "Bool"    ||              \
                     21:        $1 == "short"           {print $2}
                     22: 
                     23:        $1 == "unsigned"        {if ($2 == "int" || $2 == "short")
                     24:                                        print $3
                     25:                                 else   print $2}'                      | \
                     26:    sed 's/^[)(\*;\[\]]*//;s/(.*)//;s/\[.*\]//'                         | \
                     27:    sed 's/[}{;)( ]*$//;s/[}{;()\]\[\*]//g'                             | \
                     28:    tr ' ' '\012' | sort | uniq  > $i.id
                     29: done
                     30: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.