1*143054faSnaddy /* $OpenBSD: cddb.c,v 1.23 2020/06/26 19:51:14 naddy Exp $ */
29ed7639aSespie /*
39ed7639aSespie * Copyright (c) 2002 Marc Espie.
49ed7639aSespie *
59ed7639aSespie * Redistribution and use in source and binary forms, with or without
69ed7639aSespie * modification, are permitted provided that the following conditions
79ed7639aSespie * are met:
89ed7639aSespie * 1. Redistributions of source code must retain the above copyright
99ed7639aSespie * notice, this list of conditions and the following disclaimer.
109ed7639aSespie * 2. Redistributions in binary form must reproduce the above copyright
119ed7639aSespie * notice, this list of conditions and the following disclaimer in the
129ed7639aSespie * documentation and/or other materials provided with the distribution.
139ed7639aSespie *
149ed7639aSespie * THIS SOFTWARE IS PROVIDED BY THE OPENBSD PROJECT AND CONTRIBUTORS
159ed7639aSespie * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
169ed7639aSespie * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
179ed7639aSespie * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OPENBSD
189ed7639aSespie * PROJECT OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
199ed7639aSespie * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
209ed7639aSespie * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
219ed7639aSespie * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
229ed7639aSespie * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
239ed7639aSespie * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
249ed7639aSespie * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
259ed7639aSespie */
269ed7639aSespie
279ed7639aSespie #include <sys/socket.h>
289ed7639aSespie #include <netinet/in.h>
299ed7639aSespie #include <sys/cdio.h>
309ed7639aSespie #include <err.h>
319ed7639aSespie #include <netdb.h>
329ed7639aSespie #include <stdio.h>
339ed7639aSespie #include <stdlib.h>
349ed7639aSespie #include <string.h>
359ed7639aSespie #include <unistd.h>
36b9fc9a72Sderaadt #include <limits.h>
379ed7639aSespie #include <vis.h>
389ed7639aSespie #include "extern.h"
399ed7639aSespie
409ed7639aSespie unsigned long cddb_sum(unsigned long);
419ed7639aSespie void send_hello(FILE *);
429ed7639aSespie void send_query(FILE *, int, struct cd_toc_entry *);
439ed7639aSespie int further_query(FILE *, char *);
449ed7639aSespie int connect_to(const char *, const char *);
459ed7639aSespie int parse_connect_to(const char *, const char *);
469ed7639aSespie char * get_line(FILE *);
479ed7639aSespie char * get_answer(FILE *);
489ed7639aSespie void verify_track_names(char **, int, struct cd_toc_entry *);
497c9f4bc9Sespie void safe_copy(char **, const char *);
509ed7639aSespie
519ed7639aSespie unsigned long
cddb_sum(unsigned long v)529ed7639aSespie cddb_sum(unsigned long v)
539ed7639aSespie {
549ed7639aSespie unsigned long sum = 0;
559ed7639aSespie
569ed7639aSespie while (v > 0) {
579ed7639aSespie sum += v % 10;
589ed7639aSespie v /= 10;
599ed7639aSespie }
609ed7639aSespie return (sum);
619ed7639aSespie }
629ed7639aSespie
639ed7639aSespie unsigned long
cddb_discid(int n,struct cd_toc_entry * e)649ed7639aSespie cddb_discid(int n, struct cd_toc_entry *e)
659ed7639aSespie {
669ed7639aSespie unsigned long sum;
679ed7639aSespie int i;
689ed7639aSespie
699ed7639aSespie sum = 0;
709ed7639aSespie for (i =0; i < n; i++)
719ed7639aSespie sum += cddb_sum(entry2time(e+i));
729ed7639aSespie return (((sum % 0xff) << 24) |
739ed7639aSespie ((entry2time(e+n) - entry2time(e)) << 8) | n);
749ed7639aSespie }
759ed7639aSespie
769ed7639aSespie void
send_hello(FILE * cout)779ed7639aSespie send_hello(FILE *cout)
789ed7639aSespie {
79b9fc9a72Sderaadt char hostname[HOST_NAME_MAX+1];
809ed7639aSespie
819ed7639aSespie if (gethostname(hostname, sizeof(hostname)) == -1)
82334e018bSderaadt strlcpy(hostname, "unknown", sizeof hostname);
839ed7639aSespie fprintf(cout, "CDDB HELLO %s %s cdio " VERSION "\r\n",
849ed7639aSespie getlogin(), hostname);
859ed7639aSespie fflush(cout);
869ed7639aSespie }
879ed7639aSespie
889ed7639aSespie void
send_query(FILE * f,int n,struct cd_toc_entry * e)899ed7639aSespie send_query(FILE *f, int n, struct cd_toc_entry *e)
909ed7639aSespie {
919ed7639aSespie int i;
929ed7639aSespie
939ed7639aSespie fprintf(f, "cddb query %8lx %d", cddb_discid(n, e), n);
949ed7639aSespie for (i = 0; i < n; i++)
959ed7639aSespie fprintf(f, " %lu", entry2frames(e+i));
969ed7639aSespie fprintf(f, " %lu\r\n", (entry2frames(e+n)-entry2frames(e)) /75);
971c866f68Skrw fflush(f);
989ed7639aSespie }
999ed7639aSespie
1009ed7639aSespie #define MAXSIZE 256
1019ed7639aSespie char copy_buffer[MAXSIZE];
1029ed7639aSespie
1037c9f4bc9Sespie void
safe_copy(char ** p,const char * title)1047c9f4bc9Sespie safe_copy(char **p, const char *title)
1059ed7639aSespie {
1069ed7639aSespie strnvis(copy_buffer, title, MAXSIZE-1, VIS_TAB|VIS_NL);
1077c9f4bc9Sespie if (*p == NULL)
1087c9f4bc9Sespie *p = strdup(copy_buffer);
1097c9f4bc9Sespie else {
110f760b59dSderaadt char *n;
111f760b59dSderaadt
112f760b59dSderaadt if (asprintf(&n, "%s%s", *p, copy_buffer) == -1)
1137c9f4bc9Sespie return;
1147c9f4bc9Sespie free(*p);
1157c9f4bc9Sespie *p = n;
1167c9f4bc9Sespie }
1179ed7639aSespie }
1189ed7639aSespie
1199ed7639aSespie int
further_query(FILE * cout,char * line)1209ed7639aSespie further_query(FILE *cout, char *line)
1219ed7639aSespie {
1229ed7639aSespie char *key;
1239ed7639aSespie char *title;
1249ed7639aSespie
1259ed7639aSespie key = strchr(line, ' ');
1269ed7639aSespie if (!key)
1279ed7639aSespie return 0;
1289ed7639aSespie *key++ = 0;
1299ed7639aSespie title = strchr(key, ' ');
1309ed7639aSespie if (!title)
1319ed7639aSespie return 0;
1329ed7639aSespie *title++ = 0;
1339ed7639aSespie strnvis(copy_buffer, title, MAXSIZE-1, VIS_TAB|VIS_NL);
1349ed7639aSespie printf("%s", copy_buffer);
1359ed7639aSespie strnvis(copy_buffer, line, MAXSIZE-1, VIS_TAB|VIS_NL);
1369ed7639aSespie printf("(%s)\n", copy_buffer);
1379ed7639aSespie fprintf(cout, "CDDB READ %s %s\r\n", line, key);
1389ed7639aSespie fflush(cout);
1399ed7639aSespie return 1;
1409ed7639aSespie }
1419ed7639aSespie
1429ed7639aSespie
1439ed7639aSespie int
connect_to(const char * host,const char * serv)1449ed7639aSespie connect_to(const char *host, const char *serv)
1459ed7639aSespie {
1469ed7639aSespie int s = -1;
1479ed7639aSespie struct addrinfo hints, *res0 = NULL, *res;
1489ed7639aSespie int error;
1499ed7639aSespie
1509ed7639aSespie memset(&hints, 0, sizeof hints);
1519ed7639aSespie hints.ai_family = PF_UNSPEC;
1529ed7639aSespie hints.ai_socktype = SOCK_STREAM;
1539ed7639aSespie
1549ed7639aSespie error = getaddrinfo(host, serv, &hints, &res0);
1559ed7639aSespie if (error) {
1569ed7639aSespie warnx("%s", gai_strerror(error));
1579ed7639aSespie return -1;
1589ed7639aSespie }
1599ed7639aSespie
1609ed7639aSespie for (res = res0; res; res = res->ai_next) {
1619ed7639aSespie s = socket(res->ai_family, res->ai_socktype,
1629ed7639aSespie res->ai_protocol);
1639ed7639aSespie if (s == -1)
1649ed7639aSespie continue;
1659ed7639aSespie if (connect(s, res->ai_addr, res->ai_addrlen) == -1) {
1669ed7639aSespie close(s);
1679ed7639aSespie s = -1;
1689ed7639aSespie continue;
1699ed7639aSespie }
1709ed7639aSespie break;
1719ed7639aSespie }
1729ed7639aSespie if (s == -1)
1739ed7639aSespie warn("cddb");
1749ed7639aSespie freeaddrinfo(res0);
1759ed7639aSespie return s;
1769ed7639aSespie }
1779ed7639aSespie
1789ed7639aSespie int
parse_connect_to(const char * host_port,const char * port)1799ed7639aSespie parse_connect_to(const char *host_port, const char *port)
1809ed7639aSespie {
1819ed7639aSespie int s;
1829ed7639aSespie char *last, *host;
1839ed7639aSespie
1849ed7639aSespie host = (char *)host_port;
1859ed7639aSespie
1869ed7639aSespie last = strrchr(host_port, ':');
1879ed7639aSespie if (last != 0 && !(last != host && last[-1] == ':')) {
1889ed7639aSespie port = last + 1;
1899ed7639aSespie host = malloc(last - host_port + 1);
1909ed7639aSespie if (!host)
1919ed7639aSespie return -1;
1929ed7639aSespie memcpy(host, host_port, last-host_port);
1939ed7639aSespie host[last-host_port] = 0;
1949ed7639aSespie }
1959ed7639aSespie s = connect_to(host, port);
1969ed7639aSespie if (host != host_port)
1979ed7639aSespie free(host);
1989ed7639aSespie return s;
1999ed7639aSespie }
2009ed7639aSespie
2019ed7639aSespie char *
get_line(FILE * cin)2029ed7639aSespie get_line(FILE *cin)
2039ed7639aSespie {
2049ed7639aSespie char *line;
2059ed7639aSespie size_t len;
2069ed7639aSespie
2079ed7639aSespie line = fgetln(cin, &len);
2089ed7639aSespie if (!line)
2099ed7639aSespie return NULL;
2109ed7639aSespie if (len == 0)
2119ed7639aSespie return NULL;
2129ed7639aSespie if (line[len-1] == '\n')
2139ed7639aSespie line[--len] = 0;
2149ed7639aSespie if (len != 0 && line[len-1] == '\r')
2159ed7639aSespie line[--len] = 0;
21698f738e7Sespie if (line[len] != 0)
21798f738e7Sespie return NULL;
2189ed7639aSespie return line;
2199ed7639aSespie }
2209ed7639aSespie
2219ed7639aSespie char *
get_answer(FILE * cin)2229ed7639aSespie get_answer(FILE *cin)
2239ed7639aSespie {
2249ed7639aSespie char *line;
2259ed7639aSespie
2269ed7639aSespie line = get_line(cin);
227ce2747ceSespie if (!line || *line != '2')
2289ed7639aSespie return NULL;
2299ed7639aSespie else
2309ed7639aSespie return line;
2319ed7639aSespie }
2329ed7639aSespie
2339ed7639aSespie void
verify_track_names(char ** names,int n,struct cd_toc_entry * e)2349ed7639aSespie verify_track_names(char **names, int n, struct cd_toc_entry *e)
2359ed7639aSespie {
2369ed7639aSespie int i;
2379ed7639aSespie
2389ed7639aSespie for (i = 0; i < n; i++) {
2399ed7639aSespie if (names[i] == 0)
2409ed7639aSespie names[i] = strdup(e->control & 4 ? "data" : "audio");
2419ed7639aSespie }
2429ed7639aSespie }
2439ed7639aSespie
2449ed7639aSespie char **
cddb(const char * host_port,int n,struct cd_toc_entry * e,char * arg)2459ed7639aSespie cddb(const char *host_port, int n, struct cd_toc_entry *e, char *arg)
2469ed7639aSespie {
2479ed7639aSespie int s = -1;
248c14b1d51Sespie int s2 = -1;
2499ed7639aSespie FILE *cin = NULL;
2509ed7639aSespie FILE *cout = NULL;
2519ed7639aSespie char *type;
2529ed7639aSespie char *line;
2539ed7639aSespie char **result = NULL;
2549ed7639aSespie int i;
255f925fb25Sjdixon const char *errstr;
2569ed7639aSespie
257*143054faSnaddy s = parse_connect_to(host_port, "8880");
2589ed7639aSespie if (s == -1)
2599ed7639aSespie goto end;
260c14b1d51Sespie s2 = dup(s);
261c14b1d51Sespie if (s2 == -1)
262c14b1d51Sespie goto end;
2639ed7639aSespie cin = fdopen(s, "r");
2649ed7639aSespie if (!cin) {
2659ed7639aSespie warn("cddb: fdopen");
2669ed7639aSespie goto end;
2679ed7639aSespie }
2689ed7639aSespie s = -1;
269c14b1d51Sespie cout = fdopen(s2, "w");
2709ed7639aSespie if (!cout) {
2719ed7639aSespie warn("cddb: fdopen");
2729ed7639aSespie goto end;
2739ed7639aSespie }
274c14b1d51Sespie s2 = -1;
2759ed7639aSespie line = get_answer(cin);
2769ed7639aSespie if (!line) {
2779ed7639aSespie warnx("cddb: won't talk to us");
2789ed7639aSespie goto end;
2799ed7639aSespie }
2809ed7639aSespie
2819ed7639aSespie send_hello(cout);
2829ed7639aSespie line = get_answer(cin);
2839ed7639aSespie if (!line) {
2849ed7639aSespie warnx("cddb: problem in hello");
2859ed7639aSespie goto end;
2869ed7639aSespie }
2879ed7639aSespie
2889ed7639aSespie send_query(cout, n, e);
2899ed7639aSespie line = get_answer(cin);
2909ed7639aSespie if (!line) {
2919ed7639aSespie warnx("cddb: problem in query");
2929ed7639aSespie goto end;
2939ed7639aSespie }
2949ed7639aSespie type = strchr(line, ' ');
2959ed7639aSespie if (!type)
2969ed7639aSespie goto end;
2979ed7639aSespie *type++ = 0;
2989ed7639aSespie /* no match or other issue */
2999ed7639aSespie if (strcmp(line, "202") == 0) {
3009ed7639aSespie printf("cddb: No match in database\n");
3019ed7639aSespie goto end;
3029ed7639aSespie }
3039ed7639aSespie if (strcmp(line, "211") == 0 || strcmp(line, "212") == 0) {
304f925fb25Sjdixon int number = strtonum(arg, 0, INT_MAX, &errstr);
305691235adSmiod if (errstr != NULL && *arg != '\0') {
306579d55c9Sfgsch warnx("cddb: invalid index");
307579d55c9Sfgsch goto end;
308579d55c9Sfgsch }
3099ed7639aSespie if (number == 0) {
3109ed7639aSespie if (strcmp(line, "211") == 0)
3119ed7639aSespie printf("cddb: multiple matches\n");
3129ed7639aSespie else {
3139ed7639aSespie printf("cddb: inexact match\n");
3149ed7639aSespie number = 1;
3159ed7639aSespie }
3169ed7639aSespie }
3179ed7639aSespie if (number == 0) {
3189ed7639aSespie for (i = 1;; i++) {
3199ed7639aSespie line = get_line(cin);
320ce2747ceSespie if (!line || strcmp(line, ".") == 0)
3219ed7639aSespie goto end;
3229ed7639aSespie printf("%d: %s\n", i, line);
3239ed7639aSespie }
3249ed7639aSespie } else {
3259ed7639aSespie int ok = 0;
3269ed7639aSespie
3279ed7639aSespie for (i = 1;; i++) {
3289ed7639aSespie line = get_line(cin);
3299ed7639aSespie if (!line)
3309ed7639aSespie break;
3319ed7639aSespie if (strcmp(line, ".") == 0)
3329ed7639aSespie break;
3339ed7639aSespie if (i == number)
3349ed7639aSespie ok = further_query(cout, line);
3359ed7639aSespie }
3369ed7639aSespie if (!ok)
3379ed7639aSespie goto end;
3389ed7639aSespie }
3399ed7639aSespie } else if (strcmp(line, "200") != 0 || !further_query(cout, type))
3409ed7639aSespie goto end;
3411ed98fdfSderaadt result = calloc(sizeof(char *), n + 1);
3429ed7639aSespie if (!result)
3439ed7639aSespie goto end;
3449ed7639aSespie for (i = 0; i <= n; i++)
3459ed7639aSespie result[i] = NULL;
3469ed7639aSespie line = get_answer(cin);
3479ed7639aSespie if (!line)
3489ed7639aSespie goto end2;
3499ed7639aSespie for (;;) {
35061dbd8aaStobias int k;
3519ed7639aSespie char *end;
3529ed7639aSespie
3539ed7639aSespie line = get_line(cin);
3549ed7639aSespie if (!line)
3559ed7639aSespie goto end2;
3569ed7639aSespie if (strcmp(line, ".") == 0)
357fd338a62Scloder break;
3589ed7639aSespie if (strncmp(line, "TTITLE", 6) != 0)
3599ed7639aSespie continue;
3609ed7639aSespie line += 6;
36161dbd8aaStobias end = strchr(line, '=');
36261dbd8aaStobias if (end == NULL)
3639ed7639aSespie continue;
36461dbd8aaStobias *end++ = '\0';
36561dbd8aaStobias k = strtonum(line, 0, n - 1, &errstr);
36661dbd8aaStobias if (errstr != NULL)
3679ed7639aSespie continue;
3687c9f4bc9Sespie safe_copy(&result[k], end);
3699ed7639aSespie }
3709ed7639aSespie fprintf(cout, "QUIT\r\n");
3719ed7639aSespie verify_track_names(result, n, e);
3729ed7639aSespie goto end;
3739ed7639aSespie end2:
3749ed7639aSespie free(result);
3759ed7639aSespie result = NULL;
3769ed7639aSespie end:
3779ed7639aSespie if (cout)
3789ed7639aSespie fclose(cout);
3799ed7639aSespie if (cin)
3809ed7639aSespie fclose(cin);
3819ed7639aSespie if (s != -1)
3829ed7639aSespie close(s);
383c14b1d51Sespie if (s2 != -1)
384c14b1d51Sespie close(s2);
3859ed7639aSespie return result;
3869ed7639aSespie }
3879ed7639aSespie
3889ed7639aSespie void
free_names(char ** names)3899ed7639aSespie free_names(char **names)
3909ed7639aSespie {
3919ed7639aSespie int i;
3929ed7639aSespie
3939ed7639aSespie for (i = 0; names[i]; i++)
3949ed7639aSespie free(names[i]);
3959ed7639aSespie free(names);
3969ed7639aSespie }
397