libnjb 2.2.7

pl.c
#include "common.h"
#include <string.h>
#define PL_CREATE 1
#define PL_DELETE 2
#define PL_RENAME 3
static void usage(void)
{
fprintf(stderr, "usage: pl [ -D debuglvl ] -d name\n" \
"pl [ -D debuglvl ] -r oldname newname\n" \
"pl [ -D debuglvl ] -c name trackid < trackid2 trackid3 ... >\n");
}
static void playlist_dump (njb_playlist_t *pl, FILE *fp)
{
njb_playlist_track_t *track;
unsigned int i = 1;
fprintf(fp, "Playlist: %s\n", pl->name);
fprintf(fp, "ID: %u\n", pl->plid);
fprintf(fp, "Tracks: %u\n", pl->ntracks);
fprintf(fp, "State: %d\n", pl->_state);
NJB_Playlist_Reset_Gettrack(pl);
while ( (track = NJB_Playlist_Gettrack(pl)) ) {
fprintf(fp, "%5u - track ID %u\n", i, track->trackid);
i++;
}
}
int main (int argc, char **argv)
{
njb_t njbs[NJB_MAX_DEVICES];
njb_t *njb;
njb_playlist_t *playlist;
njb_playlist_track_t *pl_track;
int i, n, opt, mode, debug;
char *name, *newname;
extern int optind;
extern char *optarg;
char *endptr;
char *lang;
debug= 0;
mode= 0;
name= NULL;
newname = NULL;
while ( (opt= getopt(argc, argv, "d:r:c:")) != -1 ) {
switch (opt) {
case 'c':
mode= PL_CREATE;
break;
case 'd':
mode= PL_DELETE;
break;
case 'r':
mode= PL_RENAME;
break;
case 'D':
debug= atoi(optarg);
break;
case '?':
default:
usage();
return 1;
}
name= optarg;
}
argc-= optind;
argv+= optind;
if ( debug ) NJB_Set_Debug(debug);
/*
* Check environment variables $LANG and $LC_CTYPE
* to see if we want to support UTF-8 unicode
* $LANG = "xx_XX.UTF-8" or $LC_CTYPE = "?"
* trigger unicode support.
*/
lang = getenv("LANG");
if (lang != NULL) {
if (strlen(lang) > 5) {
if (!strcmp(&lang[strlen(lang)-5], "UTF-8")) {
NJB_Set_Unicode(NJB_UC_UTF8);
}
}
}
if ( ! mode ) {
usage();
return 1;
}
playlist = NULL;
if ( mode == PL_CREATE ) {
playlist = NJB_Playlist_New();
if ( playlist == NULL ) {
perror("NJB_Playlist_New");
return 1;
}
if ( NJB_Playlist_Set_Name(playlist, name) == -1 ) {
perror("NJB_Playlist_Set_Name");
} else {
for (i= 0; i< argc; i++) {
u_int32_t trid= strtoul(argv[i], &endptr, 10);
if ( *endptr != '\0' ) {
fprintf(stderr, "invalid track id %s",
argv[i]);
return 1;
}
pl_track= NJB_Playlist_Track_New(trid);
if ( pl_track == NULL ) {
perror("NJB_Playlist_Track_New");
return 1;
}
NJB_Playlist_Addtrack(playlist, pl_track,
NJB_PL_END);
}
playlist_dump(playlist, stdout);
}
} else if ( mode == PL_RENAME ) {
newname= argv[0];
}
if (NJB_Discover(njbs, 0, &n) == -1) {
fprintf(stderr, "could not locate any jukeboxes\n");
return 1;
}
if ( n == 0 ) {
fprintf(stderr, "no NJB devices found\n");
return 0;
}
njb = njbs;
if ( NJB_Open(njb) == -1 ) {
NJB_Error_Dump(njb,stderr);
return 1;
}
if ( NJB_Capture(njb) == -1 ) {
NJB_Error_Dump(njb,stderr);
return 1;
}
if ( mode == PL_CREATE ) {
if ( NJB_Update_Playlist(njb, playlist) == -1 )
NJB_Error_Dump(njb,stderr);
} else {
int status = 0;
int repeat= 1;
NJB_Reset_Get_Playlist(njb);
while ( repeat ) {
playlist = NJB_Get_Playlist(njb);
if ( playlist == NULL ) {
repeat= 0;
} else {
repeat = strcmp(name, playlist->name);
if ( repeat )
NJB_Playlist_Destroy(playlist);
}
}
if ( playlist == NULL ) {
NJB_Error_Dump(njb,stderr);
} else {
if ( mode == PL_DELETE ) {
status= NJB_Delete_Playlist(njb,
playlist->plid);
} else {
if ( NJB_Playlist_Set_Name(playlist, newname) == -1 ) {
status = -1;
} else {
status= NJB_Update_Playlist(njb,
playlist);
}
}
}
if ( status == -1 ) NJB_Error_Dump(njb,stderr);
}
NJB_Release(njb);
NJB_Close(njb);
return 0;
}