#!/bin/bash
#  imalib is a php program to present pictures in a web interface.
#  Copyright (C) 2002 Sébastien MICHEL <sebastien@nospam.org>
#
#  This program is free software; you can redistribute it and/or modify
#  it under the terms of the GNU General Public License as published by
#  the Free Software Foundation; either version 2 of the License, or
#  (at your option) any later version.
#
#  This program is distributed in the hope that it will be useful,
#  but WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#  GNU General Public License for more details.
#
#  You should have received a copy of the GNU General Public License
#  along with this program; if not, write to the Free Software
#  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

# permet d'archiver et faire un backup au format d'archive de Casio (QV3500EX au moins)
# ce script doit être placé dans /etc/hotplug/usb

# This script make archives plus backup with the tree format from Casio (QV3500EX at least)
# This script must be put in /etc/hotplug/usb

############################################################
# Config

# vous devez mettre la variable $ACTIVE a TRUE pour faire marcher ce script.
# You must put TRUE in $ACTIVE to make this script work
# ACTIVE="TRUE"
ACTIVE="false"

# MOUNT="FALSE"                             # On monte l'apn ?
# APN="/mnt/rack/Image Library/apn/"        # chemin ou se trouve l'appareil photo après le montage.
# APNPATH=""                                # chemin ou se trouve les repertoires de photo dans l'appareil.

MOUNT="TRUE"                                # On monte l'apn ?
APN="/mnt/apn/"                             # chemin ou se trouve l'appareil photo après le montage.
APNPATH="dcim/"                             # chemin ou se trouve les repertoires de photo dans l'appareil.

RECUP="/mnt/rack/Image Library/"            # chemin primaire de recuperation des photo
BACKUP="/mnt/videorip/Image Library/"       # chemin du backup des photos qui seront recopiés en double.

DEV="/dev/sdc1"                             # device de l'appareil photo
FS="vfat"                                   # fs de l'appareil photo
mount="/bin/mount -t $FS $DEV $APN"         # commande de montage de l'appareil photo.
umount="/bin/umount $APN"                   # commande de démontage de l'appareil photo.

############################################################
# Script Side

cd /etc/hotplug
. hotplug.functions

if [ "`echo $ACTIVE |tr \"[:lower:]\" \"[:upper:]\"`" = "FALSE" ]; then
    mesg "Rapatriement des photos inactif !"
    exit;
fi

if [ ! -d "$APN" ];then
    mesg "Probleme avec le chemin du l'appareil photo: $APN"
    exit;
else
    mesg "chemin du l'appareil photo: $APN"
    if [ "`echo $MOUNT |tr \"[:lower:]\" \"[:upper:]\"`" = "TRUE" ]; then
        mesg "montage de l'appareil photo: $APN -> $mount"
        $mount
    fi
fi
if [ ! -d "${APN}${APNPATH}" ];then
    mesg "Probleme avec le chemin des photo dans l'appareil: ${APN$APNPATH}"
    exit;
fi
if [ ! -d "$RECUP" ];then
    mesg "Probleme avec le chemin de destination: $RECUP"
    exit;
else
    mesg "chemin de destination: $RECUP"
fi
if [ ! -d "$BACKUP" ];then
    mesg "Probleme avec le chemin du backup: $BACKUP"
    exit;
else
    mesg "chemin du backup: $BACKUP"
fi

mesg "detection des repertoires a recuperer:"
LIST=`find "${APN}${APNPATH}" -type d|grep "[0-9]\{3\}_[0-9]\{4\}$" |sed "y/ /µ/"`
find "/mnt/apn/dcim/" -type d|grep "[0-9]\{3\}_[0-9]\{4\}$" |sed "y/ /µ/">>/toto
YEAR=`date +%Y`;

mesg "Liste des repertoires a rapatrier:
$LIST"

for REP in $LIST
do
# repertoire ou sont les photos dans l'appareil.
    ORG="${REP/µ/ }"
# Repertoire final d'archivage.
    REP=${REP/\/[0-9][0-9][0-9]_/\/$YEAR};
    REP=${REP/µ/ };
    REP=${REP/*\//};
    DEST="${RECUP}$REP"
    DEST2="${BACKUP}$REP"
# # creation de la destination.
#   if [ ! -d "${DEST}" ];then
#       mesg "Creation de ${DEST}"
#       mkdir ${DEST}
#   fi
#   if [ ! -d "${DEST2}" ];then
#       mesg "Creation de ${DEST2}"
#       mkdir ${DEST2}
#   fi
# si la destination existe on la renomme.
    if [ -d "${DEST}" ];then
        DESTOLD="${DEST}"
        while [ -d "${DESTOLD}" ]
            do
            DESTOLD="${DESTOLD}.old"
            done
        mesg "Déplacement de $DEST vers $DESTOLD"
        mv "${DEST}" "${DESTOLD}"
    fi
    if [ -d "${DEST2}" ];then
        DESTOLD="${DEST2}"
        while [ -d "${DESTOLD}" ]
            do
            DESTOLD="${DESTOLD}.old"
            done
        mesg "Déplacement de $DEST2 vers $DESTOLD"
        mv "${DEST2}" "${DESTOLD}"
    fi
    mesg "Déplacement de $ORG vers $DEST"
    mesg "Sauvegarde de $DEST vers $DEST2"
    IMGS=`find "${ORG}" -name "*.jpg"|grep -v "\\(preview\\|PREVIEW\\)"`
#y a t il des images dans le repertoire a sauvegarder ?
    if [ "$IMGS" ];then
# mise en archivage des photos.
        mv "$ORG" "$DEST"
#       cp -r "$ORG" "$DEST"
        mesg "Repertoire $DEST:"
        mesg `ls "$DEST"`
# verification de l'orientation des images
        IMGS=`find "${DEST}" -name "*.jpg"|grep -v "\\(preview\\|PREVIEW\\)" |sed "y/ /µ/"`
        for IMG in $IMGS
        do
            IMG="${IMG/µ/ }"
            ORIENTATION=`identify -format "%[EXIF:Orientation]" "$IMG"`
            mesg "$IMG:$ORIENTATION"
            if [ "$ORIENTATION" ];then
                if [ "`identify -format "%[EXIF:ExifImageWidth]" "$IMG"`" -eq "`identify -format "%w" "$IMG"`" -a "`identify -format "%[EXIF:ExifImageLength]" "$IMG"`" -eq "`identify -format "%h" "$IMG"`" ];then
                    if [ "$ORIENTATION" -eq "6" ];then
                        convert -rotate "90" "$IMG" "${IMG}tmp.jpg"
                        mv "${IMG}tmp.jpg" "$IMG"
                    elif [ "$ORIENTATION" -eq "8" ];then
                        convert -rotate "270" "$IMG" "${IMG}tmp.jpg"
                        mv "${IMG}tmp.jpg" "$IMG"
                    fi
                else
                    mesg "Image déjà retournée."
                fi
            fi
        done
# sauvegarde du repertoire d'archivage.     
        cp -r "$DEST" "$DEST2"
        mesg "Repertoire de sauvegarde $DEST2:"
        mesg `ls "$DEST2"`
    else
        mesg "REPERTOIRE sans image: $ORG"
        rm -r "$ORG"
    fi
done

if [ "`echo $MOUNT |tr \"[:lower:]\" \"[:upper:]\"`" = "TRUE" ]; then
    mesg "démontage de l'appareil photo: $APN"
    $umount
fi