Merge branch 'maint'
[git] / git-web--browse.sh
1 #!/bin/sh
2 #
3 # This program launch a web browser on the html page
4 # describing a git command.
5 #
6 # Copyright (c) 2007 Christian Couder
7 # Copyright (c) 2006 Theodore Y. Ts'o
8 #
9 # This file is heavily stolen from git-mergetool.sh, by
10 # Theodore Y. Ts'o (thanks) that is:
11 #
12 # Copyright (c) 2006 Theodore Y. Ts'o
13 #
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.
17 #
18
19 USAGE='[--browser=browser|--tool=browser] [--config=conf.var] url/file ...'
20
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
25
26 valid_custom_tool()
27 {
28         browser_cmd="$(git config "browser.$1.cmd")"
29         test -n "$browser_cmd"
30 }
31
32 valid_tool() {
33         case "$1" in
34                 firefox | iceweasel | konqueror | w3m | links | lynx | dillo | open)
35                         ;; # happy
36                 *)
37                         valid_custom_tool "$1" || return 1
38                         ;;
39         esac
40 }
41
42 init_browser_path() {
43         browser_path=$(git config "browser.$1.path")
44         test -z "$browser_path" && browser_path="$1"
45 }
46
47 while test $# != 0
48 do
49     case "$1" in
50         -b|--browser*|-t|--tool*)
51             case "$#,$1" in
52                 *,*=*)
53                     browser=`expr "z$1" : 'z-[^=]*=\(.*\)'`
54                     ;;
55                 1,*)
56                     usage ;;
57                 *)
58                     browser="$2"
59                     shift ;;
60             esac
61             ;;
62         -c|--config*)
63             case "$#,$1" in
64                 *,*=*)
65                     conf=`expr "z$1" : 'z-[^=]*=\(.*\)'`
66                     ;;
67                 1,*)
68                     usage ;;
69                 *)
70                     conf="$2"
71                     shift ;;
72             esac
73             ;;
74         --)
75             break
76             ;;
77         -*)
78             usage
79             ;;
80         *)
81             break
82             ;;
83     esac
84     shift
85 done
86
87 test $# = 0 && usage
88
89 if test -z "$browser"
90 then
91     for opt in "$conf" "web.browser"
92     do
93         test -z "$opt" && continue
94         browser="`git config $opt`"
95         test -z "$browser" || break
96     done
97     if test -n "$browser" && ! valid_tool "$browser"; then
98         echo >&2 "git config option $opt set to unknown browser: $browser"
99         echo >&2 "Resetting to default..."
100         unset browser
101     fi
102 fi
103
104 if test -z "$browser" ; then
105     if test -n "$DISPLAY"; then
106         browser_candidates="firefox iceweasel konqueror w3m links lynx dillo"
107         if test "$KDE_FULL_SESSION" = "true"; then
108             browser_candidates="konqueror $browser_candidates"
109         fi
110     else
111         browser_candidates="w3m links lynx"
112     fi
113     # SECURITYSESSIONID indicates an OS X GUI login session
114     if test -n "$SECURITYSESSIONID"; then
115         browser_candidates="open $browser_candidates"
116     fi
117
118     for i in $browser_candidates; do
119         init_browser_path $i
120         if type "$browser_path" > /dev/null 2>&1; then
121             browser=$i
122             break
123         fi
124     done
125     test -z "$browser" && die "No known browser available."
126 else
127     valid_tool "$browser" || die "Unknown browser '$browser'."
128
129     init_browser_path "$browser"
130
131     if test -z "$browser_cmd" && ! type "$browser_path" > /dev/null 2>&1; then
132         die "The browser $browser is not available as '$browser_path'."
133     fi
134 fi
135
136 case "$browser" in
137     firefox|iceweasel)
138         # Check version because firefox < 2.0 does not support "-new-tab".
139         vers=$(expr "$($browser_path -version)" : '.* \([0-9][0-9]*\)\..*')
140         NEWTAB='-new-tab'
141         test "$vers" -lt 2 && NEWTAB=''
142         "$browser_path" $NEWTAB "$@" &
143         ;;
144     konqueror)
145         case "$(basename "$browser_path")" in
146             konqueror)
147                 # It's simpler to use kfmclient to open a new tab in konqueror.
148                 browser_path="$(echo "$browser_path" | sed -e 's/konqueror$/kfmclient/')"
149                 type "$browser_path" > /dev/null 2>&1 || die "No '$browser_path' found."
150                 eval "$browser_path" newTab "$@"
151                 ;;
152             kfmclient)
153                 eval "$browser_path" newTab "$@"
154                 ;;
155             *)
156                 "$browser_path" "$@" &
157                 ;;
158         esac
159         ;;
160     w3m|links|lynx|open)
161         eval "$browser_path" "$@"
162         ;;
163     dillo)
164         "$browser_path" "$@" &
165         ;;
166     *)
167         if test -n "$browser_cmd"; then
168             ( eval $browser_cmd "$@" )
169         fi
170         ;;
171 esac