#!/bin/sh
#===============================================================================
XPROP_WAY(){
#ident  "@(#)pb.sh  display xterm paste buffer to standard out  19910405 John S. Urban"
# Usage: pb [p] [0-9] [0-9] ...
# Usage: pb CUT_BUFFER0
# Usage: pb PRIMARY
# John S. Urban, June 1991 (pb or pb -display name:0)
export NAME
export NAMES
NAMES="${*}"
#[ "$NAMES" != '' ] && shift
NAMES=${NAMES:-'CUT_BUFFER0'}
DUMPIT(){
   xprop -len 200000000000 -notype -root $NAME $*|
      sed \
         -e "s%^${NAME}$%%" \
         -e "s%^$NAME = \"%%" \
         -e "s%^$NAME = $%%" \
         -e 's%\\\\"%\"%' \
         -e 's/%/%%/g' \
         -e 's/"$//'
}
for NAME in $NAMES
do
   case "$NAME" in 
   a|all) exec $0 p 0 1 2 3 4 5 6 7;;
   P|p) NAME=PRIMARY;;
   [0-9]) NAME=CUT_BUFFER${NAME};;
   esac
   printf -- "`DUMPIT`"
done
}
#===============================================================================
if [ -f "`which wxpaste 2> /dev/null`" ] 
then
   wxpaste
elif [ -f "`which xclip 2> /dev/null`" ] 
   xclip -o
else 
   XPROP_WAY
fi
#===============================================================================
if ( tty >/dev/null )
then
   echo ""
fi
#===============================================================================
exit
#===============================================================================
# In newer versions of xprop(1) no more than 10000 characters seem to be output