#! /bin/bash 
# Last edited on 2008-02-04 20:31:09 by stolfi

usage="${0##*/}"

if [ $# -ne 0 ]; then echo "usage: ${usage}"; exit 1; fi

rootdir=${STOLFIHOME}/projects/fragments
( cd ${rootdir}/. )
cd ${rootdir}

find */raw-images/ \
    -type f \
    \( -name '*.JPG' -o -name '*.TIF' -o -name '*.MOV' \) \
    -ls \
  | gawk '/[.]/{ print $11; }' \
  | sed -e 's:^[.][/]::g' \
  | sort \
  > .imgs
  

find */raw-sorted/ \
    -type l \
    -ls \
  | gawk '/[\/]DSC/{ print $11,"->",$13; }' \
  | sed -e 's:^[.][/]::g' \
  | sort \
  > .links
  
cat .links \
  | sed -e 's:\(^.*\)[\/]raw-sorted[\/].*[-][>] *:\1/raw-images/:' \
  | sort \
  > .linked-imgs

echo "doubly-linked images:"
cat .linked-imgs | uniq -d

echo "unlinked images:"
bool 1-2 .imgs .linked-imgs > .unlinked-imgs
cat .unlinked-imgs

echo "bogus links:"
bool 1-2 .linked-imgs .imgs > .bogus-links
cat .bogus-links