look1

ksh 实现的基于hpux下的性能数据以及故障的采集程序。可以作为新手练手使用

#!/bin/ksh
#@(#)  查询字典中的字段含义、
if [[ $# != 2 ]] then
   echo 用法： look1 中文或英文  交易终端类型 如 TT,ST
   exit 1
fi
name=$1
if [[ `expr "$1" : '[a-zA-Z0-9_.]*' ` = ${#1} ]] then
   name=`echo $1 | tr "[:upper:]" "[:lower:]"`
fi

digit=0
if [[ `expr "$1" : "[[:digit:]]*" ` = ${#1} ]] then
  digit=1
fi

type=$2
type=`echo $type | tr "[:lower:]" "[:upper:]"`

[[ $type = TT ]] && DictFile=$HOME/dict/dict.dat 
[[ $type = TT ]] || DictFile=$HOME/dict/dict.dat 
[[ $type = ST ]] && DictFile=$HOME/dict/dict.handsome 
[[ $type = SE ]] && DictFile=$HOME/dict/dict.handsome
[[ $type = IB ]] && DictFile=$HOME/dict/dict.ibs
[[ $type = AG ]] && DictFile=$HOME/dict/dict.dat
[[ $type = EX ]] && DictFile=$HOME/dict/dict.dat
[[ $type = KN ]] && DictFile=$HOME/dict/dict.kernel
[[ $type = UM ]] && DictFile=$HOME/dict/dict.fund
[[ $type = CM ]] && DictFile=$HOME/dict/dict.cm

if [[ $digit = 0 ]] then
  nawk ' 
   BEGIN {
     label=0;
   }
   $1!~/^#/ {
     $2 = tolower( $2 );
   } 
   $1~/'"$name"'/ || $2~/'"$name"'/ {
      label = 1;
      printf("%30s  %12s %20s    %s\n", $1, $2,$3,$4) ;
      while( 1 ){
          if( getline == 0 )
            break;
          if( $1~/^#/ || length( $0 ) == 0 )
            print $0;
          else {
            $2 = tolower( $2 );
            if( index( $1, "'"$name"'" ) || index( $2, "'"$name"'" ) ){
              printf("%30s  %12s %20s    %s\n", $1, $2,$3,$4) ;
              continue;
            }
            break;
          }
      }
  }
  END {
    if( label == 0 )
      print "'"$1"' 不在数据字典中 "
  }
  ' $DictFile
else
  nawk ' 
   BEGIN {
     label=0;
     nubr=0;
   }
   $1~/^#/ || length( $0 ) == 0 {
     continue;
   }
   {
     nubr++;
     $2 = tolower( $2 );
     if( nubr == '"$1"' ){
       printf("%-8s %-12s  %-30s \n","'"$1"'", $2, $1) ;
       label = 1;
     }
     if( label == 1 )
       exit( 1 );
  }
  END {
    if( label == 0 )
      print "'"$1"' 不在数据字典中 "
  }
  ' $DictFile
fi