#!/bin/ksh
# fix_jpeg_names
# Author: Perette Barella, Devious Fish
# Finds JPEG files with mangled names below the current directory, and
# wrangles their names into a common form.
# .JPG -> .jpeg
# .jpg -> .jpeg
# .jpeg.jpeg -> .jpeg
# Caveats: Could cover cases more completely, but gets all I've ever run into.


find . \( -name "*.jpg" -o -name "*.JPG" \) -print | while IFS="" read name
do
	mv "$name" "$(print -- "$name" | sed 's/[jJ][pP][gG]$/jpeg/')"
done

find . -name "*.jpeg.jpeg" | while IFS="" read name
do
	mv "$name" "$(print -- "$name" | sed 's/.jpeg.jpeg/.jpeg/')"
done

exit 1