Merge branch 'master' of git.distorted.org.uk:~mdw/publish/public-git/disorder
[disorder] / disobedience / rtp.c
1 /*
2 * This file is part of Disobedience
3 * Copyright (C) 2007-2010 Richard Kettlewell
4 *
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation, either version 3 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
17 */
18 /** @file disobedience/rtp.c
19 * @brief RTP player support for Disobedience
20 */
21
22 #include "disobedience.h"
23 #include <sys/types.h>
24 #include <sys/stat.h>
25 #include <unistd.h>
26 #include <fcntl.h>
27 #include <sys/un.h>
28 #include <sys/utsname.h>
29 #include <sys/wait.h>
30
31 /** @brief Path to RTP player's control socket */
32 static char *rtp_socket;
33
34 /** @brief Path to RTP player's logfile */
35 static char *rtp_log;
36
37 static char *substitute_instance_name(void) {
38 const char *p = config->rtp_instance_name;
39 struct utsname uts;
40 size_t n;
41 int ok;
42 struct dynstr z;
43
44 ok = (uname(&uts) >= 0);
45 if(!p) p = "%h-rtp";
46 dynstr_init(&z);
47 for(;;) {
48 n = strcspn(p, "%");
49 if(n) { dynstr_append_bytes(&z, p, n); p += n; }
50 if(!*p) break;
51 p++;
52 switch(*p) {
53 case '%': dynstr_append_bytes(&z, "%", 1); p++; break;
54 case 'h':
55 if(ok) { dynstr_append_string(&z, uts.nodename); p++; }
56 else { p++; if(*p) p++; }
57 case 0: break;
58 default: dynstr_append_bytes(&z, p - 1, 2); p++; break;
59 }
60 }
61 dynstr_terminate(&z);
62 return z.vec;
63 }
64
65 /** @brief Initialize @ref rtp_socket and @ref rtp_log if necessary */
66 static void rtp_init(void) {
67 if(!rtp_socket) {
68 const char *dir, *instance;
69 if(!(dir = profile_directory()))
70 disorder_fatal(0, "failed to find profile directory");
71 mkdir(dir, 02700);
72 instance = substitute_instance_name();
73 byte_xasprintf(&rtp_socket, "%s/%s", dir, instance);
74 byte_xasprintf(&rtp_log, "%s/%s.log", dir, instance);
75 }
76 }
77
78 /** @brief Return a connection to the RTP player's control socket */
79 static FILE *rtp_connect(void) {
80 struct sockaddr_un un;
81 int fd;
82 FILE *fp;
83
84 rtp_init();
85 memset(&un, 0, sizeof un);
86 un.sun_family = AF_UNIX;
87 strcpy(un.sun_path, rtp_socket);
88 fd = xsocket(PF_UNIX, SOCK_STREAM, 0);
89 if(connect(fd, (const struct sockaddr *)&un, sizeof un) < 0) {
90 /* Connection refused just means that the player quit without deleting its
91 * socket */
92 switch(errno) {
93 case ECONNREFUSED:
94 case ENOENT:
95 break;
96 default:
97 /* Anything else may be a problem */
98 fpopup_msg(GTK_MESSAGE_ERROR, "connecting to %s: %s",
99 rtp_socket, strerror(errno));
100 break;
101 }
102 close(fd);
103 return 0;
104 }
105 if(!(fp = fdopen(fd, "r+"))) {
106 fpopup_msg(GTK_MESSAGE_ERROR, "error calling fdopen: %s", strerror(errno));
107 close(fd);
108 return 0;
109 }
110 return fp;
111 }
112
113 /** @brief Return non-0 iff the RTP player is running */
114 int rtp_running(void) {
115 FILE *fp = rtp_connect();
116
117 if(!fp)
118 return 0; /* no connection -> not running */
119 fclose(fp); /* connection -> running */
120 return 1;
121 }
122
123 int rtp_getvol(int *l, int *r) {
124 FILE *fp;
125 int rc = -1;
126
127 fp = rtp_connect(); if(!fp) goto end;
128 fprintf(fp, "getvol\n"); fflush(fp);
129 if(fscanf(fp, "%d %d\n", l, r) != 2) goto end;
130 rc = 0;
131 end:
132 if(fp) fclose(fp);
133 return rc;
134 }
135
136 int rtp_setvol(int *l, int *r) {
137 FILE *fp = rtp_connect(); if(!fp) return -1;
138 fprintf(fp, "setvol %d %d\n", *l, *r); fflush(fp);
139 if(fscanf(fp, "%d %d\n", l, r) != 2) { /* do nothing */ }
140 fclose(fp);
141 return 0;
142 }
143
144 /** @brief Activate the RTP player if it is not running */
145 void start_rtp(void) {
146 pid_t pid;
147 int w, fd;
148
149 if(rtp_running())
150 return; /* already running */
151 /* double-fork so we don't have to wait() later */
152 if(!(pid = xfork())) {
153 if(setsid() < 0)
154 disorder_fatal(errno, "error calling setsid");
155 if(!xfork()) {
156 /* grandchild */
157 exitfn = _exit;
158 /* log errors and output somewhere reasonably sane. rtp_running()
159 * will have made sure the directory exists. */
160 if((fd = open(rtp_log, O_WRONLY|O_CREAT|O_TRUNC, 0600)) < 0)
161 disorder_fatal(errno, "creating %s", rtp_log);
162 if(dup2(fd, 1) < 0
163 || dup2(fd, 2) < 0)
164 disorder_fatal(errno, "dup2");
165 if(close(fd) < 0)
166 disorder_fatal(errno, "close");
167 /* We don't want to hang onto whatever stdin was */
168 if((fd = open("/dev/null", O_RDONLY)) < 0)
169 disorder_fatal(errno, "opening /dev/null");
170 if(dup2(fd, 0) < 0)
171 disorder_fatal(errno, "dup2");
172 if(close(fd) < 0)
173 disorder_fatal(errno, "close");
174 /* execute the player */
175 execlp("disorder-playrtp",
176 "disorder-playrtp",
177 "--socket", rtp_socket,
178 "--api", rtp_api,
179 "--config", configfile,
180 "--user-config", userconfigfile,
181 (char *)0);
182 disorder_fatal(errno, "disorder-playrtp");
183 } else {
184 /* child */
185 _exit(0);
186 }
187 } else {
188 /* parent */
189 while(waitpid(pid, &w, 0) < 0 && errno == EINTR)
190 ;
191 }
192 }
193
194 /** @brief Stop the RTP player if it is running */
195 void stop_rtp(void) {
196 FILE *fp = rtp_connect();
197
198 if(!fp)
199 return; /* already stopped */
200 fprintf(fp, "stop\n");
201 fclose(fp);
202 }
203
204 static char *rtp_config_file(void) {
205 static char *rtp_config;
206 if(!rtp_config)
207 rtp_config = profile_filename("api");
208 return rtp_config;
209 }
210
211 const char *rtp_api;
212
213 void load_rtp_config(void) {
214 char *rtp_config = rtp_config_file();
215 FILE *fp;
216 if((fp = fopen(rtp_config, "r"))) {
217 char *line;
218 if(inputline(rtp_config, fp, &line, '\n') == 0) {
219 for(int n = 0; uaudio_apis[n]; ++n)
220 if(!strcmp(uaudio_apis[n]->name, line))
221 rtp_api = line;
222 }
223 fclose(fp);
224 }
225 if(!rtp_api)
226 rtp_api = uaudio_default(uaudio_apis, UAUDIO_API_CLIENT)->name;
227 }
228
229 void save_rtp_config(void) {
230 if(rtp_api) {
231 char *rtp_config = rtp_config_file();
232 char *tmp;
233 byte_xasprintf(&tmp, "%s.tmp", rtp_config);
234 FILE *fp;
235 if(!(fp = fopen(tmp, "w"))){
236 fpopup_msg(GTK_MESSAGE_ERROR, "error opening %s: %s",
237 tmp, strerror(errno));
238 return;
239 }
240 if(fprintf(fp, "%s\n", rtp_api) < 0) {
241 fpopup_msg(GTK_MESSAGE_ERROR, "error writing to %s: %s",
242 tmp, strerror(errno));
243 fclose(fp);
244 return;
245 }
246 if(fclose(fp) < 0) {
247 fpopup_msg(GTK_MESSAGE_ERROR, "error closing %s: %s",
248 tmp, strerror(errno));
249 return;
250 }
251 if(rename(tmp, rtp_config) < 0) {
252 fpopup_msg(GTK_MESSAGE_ERROR, "error renaming %s: %s",
253 tmp, strerror(errno));
254 }
255 }
256 }
257
258 void change_rtp_api(const char *api) {
259 if(rtp_api && !strcmp(api, rtp_api))
260 return; /* no change */
261 int running = rtp_running();
262 if(running)
263 stop_rtp();
264 rtp_api = api;
265 save_rtp_config();
266 // TODO this is racy and does not work; the player doesn't shut down quickly
267 // enough.
268 if(running)
269 start_rtp();
270 }
271
272 /*
273 Local Variables:
274 c-basic-offset:2
275 comment-column:40
276 fill-column:79
277 indent-tabs-mode:nil
278 End:
279 */