[原创]终端互聊的脚本(模访icq)

styr

做了个模访icq的脚本来玩玩，建一个icq用户，考入icq.sh,此用户必须要有系统命令icq的授权。再用户目录下建用户表user.dat ，格式为每行三列： 序号  TTY号  网点名
还有很多地方需要改进，请各位高手多出手啊，谢谢!

user.dat:

1  ttyp0 乐山
2  ttyp1 沙湾
3  ttyp2 现业   
4  ttyp3 太平

icq.sh

1. #/bin/ksh
   
2. #终端聊天shell V050817
   
3. #修正改进 V050818
   
4. trap 'tput sgr0 ; rm $HOME/talk.temp $HOME/icq.tmp 2>/dev/null ; clear ; exit 0 ' 0 1 3 9 15
   
5. trap '' 2
   
6. tput bold
   
7. clear
   
8. icqname="icq"
   
9. 
   
10. test -e $HOME/user.dat || { echo "\n        用户配置表 user.dat 不存在\n\n        请联系管理人员解决 ^_^ " ; read ; exit 0 ; }
    
11. 
    
12. metty=`tty|awk -F"/" '{print $3}'`
    
13. 
    
14. if [ -e $HOME/icq.tmp ]
    
15. then
    
16. me=`awk '{print $3}' $HOME/icq.tmp`
    
17. if [ "$metty" = "$me" ]
    
18. then
    
19. yourtty=`awk '{print $2}' $HOME/icq.tmp`
    
20. yourname=`awk '{ if ($2=="'$yourtty'") print $3}' $HOME/user.dat`   
    
21. mename=`awk '{if ($2=="'metty'") print $3}' $HOME/user.dat`
    
22. mexh=`awk '{if ($2=="'metty'") print $1}' $HOME/user.dat`
    
23. clear ; mesg -y ; echo "\n        你正与 ${yourname} 聊天\n "
    
24. echo "\n        ${mename} 正与你聊天,请选择 ${mexh} 与之对聊\n" >/dev/$yourtty
    
25. /tcb/bin/asroot write $icqname $yourtty ; exit 0
    
26. fi
    
27. fi
    
28. 
    
29. while :
    
30. do
    
31. clear
    
32. who | awk '{print $1,$2}' >$HOME/talk.temp
    
33. sed '/'"$metty"'/d;/^#/d' $HOME/user.dat |awk 'BEGIN{printf("\n%-5s%-10s%-16s\n"),"序号","TTY","用户名"} \
    
34. {printf("%-5s%-10s%-16s\n"),$1,$2,$3}'
    
35. 
    
36. echo -n  "\n        请输入对方的序号(q键退出程序):   "
    
37. read xh
    
38. test "$xh" = "q" -o "$xh" = "Q" && exit 0   
    
39. yourtty=`awk '{if ($1=="'$xh'") print $2 }' $HOME/user.dat 2>/dev/null`
    
40. test -z "$yourtty" && { echo "\n       $xh 未配置TTY\n" ; read ; continue ; }
    
41. 
    
42. ut=`awk '{if ($2=="'$yourtty'") print $2}' $HOME/talk.temp 2>/dev/null`
    
43. test -z "$ut" && { echo "\n       ${ut} 终端未登陆\n" ; read ; echo $icqname $metty $yourtty > $HOME/icq.tmp ; continue ; }
    
44. 
    
45. yn=`awk '{if ($1=="'$icqname'" && $2=="'$ut'") print $1,$2}' $HOME/talk.temp 2>/dev/null`
    
46. test -z "$yn" && { echo "\n        $icqname 用户未在 $ut 终端上登陆\n" ; read ; \
    
47. echo $icqname $metty $yourtty > $HOME/icq.tmp ; continue ;  } || break
    
48. done
    
49. mesg -y
    
50. clear
    
51. echo $icqname $metty $yourtty > $HOME/icq.tmp
    
52. yourname=`awk '{if ($2=="'$ut'") print $3 }' $HOME/user.dat`
    
53. mename=`awk '{if ($2=="'$metty'") print $3 }' $HOME/user.dat`
    
54. mexh=`awk '{if ($2=="'$metty'") print $1 }' $HOME/user.dat`
    
55. echo "\n        你正与 ${yourname} 聊天\n"
    
56. echo "\n        你正与 ${mename} 聊天\n        请选择 ${mexh} 与之对聊\n" >/dev/$yourtty
    
57. /tcb/bin/asroot write $icqname $yourtty

复制代码