2 * Copyright (C) 2007-2009 Andre Noll <maan@systemlinux.org>
4 * Licensed under the GPL v2. For licencing details see COPYING.
7 /** \file afs.c Paraslash's audio file selector. */
11 #include "server.cmdline.h"
18 #include <dirent.h> /* readdir() */
28 /** The osl tables used by afs. \sa blob.c. */
30 /** Contains audio file information. See aft.c. */
32 /** The table for the paraslash attributes. See attribute.c. */
35 * Paraslash's scoring system is based on Gaussian normal
36 * distributions, and the relevant data is stored in the rbtrees of an
37 * osl table containing only volatile columns. See score.c for
42 * A standard blob table containing the mood definitions. For details
46 /** A blob table containing lyrics on a per-song basis. */
48 /** Another blob table for images (for example album cover art). */
50 /** Yet another blob table for storing standard playlists. */
52 /** How many tables are in use? */
56 static struct afs_table afs_tables
[NUM_AFS_TABLES
] = {
57 [TBLNUM_AUDIO_FILES
] = {.init
= aft_init
},
58 [TBLNUM_ATTRIBUTES
] = {.init
= attribute_init
},
59 [TBLNUM_SCORES
] = {.init
= score_init
},
60 [TBLNUM_MOODS
] = {.init
= moods_init
},
61 [TBLNUM_LYRICS
] = {.init
= lyrics_init
},
62 [TBLNUM_IMAGES
] = {.init
= images_init
},
63 [TBLNUM_PLAYLIST
] = {.init
= playlists_init
},
67 /** The file descriptor for the local socket. */
70 * Value sent by the command handlers to identify themselves as
71 * children of the running para_server.
74 /** The associated task structure. */
79 extern struct misc_meta_data
*mmd
;
81 static int server_socket
;
82 static struct command_task command_task_struct
;
83 static struct signal_task signal_task_struct
;
85 static enum play_mode current_play_mode
;
86 static char *current_mop
; /* mode or playlist specifier. NULL means dummy mooe */
89 * A random number used to "authenticate" the connection.
91 * para_server picks this number by random before forking the afs process. The
92 * command handlers write this number together with the id of the shared memory
93 * area containing the query. This way, a malicious local user has to know this
94 * number to be able to cause the afs process to crash by sending fake queries.
96 extern uint32_t afs_socket_cookie
;
99 * Struct to let command handlers execute a callback in afs context.
101 * Commands that need to change the state of afs can't change the relevant data
102 * structures directly because commands are executed in a child process, i.e.
103 * they get their own virtual address space.
105 * This structure is used by \p send_callback_request() (executed from handler
106 * context) in order to let the afs process call the specified function. An
107 * instance of that structure is written to a shared memory area together with
108 * the arguments to the callback function. The identifier of the shared memory
109 * area is written to the command socket.
111 * The afs process accepts connections on the command socket and reads the
112 * shared memory id, attaches the corresponing area, calls the given handler to
113 * perform the desired action and to optionally compute a result.
115 * The result and a \p callback_result structure is then written to another
116 * shared memory area. The identifier for that area is written to the handler's
117 * command socket, so that the handler process can read the id, attach the
118 * shared memory area and use the result.
120 * \sa struct callback_result.
122 struct callback_query
{
123 /** The function to be called. */
124 callback_function
*handler
;
125 /** The number of bytes of the query */
130 * Structure embedded in the result of a callback.
132 * If the callback produced a result, an instance of that structure is embeeded
133 * into the shared memory area holding the result, mainly to let the command
134 * handler know the size of the result.
136 * \sa struct callback_query.
138 struct callback_result
{
139 /** The number of bytes of the result. */
143 static int dispatch_result(int result_shmid
, callback_result_handler
*handler
,
144 void *private_result_data
)
146 struct osl_object result
;
148 int ret2
, ret
= shm_attach(result_shmid
, ATTACH_RO
, &result_shm
);
149 struct callback_result
*cr
= result_shm
;
152 PARA_ERROR_LOG("attach failed: %s\n", para_strerror(-ret
));
155 result
.size
= cr
->result_size
;
156 result
.data
= result_shm
+ sizeof(*cr
);
159 ret
= handler(&result
, private_result_data
);
161 PARA_NOTICE_LOG("result handler error: %s\n",
162 para_strerror(-ret
));
164 ret2
= shm_detach(result_shm
);
166 PARA_ERROR_LOG("detach failed: %s\n", para_strerror(-ret2
));
174 * Ask the afs process to call a given function.
176 * \param f The function to be called.
177 * \param query Pointer to arbitrary data for the callback.
178 * \param result_handler Called for each shm area sent by the callback.
179 * \param private_result_data Passed verbatim to \a result_handler.
181 * This function creates a socket for communication with the afs process and a
182 * shared memory area (sma) to which the buffer pointed to by \a query is
183 * copied. It then notifies the afs process that the callback function \a f
184 * should be executed by sending the shared memory identifier (shmid) to the
187 * If the callback produces a result, it sends any number of shared memory
188 * identifiers back via the socket. For each such identifier received, \a
189 * result_handler is called. The contents of the sma identified by the received
190 * shmid are passed to that function as an osl object. The private_result_data
191 * pointer is passed as the second argument to \a result_handler.
195 * \sa send_option_arg_callback_request(), send_standard_callback_request().
197 int send_callback_request(callback_function
*f
, struct osl_object
*query
,
198 callback_result_handler
*result_handler
,
199 void *private_result_data
)
201 struct callback_query
*cq
;
202 int ret
, fd
= -1, query_shmid
, result_shmid
;
204 char buf
[sizeof(afs_socket_cookie
) + sizeof(int)];
205 size_t query_shm_size
= sizeof(*cq
);
206 int dispatch_error
= 0;
209 query_shm_size
+= query
->size
;
210 ret
= shm_new(query_shm_size
);
214 ret
= shm_attach(query_shmid
, ATTACH_RW
, &query_shm
);
219 cq
->query_size
= query_shm_size
- sizeof(*cq
);
222 memcpy(query_shm
+ sizeof(*cq
), query
->data
, query
->size
);
223 ret
= shm_detach(query_shm
);
227 *(uint32_t *) buf
= afs_socket_cookie
;
228 *(int *) (buf
+ sizeof(afs_socket_cookie
)) = query_shmid
;
230 ret
= create_remote_socket(conf
.afs_socket_arg
);
234 ret
= send_bin_buffer(fd
, buf
, sizeof(buf
));
238 * Read all shmids from afs.
240 * Even if the dispatcher returns an error we _must_ continue to read
241 * shmids from fd so that we can destroy all shared memory areas that
242 * have been created for us by the afs process.
245 ret
= recv_bin_buffer(fd
, buf
, sizeof(int));
248 assert(ret
== sizeof(int));
252 if (!dispatch_error
) {
253 ret
= dispatch_result(result_shmid
, result_handler
,
254 private_result_data
);
258 ret
= shm_destroy(result_shmid
);
260 PARA_CRIT_LOG("destroy result failed: %s\n",
261 para_strerror(-ret
));
264 if (shm_destroy(query_shmid
) < 0)
265 PARA_CRIT_LOG("shm destroy error\n");
268 // PARA_DEBUG_LOG("callback_ret: %d\n", ret);
273 * Send a callback request passing an options structure and an argument vector.
275 * \param options pointer to an arbitrary data structure.
276 * \param argc Argument count.
277 * \param argv Standard argument vector.
278 * \param f The callback function.
279 * \param result_handler See \ref send_callback_request.
280 * \param private_result_data See \ref send_callback_request.
282 * Some commands have a couple of options that are parsed in child context for
283 * syntactic correctness and are stored in a special options structure for that
284 * command. This function allows to pass such a structure together with a list
285 * of further arguments (often a list of audio files) to the parent process.
287 * \sa send_standard_callback_request(), send_callback_request().
289 int send_option_arg_callback_request(struct osl_object
*options
,
290 int argc
, char * const * const argv
, callback_function
*f
,
291 callback_result_handler
*result_handler
,
292 void *private_result_data
)
296 struct osl_object query
= {.size
= options
? options
->size
: 0};
298 for (i
= 0; i
< argc
; i
++)
299 query
.size
+= strlen(argv
[i
]) + 1;
300 query
.data
= para_malloc(query
.size
);
303 memcpy(query
.data
, options
->data
, options
->size
);
306 for (i
= 0; i
< argc
; i
++) {
307 strcpy(p
, argv
[i
]); /* OK */
308 p
+= strlen(argv
[i
]) + 1;
310 ret
= send_callback_request(f
, &query
, result_handler
,
311 private_result_data
);
317 * Send a callback request with an argument vector only.
319 * \param argc The same meaning as in send_option_arg_callback_request().
320 * \param argv The same meaning as in send_option_arg_callback_request().
321 * \param f The same meaning as in send_option_arg_callback_request().
322 * \param result_handler See \ref send_callback_request.
323 * \param private_result_data See \ref send_callback_request.
325 * This is similar to send_option_arg_callback_request(), but no options buffer
326 * is passed to the parent process.
328 * \return The return value of the underlying call to
329 * send_option_arg_callback_request().
331 int send_standard_callback_request(int argc
, char * const * const argv
,
332 callback_function
*f
, callback_result_handler
*result_handler
,
333 void *private_result_data
)
335 return send_option_arg_callback_request(NULL
, argc
, argv
, f
, result_handler
,
336 private_result_data
);
339 static int action_if_pattern_matches(struct osl_row
*row
, void *data
)
341 struct pattern_match_data
*pmd
= data
;
342 struct osl_object name_obj
;
343 const char *p
, *name
;
344 int ret
= osl_get_object(pmd
->table
, row
, pmd
->match_col_num
, &name_obj
);
345 const char *pattern_txt
= (const char *)pmd
->patterns
.data
;
349 name
= (char *)name_obj
.data
;
350 if ((!name
|| !*name
) && (pmd
->pm_flags
& PM_SKIP_EMPTY_NAME
))
352 if (!pmd
->patterns
.size
&& (pmd
->pm_flags
& PM_NO_PATTERN_MATCHES_EVERYTHING
))
353 return pmd
->action(pmd
->table
, row
, name
, pmd
->data
);
354 for (p
= pattern_txt
; p
< pattern_txt
+ pmd
->patterns
.size
;
355 p
+= strlen(p
) + 1) {
356 ret
= fnmatch(p
, name
, pmd
->fnmatch_flags
);
357 if (ret
== FNM_NOMATCH
)
361 return pmd
->action(pmd
->table
, row
, name
, pmd
->data
);
367 * Execute the given function for each matching row.
369 * \param pmd Describes what to match and how.
371 * \return The return value of the underlying call to osl_rbtree_loop()
372 * or osl_rbtree_loop_reverse().
374 int for_each_matching_row(struct pattern_match_data
*pmd
)
376 if (pmd
->pm_flags
& PM_REVERSE_LOOP
)
377 return osl_rbtree_loop_reverse(pmd
->table
, pmd
->loop_col_num
, pmd
,
378 action_if_pattern_matches
);
379 return osl_rbtree_loop(pmd
->table
, pmd
->loop_col_num
, pmd
,
380 action_if_pattern_matches
);
384 * Compare two osl objects of string type.
386 * \param obj1 Pointer to the first object.
387 * \param obj2 Pointer to the second object.
389 * In any case, only \p MIN(obj1->size, obj2->size) characters of each string
390 * are taken into account.
392 * \return It returns an integer less than, equal to, or greater than zero if
393 * \a obj1 is found, respectively, to be less than, to match, or be greater than
396 * \sa strcmp(3), strncmp(3), osl_compare_func.
398 int string_compare(const struct osl_object
*obj1
, const struct osl_object
*obj2
)
400 const char *str1
= (const char *)obj1
->data
;
401 const char *str2
= (const char *)obj2
->data
;
402 return strncmp(str1
, str2
, PARA_MIN(obj1
->size
, obj2
->size
));
406 * write input from fd to dynamically allocated buffer,
407 * but maximal max_size byte.
409 static int fd2buf(int fd
, unsigned max_size
, struct osl_object
*obj
)
411 const size_t chunk_size
= 1024;
412 size_t size
= 2048, received
= 0;
414 char *buf
= para_malloc(size
);
417 ret
= recv_bin_buffer(fd
, buf
+ received
, chunk_size
);
421 if (received
+ chunk_size
>= size
) {
423 ret
= -E_INPUT_TOO_LARGE
;
426 buf
= para_realloc(buf
, size
);
430 obj
->size
= received
;
437 * Read data from a file descriptor, and send it to the afs process.
439 * \param fd File descriptor to read data from.
440 * \param arg_obj Pointer to the arguments to \a f.
441 * \param f The callback function.
442 * \param max_len Don't read more than that many bytes from stdin.
443 * \param result_handler See \ref send_callback_request.
444 * \param private_result_data See \ref send_callback_request.
446 * This function is used by commands that wish to let para_server store
447 * arbitrary data specified by the user (for instance the add_blob family of
448 * commands). First, at most \a max_len bytes are read from \a fd, the result
449 * is concatenated with the buffer given by \a arg_obj, and the combined buffer
450 * is made available to the afs process via the callback method. See \ref
451 * send_callback_request for details.
453 * \return Negative on errors, the return value of the underlying call to
454 * send_callback_request() otherwise.
456 int stdin_command(int fd
, struct osl_object
*arg_obj
, callback_function
*f
,
457 unsigned max_len
, callback_result_handler
*result_handler
,
458 void *private_result_data
)
460 struct osl_object query
, stdin_obj
;
463 ret
= send_buffer(fd
, AWAITING_DATA_MSG
);
466 ret
= fd2buf(fd
, max_len
, &stdin_obj
);
469 query
.size
= arg_obj
->size
+ stdin_obj
.size
;
470 query
.data
= para_malloc(query
.size
);
471 memcpy(query
.data
, arg_obj
->data
, arg_obj
->size
);
472 memcpy((char *)query
.data
+ arg_obj
->size
, stdin_obj
.data
, stdin_obj
.size
);
473 free(stdin_obj
.data
);
474 ret
= send_callback_request(f
, &query
, result_handler
, private_result_data
);
479 static int pass_afd(int fd
, char *buf
, size_t size
)
481 struct msghdr msg
= {.msg_iov
= NULL
};
482 struct cmsghdr
*cmsg
;
493 msg
.msg_control
= control
;
494 msg
.msg_controllen
= sizeof(control
);
496 cmsg
= CMSG_FIRSTHDR(&msg
);
497 cmsg
->cmsg_level
= SOL_SOCKET
;
498 cmsg
->cmsg_type
= SCM_RIGHTS
;
499 cmsg
->cmsg_len
= CMSG_LEN(sizeof(int));
500 *(int *)CMSG_DATA(cmsg
) = fd
;
502 /* Sum of the length of all control messages in the buffer */
503 msg
.msg_controllen
= cmsg
->cmsg_len
;
504 PARA_DEBUG_LOG("passing %zu bytes and fd %d\n", size
, fd
);
505 ret
= sendmsg(server_socket
, &msg
, 0);
507 ret
= -ERRNO_TO_PARA_ERROR(errno
);
514 * Open the audio file with highest score.
516 * This stores all information for streaming the "best" audio file in a shared
517 * memory area. The id of that area and an open file descriptor for the next
518 * audio file are passed to the server process.
522 * \sa open_and_update_audio_file().
524 static int open_next_audio_file(void)
526 struct osl_row
*aft_row
;
527 struct audio_file_data afd
;
532 PARA_NOTICE_LOG("getting next audio file\n");
533 ret
= score_get_best(&aft_row
, &score
);
535 PARA_ERROR_LOG("%s\n", para_strerror(-ret
));
536 goto no_admissible_files
;
538 ret
= open_and_update_audio_file(aft_row
, score
, &afd
);
540 PARA_ERROR_LOG("%s\n", para_strerror(-ret
));
541 ret
= score_delete(aft_row
);
543 PARA_ERROR_LOG("%s\n", para_strerror(-ret
));
544 goto no_admissible_files
;
549 if (!write_ok(server_socket
)) {
553 *(uint32_t *)buf
= NEXT_AUDIO_FILE
;
554 *(uint32_t *)(buf
+ 4) = (uint32_t)shmid
;
555 ret
= pass_afd(afd
.fd
, buf
, 8);
563 *(uint32_t *)buf
= NO_ADMISSIBLE_FILES
;
564 *(uint32_t *)(buf
+ 4) = (uint32_t)0;
565 return send_bin_buffer(server_socket
, buf
, 8);
568 /* Never fails if arg == NULL */
569 static int activate_mood_or_playlist(char *arg
, int *num_admissible
)
575 ret
= change_current_mood(NULL
); /* always successful */
576 mode
= PLAY_MODE_MOOD
;
578 if (!strncmp(arg
, "p/", 2)) {
579 ret
= playlist_open(arg
+ 2);
580 mode
= PLAY_MODE_PLAYLIST
;
581 } else if (!strncmp(arg
, "m/", 2)) {
582 ret
= change_current_mood(arg
+ 2);
583 mode
= PLAY_MODE_MOOD
;
585 return -E_AFS_SYNTAX
;
590 *num_admissible
= ret
;
591 current_play_mode
= mode
;
592 if (arg
!= current_mop
) {
595 current_mop
= para_strdup(arg
);
596 mutex_lock(mmd_mutex
);
597 strncpy(mmd
->afs_mode_string
, arg
,
598 sizeof(mmd
->afs_mode_string
));
599 mmd
->afs_mode_string
[sizeof(mmd
->afs_mode_string
) - 1] = '\0';
600 mutex_unlock(mmd_mutex
);
602 mutex_lock(mmd_mutex
);
603 strcpy(mmd
->afs_mode_string
, "dummy");
604 mutex_unlock(mmd_mutex
);
611 static void com_select_callback(int fd
, const struct osl_object
*query
)
613 struct para_buffer pb
= {
616 .max_size_handler
= pass_buffer_as_shm
618 char *arg
= query
->data
;
619 int num_admissible
, ret
, ret2
;
621 ret
= clear_score_table();
623 ret2
= para_printf(&pb
, "%s\n", para_strerror(-ret
));
626 if (current_play_mode
== PLAY_MODE_MOOD
)
627 close_current_mood();
630 ret
= activate_mood_or_playlist(arg
, &num_admissible
);
632 ret2
= para_printf(&pb
, "%s\nswitching back to %s\n",
633 para_strerror(-ret
), current_mop
?
634 current_mop
: "dummy");
635 ret
= activate_mood_or_playlist(current_mop
, &num_admissible
);
638 ret2
= para_printf(&pb
, "failed, switching to dummy\n");
639 activate_mood_or_playlist(NULL
, &num_admissible
);
642 ret2
= para_printf(&pb
, "activated %s (%d admissible files)\n", current_mop
?
643 current_mop
: "dummy mood", num_admissible
);
645 if (ret2
>= 0 && pb
.offset
)
646 pass_buffer_as_shm(pb
.buf
, pb
.offset
, &fd
);
651 * Result handler for sending data to the para_client process.
653 * \param result The data to be sent.
654 * \param fd_ptr Pointer to the file descriptor.
656 * \return The return value of the underlying call to send_bin_buffer().
658 * \sa \ref callback_result_handler.
660 int send_result(struct osl_object
*result
, void *fd_ptr
)
662 int fd
= *(int *)fd_ptr
;
665 return send_bin_buffer(fd
, result
->data
, result
->size
);
668 int com_select(int fd
, int argc
, char * const * const argv
)
670 struct osl_object query
;
673 return -E_AFS_SYNTAX
;
674 query
.data
= argv
[1];
675 query
.size
= strlen(argv
[1]) + 1;
676 return send_callback_request(com_select_callback
, &query
,
680 static void init_admissible_files(char *arg
)
682 if (activate_mood_or_playlist(arg
, NULL
) < 0)
683 activate_mood_or_playlist(NULL
, NULL
); /* always successful */
686 static int setup_command_socket_or_die(void)
689 char *socket_name
= conf
.afs_socket_arg
;
690 struct sockaddr_un unix_addr
;
693 ret
= create_local_socket(socket_name
, &unix_addr
,
694 S_IRUSR
| S_IWUSR
| S_IRGRP
| S_IWGRP
| S_IWOTH
);
696 PARA_EMERG_LOG("%s: %s\n", para_strerror(-ret
), socket_name
);
700 if (listen(socket_fd
, 5) < 0) {
701 PARA_EMERG_LOG("can not listen on socket\n");
704 ret
= mark_fd_nonblocking(socket_fd
);
709 PARA_INFO_LOG("listening on socket %s (fd %d)\n", socket_name
,
714 static void close_afs_tables(void)
717 PARA_NOTICE_LOG("closing afs_tables\n");
718 for (i
= 0; i
< NUM_AFS_TABLES
; i
++)
719 afs_tables
[i
].close();
722 static char *database_dir
;
724 static void get_database_dir(void)
727 if (conf
.afs_database_dir_given
)
728 database_dir
= para_strdup(conf
.afs_database_dir_arg
);
730 char *home
= para_homedir();
731 database_dir
= make_message(
732 "%s/.paraslash/afs_database", home
);
736 PARA_INFO_LOG("afs_database dir %s\n", database_dir
);
739 static int make_database_dir(void)
744 ret
= para_mkdir(database_dir
, 0777);
745 if (ret
>= 0 || is_errno(-ret
, EEXIST
))
750 static int open_afs_tables(void)
755 PARA_NOTICE_LOG("opening %u osl tables in %s\n", NUM_AFS_TABLES
,
757 for (i
= 0; i
< NUM_AFS_TABLES
; i
++) {
758 ret
= afs_tables
[i
].open(database_dir
);
761 PARA_ERROR_LOG("%s init: %s\n", afs_tables
[i
].name
,
762 para_strerror(-ret
));
768 afs_tables
[--i
].close();
772 static void signal_pre_select(struct sched
*s
, struct task
*t
)
774 struct signal_task
*st
= container_of(t
, struct signal_task
, task
);
775 para_fd_set(st
->fd
, &s
->rfds
, &s
->max_fileno
);
778 static void afs_signal_post_select(struct sched
*s
, struct task
*t
)
780 struct signal_task
*st
= container_of(t
, struct signal_task
, task
);
781 if (getppid() == 1) {
782 PARA_EMERG_LOG("para_server died\n");
785 if (!FD_ISSET(st
->fd
, &s
->rfds
))
787 st
->signum
= para_next_signal();
788 if (st
->signum
== SIGHUP
) {
790 parse_config_or_die(1);
791 t
->error
= open_afs_tables();
794 init_admissible_files(current_mop
);
797 PARA_EMERG_LOG("terminating on signal %d\n", st
->signum
);
800 t
->error
= -E_AFS_SIGNAL
;
803 static void register_signal_task(void)
805 struct signal_task
*st
= &signal_task_struct
;
807 para_sigaction(SIGPIPE
, SIG_IGN
);
808 st
->fd
= para_signal_init();
809 PARA_INFO_LOG("signal pipe: fd %d\n", st
->fd
);
810 para_install_sighandler(SIGINT
);
811 para_install_sighandler(SIGTERM
);
812 para_install_sighandler(SIGHUP
);
814 st
->task
.pre_select
= signal_pre_select
;
815 st
->task
.post_select
= afs_signal_post_select
;
816 sprintf(st
->task
.status
, "signal task");
817 register_task(&st
->task
);
820 static struct list_head afs_client_list
;
822 /** Describes on connected afs client. */
824 /** Position in the afs client list. */
825 struct list_head node
;
826 /** The socket file descriptor for this client. */
828 /** The time the client connected. */
829 struct timeval connect_time
;
832 static void command_pre_select(struct sched
*s
, struct task
*t
)
834 struct command_task
*ct
= container_of(t
, struct command_task
, task
);
835 struct afs_client
*client
;
837 para_fd_set(server_socket
, &s
->rfds
, &s
->max_fileno
);
838 para_fd_set(ct
->fd
, &s
->rfds
, &s
->max_fileno
);
839 list_for_each_entry(client
, &afs_client_list
, node
)
840 para_fd_set(client
->fd
, &s
->rfds
, &s
->max_fileno
);
844 * Send data as shared memory to a file descriptor.
846 * \param buf The buffer holding the data to be sent.
847 * \param size The size of \a buf.
848 * \param fd_ptr A pointer to the file descriptor.
850 * This function is used as the \a max_size handler in a \ref para_buffer
851 * structure. If used this way, it is called by \ref para_printf() whenever
852 * the buffer passed to para_printf() is about to exceed its maximal size.
854 * This function creates a shared memory area large enough to hold
855 * the content given by \a buf and \a size and sends the identifier
856 * of this area to the file descriptor given by \a fd_ptr.
858 * \return Zero if \a buf is \p NULL or \a size is zero. Negative on errors,
859 * and positive on success.
861 int pass_buffer_as_shm(char *buf
, size_t size
, void *fd_ptr
)
863 int ret
, shmid
, fd
= *(int *)fd_ptr
;
865 struct callback_result
*cr
;
869 ret
= shm_new(size
+ sizeof(struct callback_result
));
873 ret
= shm_attach(shmid
, ATTACH_RW
, &shm
);
877 cr
->result_size
= size
;
878 memcpy(shm
+ sizeof(*cr
), buf
, size
);
879 ret
= shm_detach(shm
);
882 ret
= send_bin_buffer(fd
, (char *)&shmid
, sizeof(int));
886 if (shm_destroy(shmid
) < 0)
887 PARA_ERROR_LOG("destroy result failed\n");
892 * On errors, negative value is written to fd.
893 * On success: If query produced a result, the result_shmid is written to fd.
894 * Otherwise, zero is written.
896 static int call_callback(int fd
, int query_shmid
)
899 struct callback_query
*cq
;
900 struct osl_object query
;
903 ret
= shm_attach(query_shmid
, ATTACH_RW
, &query_shm
);
907 query
.data
= (char *)query_shm
+ sizeof(*cq
);
908 query
.size
= cq
->query_size
;
909 cq
->handler(fd
, &query
);
910 return shm_detach(query_shm
);
913 static int execute_server_command(void)
916 int ret
= recv_bin_buffer(server_socket
, buf
, sizeof(buf
) - 1);
920 ret
= -ERRNO_TO_PARA_ERROR(ECONNRESET
);
924 PARA_DEBUG_LOG("received: %s\n", buf
);
926 if (strcmp(buf
, "new"))
928 ret
= open_next_audio_file();
933 static void execute_afs_command(int fd
, uint32_t expected_cookie
)
937 char buf
[sizeof(cookie
) + sizeof(query_shmid
)];
938 int ret
= recv_bin_buffer(fd
, buf
, sizeof(buf
));
942 if (ret
!= sizeof(buf
)) {
943 PARA_NOTICE_LOG("short read (%d bytes, expected %lu)\n",
944 ret
, (long unsigned) sizeof(buf
));
947 cookie
= *(uint32_t *)buf
;
948 if (cookie
!= expected_cookie
) {
949 PARA_NOTICE_LOG("received invalid cookie(got %u, expected %u)\n",
950 (unsigned)cookie
, (unsigned)expected_cookie
);
953 query_shmid
= *(int *)(buf
+ sizeof(cookie
));
954 if (query_shmid
< 0) {
955 PARA_WARNING_LOG("received invalid query shmid %d)\n",
959 ret
= call_callback(fd
, query_shmid
);
963 PARA_NOTICE_LOG("%s\n", para_strerror(-ret
));
966 /** Shutdown connection if query has not arrived until this many seconds. */
967 #define AFS_CLIENT_TIMEOUT 3
969 static void command_post_select(struct sched
*s
, struct task
*t
)
971 struct command_task
*ct
= container_of(t
, struct command_task
, task
);
972 struct sockaddr_un unix_addr
;
973 struct afs_client
*client
, *tmp
;
976 if (FD_ISSET(server_socket
, &s
->rfds
)) {
977 ret
= execute_server_command();
979 PARA_EMERG_LOG("%s\n", para_strerror(-ret
));
985 /* Check the list of connected clients. */
986 list_for_each_entry_safe(client
, tmp
, &afs_client_list
, node
) {
987 if (FD_ISSET(client
->fd
, &s
->rfds
))
988 execute_afs_command(client
->fd
, ct
->cookie
);
989 else { /* prevent bogus connection flooding */
991 tv_diff(now
, &client
->connect_time
, &diff
);
992 if (diff
.tv_sec
< AFS_CLIENT_TIMEOUT
)
994 PARA_WARNING_LOG("connection timeout\n");
997 list_del(&client
->node
);
1000 /* Accept connections on the local socket. */
1001 if (!FD_ISSET(ct
->fd
, &s
->rfds
))
1003 ret
= para_accept(ct
->fd
, &unix_addr
, sizeof(unix_addr
));
1005 PARA_NOTICE_LOG("%s\n", para_strerror(-ret
));
1009 ret
= mark_fd_nonblocking(fd
);
1011 PARA_NOTICE_LOG("%s\n", para_strerror(-ret
));
1015 client
= para_malloc(sizeof(*client
));
1017 client
->connect_time
= *now
;
1018 para_list_add(&client
->node
, &afs_client_list
);
1021 static void register_command_task(uint32_t cookie
)
1023 struct command_task
*ct
= &command_task_struct
;
1024 ct
->fd
= setup_command_socket_or_die();
1025 ct
->cookie
= cookie
;
1027 ct
->task
.pre_select
= command_pre_select
;
1028 ct
->task
.post_select
= command_post_select
;
1029 sprintf(ct
->task
.status
, "command task");
1030 register_task(&ct
->task
);
1034 * Initialize the audio file selector process.
1036 * \param cookie The value used for "authentication".
1037 * \param socket_fd File descriptor used for communication with the server.
1039 __noreturn
void afs_init(uint32_t cookie
, int socket_fd
)
1041 static struct sched s
;
1044 register_signal_task();
1045 INIT_LIST_HEAD(&afs_client_list
);
1046 for (i
= 0; i
< NUM_AFS_TABLES
; i
++)
1047 afs_tables
[i
].init(&afs_tables
[i
]);
1048 ret
= open_afs_tables();
1051 server_socket
= socket_fd
;
1052 ret
= mark_fd_nonblocking(server_socket
);
1055 PARA_INFO_LOG("server_socket: %d, afs_socket_cookie: %u\n",
1056 server_socket
, (unsigned) cookie
);
1057 init_admissible_files(conf
.afs_initial_mode_arg
);
1058 register_command_task(cookie
);
1059 s
.default_timeout
.tv_sec
= 0;
1060 s
.default_timeout
.tv_usec
= 999 * 1000;
1066 PARA_EMERG_LOG("%s\n", para_strerror(-ret
));
1070 static void create_tables_callback(int fd
, const struct osl_object
*query
)
1072 uint32_t table_mask
= *(uint32_t *)query
->data
;
1077 for (i
= 0; i
< NUM_AFS_TABLES
; i
++) {
1078 struct afs_table
*t
= &afs_tables
[i
];
1080 if (!(table_mask
& (1 << i
)))
1084 ret
= t
->create(database_dir
);
1088 ret
= open_afs_tables();
1091 buf
= make_message("successfully created afs table(s)\n");
1093 buf
= make_message("%s\n", para_strerror(-ret
));
1094 pass_buffer_as_shm(buf
, strlen(buf
), &fd
);
1098 int com_init(int fd
, int argc
, char * const * const argv
)
1101 uint32_t table_mask
= (1 << (NUM_AFS_TABLES
+ 1)) - 1;
1102 struct osl_object query
= {.data
= &table_mask
,
1103 .size
= sizeof(table_mask
)};
1105 ret
= make_database_dir();
1110 for (i
= 1; i
< argc
; i
++) {
1111 for (j
= 0; j
< NUM_AFS_TABLES
; j
++) {
1112 struct afs_table
*t
= &afs_tables
[j
];
1114 if (strcmp(argv
[i
], t
->name
))
1116 table_mask
|= (1 << j
);
1119 if (j
== NUM_AFS_TABLES
)
1120 return -E_BAD_TABLE_NAME
;
1123 ret
= send_callback_request(create_tables_callback
, &query
, &send_result
, &fd
);
1125 return send_va_buffer(fd
, "%s\n", para_strerror(-ret
));
1130 * Flags for the check command.
1134 enum com_check_flags
{
1135 /** Check the audio file table. */
1137 /** Check the mood table. */
1139 /** Check the playlist table. */
1143 int com_check(int fd
, int argc
, char * const * const argv
)
1148 for (i
= 1; i
< argc
; i
++) {
1149 const char *arg
= argv
[i
];
1152 if (!strcmp(arg
, "--")) {
1156 if (!strcmp(arg
, "-a")) {
1160 if (!strcmp(arg
, "-p")) {
1161 flags
|= CHECK_PLAYLISTS
;
1164 if (!strcmp(arg
, "-m")) {
1165 flags
|= CHECK_MOODS
;
1168 return -E_AFS_SYNTAX
;
1171 return -E_AFS_SYNTAX
;
1174 if (flags
& CHECK_AFT
) {
1175 ret
= send_callback_request(aft_check_callback
, NULL
, send_result
, &fd
);
1179 if (flags
& CHECK_PLAYLISTS
) {
1180 ret
= send_callback_request(playlist_check_callback
, NULL
, send_result
, &fd
);
1184 if (flags
& CHECK_MOODS
) {
1185 ret
= send_callback_request(mood_check_callback
, NULL
, send_result
, &fd
);
1193 * The afs event dispatcher.
1195 * \param event Type of the event.
1196 * \param pb May be \p NULL.
1197 * \param data Type depends on \a event.
1199 * This function calls the table handlers of all tables and passes \a pb and \a
1200 * data verbatim. It's up to the handlers to interpret the \a data pointer.
1202 void afs_event(enum afs_events event
, struct para_buffer
*pb
,
1207 for (i
= 0; i
< NUM_AFS_TABLES
; i
++) {
1208 struct afs_table
*t
= &afs_tables
[i
];
1209 if (!t
->event_handler
)
1211 ret
= t
->event_handler(event
, pb
, data
);
1213 PARA_CRIT_LOG("table %s, event %d: %s\n", t
->name
,
1214 event
, para_strerror(-ret
));
1218 int images_event_handler(__a_unused
enum afs_events event
,
1219 __a_unused
struct para_buffer
*pb
, __a_unused
void *data
)
1224 int lyrics_event_handler(__a_unused
enum afs_events event
,
1225 __a_unused
struct para_buffer
*pb
, __a_unused
void *data
)