自制简漏的终端聊天脚本,请大家多斧正,谢谢

styr

无聊时用write做了个简单的icq.sh,目前只实现了在同一主机下的所有终端互聊。谈不上什么功能和界面了,主要是抛砖引玉，各位请多修正改进请大家帮着精进啊,谢谢!

脚本简单说明：

  1）由于write默认为root权限，普通用户要使用write必须要先由root授权
授权成功后，可建一普通聊天用户icq(呵呵，不爽就自已改改,当然脚本中的用户名也请相应修改)

   2)icq用户根下必须要有配置表user.dat,规则为每行为3个字段,分别为序号,tty名,网点名称,字段间以空格分隔.各位可按实际情况编辑生成该表,shell根据这表来选择聊天对像,未在该表中反映的终端和用户将不能应用本shell

$cat user.dat
1  ttyp0 沙湾局
2  ttyp1 乐山局

   3)必须要对方TTY开启并已用icq用户登陆才能与之互聊,聊完之后按Ctrl-d即可退出。已在sco5.0.5 ksh下测试通过，在unix下自已和自已聊起来还是别有一番风味的 ^_^

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

复制代码

秋池飞叶

有点意思，研究下

styr

欢迎测试,请多提意见和改进方案,谢谢.

heijude

强人，赞一个！