--- scripts/pgallery/src/pgallery.sh	2012/08/28 12:30:30	1.6
+++ scripts/pgallery/src/pgallery.sh	2012/08/29 14:44:04	1.17
@@ -5,7 +5,7 @@
 # can do whatever you want with this stuff. If we meet some day, and you think
 # this stuff is worth it, you can buy me a beer in return Aron Schlesinger
 #
-# $Paefchen: scripts/pgallery/src/pgallery.sh,v 1.5 2012/08/28 10:44:41 as Exp $
+# $Paefchen: scripts/pgallery/src/pgallery.sh,v 1.16 2012/08/29 14:15:50 as Exp $
 #
 
 ARG_TITLE="PGallery"
@@ -23,14 +23,17 @@ ARG_INFOFILE=""
 ARG_MAILTO=""
 ARG_MAILFROM="PGallery <${USER}@${HOST}>"
 ARG_URL=
+ARG_EXIF="0x920a 0x829d 0x829a ISO 0x8827 / 0x010f - 0x0110"
 
 BIN_CONVERT="/usr/local/bin/convert"
 BIN_EXIFAUTOTRAN="/usr/local/bin/exifautotran"
 BIN_IMGINFO="/usr/local/bin/imginfo"
 BIN_SENDMAIL="/usr/sbin/sendmail"
+BIN_EXIFTRAN="/usr/local/bin/exiftran"
+BIN_EXIF="/usr/local/bin/exif"
 
 MKAKEFILE=".htmakefile"
-VERSION="pgallery-1.1"
+VERSION="pgallery-1.3"
 
 #
 # usage()
@@ -40,13 +43,15 @@ usage()
 	cat <<USAGE
 usage $0: ( [-f <files>] | [-s <suffix>] ) [-d <dir>] [-n <name>]
                 [-t <thumbnail_size>] [-u <thumbnail_quality>]
-                [-b <big_size>] [-c <big_quality>] [-l link]
+                [-b <big_size>] [-c <big_quality>] [-l link] [-e <exif>]
                 [-i <index>] [-C <copyright>] [-F <mailfrom>] [-T <mailto>]
                 [-U] | -h | -v
 Options:
   -b size       size from big images in pixel (default: $ARG_BIGSIZE)
   -c quality    quality from big images 0-100% (default: $ARG_BIGQALITY)
   -d dir        gallery dir (default: $ARG_DIR)
+  -e exif       list of tags in hex. (default: $ARG_EXIF)
+                see: http://www.exiv2.org/tags.html
   -f files      gallery images
   -h            this page
   -i name       index file name (default: $ARG_INDEX)
@@ -64,6 +69,7 @@ Options:
                 the syntax of the file is MAKE(1)
                 supported variable: TITLE COPYRIGHT INDEX FILETYPES TNSIZE URL
                                     TNQALITY BIGSIZE BIGQALITY MAILTO MAILFROM
+                                    EXIF
   -T mailto     send update infos to this address. if not set, no mail delivery
   -U            no update, new calculation of all images.
                 normally only new and modified images will calculated
@@ -88,14 +94,15 @@ get_my_path()
 html_header()
 {
 	cat <<HTML
+<?xml version="1.0" encoding="utf-8"?>
 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
-"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+	"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
 <html xmlns="http://www.w3.org/1999/xhtml">
 <head>
 	<title>$ARG_TITLE</title>
-		<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1" />
-		<style type="text/css">
-		<!--
+	<meta http-equiv="content-type" content="text/html; charset=utf-8" />
+	<style type="text/css">
+	<!--
 body {
 	background-color: #464646;
 	background-image: url("data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAFgAAABYB\
@@ -154,6 +161,7 @@ HLaErzv/wD99ABmjNZk0AAAAABJRU5ErkJggg==");
 	font-family: Geneva,Arial,sans-serif;
 	font-size: 12px;
 	text-shadow: 1px 1px 1px #000;
+	color: #808080;
 }
 div.tn {
 	float: left;
@@ -238,20 +246,21 @@ div.box {
 	width: ${ARG_BIGSIZE}px;
 	margin: auto;
 }
-div.box div.c {
+div.box div.d {
 	width: ${ARG_BIGSIZE}px;
-	text-align: right;
+	padding: 5px;
+	text-align: center;
+}
+div.box div.i {
+	width: ${ARG_BIGSIZE}px;
 	font-size: 90%;
-	color: #808080;
 	height: 25px;
 	line-height: 25px;
 	position: relative;
-	left: 4px;
 }
 body > div.c {
 	text-align: center;
 	font-size: 90%;
-	color: #808080;
 	height: 25px;
 	line-height: 25px;
 	position: relative;
@@ -332,39 +341,52 @@ HTML
 #
 html_img()
 {
-	img=$1
-	link=$2
-	linkb=$3
-	linkn=$4
+	orig=$1
+	num=$2
+	all=$3
+	img=$4
+	link=$5
+	linkb=$6
+	linkn=$7
 
 	info=$($BIN_IMGINFO -f $img)
 	width=$(echo $info | awk '{print $3}')
 	height=$(echo $info | awk '{print $4}')
 
+	desc=$(get_exif_desc $orig)
+	if [ "$desc" != "" ]
+	then
+		desc="<div class='d'>$desc</div>"
+	fi
+
 	if [ "$linkb" != "" ]
 	then
-		hlinkb="<a href='$linkb'>zur�ck</a>"
+		hlinkb="<a href='$linkb'>prev</a>"
 		olinkb="<a class='left' style='height:${height}px' href='$linkb'></a>"
 	fi
 
 	if [ "$linkn" != "" ]
 	then
-		hlinkn="<a href="$linkn">weiter</a>"
+		hlinkn="<a href="$linkn">next</a>"
 		olinkn="<a class='right' style='height:${height}px' href='$linkn'></a>"
 	fi
 
 	cat <<HTML
 <div class="box">
 	<div class="nav">
-		<div class="top"><a href="$link">Index</a></div>
+		<div class="top">
+			<a href="$link">index</a>&nbsp;&nbsp;&nbsp;|&nbsp;&nbsp;&nbsp;<a href="$orig">original</a>&nbsp;&nbsp;&nbsp;|&nbsp;&nbsp;&nbsp;$num/$all
+		</div>
 		<div class="left">$hlinkb</div>
 		<div class="right">$hlinkn</div>
 	</div>
 	<div class="big">
 		<img alt="$img" width="$width" height="$height" src="$img" />
 	</div>
-	<div class="c">
-		$ARG_TITLE $ARG_COPYRIGHT
+	$desc
+	<div class="i">
+		<div class="left">$(get_exif_info $orig)</div>
+		<div class="right">$ARG_TITLE $ARG_COPYRIGHT</div>
 	</div>
 	<div class="over" style='height:${height}px'>
 		$olinkb
@@ -402,6 +424,88 @@ MAIL
 	) | $BIN_SENDMAIL -t
 }
 
+#
+# get_exif_desc()
+#
+get_exif_desc()
+{
+	img=$1
+	$BIN_EXIF --ifd=0 --tag=0x010e -m $img 2> /dev/null | while read line
+	do
+		echo "$line<br />"
+	done
+}
+
+#
+# get_exif_ts()
+#
+get_exif_ts()
+{
+	img=$1
+	date=$($BIN_EXIF --ifd=EXIF --tag=0x9003 -m $img 2> /dev/null)
+	if [ "$date" = "" ]
+	then
+		echo "-1"
+		return 1
+	fi
+	date -j -f "%Y:%m:%d %T" "$date" "+%s"
+}
+
+#
+# get_exif_date()
+#
+get_exif_date()
+{
+	img=$1
+	ts=$(get_exif_ts $img) && date -r $ts "+%d.%m.%Y %H:%M" || echo ""
+}
+
+#
+# get_exif_value()
+#
+get_exif_value()
+{
+	img=$1
+	hex=$2
+	$BIN_EXIFTRAN -d $img | grep $hex | sed -E 's/^.{45}//'
+}
+
+#
+# get_exif_info()
+#
+get_exif_info()
+{
+	img=$1
+
+	exifinfo=
+	created=$(get_exif_date $img) && exifinfo="$created / "
+
+	for exif in $ARG_EXIF
+	do
+		if echo $exif | grep -q -E '0x[[:alnum:]]{4}'
+		then
+			exifinfo="$exifinfo$(get_exif_value $img $exif) "
+		else
+			exifinfo="$exifinfo$exif "
+		fi
+	done
+	echo $exifinfo | sed -E -e 's/ mm /mm /' -e 's/ se(c|k)./s/' -e 's/ ISO / ISO/' -e 's/ ISO(\/| )/ \1/'
+}
+
+#
+# is_in_list()
+#
+is_in_list()
+{
+	list=$1
+	value=$2
+	for entry in $list
+	do
+		test "$entry" = "$value" && return 0
+	done
+	return 1
+}
+
 # parse args
 while [ "$1" != "" ]
 do
@@ -437,6 +541,9 @@ do
 		-d)
 			ARG_DIR=$1
 			shift;;
+		-e)
+			ARG_EXIF=$1
+			shift;;
 		-C)
 			ARG_COPYRIGHT=$1
 			shift;;
@@ -460,12 +567,16 @@ do
 	esac
 done
 
+# go to gallery directory
+MY=$(get_my_path)
+cd "$ARG_DIR" || exit 1
+
 # parese info file
 if [ "$ARG_INFOFILE" != "" ]
 then
 	test -f $ARG_INFOFILE || err "info file not found \`\`$ARG_INFOFILE''"
 	for n in TITLE COPYRIGHT INDEX FILETYPES TNSIZE TNQALITY BIGSIZE \
-		BIGQALITY MAILTO MAILFROM URL
+		BIGQALITY MAILTO MAILFROM URL EXIF
 	do
 		v=$(make -f $ARG_INFOFILE -V$n)
 		test "$v" = "" && continue
@@ -473,9 +584,12 @@ then
 	done	
 fi
 
-# go to gallery directory
-MY=$(get_my_path)
-cd "$ARG_DIR" || exit 1
+# paras from iso to utf-8
+for n in $(set | awk -F= '{print $1}')
+do
+	echo "$n" | grep -q '^ARG_' || continue
+	eval "$n=\"\$(echo \"\$$n\" | iconv -f ISO-8859-1 -t UTF-8)\""
+done
 
 # fix url
 if [ "$ARG_URL" != "" ]
@@ -508,6 +622,16 @@ echo 
 
 test $(echo $FLIST | wc -w) -eq 0 && err "error: no image found in \`\`$ARG_DIR''"
 
+# use exif createtime to order images
+FLIST=$(
+	(
+		for file in $FLIST
+		do
+			echo "$(get_exif_ts $file) $file"
+		done
+	) | sort -n | awk '{print $2}'
+)
+
 # find new and to update images
 FLIST_NEW=
 FLIST_UPDATE=
@@ -579,9 +703,27 @@ echo "tns: $targets" >> $MKAKEFILE
 make -f $MKAKEFILE
 rm $MKAKEFILE
 
-# create single html files
+# create html index
 index=""
+for file in $FLIST
+do
+	tn="${file}.tn.jpg"
+	imglink="${file}.html"
+	index="$index $(html_tn $tn $imglink)"
+done
+echo create html index
+(
+	html_header
+	echo $index
+	echo "<div class='clear'></div>"
+	echo "<div class='c'>$ARG_TITLE $ARG_COPYRIGHT</div>"
+	html_footer
+) > $ARG_INDEX
+
+# create single html files
+#test $ARG_UPDATE -eq 1 && FLIST="$FLIST_NEW $FLIST_UPDATE"
 i=0
+all=$(echo $FLIST | wc -w)
 echo -n "create single html files "
 for file in $FLIST
 do
@@ -589,7 +731,12 @@ do
 	i=$(($i + 1))
 	j=$(($i + 1))
 
-	tn="${file}.tn.jpg"
+	# is update mod and no new images founded
+	if [ $ARG_UPDATE -eq 1 -a "$FLIST_NEW" = "" ]
+	then
+		is_in_list "$FLIST_UPDATE" "$file" || continue
+	fi
+
 	big="${file}.big.jpg"
 	imglink="${file}.html"
 
@@ -601,25 +748,21 @@ do
 	test "$linkn" != "" && linkn="$linkn.html"
 
 	echo -n .
-	index="$index $(html_tn $tn $imglink)"
 	(
 		html_header
-		html_img $big $ARG_INDEX "$linkb" "$linkn"
+		html_img $file $i $all $big $ARG_INDEX "$linkb" "$linkn"
 		html_footer
 	) > $imglink
 done
 echo
 
-# create html index
-echo create html index
-(
-	html_header
-	echo $index
-	echo "<div class='clear'></div>"
-	echo "<div class='c'>$ARG_TITLE $ARG_COPYRIGHT</div>"
-	html_footer
-) > $ARG_INDEX
-
+# .htaccess
+if [ -f .htaccess ]
+then
+	grep -q 'AddCharset UTF-8 .html' < .htaccess || echo "AddCharset UTF-8 .html" >> .htaccess
+else
+	echo "AddCharset UTF-8 .html" > .htaccess
+fi
 
 test "$ARG_MAILTO" = "" && exit 0
 
