test.sh
2.36 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
#!/bin/bash
SESSION=a
DEST=br.com.bb.pw3270
BPATH=/br/com/bb/pw3270
run_command()
{
case $1 in
revision)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getRevision
;;
message)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getMessageID
;;
ssl)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getSecureState
;;
connect)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.connect string:$2
;;
disconnect)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.disconnect
;;
url)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getURL
;;
quit)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.quit
;;
get)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getScreenContents
;;
protect)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getIsProtectedAt int32:$2 int32:$3
;;
set)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.setTextAt int32:$2 int32:$3 string:$4
;;
action)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.action string:$2
;;
enter)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.enter
;;
isconnected)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.isConnected
;;
hostcharset)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getHostCharset
;;
displaycharset)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.getDisplayCharset
;;
unlockdelay)
dbus-send --session --print-reply --dest=$DEST.$SESSION $BPATH $DEST.setUnlockDelay int32:$2
;;
*)
echo "Comando $1 desconhecido"
;;
esac
}
until [ -z "$1" ]
do
if [ ${1:0:2} = '--' ]; then
tmp=${1:2}
parameter=${tmp%%=*}
parameter=$(echo $parameter | tr "[:lower:]" "[:upper:]")
value=${tmp##*=}
case "$parameter" in
SESSION)
SESSION=$value
;;
HELP)
echo "$0 options"
echo ""
echo "Options:"
echo ""
echo " --session pw3270's session manager"
echo ""
exit 0
;;
*)
eval $parameter=$value
;;
esac
else
run_command $@
exit 0
fi
shift
done