[clinton/abcde.git] / cddb-tool

#!/bin/sh

# Copyright (C) 1999 Nathaniel Smith <njs@uclink4.berkeley.edu>
# Copyright (C) 1999, 2000, 2001 Robert Woodcock <rcw@debian.org>
# Copyright (C) 2003, 2005 Jesus Climent <jesus.climent@hispalinux.es>
# This code is hereby licensed for public consumption under either the
# GNU GPL v2 or greater, or Larry Wall's Artistic License - your choice.
#
# You should have recieved 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.

# Copyright for this work is to expire January 1, 2010, after which it
# shall be public domain.

# TODO:
#  - Add more error checking

# KNOWN BUGS:
#  - Not much error checking, esp. of arguments
#  - Submitted via: line is created by template, when it really should be in send.
#    Oh well.

VERSION=0.4.7
NAME=cddb-tool

#return codes
BAD_SYNTAX_ERR=10  # invalid CDDB file
NO_TMP_ERR=11      # can't create a temp file
NO_MATCH_ERR=12    # try submitting one
LOOKUP_ERR=13      # problem connecting to cddb server
EMPTY_QUERY_RESPONSE=14	# query response = "", (probably no net connection)

# assume a reasonable default if $HTTPGET is undefined
if [ "$HTTPGET" = "" ]; then
	if [ X"$(uname)" = X"FreeBSD" ] ; then
		HTTPGET=fetch
		HTTPGETOPTS=${HTTPGETOPTS:="-q -o -"}
	elif [ X"$(uname)" = X"NetBSD" ] ; then
		HTTPGET=ftp
		HTTPGETOPTS=${HTTPGETOPTS:="-a -V -o - "}
	elif [ X"$(uname)" = X"Darwin" ] ; then
		HTTPGET=curl
		HTTPGETOPTS=${HTTPGETOPTS:="-f -s"}
	else
		HTTPGET=wget
		HTTPGETOPTS=${HTTPGETOPTS:="-q -nv -e timestamping=off -O -"}
	fi
fi

HTTPGET="$HTTPGET $HTTPGETOPTS"

usage() {
	  cat << EOF
$NAME version $VERSION
usage: one of:
  $0 parse file
  $0 template disc-id tracks
  $0 send file address
  $0 read server proto user host disc-id genre
  $0 query server proto user host disc-id tracks
  $0 stat serverurl user host proto
  $0 help
EOF
}

help() {
	cat << EOF
$NAME version $VERSION
A toolbox for doing cddb related stuff

Usage: $0 command [command_options]

Commands:
  parse file
	Get data out of a cddb file - dumps to stdout in a form
	source'able by the shell

  send file address
	Mails a CDDB file to a specified address, using correct format.
	Category should be one of blues, classical, country, data, folk,
	jazz, newage, reggae, rock, soundtrack, or misc.
  template disc-id tracks
	Generates a template (empty) cddb file to stdout.  The command
	line should be essentially the output of cd-discid.
  query server proto user host disc-id tracks
	Looks up disc on server (should be of form "http://host/~cddb/cddb.cgi")
	remainder of command line is in the same form as that returned
	by the cd-discid program.  
  read server proto user host disc-id genre
	CDDB file is dumped to stdout. File will contain an extra
	#CATEGORY= line, which leaves it a valid CDDB file but which will
	be recognized by parse and send commands. Uses wget, so if you
	need to use a proxy then just configure wget to do so. user and
	host will be used for identifying ourselves to the CDDB server.
  stat serverurl user host proto
	Check server status with given protocol. This can be used to check
	if the server supports given protocol. Most common values for proto
	should be 5 and 3. With 3 you will not get DYEAR and DGENRE fields
	in response.
  help  
	Display this.
EOF
}

f_seq ()
{
	i=$1
	while [ $i -ne `expr $2 + 1` ]
	do
		echo $i
		i=`expr $i + 1`
	done
}

COMMAND=$1
shift
case $COMMAND in
parse)	# takes 1 argument, a filename, and dumps out a sh parseable version
	CDDBFILE="$1"
	
	set -e
	# names chosen to match usage in abcde code
	DISCID=$(grep ^DISCID= "$CDDBFILE" | cut -f2 -d= | tr -d \[:cntrl:\])
	DARTISTALBUM="$(grep ^DTITLE= "$CDDBFILE" | cut -f2- -d= | tr -d \\n | sed 's- / -~-g' | tr -d \[:cntrl:\])"
	DARTIST="$(echo "$DARTISTALBUM" | cut -f1 -d~ | sed 's,\\,\\\\,g;s,\([\"\$\`]\),\\\1,g' | tr -d \[:cntrl:\])"
	DALBUM="$(echo "$DARTISTALBUM" | cut -f2 -d~ | sed 's,\\,\\\\,g;s,\([\"\$\`]\),\\\1,g' | tr -d \[:cntrl:\])"
	CDDBGENRE="$(grep '^#CATEGORY=' "$CDDBFILE" | cut -f2- -d= | tr -d \[:cntrl:\])"
	if grep "^DYEAR" "$CDDBFILE" 2>&1 > /dev/null ; then
		CDYEAR=$(grep "^DYEAR" "$CDDBFILE" | cut -f2- -d= | tr -d \[:cntrl:\])
	elif grep YEAR "$CDDBFILE" 2>&1 > /dev/null ; then
		CDYEAR=$(grep "YEAR" "$CDDBFILE" | grep -v "DYEAR" | awk 'BEGIN{FS="YEAR:"}{print $2}' | awk '{print $1}')
	else
		CDYEAR=""
	fi
	CDGENRE=$(grep '^DGENRE=' "$CDDBFILE" | cut -f2- -d= | tr -d \[:cntrl:\])

	set +e
	echo DISCID="\"$DISCID\""
	echo DALBUM="\"$DALBUM\""
	echo DARTIST="\"$DARTIST\""
	echo CDDBGENRE="\"$CDDBGENRE\""
	echo CDYEAR="\"$CDYEAR\""
	echo CDGENRE="\"$CDGENRE\""
	NUMTRACKS=$(grep -E '^TTITLE[0-9]+=' "$CDDBFILE" | wc -l)
	CURRTRACK=0
	while [ "$CURRTRACK" -lt $NUMTRACKS ]; do
		CURRTRACKM1=$CURRTRACK # Track minus 1 (cddb numbers from 0)
		CURRTRACK=$(expr $CURRTRACK + 1)
		echo -n "TRACK${CURRTRACK}=\""
		grep ^TTITLE${CURRTRACKM1}= "$CDDBFILE" | cut -f2 -d= | sed 's,\\,\\\\,g;s,\([\"\$\`]\),\\\1,g' | tr -d \[:cntrl:\]
		echo \"
	done
	;;

template)
	DISCID="$@"
	DISCNUM=$1
	echo '# xmcd CD database file'
	echo '#'
	echo '# Track frame offsets:'
	NUMTRACKS=$2
	for x in $(f_seq 3 $(expr $NUMTRACKS + 2))
	do
		printf "#\t$(echo "$DISCID" | cut -f$x -d' ')\n"
	done
	x=$(expr $x + 1)
	LENGTH=$(echo "$DISCID" | cut -f$x -d' ')
	echo "#"
	echo "# Disc length: $LENGTH seconds"
	echo "#"
	echo "# Submitted via: $NAME $VERSION"
	echo "#"
	echo "#blues,classical,country,data,folk,jazz,newage,reggae,rock,soundtrack,misc"
	echo "#CATEGORY=misc"
	echo DISCID="$DISCNUM"
	echo "DTITLE=Unknown Artist / Unknown Album"
	echo "DYEAR="
	echo "DGENRE="
	# TTITLE0 -- TTITLEn
	for x in $(f_seq 1 $NUMTRACKS)
	do
		echo "TTITLE$(expr $x - 1)=Track $x"
	done
	echo "EXTD="
	# EXTT0 -- EXTTn
	for x in $(f_seq 1 $NUMTRACKS)
	do
		echo "EXTT$(expr $x - 1)="
	done
	echo "PLAYORDER="
	;;

send) # cddb-tool send filename email@address
	FILE="$1"
	ADDRESS="$2"
	DISCID=$(grep ^DISCID= "$FILE" | cut -f2 -d= | tr -d \[:cntrl:\])
	CDDBGENRE=$(grep '^#CATEGORY=' "$FILE" | cut -f2- -d= | tr -d \[:cntrl:\])
	grep -v "^#CATEGORY=" "$FILE" | iconv -t utf-8 | mail -a "Content-Type: text/plain; charset=utf-8" -s "cddb $CDDBGENRE $DISCID" "$ADDRESS"
	;;

query) # cddb-tool query serverurl proto user host discid...
	SERVER="$1"
	PROTO="$2"
	USER="$3"
	HOST="$4"
	HELLOINFO="$USER+$HOST+$NAME+$VERSION"
	shift 4
	TRACKINFO="$@"
	TRACKINFOPLUS=$(echo $TRACKINFO | tr ' ' '+')
	RESULTS=$($HTTPGET "$SERVER?cmd=cddb+query+$TRACKINFOPLUS&hello=$HELLOINFO&proto=$PROTO") || exit $LOOKUP_ERR
	echo "$RESULTS" | tr '\r' '\n' | tr -s '\n' | sed 's/^ //g'
	;;

read) # cddb-tool read serverurl proto user host genre discnumber
	SERVER="$1"
	PROTO="$2"
	USER="$3"
	HOST="$4"
	CATEGORY="$5"
	DISCID="$6"
	HELLOINFO="$USER+$HOST+$NAME+$VERSION"
	$HTTPGET $CDDBDATA "$SERVER?cmd=cddb+read+$CATEGORY+$DISCID&hello=$HELLOINFO&proto=$PROTO" 2>/dev/null
	;;

stat) # cddb-tool stat serverurl user host proto
	SERVER="$1"
	USER="$2"
	HOST="$3"
	PROTO="$4"
	HELLOINFO="$USER+$HOST+$NAME+$VERSION"
	$HTTPGET $CDDBDATA "$SERVER?cmd=stat&hello=$HELLOINFO&proto=$PROTO" 2>/dev/null
	;;

help) # help
	help
	;;

*) # usage
	usage
	;;
esac
Commit	Line	Data
c9c2ca27	1	#!/bin/sh
	2
	3	# Copyright (C) 1999 Nathaniel Smith <njs@uclink4.berkeley.edu>
	4	# Copyright (C) 1999, 2000, 2001 Robert Woodcock <rcw@debian.org>
5895f404	5	# Copyright (C) 2003, 2005 Jesus Climent <jesus.climent@hispalinux.es>
c9c2ca27	6	# This code is hereby licensed for public consumption under either the
	7	# GNU GPL v2 or greater, or Larry Wall's Artistic License - your choice.
	8	#
	9	# You should have recieved a copy of the GNU General Public License
	10	# along with this program; if not, write to the Free Software
	11	# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
	12
	13	# Copyright for this work is to expire January 1, 2010, after which it
	14	# shall be public domain.
	15
	16	# TODO:
	17	# - Add more error checking
	18
	19	# KNOWN BUGS:
	20	# - Not much error checking, esp. of arguments
	21	# - Submitted via: line is created by template, when it really should be in send.
	22	# Oh well.
	23
0759150d	24	VERSION=0.4.7
c9c2ca27	25	NAME=cddb-tool
	26
	27	#return codes
	28	BAD_SYNTAX_ERR=10 # invalid CDDB file
	29	NO_TMP_ERR=11 # can't create a temp file
	30	NO_MATCH_ERR=12 # try submitting one
	31	LOOKUP_ERR=13 # problem connecting to cddb server
	32	EMPTY_QUERY_RESPONSE=14 # query response = "", (probably no net connection)
	33
	34	# assume a reasonable default if $HTTPGET is undefined
	35	if [ "$HTTPGET" = "" ]; then
	36	if [ X"$(uname)" = X"FreeBSD" ] ; then
	37	HTTPGET=fetch
	38	HTTPGETOPTS=${HTTPGETOPTS:="-q -o -"}
a9a23379	39	elif [ X"$(uname)" = X"NetBSD" ] ; then
a9a23379	40	HTTPGET=ftp
5b9629b0	41	HTTPGETOPTS=${HTTPGETOPTS:="-a -V -o - "}
c9c2ca27	42	elif [ X"$(uname)" = X"Darwin" ] ; then
	43	HTTPGET=curl
	44	HTTPGETOPTS=${HTTPGETOPTS:="-f -s"}
	45	else
	46	HTTPGET=wget
0099f076	47	HTTPGETOPTS=${HTTPGETOPTS:="-q -nv -e timestamping=off -O -"}
c9c2ca27	48	fi
	49	fi
	50
	51	HTTPGET="$HTTPGET $HTTPGETOPTS"
	52
	53	usage() {
	54	cat << EOF
	55	$NAME version $VERSION
	56	usage: one of:
	57	$0 parse file
	58	$0 template disc-id tracks
	59	$0 send file address
	60	$0 read server proto user host disc-id genre
	61	$0 query server proto user host disc-id tracks
	62	$0 stat serverurl user host proto
	63	$0 help
	64	EOF
	65	}
	66
	67	help() {
	68	cat << EOF
	69	$NAME version $VERSION
	70	A toolbox for doing cddb related stuff
	71
	72	Usage: $0 command [command_options]
	73
	74	Commands:
	75	parse file
	76	Get data out of a cddb file - dumps to stdout in a form
	77	source'able by the shell
	78
	79	send file address
	80	Mails a CDDB file to a specified address, using correct format.
	81	Category should be one of blues, classical, country, data, folk,
	82	jazz, newage, reggae, rock, soundtrack, or misc.
	83	template disc-id tracks
	84	Generates a template (empty) cddb file to stdout. The command
	85	line should be essentially the output of cd-discid.
	86	query server proto user host disc-id tracks
	87	Looks up disc on server (should be of form "http://host/~cddb/cddb.cgi")
	88	remainder of command line is in the same form as that returned
	89	by the cd-discid program.
	90	read server proto user host disc-id genre
	91	CDDB file is dumped to stdout. File will contain an extra
	92	#CATEGORY= line, which leaves it a valid CDDB file but which will
	93	be recognized by parse and send commands. Uses wget, so if you
	94	need to use a proxy then just configure wget to do so. user and
	95	host will be used for identifying ourselves to the CDDB server.
	96	stat serverurl user host proto
	97	Check server status with given protocol. This can be used to check
	98	if the server supports given protocol. Most common values for proto
	99	should be 5 and 3. With 3 you will not get DYEAR and DGENRE fields
	100	in response.
	101	help
	102	Display this.
	103	EOF
	104	}
	105
	106	f_seq ()
	107	{
	108	i=$1
	109	while [ $i -ne `expr $2 + 1` ]
	110	do
	111	echo $i
112	i=`expr $i + 1`
113	done
114	}
115
116	COMMAND=$1
117	shift
118	case $COMMAND in
119	parse) # takes 1 argument, a filename, and dumps out a sh parseable version
120	CDDBFILE="$1"
121
122	set -e
123	# names chosen to match usage in abcde code
124	DISCID=$(grep ^DISCID= "$CDDBFILE" \| cut -f2 -d= \| tr -d \[:cntrl:\])
fe4d186c	125	DARTISTALBUM="$(grep ^DTITLE= "$CDDBFILE" \| cut -f2- -d= \| tr -d \\n \| sed 's- / -~-g' \| tr -d \[:cntrl:\])"
	126	DARTIST="$(echo "$DARTISTALBUM" \| cut -f1 -d~ \| sed 's,\\,\\\\,g;s,\([\"\$\`]\),\\\1,g' \| tr -d \[:cntrl:\])"
	127	DALBUM="$(echo "$DARTISTALBUM" \| cut -f2 -d~ \| sed 's,\\,\\\\,g;s,\([\"\$\`]\),\\\1,g' \| tr -d \[:cntrl:\])"
	128	CDDBGENRE="$(grep '^#CATEGORY=' "$CDDBFILE" \| cut -f2- -d= \| tr -d \[:cntrl:\])"
c9c2ca27	129	if grep "^DYEAR" "$CDDBFILE" 2>&1 > /dev/null ; then
	130	CDYEAR=$(grep "^DYEAR" "$CDDBFILE" \| cut -f2- -d= \| tr -d \[:cntrl:\])
	131	elif grep YEAR "$CDDBFILE" 2>&1 > /dev/null ; then
	132	CDYEAR=$(grep "YEAR" "$CDDBFILE" \| grep -v "DYEAR" \| awk 'BEGIN{FS="YEAR:"}{print $2}' \| awk '{print $1}')
	133	else
	134	CDYEAR=""
	135	fi
	136	CDGENRE=$(grep '^DGENRE=' "$CDDBFILE" \| cut -f2- -d= \| tr -d \[:cntrl:\])
	137
	138	set +e
	139	echo DISCID="\"$DISCID\""
	140	echo DALBUM="\"$DALBUM\""
	141	echo DARTIST="\"$DARTIST\""
	142	echo CDDBGENRE="\"$CDDBGENRE\""
	143	echo CDYEAR="\"$CDYEAR\""
	144	echo CDGENRE="\"$CDGENRE\""
	145	NUMTRACKS=$(grep -E '^TTITLE[0-9]+=' "$CDDBFILE" \| wc -l)
	146	CURRTRACK=0
	147	while [ "$CURRTRACK" -lt $NUMTRACKS ]; do
	148	CURRTRACKM1=$CURRTRACK # Track minus 1 (cddb numbers from 0)
	149	CURRTRACK=$(expr $CURRTRACK + 1)
	150	echo -n "TRACK${CURRTRACK}=\""
	151	grep ^TTITLE${CURRTRACKM1}= "$CDDBFILE" \| cut -f2 -d= \| sed 's,\\,\\\\,g;s,\([\"\$\`]\),\\\1,g' \| tr -d \[:cntrl:\]
	152	echo \"
	153	done
	154	;;
	155
	156	template)
	157	DISCID="$@"
	158	DISCNUM=$1
	159	echo '# xmcd CD database file'
	160	echo '#'
	161	echo '# Track frame offsets:'
	162	NUMTRACKS=$2
	163	for x in $(f_seq 3 $(expr $NUMTRACKS + 2))
	164	do
	165	printf "#\t$(echo "$DISCID" \| cut -f$x -d' ')\n"
	166	done
	167	x=$(expr $x + 1)
	168	LENGTH=$(echo "$DISCID" \| cut -f$x -d' ')
	169	echo "#"
	170	echo "# Disc length: $LENGTH seconds"
	171	echo "#"
	172	echo "# Submitted via: $NAME $VERSION"
	173	echo "#"
	174	echo "#blues,classical,country,data,folk,jazz,newage,reggae,rock,soundtrack,misc"
	175	echo "#CATEGORY=misc"
	176	echo DISCID="$DISCNUM"
	177	echo "DTITLE=Unknown Artist / Unknown Album"
	178	echo "DYEAR="
	179	echo "DGENRE="
	180	# TTITLE0 -- TTITLEn
	181	for x in $(f_seq 1 $NUMTRACKS)
	182	do
	183	echo "TTITLE$(expr $x - 1)=Track $x"
	184	done
	185	echo "EXTD="
	186	# EXTT0 -- EXTTn
	187	for x in $(f_seq 1 $NUMTRACKS)
	188	do
	189	echo "EXTT$(expr $x - 1)="
	190	done
	191	echo "PLAYORDER="
	192	;;
193
194	send) # cddb-tool send filename email@address
195	FILE="$1"
196	ADDRESS="$2"
197	DISCID=$(grep ^DISCID= "$FILE" \| cut -f2 -d= \| tr -d \[:cntrl:\])
fd34b28b	198	CDDBGENRE=$(grep '^#CATEGORY=' "$FILE" \| cut -f2- -d= \| tr -d \[:cntrl:\])
bb73d125	199	grep -v "^#CATEGORY=" "$FILE" \| iconv -t utf-8 \| mail -a "Content-Type: text/plain; charset=utf-8" -s "cddb $CDDBGENRE $DISCID" "$ADDRESS"
c9c2ca27	200	;;
	201
	202	query) # cddb-tool query serverurl proto user host discid...
	203	SERVER="$1"
	204	PROTO="$2"
	205	USER="$3"
	206	HOST="$4"
	207	HELLOINFO="$USER+$HOST+$NAME+$VERSION"
	208	shift 4
	209	TRACKINFO="$@"
	210	TRACKINFOPLUS=$(echo $TRACKINFO \| tr ' ' '+')
14fe91e3	211	RESULTS=$($HTTPGET "$SERVER?cmd=cddb+query+$TRACKINFOPLUS&hello=$HELLOINFO&proto=$PROTO") \|\| exit $LOOKUP_ERR
0759150d	212	echo "$RESULTS" \| tr '\r' '\n' \| tr -s '\n' \| sed 's/^ //g'
c9c2ca27	213	;;
	214
	215	read) # cddb-tool read serverurl proto user host genre discnumber
	216	SERVER="$1"
	217	PROTO="$2"
	218	USER="$3"
	219	HOST="$4"
	220	CATEGORY="$5"
	221	DISCID="$6"
	222	HELLOINFO="$USER+$HOST+$NAME+$VERSION"
14fe91e3	223	$HTTPGET $CDDBDATA "$SERVER?cmd=cddb+read+$CATEGORY+$DISCID&hello=$HELLOINFO&proto=$PROTO" 2>/dev/null
c9c2ca27	224	;;
	225
	226	stat) # cddb-tool stat serverurl user host proto
	227	SERVER="$1"
	228	USER="$2"
	229	HOST="$3"
	230	PROTO="$4"
	231	HELLOINFO="$USER+$HOST+$NAME+$VERSION"
14fe91e3	232	$HTTPGET $CDDBDATA "$SERVER?cmd=stat&hello=$HELLOINFO&proto=$PROTO" 2>/dev/null
c9c2ca27	233	;;
	234
	235	help) # help
	236	help
	237	;;
	238
	239	*) # usage
	240	usage
	241	;;
	242	esac