rev |
line source |
devi@70
|
1 #!/bin/sh
|
devi@70
|
2
|
devi@105
|
3 # (c) Igor Chubin, igor@chub.in, 2004-2006
|
devi@70
|
4
|
devi@76
|
5 # Environment variables set by the script:
|
devi@76
|
6 #
|
devi@76
|
7 # L3_SESSION_ID - uniq id of the LiLaLo-session
|
devi@76
|
8 # L3_PARENT_TTY - name of tty on which script is running
|
devi@76
|
9 # PS1 - intercative shell prompt in which LiLaLo hides
|
devi@76
|
10 # various information about the command
|
devi@76
|
11 # L3_TAMPERED_EDITORS - list of editors which are tampered with functions
|
devi@76
|
12
|
devi@76
|
13
|
devi@76
|
14 # Functions with the names starting _l3_ are internal.
|
devi@76
|
15 # Such functions are unset before this rc script exits
|
devi@76
|
16
|
devi@76
|
17 _l3_editors_to_tamper='/bin/vi /usr/bin/vi /usr/bin/vim /bin/ee /usr/bin/ee /usr/bin/pico /usr/bin/nano /usr/local/bin/vim'
|
devi@76
|
18
|
devi@70
|
19 _l3_start()
|
devi@70
|
20 {
|
devi@80
|
21 echo $- | grep -q i || return 0
|
devi@79
|
22 if _l3_is_running_here
|
devi@76
|
23 then
|
devi@76
|
24 _l3_env
|
devi@76
|
25 _l3_init_prompt
|
devi@76
|
26 l3_fix_prompt
|
devi@76
|
27 _l3_tamper_editors
|
devi@76
|
28 _l3_tamper_commands
|
devi@76
|
29 _l3_unset_internal
|
devi@79
|
30 else
|
devi@79
|
31 _l3_start_session
|
devi@79
|
32 _l3_run_script
|
devi@76
|
33 fi
|
devi@76
|
34 }
|
devi@76
|
35
|
devi@76
|
36 # ===================== STAGE 1 ============================
|
devi@76
|
37
|
devi@79
|
38 _l3_is_running_here()
|
devi@76
|
39 {
|
devi@79
|
40 ps waux | awk '{print $2" "$11 }' | grep -q ^$PPID" "script
|
devi@79
|
41 return $?
|
devi@79
|
42
|
devi@79
|
43 # Check if ^^^^ run on Linux
|
devi@79
|
44 # and del vvvv this if it does
|
devi@79
|
45
|
devi@76
|
46 export L3_TTY=`/usr/bin/tty`
|
igor@158
|
47 uname -a | egrep -qi '(bsd|darwin)' && bsd=yes
|
devi@70
|
48 proc_on_the_term=`w | grep "${L3_TTY##/dev/}" | awk '{print $8;}'`
|
devi@70
|
49 # freeBSD:
|
devi@70
|
50 [ -n "$bsd" ] && \
|
devi@70
|
51 proc_on_the_term=`w | grep "${L3_TTY##/dev/tty}" | awk '{print $6;}'`
|
devi@70
|
52
|
devi@79
|
53 [ -n "$proc_on_the_term" ] && echo $proc_on_the_term | grep -q script
|
devi@70
|
54 }
|
devi@70
|
55
|
devi@70
|
56 _l3_start_session()
|
devi@70
|
57 {
|
devi@79
|
58 export L3_SESSION_ID=${RANDOM}${RANDOM}${RANDOM}${RANDOM}-`date +%s`
|
devi@71
|
59 export L3_HOME=~/.lilalo/
|
devi@70
|
60 mkdir -p $L3_HOME
|
devi@70
|
61
|
devi@79
|
62 tty=`/usr/bin/tty`
|
igor@158
|
63 uname -a | egrep -qi '(bsd|darwin)' && bsd=yes
|
devi@70
|
64 parent=`cat /proc/$PPID/cmdline 2> /dev/null`
|
devi@79
|
65 [ -z "$parent" ] && parent="`ps waux | awk '{if ($2 == '$PPID') print $11; }'`"
|
devi@70
|
66 system=`uname -rs`
|
devi@79
|
67 login_from=`who | grep "${tty##/dev/}" | awk '{print $6;}' | tr -d '()'`
|
devi@70
|
68 #[ -n "$bsd" ] && login_from="" #FIXME!
|
devi@70
|
69 start_time=`date +%s`
|
devi@70
|
70 hostname=`hostname -f 2> /dev/null`
|
devi@70
|
71 [ -n "$bsd" ] && hostname=`hostname`
|
devi@70
|
72
|
devi@70
|
73 cat <<INFO > $L3_HOME/$L3_SESSION_ID.info
|
devi@70
|
74 <session>
|
devi@70
|
75 <local_session_id>$L3_SESSION_ID</local_session_id>
|
devi@70
|
76 <hostname>$hostname</hostname>
|
devi@70
|
77 <user>$USER</user>
|
devi@70
|
78 <uid>$UID</uid>
|
devi@70
|
79 <login_from>$login_from</login_from>
|
devi@79
|
80 <tty>$tty</tty>
|
devi@70
|
81 <system>$system</system>
|
devi@70
|
82 <parent>$parent</parent>
|
devi@70
|
83 <ppid>$PPID</ppid>
|
devi@70
|
84 <pid>$$</pid>
|
devi@70
|
85 <start_time>$start_time</start_time>
|
devi@76
|
86 <lang>$LANG</lang>
|
devi@70
|
87 </session>
|
devi@70
|
88 INFO
|
devi@70
|
89
|
devi@79
|
90 unset parent system login_from start_time hostname tty
|
devi@70
|
91 }
|
devi@70
|
92
|
devi@70
|
93 _l3_run_script()
|
devi@70
|
94 {
|
igor@158
|
95 uname -a | egrep -qi '(bsd|darwin)' && bsd=yes
|
devi@70
|
96 flush="-f" #linux
|
devi@70
|
97 [ -n "$bsd" ] && flush="-t 0" #freebsd
|
devi@76
|
98 export L3_PARENT_TTY=`/usr/bin/tty`
|
igor@157
|
99 if [ -n "$bsd" ]
|
igor@157
|
100 then
|
igor@157
|
101 exec script $flush -q $L3_HOME/${L3_SESSION_ID}.script ${0#-}
|
igor@157
|
102 else
|
igor@149
|
103 exec script $flush -c ${0#-} -q $L3_HOME/${L3_SESSION_ID}.script
|
igor@157
|
104 fi
|
devi@70
|
105 }
|
devi@70
|
106
|
devi@76
|
107 # ===================== STAGE 2 ============================
|
devi@76
|
108
|
devi@76
|
109 _l3_env()
|
devi@76
|
110 {
|
devi@76
|
111 trap l3_close_session 2
|
devi@76
|
112 trap l3_close_session EXIT
|
devi@76
|
113 true
|
devi@76
|
114 }
|
devi@76
|
115
|
devi@76
|
116 l3_close_session()
|
devi@70
|
117 {
|
devi@71
|
118 (
|
devi@71
|
119 echo '<history>'
|
devi@71
|
120 history | sed 's/&/\&/; s/</\</g; s/>/\>/g'
|
devi@71
|
121 echo '</history>'
|
devi@71
|
122 ) >> $L3_HOME/$L3_SESSION_ID.info
|
devi@70
|
123 }
|
devi@70
|
124
|
devi@76
|
125 _l3_init_prompt()
|
devi@76
|
126 {
|
devi@76
|
127 PS1='[\u@\h:\W]\$ '
|
devi@77
|
128 [ $UID = 0 ] \
|
devi@77
|
129 && PS1='\[\033[0;31m\]'$PS1'\[\033[0m\]' \
|
devi@77
|
130 || PS1='\[\033[0;32m\]'$PS1'\[\033[0m\]' \
|
devi@76
|
131 export PS1
|
devi@76
|
132 }
|
devi@76
|
133
|
devi@76
|
134 l3_fix_prompt()
|
devi@76
|
135 {
|
igor@119
|
136 export PS1='\[$($L3_HOME/l3prompt "v3#\!#$?#$UID#$$#$(/bin/date +%s)#$PWD#$RANDOM#")$(l3_save_last_line >& /dev/null)\]'$PS1
|
devi@76
|
137 }
|
devi@76
|
138
|
devi@76
|
139 _l3_tamper_editors()
|
devi@76
|
140 {
|
devi@76
|
141 for editor_file in $_l3_editors_to_tamper
|
devi@76
|
142 do
|
devi@76
|
143 [ -x $editor_file ] || continue
|
devi@76
|
144 editor_name=${editor_file##*/}
|
devi@76
|
145 eval "
|
devi@76
|
146 $editor_name() {
|
devi@76
|
147 if [ -d \"\$1\" ]
|
devi@76
|
148 then
|
devi@76
|
149 $editor_file \"\$1\"
|
devi@76
|
150 return \$?
|
devi@76
|
151 else
|
devi@76
|
152 TIME=\"\`date +%s\`\"
|
devi@76
|
153 DIR=\"\"
|
devi@76
|
154 [ \"\${1#/}\" = \"\$1\" ] && DIR=\"\$PWD/\"
|
devi@80
|
155 DIFFNAME=\"\${L3_SESSION_ID}_\${TIME}\`echo \$DIR\$1| sed s@_@__@ | sed 's@/@_@g'\`.diff\"
|
devi@76
|
156 old_file=\"/tmp/l3-saved-\$\$.\$RANDOM.\$RANDOM\"
|
devi@76
|
157 /bin/cp -- \"\$1\" \"\$old_file\" 2> /dev/null
|
devi@76
|
158 $editor_file \"\$@\" || ERR=\$?
|
igor@112
|
159 if [ -e \"\$old_file\" ]
|
igor@112
|
160 then
|
igor@112
|
161 diff -u \"\$old_file\" \"\$1\" > \"\$L3_HOME/\$DIFFNAME\" 2> /dev/null
|
igor@112
|
162 else
|
igor@112
|
163 diff -u /dev/null \"\$1\" > \"\$L3_HOME/\$DIFFNAME\" 2> /dev/null
|
igor@112
|
164 fi
|
devi@76
|
165 /bin/rm \"\$old_file\" 2> /dev/null
|
devi@76
|
166 return \$ERR
|
devi@76
|
167 fi
|
devi@76
|
168 }
|
devi@76
|
169 "
|
devi@76
|
170 L3_TAMPERED_EDITORS="$L3_TAMPERED_EDITORS $editor_name"
|
devi@76
|
171 done
|
devi@76
|
172 [ -n "$L3_TAMPERED_EDITORS" ] && export L3_TAMPERED_EDITORS
|
devi@76
|
173 }
|
devi@76
|
174
|
devi@76
|
175 _l3_tamper_commands()
|
devi@76
|
176 {
|
devi@76
|
177 tty()
|
devi@76
|
178 {
|
devi@76
|
179 [ -n "$L3_PARENT_TTY" ] && echo $L3_PARENT_TTY || /usr/bin/tty
|
devi@76
|
180 }
|
devi@76
|
181 }
|
devi@76
|
182
|
devi@76
|
183 _l3_unset_internal()
|
devi@76
|
184 {
|
devi@76
|
185 unset `set | grep '^_l3_.*()' | sed 's/()//'`
|
devi@76
|
186 unset `set | grep '^_l3_.*=' | sed 's/=.*//'`
|
devi@76
|
187 }
|
devi@78
|
188
|
devi@78
|
189 l3shot()
|
devi@78
|
190 {
|
devi@78
|
191 if [ -x "`which xwd`" ]
|
devi@78
|
192 then
|
devi@78
|
193 _l3_home=${L3_HOME:-~/.lilalo}
|
devi@78
|
194 shot_name="${L3_SESSION_ID}_`date +%s`".xwd
|
devi@78
|
195 echo -n Choose window to be shoot ... >&2
|
devi@78
|
196 [ -d ${_l3_home} ] || mkdir -p ${_l3_home}
|
devi@78
|
197 xwd -out "$_l3_home/$shot_name" \
|
devi@78
|
198 && echo Screenshot is written to ${_l3_home}/${shot_name} \
|
igor@115
|
199 && curl -s -F photo=@$_l3_home/$shot_name http://`l3-config backend_address`/l3-upload
|
devi@78
|
200 else
|
devi@78
|
201 {
|
devi@78
|
202 echo
|
devi@78
|
203 echo "Can't make screenshot :("
|
devi@78
|
204 echo
|
devi@78
|
205 echo I must use program xwd to make screenshot,
|
devi@78
|
206 echo but it seems not to be installed
|
devi@78
|
207 echo Try to find the program in the \"xbase-clients\" package
|
devi@78
|
208 echo
|
devi@78
|
209 } >&2
|
devi@78
|
210 fi
|
devi@78
|
211 }
|
devi@97
|
212
|
igor@111
|
213 l3upload()
|
igor@111
|
214 {
|
igor@111
|
215 if [ $# -lt 1 ]
|
igor@111
|
216 then
|
igor@111
|
217 echo Usage:
|
igor@111
|
218 echo
|
igor@144
|
219 echo l3upload "<filename> [<time>]"
|
igor@111
|
220 echo
|
igor@111
|
221 echo "<filename>" - name of the file to upload
|
igor@111
|
222 return 1
|
igor@111
|
223 else
|
igor@111
|
224 source=$1
|
igor@144
|
225 time=`date +%s`
|
igor@144
|
226 [ -n "$2" ] && time="$2"
|
igor@144
|
227 target="${L3_SESSION_ID}_$time"_"$(echo $source|sed s@.*/@@)"
|
igor@111
|
228 if echo $source | grep -q http://
|
igor@111
|
229 then
|
igor@111
|
230 curl -s "$source" > /tmp/$target
|
igor@111
|
231 else
|
igor@111
|
232 [ -r "$source" ] || { echo "l3upload: Can't open $source for reading" > /dev/stderr; return 1; }
|
igor@111
|
233 cp $source /tmp/$target
|
igor@111
|
234 fi
|
igor@111
|
235 echo Uploaded file name is ${target}
|
igor@115
|
236 curl -s -F photo=@/tmp/$target http://`l3-config backend_address`/l3-upload && rm -f /tmp/$target
|
igor@111
|
237 fi
|
igor@111
|
238 }
|
igor@111
|
239
|
igor@144
|
240 l3mass_upload()
|
igor@144
|
241 {
|
igor@144
|
242 for i in "$@"
|
igor@144
|
243 do
|
igor@144
|
244 l3upload $i `perl -e 'print (((stat("$i"))[9])."\n")'`
|
igor@144
|
245 done
|
igor@144
|
246 }
|
igor@144
|
247
|
devi@97
|
248 # Append lines from "$@" files to the end of the shell history
|
igor@111
|
249 hist_append ()
|
igor@111
|
250 {
|
igor@111
|
251 eval $(cat "$@" | sed 's/"/\\\\"/g' | while read line; do echo history -s \"$line\"\;; done);
|
devi@97
|
252 }
|
devi@97
|
253
|
devi@97
|
254 l3_save_last_line ()
|
devi@97
|
255 {
|
devi@97
|
256 (
|
devi@97
|
257 echo '<cline>'
|
devi@97
|
258 history 1 | sed 's/&/&/; s/</\</g; s/>/\>/g'
|
devi@97
|
259 echo '</cline>'
|
devi@97
|
260 ) >> $L3_HOME/$L3_SESSION_ID.info
|
devi@97
|
261 }
|
devi@97
|
262
|
devi@107
|
263 l3 ()
|
devi@107
|
264 {
|
devi@107
|
265 case "$1" in
|
devi@107
|
266 on)
|
devi@107
|
267 echo switching on
|
devi@107
|
268 ;;
|
devi@107
|
269 off)
|
devi@107
|
270 echo switcing off
|
devi@107
|
271 ;;
|
devi@107
|
272 cd)
|
devi@107
|
273 echo l3cd="$2" > ~/.l3rc
|
devi@107
|
274 ;;
|
devi@107
|
275 pwd)
|
devi@107
|
276 grep ^l3cd= ~/.l3rc | sed s/[^=]*=//
|
devi@107
|
277 ;;
|
devi@107
|
278 *)
|
igor@109
|
279 cat <<EOF
|
igor@109
|
280 l3 [command]:
|
igor@109
|
281
|
igor@109
|
282 cd new_context - change current lilalo context
|
igor@109
|
283 pwd - show current lilalo context
|
igor@109
|
284 on - switch writing on (NOT IMPLEMENTED YET)
|
igor@109
|
285 off - switch writing off (NOT IMPLEMENTED YET)
|
igor@109
|
286
|
igor@109
|
287 EOF
|
devi@107
|
288 ;;
|
devi@107
|
289 esac
|
devi@107
|
290 }
|
devi@97
|
291
|
igor@109
|
292 l3cd()
|
igor@109
|
293 {
|
igor@109
|
294 l3 cd "$@"
|
igor@109
|
295 }
|
igor@109
|
296
|
igor@109
|
297 l3pwd()
|
igor@109
|
298 {
|
igor@109
|
299 l3 pwd
|
igor@109
|
300 }
|
igor@109
|
301
|