more tr portability test script fixes
[git/dkf.git] / git-web--browse.sh
blob1023b9085989aecfdcdc161232ee22de866d5f57
1 #!/bin/sh
3 # This program launch a web browser on the html page
4 # describing a git command.
6 # Copyright (c) 2007 Christian Couder
7 # Copyright (c) 2006 Theodore Y. Ts'o
9 # This file is heavily stolen from git-mergetool.sh, by
10 # Theodore Y. Ts'o (thanks) that is:
12 # Copyright (c) 2006 Theodore Y. Ts'o
14 # This file is licensed under the GPL v2, or a later version
15 # at the discretion of Junio C Hamano or any other official
16 # git maintainer.
19 USAGE='[--browser=browser|--tool=browser] [--config=conf.var] url/file ...'
21 # This must be capable of running outside of git directory, so
22 # the vanilla git-sh-setup should not be used.
23 NONGIT_OK=Yes
24 . git-sh-setup
26 valid_tool() {
27 case "$1" in
28 firefox | iceweasel | konqueror | w3m | links | lynx | dillo | open)
29 ;; # happy
31 return 1
33 esac
36 init_browser_path() {
37 browser_path=$(git config "browser.$1.path")
38 test -z "$browser_path" && browser_path="$1"
41 while test $# != 0
43 case "$1" in
44 -b|--browser*|-t|--tool*)
45 case "$#,$1" in
46 *,*=*)
47 browser=`expr "z$1" : 'z-[^=]*=\(.*\)'`
49 1,*)
50 usage ;;
52 browser="$2"
53 shift ;;
54 esac
56 -c|--config*)
57 case "$#,$1" in
58 *,*=*)
59 conf=`expr "z$1" : 'z-[^=]*=\(.*\)'`
61 1,*)
62 usage ;;
64 conf="$2"
65 shift ;;
66 esac
68 --)
69 break
71 -*)
72 usage
75 break
77 esac
78 shift
79 done
81 test $# = 0 && usage
83 if test -z "$browser"
84 then
85 for opt in "$conf" "web.browser"
87 test -z "$opt" && continue
88 browser="`git config $opt`"
89 test -z "$browser" || break
90 done
91 if test -n "$browser" && ! valid_tool "$browser"; then
92 echo >&2 "git config option $opt set to unknown browser: $browser"
93 echo >&2 "Resetting to default..."
94 unset browser
98 if test -z "$browser" ; then
99 if test -n "$DISPLAY"; then
100 browser_candidates="firefox iceweasel konqueror w3m links lynx dillo"
101 if test "$KDE_FULL_SESSION" = "true"; then
102 browser_candidates="konqueror $browser_candidates"
104 else
105 browser_candidates="w3m links lynx"
107 # SECURITYSESSIONID indicates an OS X GUI login session
108 if test -n "$SECURITYSESSIONID"; then
109 browser_candidates="open $browser_candidates"
112 for i in $browser_candidates; do
113 init_browser_path $i
114 if type "$browser_path" > /dev/null 2>&1; then
115 browser=$i
116 break
118 done
119 test -z "$browser" && die "No known browser available."
120 else
121 valid_tool "$browser" || die "Unknown browser '$browser'."
123 init_browser_path "$browser"
125 if ! type "$browser_path" > /dev/null 2>&1; then
126 die "The browser $browser is not available as '$browser_path'."
130 case "$browser" in
131 firefox|iceweasel)
132 # Check version because firefox < 2.0 does not support "-new-tab".
133 vers=$(expr "$($browser_path -version)" : '.* \([0-9][0-9]*\)\..*')
134 NEWTAB='-new-tab'
135 test "$vers" -lt 2 && NEWTAB=''
136 "$browser_path" $NEWTAB "$@" &
138 konqueror)
139 case "$(basename "$browser_path")" in
140 konqueror)
141 # It's simpler to use kfmclient to open a new tab in konqueror.
142 browser_path="$(echo "$browser_path" | sed -e 's/konqueror$/kfmclient/')"
143 type "$browser_path" > /dev/null 2>&1 || die "No '$browser_path' found."
144 eval "$browser_path" newTab "$@"
146 kfmclient)
147 eval "$browser_path" newTab "$@"
150 "$browser_path" "$@" &
152 esac
154 w3m|links|lynx|open)
155 eval "$browser_path" "$@"
157 dillo)
158 "$browser_path" "$@" &
160 esac