#!/bin/sh

# This script is for Mozilla or Mozilla Firefox, which only lets you
# run one session at a time (though you can have multiple windows open
# in the session.) Thus a different command is necessary to launch
# a window with a given URL, depending on whether you already have the
# program running or not.

# Opens a new window with the requested URL (Or an empty window,
# if no URL requested on the command line.) This version does not
# accept parameters for the browser, only a URL or a filename.
# Special characters (e.g., spaces) in a filename should be handled
# gracefully, except for literal slashes in a filename, those
# probably wouldn't be handled well.

# Requires Perl.

# Documentation on the method for contacting the running process:
# http://www.mozilla.org/unix/remote.html

export MOZILLA_HOME=/usr/lib/firefox-0.8
export LD_LIBRARY_PATH=$LD_LIBRARY_PATH:$MOZILLA_HOME
BROWSER="${MOZILLA_HOME}/firefox"

# Customizable options here
DEFAULT="about:blank"


# Function to urlencode a string.
# Accepts one parameter (multiple params are treated as one w/ embedded spaces)
# and sticks the result into a variable called urlencoded_rv.
function urlencode () {
string="$*"
strlen=${#string}
rv=""
i=0
while [ $i -lt $strlen ]; do
thischar=${string:$i:1}
case $thischar in
'"')
rv="$rv%52"
;;
' ')
rv="$rv%20"
;;
[a-zA-Z0-9]|'.'|'/'|'-'|'_'|':')
# Leave dots, slashes, etc. alone
rv="$rv$thischar"
;;
*)
code=`perl -e "printf \"%x\", ord(\"$thischar\")"`
#echo "'$thischar' => ~~$code~~"
if [ "${#code}" != "2" ]; then
rv="$rv%0$code"
else
rv="$rv%$code"
fi
;;
esac

i=$(($i+1))

done
urlencoded_rv=$rv
}


# Use the script parameter, or if missing, use the default
arg=${*:-$DEFAULT}
#echo "Arg: $arg"

# If it's a file, provide it with the 'file://' protocol and absolute path
if [ -f "$arg" ]; then
if [ "${arg:0:1}" != "/" ]; then
arg="`pwd`/$arg"
fi

# urlencode the filename (could have spaces, etc. in it).
# We need to urlencode because the '-remote' option won't take
# an unescaped value surrounded by quote chars.
urlencoded_rv=""
urlencode "$arg"
arg=$urlencoded_rv

arg="file://$arg"
fi

# Try remote first
$BROWSER -remote "openURL($arg, new-window)" 2>/dev/null && exit 0

# if remote failed, then launch the browser
$BROWSER $arg &