1 files changed, 278 insertions, 0 deletions

diff --git a/util/fbsetbg b/util/fbsetbg
new file mode 100644
index 0000000..045e172
--- /dev/null
+++ b/util/fbsetbg
@@ -0,0 +1,278 @@
+#!/bin/sh
+#
+# Set wallpaper for fluxbox.
+#
+# Copyright (c) 2003 Han Boetes <han@mijncomputer.nl>
+#
+# Permission is hereby granted, free of charge, to any person obtaining
+# a copy of this software and associated documentation files (the
+# "Software"), to deal in the Software without restriction, including
+# without limitation the rights to use, copy, modify, merge, publish,
+# distribute, sublicense, and/or sell copies of the Software, and to
+# permit persons to whom the Software is furnished to do so, subject to
+# the following conditions:
+#
+# The above copyright notice and this permission notice shall be
+# included in all copies or substantial portions of the Software.
+#
+# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+# IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+# CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+# TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+# SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+#
+# $Id: fbsetbg,v 1.7 2003/06/06 02:18:34 rathnor Exp $
+
+#
+# Portability notes:
+# To guarantee this script works on all platforms that support fluxbox
+# please keep the following restrictions in mind:
+#
+# don't use [ -e file ], use [ -r file ]
+# don't use $(), use ``
+# don't use ~, use ${HOME}
+# don't use id -u, use whoami
+# getopts won't work on all platforms, but the config-file can
+# compensate for that.
+#
+
+# The wallpapersetter is selected in this order
+wpsetters='Esetroot wmsetbg display qiv xv xsri xli xsetbg' # broken icewmbg'
+lastwallpaper=${HOME}/.fluxbox/lastwallpaper
+
+
+WHOAMI=`whoami`
+[ "$WHOAMI" = root ] && PATH=/bin:/usr/bin/:/usr/local/bin:/usr/X11R6/bin
+
+
+# Functions
+display_usage() {
+    cat <<EOF
+Usage: fbsetbg [ -fcta /path/to/wallpaper ] [ -l ] [ -h ] [ -d ]
+EOF
+}
+
+display_help() {
+    display_usage
+    cat <<EOF
+
+Options:
+
+    -f  Set fullscreen wallpaper
+    -c  Set centered wallpaper
+    -t  Set tiled wallpaper
+    -a  Set maximized wallpaper, preserving aspect.
+        ( if your bgsetter doesn't support this
+          fbsetbg falls back to -f )
+
+    -h  Display this help
+
+    -l  Set previous wallpaper
+
+    -d  Debug fbsetbg
+    -T  Tips
+
+Files:
+
+    ~/.fluxbox/lastwallpaper
+
+EOF
+}
+
+display_tips(){
+cat<<EOF
+
+To replace all occurrences of bsetbg in a file use this command:
+
+  perl -pi -e 's,([^f]|^)bsetbg,fbsetbg,'
+
+If you want the style to set the wallpaper and you want fbsetbg to
+remember the previous wallpaper put this in your ~/.fluxbox/init
+
+  session.screen0.rootCommand:    fbsetbg -l
+
+
+EOF
+}
+
+# ugly code for solaris compat.
+find_it() {
+    file=`which $1 2> /dev/null`
+    if [ -x "$file" ]; then
+        if [ $# -gt 1 ]; then
+            shift
+            $*
+        fi
+        return 0
+    else
+        return 1
+    fi
+}
+
+message() {
+    xmessage -center "$@"
+}
+
+remembercommand() {
+    #if the $wallpaper path is absolute
+    echo $option > $lastwallpaper
+    case $wallpaper in
+        /*) echo      $wallpaper >> $lastwallpaper ;;
+        *)  echo $PWD/$wallpaper >> $lastwallpaper ;;
+    esac
+}
+
+debugfbsetbg (){
+    echo
+    echo $debugstory
+    echo
+    exit 0
+}
+
+# Find the default wallpapersetter
+for wpsetter in $wpsetters; do
+    if find_it $wpsetter; then
+        WPSETTER=$wpsetter
+        break
+    fi
+done
+
+standardrant="$WPSETTER sets the 'wrong' wallpaper. Transparant apps like aterm and
+xchat won't work right with it. Consider using wmsetbg (from windowmaker)
+or Esetroot (from Eterm)"
+
+case $WPSETTER in
+    xsri)
+        full='--center-x --center-y --scale-width=100 --scale-width=100'
+        tile='--tile'
+        center='--center-x --center-y'
+        aspect=$full
+        debugstory="This is a RedHat specific app. I can't find docs about it."
+        ;;
+    display)
+        full="`xwininfo -root|grep geom` -window root"
+        tile='-window root'
+        center='-backdrop -window root'
+        aspect=$full
+        debugstory=$standardrant
+        ;;
+    Esetroot)
+        full='-scale'
+        tile=''
+        center='-c'
+        aspect='-fit'
+        debugstory="Esetroot is a nice app. You won't have any problems."
+        ;;
+    wmsetbg)
+        full='-s -S'
+        tile='-t'
+        center='-b black -e'
+        aspect='-b black -a'
+        debugstory="wmsetbg is a nice app. You won't have any problems."
+        ;;
+    xsetbg)
+        tile='-border black'
+        center='-center -border black'
+        aspect='-fullscreen -border black'
+        full=$aspect #broken
+        debugstory="xsetbg is actually xli. The fillscreen option (-f) is broken, defaults to (-a). $standardrant"
+        ;;
+    xli)
+        tile='-onroot -quiet -border black'
+        center='-center -onroot -quiet -border black'
+        aspect='-fullscreen -onroot -quiet -border black'
+        full=$aspect #broken
+        debugstory='The fillscreen option (-f) is broken, defaults to (-a). $standardrant'
+        ;;
+    qiv)
+        full='--root_s'
+        tile='--root_t'
+        center='--root'
+        aspect='-m --root'
+        debugstory=$standardrant
+        ;;
+    xv)
+        full='-max -smooth -root -quit'
+        tile='-root -quit'
+        center='-rmode 5 -root -quit'
+        aspect='-maxpect -smooth -root -quit'
+        debugstory=$standardrant
+        ;;
+    icewmbg)
+        tile='-s'
+        full=$tile
+        center=$tile
+        aspect=$tile
+        debugstory="icewmbg does support transparency, but only tiling. And I noticed odd
+errormessages with aterm. Don't use it unless you have to."
+        ;;
+    '')
+        message "I can't find an app to set the wallpaper with. You can install one in
+many many ways but I will give you some simple advice: install Eterm and
+you're set. Eterm provides Esetroot and thats a great wallpaper setter. I
+recommend you install the package provided by your distro."
+        exit 1
+        ;;
+esac
+
+#Get options.
+getopts ":a:f:c:t:Tdlh-" COMMAND_LINE_ARGUMENT
+case "${COMMAND_LINE_ARGUMENT}" in
+    d) debugfbsetbg
+        exit 0
+        ;;
+    a) option=$aspect
+        wallpaper=$OPTARG
+        ;;
+    f) option=$full
+        wallpaper=$OPTARG
+        ;;
+    c) option=$center
+        wallpaper=$OPTARG
+        ;;
+    t) option=$tile
+        wallpaper=$OPTARG
+        ;;
+    l)
+        if [ -r $lastwallpaper ];then
+            option=`head -n1 $lastwallpaper`
+            wallpaper=`tail -n1 $lastwallpaper`
+        else
+            message 'No previous wallpaper recorded. You have never used fbsetbg before.'
+        fi
+        ;;
+    h) display_help ; exit 0 ;;
+    T) display_tips ; exit 0 ;;
+    -) echo "fbsetbg doesn't recognize -- gnu-longopts."
+        echo 'Use fbsetbg -h for a long help message.'
+        display_usage
+        exit 1
+        ;;
+    *) if [ ! -r "$1" ]; then
+           echo "$1 isn't an existing wallpaper or a valid option." >&2
+           display_usage
+           exit 1
+       fi
+       if [ -z "$1" ];then
+           message 'No wallpaper to set' >&2
+           display_usage
+           exit 1
+       fi
+       ;;
+esac
+
+option=${option:=$full}
+wallpaper=${wallpaper:=$1}
+
+
+if [ ! -r "$wallpaper" ];then
+    message "Can't find wallpaper $wallpaper"
+    exit 1
+fi
+
+$WPSETTER $option "$wallpaper" || message "Something went wrong while setting the wallpaper
+Run '$WPSETTER $option "$wallpaper"' from an xterm to find out what."
+#remember previous wallpaper
+remembercommand