| /* XMMS - Cross-platform multimedia player | |
| * Copyright (C) 1998-2000 Peter Alm, Mikael Alm, Olle Hallnas, Thomas Nilsson and 4Front Technologies | |
| * | |
| * This program is free software; you can redistribute it and/or modify | |
| * it under the terms of the GNU General Public License as published by | |
| * the Free Software Foundation; either version 2 of the License, or | |
| * (at your option) any later version. | |
| * | |
| * This program is distributed in the hope that it will be useful, | |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| * GNU General Public License for more details. | |
| * | |
| * You should have received a copy of the GNU General Public License along | |
| * with this program; if not, write to the Free Software Foundation, Inc., | |
| * with this program; if not, write to the Free Software Foundation, Inc., | |
| */ | |
| /* modified for FLAC support by Steven Richman (2003) */ | |
| #ifdef HAVE_CONFIG_H | |
| #include "config.h" | |
| #endif | |
| #include "plugin.h" | |
| #include <sys/types.h> | |
| #include <sys/socket.h> | |
| #include <sys/time.h> | |
| #include <netinet/in.h> | |
| #include <arpa/inet.h> | |
| #include <netdb.h> | |
| #include <glib.h> | |
| #include <string.h> | |
| #include <fcntl.h> | |
| #include <unistd.h> | |
| #include <errno.h> | |
| #include <stdio.h> | |
| #include <stdlib.h> | |
| #include <inttypes.h> | |
| #include <pthread.h> | |
| #include <xmms/util.h> | |
| #include <xmms/plugin.h> | |
| #include "FLAC/format.h" | |
| #include "configure.h" | |
| #include "locale_hack.h" | |
| /* on FreeBSD we get socklen_t from <sys/socket.h> */ | |
| #if (!defined HAVE_SOCKLEN_T) && !defined(__FreeBSD__) | |
| typedef uint32_t socklen_t; | |
| #endif | |
| #define min(x,y) ((x)<(y)?(x):(y)) | |
| #define min3(x,y,z) (min(x,y)<(z)?min(x,y):(z)) | |
| #define min4(x,y,z,w) (min3(x,y,z)<(w)?min3(x,y,z):(w)) | |
| static gchar *icy_name = NULL; | |
| static gint icy_metaint = 0; | |
| extern InputPlugin flac_ip; | |
| /* Static udp channel functions */ | |
| static int udp_establish_listener (gint *sock); | |
| static int udp_check_for_data(gint sock); | |
| static char *flac_http_get_title(char *url); | |
| static gboolean prebuffering, going, eof = FALSE; | |
| static gint sock, rd_index, wr_index, buffer_length, prebuffer_length; | |
| static guint64 buffer_read = 0; | |
| static gchar *buffer; | |
| static guint64 offset; | |
| static pthread_t thread; | |
| static GtkWidget *error_dialog = NULL; | |
| static FILE *output_file = NULL; | |
| #define BASE64_LENGTH(len) (4 * (((len) + 2) / 3)) | |
| /* Encode the string S of length LENGTH to base64 format and place it | |
| to STORE. STORE will be 0-terminated, and must point to a writable | |
| buffer of at least 1+BASE64_LENGTH(length) bytes. */ | |
| static void base64_encode (const gchar *s, gchar *store, gint length) | |
| { | |
| /* Conversion table. */ | |
| static gchar tbl[64] = { | |
| 'A','B','C','D','E','F','G','H', | |
| 'I','J','K','L','M','N','O','P', | |
| 'Q','R','S','T','U','V','W','X', | |
| 'Y','Z','a','b','c','d','e','f', | |
| 'g','h','i','j','k','l','m','n', | |
| 'o','p','q','r','s','t','u','v', | |
| 'w','x','y','z','0','1','2','3', | |
| '4','5','6','7','8','9','+','/' | |
| }; | |
| gint i; | |
| guchar *p = (guchar *)store; | |
| /* Transform the 3x8 bits to 4x6 bits, as required by base64. */ | |
| for (i = 0; i < length; i += 3) | |
| { | |
| *p++ = tbl[s[0] >> 2]; | |
| *p++ = tbl[((s[0] & 3) << 4) + (s[1] >> 4)]; | |
| *p++ = tbl[((s[1] & 0xf) << 2) + (s[2] >> 6)]; | |
| *p++ = tbl[s[2] & 0x3f]; | |
| s += 3; | |
| } | |
| /* Pad the result if necessary... */ | |
| if (i == length + 1) | |
| *(p - 1) = '='; | |
| else if (i == length + 2) | |
| *(p - 1) = *(p - 2) = '='; | |
| /* ...and zero-terminate it. */ | |
| *p = '\0'; | |
| } | |
| /* Create the authentication header contents for the `Basic' scheme. | |
| This is done by encoding the string `USER:PASS' in base64 and | |
| prepending `HEADER: Basic ' to it. */ | |
| static gchar *basic_authentication_encode (const gchar *user, const gchar *passwd, const gchar *header) | |
| { | |
| gchar *t1, *t2, *res; | |
| gint len1 = strlen (user) + 1 + strlen (passwd); | |
| gint len2 = BASE64_LENGTH (len1); | |
| t1 = g_strdup_printf("%s:%s", user, passwd); | |
| t2 = g_malloc0(len2 + 1); | |
| base64_encode (t1, t2, len1); | |
| res = g_strdup_printf("%s: Basic %s\r\n", header, t2); | |
| g_free(t2); | |
| g_free(t1); | |
| return res; | |
| } | |
| static void parse_url(const gchar * url, gchar ** user, gchar ** pass, gchar ** host, int *port, gchar ** filename) | |
| { | |
| gchar *h, *p, *pt, *f, *temp, *ptr; | |
| temp = g_strdup(url); | |
| ptr = temp; | |
| if (!strncasecmp("http://", ptr, 7)) | |
| ptr += 7; | |
| h = strchr(ptr, '@'); | |
| f = strchr(ptr, '/'); | |
| if (h != NULL && (!f || h < f)) | |
| { | |
| *h = '\0'; | |
| p = strchr(ptr, ':'); | |
| if (p != NULL && p < h) | |
| { | |
| *p = '\0'; | |
| p++; | |
| *pass = g_strdup(p); | |
| } | |
| else | |
| *pass = NULL; | |
| *user = g_strdup(ptr); | |
| h++; | |
| ptr = h; | |
| } | |
| else | |
| { | |
| *user = NULL; | |
| *pass = NULL; | |
| h = ptr; | |
| } | |
| pt = strchr(ptr, ':'); | |
| if (pt != NULL && (f == NULL || pt < f)) | |
| { | |
| *pt = '\0'; | |
| *port = atoi(pt + 1); | |
| } | |
| else | |
| { | |
| if (f) | |
| *f = '\0'; | |
| *port = 80; | |
| } | |
| *host = g_strdup(h); | |
| if (f) | |
| *filename = g_strdup(f + 1); | |
| else | |
| *filename = NULL; | |
| g_free(temp); | |
| } | |
| void flac_http_close(void) | |
| { | |
| going = FALSE; | |
| pthread_join(thread, NULL); | |
| g_free(icy_name); | |
| icy_name = NULL; | |
| } | |
| static gint http_used(void) | |
| { | |
| if (wr_index >= rd_index) | |
| return wr_index - rd_index; | |
| return buffer_length - (rd_index - wr_index); | |
| } | |
| static gint http_free(void) | |
| { | |
| if (rd_index > wr_index) | |
| return (rd_index - wr_index) - 1; | |
| return (buffer_length - (wr_index - rd_index)) - 1; | |
| } | |
| static void http_wait_for_data(gint bytes) | |
| { | |
| while ((prebuffering || http_used() < bytes) && !eof && going) | |
| xmms_usleep(10000); | |
| } | |
| static void show_error_message(gchar *error) | |
| { | |
| if(!error_dialog) | |
| { | |
| GDK_THREADS_ENTER(); | |
| error_dialog = xmms_show_message(_("Error"), error, _("Ok"), FALSE, | |
| NULL, NULL); | |
| gtk_signal_connect(GTK_OBJECT(error_dialog), | |
| "destroy", | |
| GTK_SIGNAL_FUNC(gtk_widget_destroyed), | |
| &error_dialog); | |
| GDK_THREADS_LEAVE(); | |
| } | |
| } | |
| int flac_http_read(gpointer data, gint length) | |
| { | |
| gint len, cnt, off = 0, meta_len, meta_off = 0, i; | |
| gchar *meta_data, **tags, *temp, *title; | |
| if (length > buffer_length) { | |
| length = buffer_length; | |
| } | |
| http_wait_for_data(length); | |
| if (!going) | |
| return 0; | |
| len = min(http_used(), length); | |
| while (len && http_used()) | |
| { | |
| if ((flac_cfg.stream.cast_title_streaming) && (icy_metaint > 0) && (buffer_read % icy_metaint) == 0 && (buffer_read > 0)) | |
| { | |
| meta_len = *((guchar *) buffer + rd_index) * 16; | |
| rd_index = (rd_index + 1) % buffer_length; | |
| if (meta_len > 0) | |
| { | |
| http_wait_for_data(meta_len); | |
| meta_data = g_malloc0(meta_len); | |
| if (http_used() >= meta_len) | |
| { | |
| while (meta_len) | |
| { | |
| cnt = min(meta_len, buffer_length - rd_index); | |
| memcpy(meta_data + meta_off, buffer + rd_index, cnt); | |
| rd_index = (rd_index + cnt) % buffer_length; | |
| meta_len -= cnt; | |
| meta_off += cnt; | |
| } | |
| tags = g_strsplit(meta_data, "';", 0); | |
| for (i = 0; tags[i]; i++) | |
| { | |
| if (!strncasecmp(tags[i], "StreamTitle=", 12)) | |
| { | |
| temp = g_strdup(tags[i] + 13); | |
| title = g_strdup_printf("%s (%s)", temp, icy_name); | |
| set_track_info(title, -1); | |
| g_free(title); | |
| g_free(temp); | |
| } | |
| } | |
| g_strfreev(tags); | |
| } | |
| g_free(meta_data); | |
| } | |
| if (!http_used()) | |
| http_wait_for_data(length - off); | |
| cnt = min3(len, buffer_length - rd_index, http_used()); | |
| } | |
| else if ((icy_metaint > 0) && (flac_cfg.stream.cast_title_streaming)) | |
| cnt = min4(len, buffer_length - rd_index, http_used(), icy_metaint - (gint) (buffer_read % icy_metaint)); | |
| else | |
| cnt = min3(len, buffer_length - rd_index, http_used()); | |
| if (output_file) | |
| fwrite(buffer + rd_index, 1, cnt, output_file); | |
| memcpy((gchar *)data + off, buffer + rd_index, cnt); | |
| rd_index = (rd_index + cnt) % buffer_length; | |
| buffer_read += cnt; | |
| len -= cnt; | |
| off += cnt; | |
| } | |
| if (!off) { | |
| fprintf(stderr, "returning zero\n"); | |
| } | |
| return off; | |
| } | |
| static gboolean http_check_for_data(void) | |
| { | |
| fd_set set; | |
| struct timeval tv; | |
| gint ret; | |
| tv.tv_sec = 0; | |
| tv.tv_usec = 20000; | |
| FD_ZERO(&set); | |
| FD_SET(sock, &set); | |
| ret = select(sock + 1, &set, NULL, NULL, &tv); | |
| if (ret > 0) | |
| return TRUE; | |
| return FALSE; | |
| } | |
| gint flac_http_read_line(gchar * buf, gint size) | |
| { | |
| gint i = 0; | |
| while (going && i < size - 1) | |
| { | |
| if (http_check_for_data()) | |
| { | |
| if (read(sock, buf + i, 1) <= 0) | |
| return -1; | |
| if (buf[i] == '\n') | |
| break; | |
| if (buf[i] != '\r') | |
| i++; | |
| } | |
| } | |
| if (!going) | |
| return -1; | |
| buf[i] = '\0'; | |
| return i; | |
| } | |
| /* returns the file descriptor of the socket, or -1 on error */ | |
| static int http_connect (gchar *url_, gboolean head, guint64 offset) | |
| { | |
| gchar line[1024], *user, *pass, *host, *filename, | |
| *status, *url, *temp, *file; | |
| gchar *chost; | |
| gint cnt, error, port, cport; | |
| socklen_t err_len; | |
| gboolean redirect; | |
| int udp_sock = 0; | |
| fd_set set; | |
| struct hostent *hp; | |
| struct sockaddr_in address; | |
| struct timeval tv; | |
| url = g_strdup (url_); | |
| do | |
| { | |
| redirect=FALSE; | |
| g_strstrip(url); | |
| parse_url(url, &user, &pass, &host, &port, &filename); | |
| if ((!filename || !*filename) && url[strlen(url) - 1] != '/') | |
| temp = g_strconcat(url, "/", NULL); | |
| else | |
| temp = g_strdup(url); | |
| g_free(url); | |
| url = temp; | |
| chost = flac_cfg.stream.use_proxy ? flac_cfg.stream.proxy_host : host; | |
| cport = flac_cfg.stream.use_proxy ? flac_cfg.stream.proxy_port : port; | |
| sock = socket(AF_INET, SOCK_STREAM, 0); | |
| fcntl(sock, F_SETFL, O_NONBLOCK); | |
| address.sin_family = AF_INET; | |
| status = g_strdup_printf(_("LOOKING UP %s"), chost); | |
| flac_ip.set_info_text(status); | |
| g_free(status); | |
| if (!(hp = gethostbyname(chost))) | |
| { | |
| status = g_strdup_printf(_("Couldn't look up host %s"), chost); | |
| show_error_message(status); | |
| g_free(status); | |
| flac_ip.set_info_text(NULL); | |
| eof = TRUE; | |
| } | |
| if (!eof) | |
| { | |
| memcpy(&address.sin_addr.s_addr, *(hp->h_addr_list), sizeof (address.sin_addr.s_addr)); | |
| address.sin_port = (gint) g_htons(cport); | |
| status = g_strdup_printf(_("CONNECTING TO %s:%d"), chost, cport); | |
| flac_ip.set_info_text(status); | |
| g_free(status); | |
| if (connect(sock, (struct sockaddr *) &address, sizeof (struct sockaddr_in)) == -1) | |
| { | |
| if (errno != EINPROGRESS) | |
| { | |
| status = g_strdup_printf(_("Couldn't connect to host %s"), chost); | |
| show_error_message(status); | |
| g_free(status); | |
| flac_ip.set_info_text(NULL); | |
| eof = TRUE; | |
| } | |
| } | |
| while (going) | |
| { | |
| tv.tv_sec = 0; | |
| tv.tv_usec = 10000; | |
| FD_ZERO(&set); | |
| FD_SET(sock, &set); | |
| if (select(sock + 1, NULL, &set, NULL, &tv) > 0) | |
| { | |
| err_len = sizeof (error); | |
| getsockopt(sock, SOL_SOCKET, SO_ERROR, &error, &err_len); | |
| if (error) | |
| { | |
| status = g_strdup_printf(_("Couldn't connect to host %s"), | |
| chost); | |
| show_error_message(status); | |
| g_free(status); | |
| flac_ip.set_info_text(NULL); | |
| eof = TRUE; | |
| } | |
| break; | |
| } | |
| } | |
| if (!eof) | |
| { | |
| gchar *auth = NULL, *proxy_auth = NULL; | |
| gchar udpspace[30]; | |
| int udp_port; | |
| if (flac_cfg.stream.use_udp_channel) | |
| { | |
| udp_port = udp_establish_listener (&udp_sock); | |
| if (udp_port > 0) | |
| flac_snprintf (udpspace, sizeof (udpspace), "x-audiocast-udpport: %d\r\n", udp_port); | |
| else | |
| udp_sock = 0; | |
| } | |
| if(user && pass) | |
| auth = basic_authentication_encode(user, pass, "Authorization"); | |
| if (flac_cfg.stream.use_proxy) | |
| { | |
| file = g_strdup(url); | |
| if(flac_cfg.stream.proxy_use_auth && flac_cfg.stream.proxy_user && flac_cfg.stream.proxy_pass) | |
| { | |
| proxy_auth = basic_authentication_encode(flac_cfg.stream.proxy_user, | |
| flac_cfg.stream.proxy_pass, | |
| "Proxy-Authorization"); | |
| } | |
| } | |
| else | |
| file = g_strconcat("/", filename, NULL); | |
| temp = g_strdup_printf("GET %s HTTP/1.0\r\n" | |
| "Host: %s\r\n" | |
| "User-Agent: %s/%s\r\n" | |
| "%s%s%s%s", | |
| file, host, "Reference FLAC Player", FLAC__VERSION_STRING, | |
| proxy_auth ? proxy_auth : "", auth ? auth : "", | |
| flac_cfg.stream.cast_title_streaming ? "Icy-MetaData:1\r\n" : "", | |
| flac_cfg.stream.use_udp_channel ? udpspace : ""); | |
| if (offset && !head) { | |
| gchar *temp_dead = temp; | |
| temp = g_strdup_printf ("%sRange: %" PRIu64 "-\r\n", temp, offset); | |
| fputs (temp, stderr); | |
| g_free (temp_dead); | |
| } | |
| g_free(file); | |
| if(proxy_auth) | |
| g_free(proxy_auth); | |
| if(auth) | |
| g_free(auth); | |
| write(sock, temp, strlen(temp)); | |
| write(sock, "\r\n", 2); | |
| g_free(temp); | |
| flac_ip.set_info_text(_("CONNECTED: WAITING FOR REPLY")); | |
| while (going && !eof) | |
| { | |
| if (http_check_for_data()) | |
| { | |
| if (flac_http_read_line(line, 1024)) | |
| { | |
| status = strchr(line, ' '); | |
| if (status) | |
| { | |
| if (status[1] == '2') | |
| break; | |
| else if(status[1] == '3' && status[2] == '0' && status[3] == '2') | |
| { | |
| while(going) | |
| { | |
| if(http_check_for_data()) | |
| { | |
| if((cnt = flac_http_read_line(line, 1024)) != -1) | |
| { | |
| if(!cnt) | |
| break; | |
| if(!strncmp(line, "Location:", 9)) | |
| { | |
| g_free(url); | |
| url = g_strdup(line+10); | |
| } | |
| } | |
| else | |
| { | |
| eof=TRUE; | |
| flac_ip.set_info_text(NULL); | |
| break; | |
| } | |
| } | |
| } | |
| redirect=TRUE; | |
| break; | |
| } | |
| else | |
| { | |
| status = g_strdup_printf(_("Couldn't connect to host %s\nServer reported: %s"), chost, status); | |
| show_error_message(status); | |
| g_free(status); | |
| break; | |
| } | |
| } | |
| } | |
| else | |
| { | |
| eof = TRUE; | |
| flac_ip.set_info_text(NULL); | |
| } | |
| } | |
| } | |
| while (going && !redirect) | |
| { | |
| if (http_check_for_data()) | |
| { | |
| if ((cnt = flac_http_read_line(line, 1024)) != -1) | |
| { | |
| if (!cnt) | |
| break; | |
| if (!strncmp(line, "icy-name:", 9)) | |
| icy_name = g_strdup(line + 9); | |
| else if (!strncmp(line, "x-audiocast-name:", 17)) | |
| icy_name = g_strdup(line + 17); | |
| if (!strncmp(line, "icy-metaint:", 12)) | |
| icy_metaint = atoi(line + 12); | |
| if (!strncmp(line, "x-audiocast-udpport:", 20)) { | |
| #ifndef NDEBUG | |
| fprintf (stderr, "Server wants udp messages on port %d\n", atoi (line + 20)); | |
| #endif | |
| /*udp_serverport = atoi (line + 20);*/ | |
| } | |
| } | |
| else | |
| { | |
| eof = TRUE; | |
| flac_ip.set_info_text(NULL); | |
| break; | |
| } | |
| } | |
| } | |
| } | |
| } | |
| if(redirect) | |
| { | |
| if (output_file) | |
| { | |
| fclose(output_file); | |
| output_file = NULL; | |
| } | |
| close(sock); | |
| } | |
| g_free(user); | |
| g_free(pass); | |
| g_free(host); | |
| g_free(filename); | |
| } while(redirect); | |
| g_free(url); | |
| return eof ? -1 : sock; | |
| } | |
| static void *http_buffer_loop(void *arg) | |
| { | |
| gchar *status, *url, *temp, *file; | |
| gint cnt, written; | |
| int udp_sock = 0; | |
| url = (gchar *) arg; | |
| sock = http_connect (url, false, offset); | |
| if (sock >= 0 && flac_cfg.stream.save_http_stream) { | |
| gchar *output_name; | |
| file = flac_http_get_title(url); | |
| output_name = file; | |
| if (!strncasecmp(output_name, "http://", 7)) | |
| output_name += 7; | |
| temp = strrchr(output_name, '.'); | |
| if (temp && (!strcasecmp(temp, ".fla") || !strcasecmp(temp, ".flac"))) | |
| *temp = '\0'; | |
| while ((temp = strchr(output_name, '/'))) | |
| *temp = '_'; | |
| output_name = g_strdup_printf("%s/%s.flac", flac_cfg.stream.save_http_path, output_name); | |
| g_free(file); | |
| output_file = fopen(output_name, "wb"); | |
| g_free(output_name); | |
| } | |
| while (going) | |
| { | |
| if (!http_used() && !flac_ip.output->buffer_playing()) | |
| prebuffering = TRUE; | |
| if (http_free() > 0 && !eof) | |
| { | |
| if (http_check_for_data()) | |
| { | |
| cnt = min(http_free(), buffer_length - wr_index); | |
| if (cnt > 1024) | |
| cnt = 1024; | |
| written = read(sock, buffer + wr_index, cnt); | |
| if (written <= 0) | |
| { | |
| eof = TRUE; | |
| if (prebuffering) | |
| { | |
| prebuffering = FALSE; | |
| flac_ip.set_info_text(NULL); | |
| } | |
| } | |
| else | |
| wr_index = (wr_index + written) % buffer_length; | |
| } | |
| if (prebuffering) | |
| { | |
| if (http_used() > prebuffer_length) | |
| { | |
| prebuffering = FALSE; | |
| flac_ip.set_info_text(NULL); | |
| } | |
| else | |
| { | |
| status = g_strdup_printf(_("PRE-BUFFERING: %dKB/%dKB"), http_used() / 1024, prebuffer_length / 1024); | |
| flac_ip.set_info_text(status); | |
| g_free(status); | |
| } | |
| } | |
| } | |
| else | |
| xmms_usleep(10000); | |
| if (flac_cfg.stream.use_udp_channel && udp_sock != 0) | |
| if (udp_check_for_data(udp_sock) < 0) | |
| { | |
| close(udp_sock); | |
| udp_sock = 0; | |
| } | |
| } | |
| if (output_file) | |
| { | |
| fclose(output_file); | |
| output_file = NULL; | |
| } | |
| if (sock >= 0) { | |
| close(sock); | |
| } | |
| if (udp_sock != 0) | |
| close(udp_sock); | |
| g_free(buffer); | |
| g_free(url); | |
| pthread_exit(NULL); | |
| return NULL; /* avoid compiler warning */ | |
| } | |
| int flac_http_open(const gchar * _url, guint64 _offset) | |
| { | |
| gchar *url; | |
| url = g_strdup(_url); | |
| rd_index = 0; | |
| wr_index = 0; | |
| buffer_length = flac_cfg.stream.http_buffer_size * 1024; | |
| prebuffer_length = (buffer_length * flac_cfg.stream.http_prebuffer) / 100; | |
| buffer_read = 0; | |
| icy_metaint = 0; | |
| prebuffering = TRUE; | |
| going = TRUE; | |
| eof = FALSE; | |
| buffer = g_malloc(buffer_length); | |
| offset = _offset; | |
| pthread_create(&thread, NULL, http_buffer_loop, url); | |
| return 0; | |
| } | |
| char *flac_http_get_title(char *url) | |
| { | |
| if (icy_name) | |
| return g_strdup(icy_name); | |
| if (g_basename(url) && strlen(g_basename(url)) > 0) | |
| return g_strdup(g_basename(url)); | |
| return g_strdup(url); | |
| } | |
| /* Start UDP Channel specific stuff */ | |
| /* Find a good local udp port and bind udp_sock to it, return the port */ | |
| static int udp_establish_listener(int *sock) | |
| { | |
| struct sockaddr_in sin; | |
| socklen_t sinlen = sizeof (struct sockaddr_in); | |
| #ifndef NDEBUG | |
| fprintf (stderr,"Establishing udp listener\n"); | |
| #endif | |
| if ((*sock = socket(AF_INET, SOCK_DGRAM, 0)) < 0) | |
| { | |
| g_log(NULL, G_LOG_LEVEL_CRITICAL, | |
| "udp_establish_listener(): unable to create socket"); | |
| return -1; | |
| } | |
| memset(&sin, 0, sinlen); | |
| sin.sin_family = AF_INET; | |
| sin.sin_addr.s_addr = g_htonl(INADDR_ANY); | |
| if (bind(*sock, (struct sockaddr *)&sin, sinlen) < 0) | |
| { | |
| g_log(NULL, G_LOG_LEVEL_CRITICAL, | |
| "udp_establish_listener(): Failed to bind socket to localhost: %s", strerror(errno)); | |
| close(*sock); | |
| return -1; | |
| } | |
| if (fcntl(*sock, F_SETFL, O_NONBLOCK) < 0) | |
| { | |
| g_log(NULL, G_LOG_LEVEL_CRITICAL, | |
| "udp_establish_listener(): Failed to set flags: %s", strerror(errno)); | |
| close(*sock); | |
| return -1; | |
| } | |
| memset(&sin, 0, sinlen); | |
| if (getsockname(*sock, (struct sockaddr *)&sin, &sinlen) < 0) | |
| { | |
| g_log(NULL, G_LOG_LEVEL_CRITICAL, | |
| "udp_establish_listener(): Failed to retrieve socket info: %s", strerror(errno)); | |
| close(*sock); | |
| return -1; | |
| } | |
| #ifndef NDEBUG | |
| fprintf (stderr,"Listening on local %s:%d\n", inet_ntoa(sin.sin_addr), g_ntohs(sin.sin_port)); | |
| #endif | |
| return g_ntohs(sin.sin_port); | |
| } | |
| static int udp_check_for_data(int sock) | |
| { | |
| char buf[1025], **lines; | |
| char *valptr; | |
| gchar *title; | |
| gint len, i; | |
| struct sockaddr_in from; | |
| socklen_t fromlen; | |
| fromlen = sizeof(struct sockaddr_in); | |
| if ((len = recvfrom(sock, buf, 1024, 0, (struct sockaddr *)&from, &fromlen)) < 0) | |
| { | |
| if (errno != EAGAIN) | |
| { | |
| g_log(NULL, G_LOG_LEVEL_CRITICAL, | |
| "udp_read_data(): Error reading from socket: %s", strerror(errno)); | |
| return -1; | |
| } | |
| return 0; | |
| } | |
| buf[len] = '\0'; | |
| #ifndef NDEBUG | |
| fprintf (stderr,"Received: [%s]\n", buf); | |
| #endif | |
| lines = g_strsplit(buf, "\n", 0); | |
| if (!lines) | |
| return 0; | |
| for (i = 0; lines[i]; i++) | |
| { | |
| while ((lines[i][strlen(lines[i]) - 1] == '\n') || | |
| (lines[i][strlen(lines[i]) - 1] == '\r')) | |
| lines[i][strlen(lines[i]) - 1] = '\0'; | |
| valptr = strchr(lines[i], ':'); | |
| if (!valptr) | |
| continue; | |
| else | |
| valptr++; | |
| g_strstrip(valptr); | |
| if (!strlen(valptr)) | |
| continue; | |
| if (strstr(lines[i], "x-audiocast-streamtitle") != NULL) | |
| { | |
| title = g_strdup_printf ("%s (%s)", valptr, icy_name); | |
| if (going) | |
| set_track_info(title, -1); | |
| g_free (title); | |
| } | |
| #if 0 | |
| else if (strstr(lines[i], "x-audiocast-streamlength") != NULL) | |
| { | |
| if (atoi(valptr) != -1) | |
| set_track_info(NULL, atoi(valptr)); | |
| } | |
| #endif | |
| else if (strstr(lines[i], "x-audiocast-streammsg") != NULL) | |
| { | |
| /* set_track_info(title, -1); */ | |
| /* xmms_show_message(_("Message"), valptr, _("Ok"), */ | |
| /* FALSE, NULL, NULL); */ | |
| g_message("Stream_message: %s", valptr); | |
| } | |
| #if 0 | |
| /* Use this to direct your webbrowser.. yeah right.. */ | |
| else if (strstr(lines[i], "x-audiocast-streamurl") != NULL) | |
| { | |
| if (lasturl && g_strcmp (valptr, lasturl)) | |
| { | |
| c_message (stderr, "Song URL: %s\n", valptr); | |
| g_free (lasturl); | |
| lasturl = g_strdup (valptr); | |
| } | |
| } | |
| #endif | |
| else if (strstr(lines[i], "x-audiocast-udpseqnr:") != NULL) | |
| { | |
| gchar obuf[60]; | |
| flac_snprintf(obuf, sizeof (obuf), "x-audiocast-ack: %ld \r\n", atol(valptr)); | |
| if (sendto(sock, obuf, strlen(obuf), 0, (struct sockaddr *) &from, fromlen) < 0) | |
| { | |
| g_log(NULL, G_LOG_LEVEL_WARNING, | |
| "udp_check_for_data(): Unable to send ack to server: %s", strerror(errno)); | |
| } | |
| #ifndef NDEBUG | |
| else | |
| fprintf(stderr,"Sent ack: %s", obuf); | |
| fprintf (stderr,"Remote: %s:%d\n", inet_ntoa(from.sin_addr), g_ntohs(from.sin_port)); | |
| #endif | |
| } | |
| } | |
| g_strfreev(lines); | |
| return 0; | |
| } |