1 5645c4af 2005-01-11 devnull #!/bin/sh
  2 5645c4af 2005-01-11 devnull 
  3 acb19305 2005-01-11 devnull # BUG - Should clean up $tmp but how to know when viewer is done?
  4 acb19305 2005-01-11 devnull 
  5 5645c4af 2005-01-11 devnull preview()
  6 5645c4af 2005-01-11 devnull {
  7 5645c4af 2005-01-11 devnull 	list=""
  8 5645c4af 2005-01-11 devnull 	pwd=`pwd`
  9 5645c4af 2005-01-11 devnull 	for i in "$@"
 10 5645c4af 2005-01-11 devnull 	do
 11 5645c4af 2005-01-11 devnull 		if [ -n "$list" ]
 12 5645c4af 2005-01-11 devnull 		then
 13 5645c4af 2005-01-11 devnull 			list="$list, "
 14 5645c4af 2005-01-11 devnull 		fi
 15 5645c4af 2005-01-11 devnull 		n=`cleanname -d $pwd $i | sed 's!/!:!g'`
 16 5645c4af 2005-01-11 devnull 		list="$list\"$n\""
 17 5645c4af 2005-01-11 devnull 	done
 18 5645c4af 2005-01-11 devnull 	# echo run $list
 19 5645c4af 2005-01-11 devnull 	echo 'tell application "Preview"
 20 5645c4af 2005-01-11 devnull 		activate
 21 5645c4af 2005-01-11 devnull 		open {'"$list"'}
 22 5645c4af 2005-01-11 devnull 	end tell' | osascript
 23 5645c4af 2005-01-11 devnull }
 24 5645c4af 2005-01-11 devnull 
 25 72208f38 2005-07-18 devnull xfile()
 26 72208f38 2005-07-18 devnull {
 27 72208f38 2005-07-18 devnull 	if sed 1q "$1" | 9 grep '^x T '
 28 72208f38 2005-07-18 devnull 	then
 29 72208f38 2005-07-18 devnull 		echo 'troff intermediate output'
 30 72208f38 2005-07-18 devnull 	else
 31 5dde0bba 2005-10-19 devnull 		9 file < "$1" | sed 's/stdin: //'
 32 72208f38 2005-07-18 devnull 	fi
 33 72208f38 2005-07-18 devnull }
 34 72208f38 2005-07-18 devnull 
 35 acb19305 2005-01-11 devnull main()
 36 acb19305 2005-01-11 devnull {
 37 acb19305 2005-01-11 devnull 	case `uname` in
 38 acb19305 2005-01-11 devnull 	Darwin)
 39 acb19305 2005-01-11 devnull 		preview "$@"
 40 acb19305 2005-01-11 devnull 		;;
 41 acb19305 2005-01-11 devnull 	*)
 42 72208f38 2005-07-18 devnull 		case "`xfile $1`" in
 43 72208f38 2005-07-18 devnull 		*troff*)
 44 72208f38 2005-07-18 devnull 			tr2post "$1" | psfonts | page
 45 72208f38 2005-07-18 devnull 			;;
 46 acb19305 2005-01-11 devnull 		*PDF*)
 47 acb19305 2005-01-11 devnull 			psv $1
 48 acb19305 2005-01-11 devnull 			;;
 49 acb19305 2005-01-11 devnull 		*PS*)
 50 acb19305 2005-01-11 devnull 			psv $1
 51 acb19305 2005-01-11 devnull 			;;
 52 5dde0bba 2005-10-19 devnull 		*postscript*)
 53 5dde0bba 2005-10-19 devnull 			psv $1
 54 5dde0bba 2005-10-19 devnull 			;;
 55 acb19305 2005-01-11 devnull 		*PostScript*)
 56 acb19305 2005-01-11 devnull 			psv $1
 57 acb19305 2005-01-11 devnull 			;;
 58 acb19305 2005-01-11 devnull 		*)
 59 acb19305 2005-01-11 devnull 			qiv "$@"
 60 acb19305 2005-01-11 devnull 			;;
 61 acb19305 2005-01-11 devnull 		esac
 62 acb19305 2005-01-11 devnull 		;;
 63 acb19305 2005-01-11 devnull 	esac
 64 acb19305 2005-01-11 devnull }
 65 acb19305 2005-01-11 devnull 	
 66 5645c4af 2005-01-11 devnull case $# in
 67 5645c4af 2005-01-11 devnull 0)
 68 acb19305 2005-01-11 devnull 	tmp=/var/tmp/page.$$.tmp
 69 acb19305 2005-01-11 devnull 	cat >$tmp
 70 5dde0bba 2005-10-19 devnull 	type=`xfile $tmp`
 71 5dde0bba 2005-10-19 devnull 	case "$type" in
 72 72208f38 2005-07-18 devnull 	*troff*)
 73 72208f38 2005-07-18 devnull 		mv $tmp $tmp.tr
 74 72208f38 2005-07-18 devnull 		tmp=$tmp.tr
 75 72208f38 2005-07-18 devnull 		;;
 76 5645c4af 2005-01-11 devnull 	*PDF*)
 77 acb19305 2005-01-11 devnull 		mv $tmp $tmp.pdf
 78 acb19305 2005-01-11 devnull 		tmp=$tmp.pdf
 79 5645c4af 2005-01-11 devnull 		;;
 80 5645c4af 2005-01-11 devnull 	*PS*)
 81 acb19305 2005-01-11 devnull 		mv $tmp $tmp.ps
 82 acb19305 2005-01-11 devnull 		tmp=$tmp.ps
 83 5645c4af 2005-01-11 devnull 		;;
 84 5645c4af 2005-01-11 devnull 	*PostScript*)
 85 acb19305 2005-01-11 devnull 		mv $tmp $tmp.ps
 86 acb19305 2005-01-11 devnull 		tmp=$tmp.ps
 87 5645c4af 2005-01-11 devnull 		;;
 88 5dde0bba 2005-10-19 devnull 	*postscript*)
 89 5dde0bba 2005-10-19 devnull 		mv $tmp $tmp.ps
 90 5dde0bba 2005-10-19 devnull 		tmp=$tmp.ps
 91 5dde0bba 2005-10-19 devnull 		;;
 92 acb19305 2005-01-11 devnull 	*GIF*)
 93 acb19305 2005-01-11 devnull 		mv $tmp $tmp.gif
 94 acb19305 2005-01-11 devnull 		tmp=$tmp.gif
 95 5645c4af 2005-01-11 devnull 		;;
 96 acb19305 2005-01-11 devnull 	*JPG*)
 97 acb19305 2005-01-11 devnull 		mv $tmp $tmp.jpg
 98 acb19305 2005-01-11 devnull 		tmp=$tmp.jpg
 99 acb19305 2005-01-11 devnull 		;;
100 acb19305 2005-01-11 devnull 	*JPEG*)
101 acb19305 2005-01-11 devnull 		mv $tmp $tmp.jpg
102 acb19305 2005-01-11 devnull 		tmp=$tmp.jpg
103 acb19305 2005-01-11 devnull 		;;
104 acb19305 2005-01-11 devnull 	*PNG*)
105 acb19305 2005-01-11 devnull 		mv $tmp $tmp.png
106 acb19305 2005-01-11 devnull 		tmp=$tmp.png
107 acb19305 2005-01-11 devnull 		;;
108 acb19305 2005-01-11 devnull 	*)
109 5dde0bba 2005-10-19 devnull 		echo 1>&2 page: unrecognized file type on standard input: $type
110 acb19305 2005-01-11 devnull 		rm -f $tmp
111 acb19305 2005-01-11 devnull 		exit 1
112 5645c4af 2005-01-11 devnull 	esac
113 acb19305 2005-01-11 devnull 	main $tmp
114 acb19305 2005-01-11 devnull 	if [ `uname` != Darwin ]
115 acb19305 2005-01-11 devnull 	then
116 acb19305 2005-01-11 devnull 		rm -f $tmp
117 acb19305 2005-01-11 devnull 	fi
118 5645c4af 2005-01-11 devnull 	;;
119 acb19305 2005-01-11 devnull *)
120 acb19305 2005-01-11 devnull 	main "$@"
121 acb19305 2005-01-11 devnull 	;;
122 5645c4af 2005-01-11 devnull esac
123 5645c4af 2005-01-11 devnull