Subversion Repositories wimsdev

Rev

Rev 2071 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2071 Rev 14893
Line 1... Line 1...
1 
#! /bin/sh
 1 
#! /bin/sh
2 
 
 - 
 
- 
 
 2 
LL="env LC_ALL=C LC_CTYPE=C LANG=C"
3 
dicsort_separator=':'
 3 
dicsort_separator=':'
4 
w_dictionary=dic/syno
 4 
w_dictionary=dic/syno
5 
w_suffix_dictionary=dic/suffix
 5 
w_suffix_dictionary=dic/suffix
6 
w_translator_unknown=leave
 6 
w_translator_unknown=leave
7 
export dicsort_separator w_dictionary w_suffix_dictionary w_translator_unknown
 7 
export dicsort_separator w_dictionary w_suffix_dictionary w_translator_unknown
Line 23... Line 23...
23 
 base=`echo $i | sed 's/\.def$//;s!^op/!!'`
 23 
 base=`echo $i | sed 's/\.def$//;s!^op/!!'`
24 
 index=`echo $base | tr / @`
 24 
 index=`echo $base | tr / @`
25 
 if [ ! -f ind/$index ] || [ ind/$index -ot $i ]; then
 25 
 if [ ! -f ind/$index ] || [ ind/$index -ot $i ]; then
26 
  get=`awk -F'=' '$1=="title" || $1=="synonyme" {print $2};
 26 
  get=`awk -F'=' '$1=="title" || $1=="synonyme" {print $2};
27 
 	$1=="!exit" {exit}' $i |
 27 
 	$1=="!exit" {exit}' $i |
28 
	tr 'çéèêëúùûüáàâäãóòôöõíìïîñýÇÉÈÊËÚÙÛÜÁÀÂÃÄÓÒÔÖÕÍÌÏÎÑÝ' 'ceeeeuuuuaaaaaoooooiiiinyCEEEEUUUUAAAAAOOOOOIIIINY' |
 28 
	$LL tr 'çéèêëúùûüáàâäãóòôöõíìïîñýÇÉÈÊËÚÙÛÜÁÀÂÃÄÓÒÔÖÕÍÌÏÎÑÝ' 'ceeeeuuuuaaaaaoooooiiiinyCEEEEUUUUAAAAAOOOOOIIIINY' |
29 
	tr "[A-Z]\-\012\'" '[a-z] , ' | sed 's/,/, /g' | tr -s '[:blank:]' ' '`
 29 
  $LL	tr "[A-Z]\-\012\'" '[a-z] , ' | sed 's/,/, /g' | tr -s '[:blank:]' ' '`
30 
  wims_exec_parm="$get"
 30 
  wims_exec_parm="$get"
31 
  got=`exec dic/translator | tr , '\012' | sed 's/^ //' | sort | uniq`
 31 
  got=`exec dic/translator | tr , '\012' | sed 's/^ //' | sort | uniq`
32 
  echo "$got" | awk '{print $0":'$base'"}' >ind/$index
 32 
  echo "$got" | awk '{print $0":'$base'"}' >ind/$index
33 
 fi
 33 
 fi
34 
 cat ind/$index >>dic/cmd
 34 
 cat ind/$index >>dic/cmd