1 | #!/bin/sh |
---|
2 | # |
---|
3 | # $Id: firefox.sh,v 1.8 2007-06-22 15:13:03 rbasch Exp $ |
---|
4 | # Firefox wrapper script for Athena. |
---|
5 | |
---|
6 | moz_progname=firefox |
---|
7 | |
---|
8 | # Profile directory's parent. |
---|
9 | prof_parent=$HOME/.mozilla/firefox |
---|
10 | |
---|
11 | # testlock is used to test whether the profile directory's lock file |
---|
12 | # is actually locked. |
---|
13 | testlock=/usr/bin/testlock |
---|
14 | |
---|
15 | # Get the profile directory path, by parsing the profiles.ini file. |
---|
16 | get_profdir () { |
---|
17 | inifile="$prof_parent/profiles.ini" |
---|
18 | if [ ! -s "$inifile" ]; then |
---|
19 | return 1 |
---|
20 | fi |
---|
21 | awk -F= -v parent="$prof_parent" ' |
---|
22 | BEGIN { |
---|
23 | nprofiles = 0; |
---|
24 | use_default = 1; |
---|
25 | } |
---|
26 | |
---|
27 | $1 ~ /^\[.*\]$/ { |
---|
28 | section = substr($1, 2, length($1) - 2); |
---|
29 | if (section ~ /^Profile[0-9]*$/) { |
---|
30 | id = section; |
---|
31 | nprofiles++; |
---|
32 | } |
---|
33 | } |
---|
34 | $1 == "StartWithLastProfile" { |
---|
35 | if (section == "General") |
---|
36 | use_default = int($2); |
---|
37 | } |
---|
38 | $1 == "Name" { a[id, "name"] = $2; } |
---|
39 | $1 == "IsRelative" { a[id, "isrelative"] = $2; } |
---|
40 | $1 == "Path" { a[id, "path"] = $2; } |
---|
41 | $1 == "Default" { a[id, "default"] = $2; } |
---|
42 | |
---|
43 | END { |
---|
44 | count = 0; |
---|
45 | default_id = ""; |
---|
46 | for (i = 0; i < nprofiles; i++) { |
---|
47 | id = "Profile" i; |
---|
48 | if (a[id, "name"] != "" && a[id, "isrelative"] != "" && |
---|
49 | a[id, "path"] != "") { |
---|
50 | count++; |
---|
51 | if (int(a[id, "default"]) != 0) |
---|
52 | default_id = id; |
---|
53 | } |
---|
54 | } |
---|
55 | if (use_default != 0 && default_id != "") |
---|
56 | id = default_id; |
---|
57 | else if (nprofiles == 1 && count == 1) |
---|
58 | id = "Profile0"; |
---|
59 | else |
---|
60 | id = ""; |
---|
61 | if (id != "") { |
---|
62 | if (int(a[id, "isrelative"]) == 0) |
---|
63 | print a[id, "path"]; |
---|
64 | else |
---|
65 | print parent "/" a[id, "path"]; |
---|
66 | } |
---|
67 | }' $inifile |
---|
68 | } |
---|
69 | |
---|
70 | # Prompt the user on how to deal with an existing locked profile when |
---|
71 | # no running Firefox window can be found, and take action accordingly. |
---|
72 | # Parameter 1 is the profile directory path. |
---|
73 | # If the function returns, the lock file(s) will have been removed per |
---|
74 | # the user's choice, and the caller should continue. Otherwise, the |
---|
75 | # process will exit. |
---|
76 | dispose_lock () { |
---|
77 | lockfile="$1/.parentlock" |
---|
78 | locklink="$1/lock" |
---|
79 | # Extract the IP address and PID from the contents of the symlink. |
---|
80 | # Also note whether firefox used fnctl() to lock .parentlock, |
---|
81 | # which is indicated with a leading '+' in the PID. |
---|
82 | eval `ls -l "$locklink" | awk '{ |
---|
83 | if (split($NF, a, ":") == 2) |
---|
84 | printf("lock_ip=%s ; lock_pid=%d ; use_fcntl=%d\n", |
---|
85 | a[1], int(a[2]), (substr(a[2], 1, 1) == "+")); }'` |
---|
86 | |
---|
87 | # If we cannot recognize the link contents, just continue. |
---|
88 | if [ -z "$lock_ip" ]; then |
---|
89 | return 0 |
---|
90 | fi |
---|
91 | |
---|
92 | local=false |
---|
93 | if [ "$use_fcntl" -ne 0 ]; then |
---|
94 | # An fcntl()-style lock was acquired; check it. |
---|
95 | if [ -f "$lockfile" ]; then |
---|
96 | # testlock tests whether there is a write lock on the file. |
---|
97 | # If so, it outputs the locker's PID, and exits with status 2. |
---|
98 | # If the lock is held by a process running on another host, the |
---|
99 | # PID will be 0. |
---|
100 | pid=`$testlock "$lockfile" 2>/dev/null` |
---|
101 | if [ $? -ne 2 ]; then |
---|
102 | # File is not locked, remove the symlink and continue. |
---|
103 | rm -f "$locklink" |
---|
104 | return 0 |
---|
105 | fi |
---|
106 | # The file is locked. If the lock is held by a process on |
---|
107 | # this machine, the locker pid will be non-0. |
---|
108 | if [ "$pid" -ne 0 ]; then |
---|
109 | local=true |
---|
110 | fi |
---|
111 | fi |
---|
112 | else |
---|
113 | # Handle an old-style (symlink) lock. |
---|
114 | case "$lock_ip" in |
---|
115 | 127.*) |
---|
116 | if ! /usr/bin/fs whichcell "$locklink" > /dev/null 2>&1 ; then |
---|
117 | local=true |
---|
118 | fi |
---|
119 | ;; |
---|
120 | *) |
---|
121 | my_host=`hostname` |
---|
122 | if [ "$lock_ip" = "`host $my_host | awk '{ print $NF; }'`" ]; then |
---|
123 | # Lock is held on this machine. |
---|
124 | local=true |
---|
125 | fi |
---|
126 | ;; |
---|
127 | esac |
---|
128 | fi |
---|
129 | |
---|
130 | if [ "$local" = true ]; then |
---|
131 | # The lock is held by a process on this machine; check if it is |
---|
132 | # still running. |
---|
133 | if kill -0 $lock_pid 2>/dev/null ; then |
---|
134 | # Lock is held by a running process. |
---|
135 | lock_host="this machine" |
---|
136 | else |
---|
137 | # Process is no longer running. Nuke the lock and continue. |
---|
138 | rm -f "$lockfile" "$locklink" |
---|
139 | return 0 |
---|
140 | fi |
---|
141 | else |
---|
142 | # The lock is held by a process on another machine. Get its |
---|
143 | # host name. |
---|
144 | case "$lock_ip" in |
---|
145 | 127.*) |
---|
146 | lock_host="another machine" |
---|
147 | ;; |
---|
148 | *) |
---|
149 | lock_host=`host $lock_ip | \ |
---|
150 | sed -n -e 's/^.*domain name pointer \(.*\)$/\1/p' | \ |
---|
151 | sed -e 's/\.*$//' | tr '[A-Z]' '[a-z]'` |
---|
152 | ;; |
---|
153 | esac |
---|
154 | if [ -z "$lock_host" ]; then |
---|
155 | lock_host="$lock_ip" |
---|
156 | fi |
---|
157 | fi |
---|
158 | |
---|
159 | dialog_text=" |
---|
160 | Your Firefox profile directory is locked by process $lock_pid |
---|
161 | on $lock_host. |
---|
162 | " |
---|
163 | |
---|
164 | dialog_text="$dialog_text |
---|
165 | If you select \"OK\" to continue, the profile will be forcibly |
---|
166 | unlocked; if the process holding the lock is still running, |
---|
167 | you risk corrupting your profile. |
---|
168 | |
---|
169 | If you are not certain whether your Firefox process is still |
---|
170 | running on $lock_host, select \"Cancel\" to exit |
---|
171 | without starting Firefox. |
---|
172 | " |
---|
173 | |
---|
174 | zenity --title "Firefox profile locked" --question --text "$dialog_text" |
---|
175 | |
---|
176 | case $? in |
---|
177 | 0) |
---|
178 | rm -f "$lockfile" "$locklink" |
---|
179 | ;; |
---|
180 | *) |
---|
181 | exit 1 |
---|
182 | ;; |
---|
183 | esac |
---|
184 | } |
---|
185 | |
---|
186 | # Give a warning if we're running on a dialup machine. |
---|
187 | if [ -x /etc/athena/dialuptype ]; then |
---|
188 | cat << \EOF |
---|
189 | |
---|
190 | *** PLEASE DO NOT RUN FIREFOX ON THE DIALUPS! *** |
---|
191 | |
---|
192 | Firefox is a very large and resource-intensive program, and it is |
---|
193 | not appropriate to run it on a dialup machine. |
---|
194 | |
---|
195 | Please run Firefox on your local machine rather than on a dialup. |
---|
196 | |
---|
197 | Thank you. |
---|
198 | |
---|
199 | EOF |
---|
200 | fi |
---|
201 | |
---|
202 | # If this is the first time the user has run firefox, create |
---|
203 | # the top-level profile directory now, so that we can set |
---|
204 | # the ACL appropriately. |
---|
205 | if [ ! -d "$prof_parent" ]; then |
---|
206 | mkdir -p "$prof_parent" |
---|
207 | /usr/bin/fs setacl "$prof_parent" "$ATHENA_USER" all \ |
---|
208 | -clear >/dev/null 2>&1 |
---|
209 | fi |
---|
210 | |
---|
211 | # We want Firefox to download files for helper applications to |
---|
212 | # /var/tmp instead of /tmp, so that users have a better chance |
---|
213 | # of retrieving them later. |
---|
214 | if [ -z "$TMPDIR" ]; then |
---|
215 | TMPDIR=/var/tmp |
---|
216 | export TMPDIR |
---|
217 | fi |
---|
218 | |
---|
219 | # If the user specified any option, skip the check for a running |
---|
220 | # Firefox, and invoke the program now. |
---|
221 | case "$1" in |
---|
222 | -*) |
---|
223 | exec /usr/bin/firefox.debathena-orig "$@" |
---|
224 | ;; |
---|
225 | esac |
---|
226 | |
---|
227 | if [ "${MOZ_NO_REMOTE+set}" = "set" ]; then |
---|
228 | found_running=false |
---|
229 | else |
---|
230 | # See if there is a running instance of Firefox, by trying to |
---|
231 | # "ping" it using X properties. |
---|
232 | user="${LOGNAME:+-u $LOGNAME}" |
---|
233 | /usr/bin/firefox.debathena-orig $user -a "$moz_progname" -remote \ |
---|
234 | "ping()" >/dev/null 2>&1 |
---|
235 | case $? in |
---|
236 | 0) |
---|
237 | # We successfully pinged it. |
---|
238 | found_running=true |
---|
239 | ;; |
---|
240 | 2) |
---|
241 | # This is the expected status when there is no running firefox window. |
---|
242 | found_running=false |
---|
243 | ;; |
---|
244 | *) |
---|
245 | # An unexpected error occurred. |
---|
246 | found_running=error |
---|
247 | ;; |
---|
248 | esac |
---|
249 | fi |
---|
250 | |
---|
251 | # If Firefox is not running, check for a (possibly stale) lock on |
---|
252 | # the profile directory. |
---|
253 | if [ $found_running != true ]; then |
---|
254 | profdir=`get_profdir` |
---|
255 | if [ -n "$profdir" ]; then |
---|
256 | # firefox now uses fcntl()-style locking on .parentlock, but an |
---|
257 | # apparent openafs bug leaves the lock set after the program exits. |
---|
258 | # Fortunately, it still maintains the "lock" symlink (which may |
---|
259 | # also have been left from running a pre-1.5.0 firefox on the |
---|
260 | # profile), so use its presence to help detect a stale lock. |
---|
261 | if [ -h "$profdir/lock" ]; then |
---|
262 | # The symlink exists, so the profile is (potentially) locked. |
---|
263 | dispose_lock "$profdir" |
---|
264 | else |
---|
265 | # The symlink is gone, so just nuke the lock file, to work around |
---|
266 | # the aforementioned openafs bug. |
---|
267 | rm -f "$profdir/.parentlock" |
---|
268 | fi |
---|
269 | fi |
---|
270 | fi |
---|
271 | |
---|
272 | FIRSTRUNFILE="$HOME/.config/edu.mit.ist.firefox.firstrun" |
---|
273 | if ! [ -f "$FIRSTRUNFILE" ]; then |
---|
274 | touch "$FIRSTRUNFILE" |
---|
275 | zenity --warning --title="Firefox on Athena" --text="When running Firefox \ |
---|
276 | on Athena, it is important that you completely quit Firefox (by choosing \ |
---|
277 | \"Quit\" from the \"File\" menu) before logging out. Failure to do so can \ |
---|
278 | corrupt your MIT Certificates and result in you being unable to visit any \ |
---|
279 | sites using SSL (e.g. Gmail, Amazon, etc.). \ |
---|
280 | \n\n |
---|
281 | Click \"OK\" to continue." |
---|
282 | fi |
---|
283 | exec /usr/bin/firefox.debathena-orig "$@" |
---|