git-web--browse.sh 3.87 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
#!/bin/sh
#
# This program launch a web browser on the html page
# describing a git command.
#
# Copyright (c) 2007 Christian Couder
# Copyright (c) 2006 Theodore Y. Ts'o
#
# This file is heavily stolen from git-mergetool.sh, by
# Theodore Y. Ts'o (thanks) that is:
#
# Copyright (c) 2006 Theodore Y. Ts'o
#
# This file is licensed under the GPL v2, or a later version
# at the discretion of Junio C Hamano or any other official
# git maintainer.
#

19
USAGE='[--browser=browser|--tool=browser] [--config=conf.var] url/file ...'
20 21 22 23

# This must be capable of running outside of git directory, so
# the vanilla git-sh-setup should not be used.
NONGIT_OK=Yes
24 25
. git-sh-setup

26 27 28 29 30 31
valid_custom_tool()
{
	browser_cmd="$(git config "browser.$1.cmd")"
	test -n "$browser_cmd"
}

32 33
valid_tool() {
	case "$1" in
34
		firefox | iceweasel | konqueror | w3m | links | lynx | dillo | open | start)
35 36
			;; # happy
		*)
37
			valid_custom_tool "$1" || return 1
38 39 40 41 42
			;;
	esac
}

init_browser_path() {
43
	browser_path=$(git config "browser.$1.path")
44
	test -z "$browser_path" && browser_path="$1"
45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61
}

while test $# != 0
do
    case "$1" in
	-b|--browser*|-t|--tool*)
	    case "$#,$1" in
		*,*=*)
		    browser=`expr "z$1" : 'z-[^=]*=\(.*\)'`
		    ;;
		1,*)
		    usage ;;
		*)
		    browser="$2"
		    shift ;;
	    esac
	    ;;
62 63 64 65 66 67 68 69 70 71 72 73
	-c|--config*)
	    case "$#,$1" in
		*,*=*)
		    conf=`expr "z$1" : 'z-[^=]*=\(.*\)'`
		    ;;
		1,*)
		    usage ;;
		*)
		    conf="$2"
		    shift ;;
	    esac
	    ;;
74 75 76 77 78 79 80 81 82 83 84 85 86
	--)
	    break
	    ;;
	-*)
	    usage
	    ;;
	*)
	    break
	    ;;
    esac
    shift
done

87 88
test $# = 0 && usage

89
if test -z "$browser"
90
then
91
    for opt in "$conf" "web.browser"
92
    do
93
	test -z "$opt" && continue
94 95 96
	browser="`git config $opt`"
	test -z "$browser" || break
    done
97
    if test -n "$browser" && ! valid_tool "$browser"; then
98 99 100
	echo >&2 "git config option $opt set to unknown browser: $browser"
	echo >&2 "Resetting to default..."
	unset browser
101 102 103 104 105 106 107 108 109 110 111 112
    fi
fi

if test -z "$browser" ; then
    if test -n "$DISPLAY"; then
	browser_candidates="firefox iceweasel konqueror w3m links lynx dillo"
	if test "$KDE_FULL_SESSION" = "true"; then
	    browser_candidates="konqueror $browser_candidates"
	fi
    else
	browser_candidates="w3m links lynx"
    fi
113
    # SECURITYSESSIONID indicates an OS X GUI login session
114 115
    if test -n "$SECURITYSESSIONID" \
	    -o "$TERM_PROGRAM" = "Apple_Terminal" ; then
116 117
	browser_candidates="open $browser_candidates"
    fi
118
    # /bin/start indicates MinGW
119
    if test -x /bin/start; then
120 121
	browser_candidates="start $browser_candidates"
    fi
122

123 124 125 126 127 128 129 130 131 132 133 134 135
    for i in $browser_candidates; do
	init_browser_path $i
	if type "$browser_path" > /dev/null 2>&1; then
	    browser=$i
	    break
	fi
    done
    test -z "$browser" && die "No known browser available."
else
    valid_tool "$browser" || die "Unknown browser '$browser'."

    init_browser_path "$browser"

136
    if test -z "$browser_cmd" && ! type "$browser_path" > /dev/null 2>&1; then
137 138 139 140 141 142 143 144 145 146
	die "The browser $browser is not available as '$browser_path'."
    fi
fi

case "$browser" in
    firefox|iceweasel)
	# Check version because firefox < 2.0 does not support "-new-tab".
	vers=$(expr "$($browser_path -version)" : '.* \([0-9][0-9]*\)\..*')
	NEWTAB='-new-tab'
	test "$vers" -lt 2 && NEWTAB=''
147
	"$browser_path" $NEWTAB "$@" &
148 149 150 151 152 153 154
	;;
    konqueror)
	case "$(basename "$browser_path")" in
	    konqueror)
		# It's simpler to use kfmclient to open a new tab in konqueror.
		browser_path="$(echo "$browser_path" | sed -e 's/konqueror$/kfmclient/')"
		type "$browser_path" > /dev/null 2>&1 || die "No '$browser_path' found."
155
		eval "$browser_path" newTab "$@"
156 157
		;;
	    kfmclient)
158
		eval "$browser_path" newTab "$@"
159 160
		;;
	    *)
161
		"$browser_path" "$@" &
162 163 164
		;;
	esac
	;;
165
    w3m|links|lynx|open)
166
	eval "$browser_path" "$@"
167
	;;
168 169 170
    start)
        exec "$browser_path" '"web-browse"' "$@"
        ;;
171
    dillo)
172
	"$browser_path" "$@" &
173
	;;
174 175 176 177 178
    *)
	if test -n "$browser_cmd"; then
	    ( eval $browser_cmd "$@" )
	fi
	;;
179
esac