2 * Copyright (C) 1999-2007 Andre Noll <maan@systemlinux.org>
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
19 /** \file mysql_selector.c para_server's mysql-based audio file selector */
21 /** \cond some internal constants */
22 #define MEDIUM_BLOB_SIZE 16777220 /* (2**24 + 4) */
23 #define BLOB_SIZE 65539 /* (2**16 + 3) */
25 #include "server.cmdline.h"
29 #include <mysql/mysql.h>
30 #include <mysql/mysql_version.h>
35 #include "user_list.h"
36 #include "mysql_selector_command_list.h"
38 /** pointer to the shared memory area */
39 extern struct misc_meta_data
*mmd
;
41 static void *mysql_ptr
= NULL
;
44 * contains name/replacement pairs used by s_a_r_list()
49 /** the name of the macro */
51 /** the replacement text */
52 const char *replacement
;
55 static struct para_macro macro_list
[] = {
57 .replacement
= "(data.%s != '1')"
60 .replacement
= "(data.%s = '1')"
63 .replacement
= "%sdata.Pic_Id"
66 .replacement
= "(data.name like '%s')"
69 .replacement
= "%sFLOOR((UNIX_TIMESTAMP(now())"
70 "-UNIX_TIMESTAMP(data.Lastplayed))/60)"
73 .replacement
= "%sdata.Numplayed"
80 * simple search and replace routine
82 * \param src source string
83 * \param macro_name the name of the macro
84 * \param replacement the replacement format string
86 * In \p src, replace each occurence of \p macro_name(arg) by the string
87 * determined by the \p replacement format string. \p replacement may (but
88 * needs not) contain a single string conversion specifier (%s) which gets
91 * \return A string in which all matches in \p src are replaced, or \p NULL if
92 * an syntax error was encountered. Caller must free the result.
96 __must_check __malloc
static char *s_a_r(const char *src
, const char* macro_name
,
97 const char *replacement
)
101 regmatch_t pmatch
[1];
104 const char *bufptr
= src
;
106 if (!macro_name
|| !replacement
|| !src
)
107 return para_strdup(src
);
108 regcomp(&preg
, macro_name
, 0);
109 while (regexec(&preg
, bufptr
, nmatch
, pmatch
, eflags
)
111 char *tmp
, *arg
, *o_bracket
, *c_bracket
;
113 o_bracket
= strchr(bufptr
+ pmatch
[0].rm_so
, '(');
114 c_bracket
= o_bracket
? strchr(o_bracket
, ')') : NULL
;
117 tmp
= para_strdup(bufptr
);
118 tmp
[pmatch
[0].rm_so
] = '\0';
119 dest
= para_strcat(dest
, tmp
);
122 arg
= para_strdup(o_bracket
+ 1);
123 arg
[c_bracket
- o_bracket
- 1] = '\0';
124 tmp
= make_message(replacement
, arg
);
126 dest
= para_strcat(dest
, tmp
);
131 dest
= para_strcat(dest
, bufptr
);
132 // PARA_DEBUG_LOG("%s: returning %s\n", __func__, dest);
139 * replace a string according to a list of macros
141 * \param macro_list the array containing a macro/replacement pairs.
142 * \param src the source string
144 * This function just calls s_a_r() for each element of \p macro_list.
146 * \return \p NULL if one of the underlying calls to \p s_a_r returned \p NULL.
147 * Otherwise the completely expanded version of \p src is returned.
149 __must_check __malloc
static char *s_a_r_list(struct para_macro
*macro_list
, char *src
)
151 struct para_macro
*mp
= macro_list
;
152 char *ret
= NULL
, *tmp
= para_strdup(src
);
155 ret
= s_a_r(tmp
, mp
->name
, mp
->replacement
);
157 if (!ret
) /* syntax error */
162 //PARA_DEBUG_LOG("%s: returning %s\n", __func__, dest);
166 static int real_query(const char *query
)
170 PARA_DEBUG_LOG("%s\n", query
);
171 if (mysql_real_query(mysql_ptr
, query
, strlen(query
))) {
172 PARA_ERROR_LOG("real_query error (%s)\n",
173 mysql_error(mysql_ptr
));
180 * Use open connection given by mysql_ptr to query server. Returns a
181 * result pointer on succes and NULL on errors
183 static struct MYSQL_RES
*get_result(const char *query
)
187 if (real_query(query
) < 0)
189 result
= mysql_store_result(mysql_ptr
);
191 PARA_ERROR_LOG("%s", "store_result error\n");
195 * write input from fd to dynamically allocated char array,
196 * but maximal max_size byte. Return size.
198 static int fd2buf(int fd
, char **buf_ptr
, size_t max_size
)
200 const size_t chunk_size
= 1024;
202 char *buf
= para_malloc(size
* sizeof(char)), *p
= buf
;
205 while ((ret
= recv_bin_buffer(fd
, p
, chunk_size
)) > 0) {
207 if ((p
- buf
) + chunk_size
>= size
) {
211 if (size
> max_size
) {
215 tmp
= para_realloc(buf
, size
);
230 static char *escape_blob(const char* old
, int size
)
234 if (!mysql_ptr
|| size
< 0)
236 new = para_malloc(2 * size
* sizeof(char) + 1);
237 mysql_real_escape_string(mysql_ptr
, new, old
, size
);
241 static char *escape_str(const char* old
)
243 return escape_blob(old
, strlen(old
));
246 static char *escaped_basename(const char *name
)
248 char *esc
, *bn
= para_basename(name
);
252 esc
= escape_str(bn
);
260 int com_na(__a_unused
int fd
, int argc
, char *argv
[])
266 return -E_MYSQL_SYNTAX
;
267 tmp
= escape_str(argv
[1]);
270 q
= make_message("alter table data add %s char(1) "
271 "not null default 0", tmp
);
281 int com_da(__a_unused
int fd
, int argc
, char *argv
[])
287 return -E_MYSQL_SYNTAX
;
288 tmp
= escape_str(argv
[1]);
291 q
= make_message("alter table data drop %s", tmp
);
299 static int com_stradd_picadd(int fd
, int argc
, char *argv
[])
301 char *blob
= NULL
, *esc_blob
= NULL
, *q
= NULL
, *tmp
= NULL
;
302 const char *fmt
, *del_fmt
;
303 int ret
, stradd
= strcmp(argv
[0], "picadd");
307 return -E_MYSQL_SYNTAX
;
308 if (strlen(argv
[1]) >= MAXLINE
- 1)
309 return -E_NAMETOOLONG
;
314 fmt
= "insert into streams (name, def) values ('%s','%s')";
315 del_fmt
="delete from streams where name='%s'";
317 size
= MEDIUM_BLOB_SIZE
;
318 fmt
= "insert into pics (name, pic) values ('%s','%s')";
319 del_fmt
="delete from pics where pic='%s'";
321 tmp
= escape_str(argv
[1]);
324 q
= make_message(del_fmt
, tmp
);
330 if ((ret
= send_buffer(fd
, AWAITING_DATA_MSG
) < 0))
332 if ((ret
= fd2buf(fd
, &blob
, size
)) < 0)
338 esc_blob
= escape_blob(blob
, size
);
341 tmp
= escape_str(argv
[1]);
344 q
= make_message(fmt
, tmp
, esc_blob
);
355 int com_stradd(int fd
, int argc
, char *argv
[])
357 return com_stradd_picadd(fd
, argc
, argv
);
361 int com_picadd(int fd
, int argc
, char *argv
[])
363 return com_stradd_picadd(fd
, argc
, argv
);
367 * print results to fd
369 static int print_results(int fd
, void *result
,
370 unsigned int top
, unsigned int left
,
371 unsigned int bottom
, unsigned int right
)
377 for (i
= top
; i
<= bottom
; i
++) {
378 row
= mysql_fetch_row(result
);
381 for (j
= left
; j
<= right
; j
++) {
382 ret
= send_va_buffer(fd
, j
== left
? "%s" : "\t%s",
383 row
[j
]? row
[j
] : "NULL");
387 ret
= send_buffer(fd
, "\n");
397 int com_verb(int fd
, int argc
, char *argv
[])
401 unsigned int num_rows
, num_fields
;
405 return -E_MYSQL_SYNTAX
;
406 tmp
= escape_str(argv
[1]);
409 result
= get_result(tmp
);
412 /* return success, because it's ok to have no results */
414 num_fields
= mysql_field_count(mysql_ptr
);
415 num_rows
= mysql_num_rows(result
);
417 if (num_fields
&& num_rows
)
418 ret
= print_results(fd
, result
, 0, 0, num_rows
- 1,
420 mysql_free_result(result
);
424 /* returns NULL on errors or if there are no atts defined yet */
425 static void *get_all_attributes(void)
427 void *result
= get_result("desc data");
428 unsigned int num_rows
;
432 num_rows
= mysql_num_rows(result
);
434 mysql_free_result(result
);
437 mysql_data_seek(result
, 4); /* skip Lastplayed, Numplayed... */
442 * list all attributes
444 int com_laa(int fd
, int argc
, __a_unused
char *argv
[])
450 return -E_MYSQL_SYNTAX
;
451 result
= get_all_attributes();
454 ret
= print_results(fd
, result
, 0, 0, mysql_num_rows(result
) - 5, 0);
455 mysql_free_result(result
);
462 int com_hist(int fd
, int argc
, char *argv
[])
467 unsigned int num_rows
;
470 return -E_MYSQL_SYNTAX
;
472 char *tmp
= escape_str(argv
[1]);
475 atts
= make_message("where %s = '1'", tmp
);
478 atts
= para_strdup(NULL
);
480 q
= make_message("select name, to_days(now()) - to_days(lastplayed) from "
481 "data %s order by lastplayed", atts
);
483 result
= get_result(q
);
487 num_rows
= mysql_num_rows(result
);
490 ret
= print_results(fd
, result
, 0, 0, num_rows
- 1, 1);
491 mysql_free_result(result
);
496 * get last num audio files
498 int com_last(int fd
, int argc
, char *argv
[])
509 return -E_MYSQL_SYNTAX
;
510 q
= make_message("select name from data order by lastplayed desc "
512 result
= get_result(q
);
516 ret
= print_results(fd
, result
, 0, 0, mysql_num_rows(result
) - 1, 0);
517 mysql_free_result(result
);
521 int com_mbox(int fd
, int argc
, char *argv
[])
526 unsigned int num_rows
, num_fields
;
527 char *query
= para_strdup("select concat('From foo@localhost ', "
528 "date_format(Lastplayed, '%a %b %e %T %Y'), "
529 "'\nReceived: from\nTo: bar\n");
532 result
= get_all_attributes();
536 while ((row
= mysql_fetch_row(result
))) {
541 tmp
= make_message("%sX-Attribute-%s: ', %s, '\n", query
,
546 query
= para_strcat(query
,
554 char *esc
= escape_str(argv
[1]), *tmp
;
558 tmp
= make_message("%s where name LIKE '%s'", query
, esc
);
563 mysql_free_result(result
);
565 result
= get_result(query
);
568 ret
= -E_EMPTY_RESULT
;
569 num_fields
= mysql_field_count(mysql_ptr
);
570 num_rows
= mysql_num_rows(result
);
571 if (!num_fields
|| !num_rows
)
573 ret
= print_results(fd
, result
, 0, 0, num_rows
- 1, num_fields
- 1);
577 mysql_free_result(result
);
581 /* get attributes by name. If verbose is not 0, get_a writes a string
582 * into atts of the form 'att1="0",att2="1"', which is used in com_cam
583 * for contructing a mysql update query.
584 * never returns NULL in *NON VERBOSE* mode
586 static char *get_atts(char *name
, int verbose
)
588 char *atts
= NULL
, *buf
, *ebn
;
589 void *result
= NULL
, *result2
= NULL
;
592 unsigned int num_fields
;
595 result2
= get_all_attributes();
599 if (!(ebn
= escaped_basename(name
)))
601 buf
= make_message("select * from data where name='%s'", ebn
);
604 result
= get_result(buf
);
608 ret
= -E_EMPTY_RESULT
;
609 num_fields
= mysql_num_fields(result
);
612 mysql_data_seek(result2
, 4); /* skip Lastplayed, Numplayed... */
613 row
= mysql_fetch_row(result
);
617 for (i
= 4; i
< num_fields
; i
++) {
618 int is_set
= row
[i
] && !strcmp(row
[i
], "1");
619 row2
= mysql_fetch_row(result2
);
620 if (!row2
|| !row2
[0])
622 if (atts
&& (verbose
|| is_set
))
623 atts
= para_strcat(atts
, verbose
? "," : " ");
624 if (is_set
|| verbose
)
625 atts
= para_strcat(atts
, row2
[0]);
627 atts
= para_strcat(atts
, is_set
? "=\"1\"" : "=\"0\"");
632 mysql_free_result(result2
);
634 mysql_free_result(result
);
635 if (!atts
&& !verbose
)
636 atts
= para_strdup("(none)");
640 /* never returns NULL in verbose mode */
641 static char *get_meta(char *name
, int verbose
)
645 char *ebn
, *q
, *ret
= NULL
;
646 const char *verbose_fmt
=
647 "select concat('lastplayed: ', "
648 "(to_days(now()) - to_days(lastplayed)),"
649 "' day(s). numplayed: ', numplayed, "
650 "', pic: ', pic_id) "
651 "from data where name = '%s'";
652 /* is that really needed? */
653 const char *fmt
= "select concat('lastplayed=\\'', lastplayed, "
654 "'\\', numplayed=\\'', numplayed, "
655 "'\\', pic_id=\\'', pic_id, '\\'') "
656 "from data where name = '%s'";
658 if (!(ebn
= escaped_basename(name
)))
660 q
= make_message(verbose
? verbose_fmt
: fmt
, ebn
);
662 result
= get_result(q
);
666 row
= mysql_fetch_row(result
);
669 ret
= para_strdup(row
[0]);
672 mysql_free_result(result
);
674 ret
= para_strdup("(not yet played)");
678 static char *get_dir(char *name
)
680 char *ret
= NULL
, *q
, *ebn
;
684 if (!(ebn
= escaped_basename(name
)))
686 q
= make_message("select dir from dir where name = '%s'", ebn
);
688 result
= get_result(q
);
692 row
= mysql_fetch_row(result
);
694 ret
= para_strdup(row
[0]);
695 mysql_free_result(result
);
699 /* never returns NULL */
700 static char *get_current_stream(void)
704 void *result
= get_result("select def from streams where "
705 "name = 'current_stream'");
709 row
= mysql_fetch_row(result
);
712 ret
= para_strdup(row
[0]);
713 mysql_free_result(result
);
717 mysql_free_result(result
);
718 return para_strdup("(none)");
722 * Read stream definition of stream streamname and construct mysql
723 * query. Return NULL on errors. If streamname is NULL, use current
724 * stream. If that is also NULL, use query that selects everything.
725 * If filename is NULL, query will list everything, otherwise only
726 * the score of given file.
728 static char *get_query(char *streamname
, char *filename
, int with_path
)
730 char *accept_opts
= NULL
, *deny_opts
= NULL
, *score
= NULL
;
731 char *where_clause
, *order
, *query
;
732 char command
[255] = ""; /* buffer for sscanf */
736 char *select_clause
= NULL
;
738 tmp
= get_current_stream();
740 tmp
= escape_str(streamname
);
744 if (!strcmp(tmp
, "(none)")) {
747 char *ret
, *ebn
= escaped_basename(filename
);
750 ret
= make_message("select to_days(now()) - "
751 "to_days(lastplayed) from data "
752 "where name = '%s'", ebn
);
758 "select concat(dir.dir, '/', dir.name) "
759 "from data, dir where dir.name = data.name "
760 "order by data.lastplayed"
763 "select name from data where name is not NULL "
764 "order by lastplayed"
768 query
= make_message("select def from streams where name = '%s'",
770 result
= get_result(query
);
775 row
= mysql_fetch_row(result
);
781 char *arg
, *line
= end
;
783 if (!(end
= strchr(line
, '\n')))
787 if (sscanf(line
, "%200s%n", command
, &n
) < 1)
790 if (!strcmp(command
, "accept:")) {
791 char *tmp2
= s_a_r_list(macro_list
, arg
);
793 accept_opts
= para_strcat(
794 accept_opts
, " or ");
795 accept_opts
= para_strcat(accept_opts
, tmp2
);
799 if (!strcmp(command
, "deny:")) {
800 char *tmp2
= s_a_r_list(macro_list
, arg
);
802 deny_opts
= para_strcat(deny_opts
, " or ");
803 deny_opts
= para_strcat(deny_opts
, tmp2
);
807 if (!score
&& !strcmp(command
, "score:"))
808 score
= s_a_r_list(macro_list
, arg
);
811 score
= s_a_r_list(macro_list
, conf
.mysql_default_score_arg
);
816 char *ebn
= escaped_basename(filename
);
819 select_clause
= make_message("select %s from data ", score
);
821 where_clause
= make_message( "where name = '%s' ", ebn
);
823 order
= para_strdup("");
826 select_clause
= para_strdup(with_path
?
827 "select concat(dir.dir, '/', dir.name) from data, dir "
828 "where dir.name = data.name "
830 "select name from data where name is not NULL");
831 order
= make_message("order by -(%s)", score
);
833 if (accept_opts
&& deny_opts
) {
834 where_clause
= make_message("and ((%s) and not (%s)) ",
835 accept_opts
, deny_opts
);
838 if (accept_opts
&& !deny_opts
) {
839 where_clause
= make_message("and (%s) ", accept_opts
);
842 if (!accept_opts
&& deny_opts
) {
843 where_clause
= make_message("and not (%s) ", deny_opts
);
846 where_clause
= para_strdup("");
848 query
= make_message("%s %s %s", select_clause
, where_clause
, order
);
858 mysql_free_result(result
);
865 * This is called from server and from some commands. Name must not be NULL
866 * Never returns NULL.
868 static char *get_selector_info(char *name
)
870 char *meta
, *atts
, *info
, *dir
, *query
, *stream
;
872 MYSQL_ROW row
= NULL
;
875 return para_strdup("(none)");
876 stream
= get_current_stream();
877 meta
= get_meta(name
, 1);
878 atts
= get_atts(name
, 0);
881 query
= get_query(stream
, name
, 0); /* FIXME: pass stream == NULL instead? */
884 result
= get_result(query
);
887 row
= mysql_fetch_row(result
);
889 info
= make_message("dbinfo1:dir: %s\n"
890 "dbinfo2:stream: %s, %s, score: %s\n"
892 dir
? dir
: "(not contained in table)",
894 (result
&& row
&& row
[0])? row
[0] : "(no score)",
901 mysql_free_result(result
);
906 /* might return NULL */
907 static char *get_current_audio_file(void)
911 name
= para_basename(mmd
->filename
);
916 /* list attributes / print database info */
917 static int com_la_info(int fd
, int argc
, char *argv
[])
919 char *name
= NULL
, *meta
= NULL
, *atts
= NULL
, *dir
= NULL
;
920 int ret
, com_la
= strcmp(argv
[0], "info");
923 ret
= -E_GET_AUDIO_FILE
;
924 if (!(name
= get_current_audio_file()))
926 ret
= send_va_buffer(fd
, "%s\n", name
);
931 if (!(name
= escaped_basename(argv
[1])))
934 meta
= get_meta(name
, 1);
935 atts
= get_atts(name
, 0);
938 ret
= send_va_buffer(fd
, "%s\n", atts
);
940 ret
= send_va_buffer(fd
, "dir: %s\n" "%s\n" "attributes: %s\n",
941 dir
? dir
: "(not contained in table)", meta
, atts
);
950 /* list attributes */
951 int com_la(int fd
, int argc
, char *argv
[])
953 return com_la_info(fd
, argc
, argv
);
956 /* print database info */
957 int com_info(int fd
, int argc
, char *argv
[])
959 return com_la_info(fd
, argc
, argv
);
962 static int change_stream(const char *stream
)
966 query
= make_message("update streams set def='%s' "
967 "where name = 'current_stream'", stream
);
968 ret
= real_query(query
);
973 static int get_pic_id_by_name(char *name
)
980 if (!(ebn
= escaped_basename(name
)))
982 q
= make_message("select pic_id from data where name = '%s'", ebn
);
984 result
= get_result(q
);
988 row
= mysql_fetch_row(result
);
992 mysql_free_result(result
);
996 static int remove_entry(const char *name
)
998 char *q
, *ebn
= escaped_basename(name
);
1003 q
= make_message("delete from data where name = '%s'", ebn
);
1004 real_query(q
); /* ignore errors */
1006 q
= make_message("delete from dir where name = '%s'", ebn
);
1007 real_query(q
); /* ignore errors */
1015 static int add_entry(const char *name
)
1017 char *q
, *dn
, *ebn
= NULL
, *edn
= NULL
;
1020 if (!name
|| !*name
)
1021 return -E_MYSQL_SYNTAX
;
1022 ebn
= escaped_basename(name
);
1025 ret
= -E_MYSQL_SYNTAX
;
1026 dn
= para_dirname(name
);
1030 edn
= escape_str(dn
);
1034 q
= make_message("insert into data (name, pic_id) values "
1035 "('%s', '%s')", ebn
, "1");
1036 ret
= real_query(q
);
1037 // ret = 1; PARA_DEBUG_LOG("q: %s\n", q);
1041 q
= make_message("insert into dir (name, dir) values "
1042 "('%s', '%s')", ebn
, edn
);
1043 // ret = 1; PARA_DEBUG_LOG("q: %s\n", q);
1044 ret
= real_query(q
);
1055 * remove/add entries
1057 static int com_rm_ne(__a_unused
int fd
, int argc
, char *argv
[])
1059 int ne
= !strcmp(argv
[0], "ne");
1062 return -E_MYSQL_SYNTAX
;
1063 for (i
= 1; i
< argc
; i
++) {
1064 ret
= remove_entry(argv
[i
]);
1069 ret
= add_entry(argv
[i
]);
1079 int com_rm(int fd
, int argc
, char *argv
[])
1081 return com_rm_ne(fd
, argc
, argv
);
1087 int com_ne(int fd
, int argc
, char *argv
[])
1089 return com_ne(fd
, argc
, argv
);
1095 int com_mv(__a_unused
int fd
, int argc
, char *argv
[])
1097 char *q
, *dn
, *ebn1
= NULL
, *ebn2
= NULL
, *edn
= NULL
;
1101 return -E_MYSQL_SYNTAX
;
1103 ebn1
= escaped_basename(argv
[1]);
1104 ebn2
= escaped_basename(argv
[2]);
1105 if (!ebn1
|| !ebn2
|| !*ebn1
|| !*ebn2
)
1107 ret
= -E_MYSQL_SYNTAX
;
1108 if (!strcmp(ebn1
, ebn2
))
1110 remove_entry(argv
[2]); /* no need to escape, ignore error */
1111 q
= make_message("update data set name = '%s' where name = '%s'",
1113 ret
= real_query(q
);
1117 ret
= -E_AUDIO_FILE
;
1118 if (!mysql_affected_rows(mysql_ptr
))
1120 q
= make_message("update dir set name = '%s' where name = '%s'",
1122 ret
= real_query(q
);
1128 dn
= para_dirname(argv
[2]);
1132 edn
= escape_str(dn
);
1139 q
= make_message("update dir set dir = '%s' where name = '%s'",
1141 ret
= real_query(q
);
1153 static int com_set(__a_unused
int fd
, int argc
, char *argv
[])
1158 const char *field
= strcmp(argv
[0], "picass")? "numplayed" : "pic_id";
1161 return -E_MYSQL_SYNTAX
;
1163 for (i
= 2; i
< argc
; i
++) {
1164 ebn
= escaped_basename(argv
[i
]);
1167 q
= make_message("update data set %s = %lu "
1168 "where name = '%s'", field
, id
, ebn
);
1170 ret
= real_query(q
);
1179 * snp: set numplayed
1181 int com_picass(int fd
, int argc
, char *argv
[])
1183 return com_set(fd
, argc
, argv
);
1187 * snp: set numplayed
1189 int com_snp(int fd
, int argc
, char *argv
[])
1191 return com_set(fd
, argc
, argv
);
1195 * picch: change entry's name in pics table
1197 int com_picch(__a_unused
int fd
, int argc
, char *argv
[])
1204 return -E_MYSQL_SYNTAX
;
1207 tmp
= escape_str(argv
[2]);
1210 q
= make_message("update pics set name = '%s' where id = %lu", tmp
, id
);
1212 ret
= real_query(q
);
1218 * piclist: print list of pics in db
1220 int com_piclist(__a_unused
int fd
, int argc
, __a_unused
char *argv
[])
1222 void *result
= NULL
;
1224 unsigned long *length
;
1228 return -E_MYSQL_SYNTAX
;
1229 result
= get_result("select id,name,pic from pics order by id");
1232 while ((row
= mysql_fetch_row(result
))) {
1233 length
= mysql_fetch_lengths(result
);
1234 if (!row
|| !row
[0] || !row
[1] || !row
[2])
1236 ret
= send_va_buffer(fd
, "%s\t%lu\t%s\n", row
[0], length
[2], row
[1]);
1242 mysql_free_result(result
);
1247 * picdel: delete picture from database
1249 int com_picdel(int fd
, int argc
, char *argv
[])
1257 return -E_MYSQL_SYNTAX
;
1258 for (i
= 1; i
< argc
; i
++) {
1260 q
= make_message("delete from pics where id = %lu", id
);
1261 ret
= real_query(q
);
1265 aff
= mysql_affected_rows(mysql_ptr
);
1267 ret
= send_va_buffer(fd
, "No such id: %lu\n", id
);
1272 q
= make_message("update data set pic_id = 1 where pic_id = %lu", id
);
1273 ret
= real_query(q
);
1279 * pic: get picture by name or by number
1281 int com_pic(int fd
, int argc
, char *argv
[])
1283 void *result
= NULL
;
1285 unsigned long *length
, id
;
1287 char *q
, *name
= NULL
;
1290 ret
= -E_GET_AUDIO_FILE
;
1291 name
= get_current_audio_file();
1294 name
= escaped_basename(argv
[1]);
1299 id
= atoi(name
+ 1);
1301 id
= get_pic_id_by_name(name
);
1305 q
= make_message("select pic from pics where id = '%lu'", id
);
1306 result
= get_result(q
);
1310 row
= mysql_fetch_row(result
);
1312 if (!row
|| !row
[0])
1314 length
= mysql_fetch_lengths(result
);
1315 ret
= send_bin_buffer(fd
, row
[0], *length
);
1317 mysql_free_result(result
);
1322 int com_strdel(__a_unused
int fd
, int argc
, char *argv
[])
1328 return -E_MYSQL_SYNTAX
;
1329 tmp
= escape_str(argv
[1]);
1332 q
= make_message("delete from streams where name='%s'", tmp
);
1334 ret
= real_query(q
);
1342 int com_ls(int fd
, int argc
, char *argv
[])
1347 unsigned int num_rows
;
1350 return -E_MYSQL_SYNTAX
;
1352 char *tmp
= escape_str(argv
[1]);
1355 q
= make_message("select name from data where name like '%s'",
1359 q
= para_strdup("select name from data");
1360 result
= get_result(q
);
1364 num_rows
= mysql_num_rows(result
);
1367 ret
= print_results(fd
, result
, 0, 0, num_rows
- 1, 0);
1368 mysql_free_result(result
);
1375 int com_summary(__a_unused
int fd
, int argc
, __a_unused
char *argv
[])
1380 void *result2
= NULL
;
1381 const char *fmt
= "select count(name) from data where %s='1'";
1382 int ret
= -E_NORESULT
;
1385 return -E_MYSQL_SYNTAX
;
1386 result
= get_all_attributes();
1389 while ((row
= mysql_fetch_row(result
))) {
1396 buf
= make_message(fmt
, row
[0]);
1397 result2
= get_result(buf
);
1402 row2
= mysql_fetch_row(result2
);
1403 if (!row2
|| !row2
[0])
1405 ret
= send_va_buffer(fd
, "%s\t%s\n", row
[0], row2
[0]);
1412 mysql_free_result(result2
);
1414 mysql_free_result(result
);
1418 static int get_numplayed(char *name
)
1422 const char *fmt
= "select numplayed from data where name = '%s'";
1423 char *buf
= make_message(fmt
, name
);
1424 int ret
= -E_NORESULT
;
1426 result
= get_result(buf
);
1431 row
= mysql_fetch_row(result
);
1432 if (!row
|| !row
[0])
1437 mysql_free_result(result
);
1441 static int update_audio_file(char *name
)
1444 const char *fmt1
= "update data set lastplayed = now() where name = '%s'";
1445 const char *fmt2
= "update data set numplayed = %i where name = '%s'";
1447 char *ebn
= escaped_basename(name
);
1452 q
= make_message(fmt1
, ebn
);
1453 ret
= real_query(q
);
1457 ret
= get_numplayed(ebn
);
1460 q
= make_message(fmt2
, ret
+ 1, ebn
);
1461 ret
= real_query(q
);
1468 /* If called as child, mmd_lock must be held */
1469 static void update_mmd(char *info
)
1471 PARA_DEBUG_LOG("%s", "updating shared memory area\n");
1472 strncpy(mmd
->selector_info
, info
, MMD_INFO_SIZE
- 1);
1473 mmd
->selector_info
[MMD_INFO_SIZE
- 1] = '\0';
1476 static void update_audio_file_server_handler(char *name
)
1479 info
= get_selector_info(name
);
1482 update_audio_file(name
);
1485 int com_us(__a_unused
int fd
, int argc
, char *argv
[])
1491 return -E_MYSQL_SYNTAX
;
1492 tmp
= escape_str(argv
[1]);
1495 ret
= update_audio_file(argv
[1]);
1500 static void refresh_selector_info(void)
1502 char *name
= get_current_audio_file();
1507 info
= get_selector_info(name
);
1515 /* select previous / next stream */
1516 static int com_ps_ns(__a_unused
int fd
, int argc
, char *argv
[])
1518 char *query
, *stream
= get_current_stream();
1519 void *result
= get_result("select name from streams");
1521 int match
= -1, ret
, i
;
1522 unsigned int num_rows
;
1525 return -E_MYSQL_SYNTAX
;
1529 num_rows
= mysql_num_rows(result
);
1530 ret
= -E_EMPTY_RESULT
;
1534 for (i
= 0; i
< num_rows
; i
++) {
1535 row
= mysql_fetch_row(result
);
1536 if (!row
|| !row
[0])
1538 if (!strcmp(row
[0], "current_stream"))
1540 if (!strcmp(row
[0], stream
)) {
1548 if (!strcmp(argv
[0], "ps"))
1549 i
= match
> 0? match
- 1 : num_rows
- 1;
1551 i
= match
< num_rows
- 1? match
+ 1 : 0;
1553 mysql_data_seek(result
, i
);
1554 row
= mysql_fetch_row(result
);
1555 if (!row
|| !row
[0])
1557 if (!strcmp(row
[0], "current_stream")) {
1558 if (!strcmp(argv
[0], "ps")) {
1560 i
= i
< 0? i
+ num_rows
: i
;
1563 i
= i
> num_rows
- 1? i
- num_rows
: i
;
1565 mysql_data_seek(result
, i
);
1566 row
= mysql_fetch_row(result
);
1567 if (!row
|| !row
[0])
1570 query
= make_message("update streams set def='%s' where name = "
1571 "'current_stream'", row
[0]);
1572 ret
= real_query(query
);
1574 refresh_selector_info();
1578 mysql_free_result(result
);
1582 /* select previous stream */
1583 int com_ps(int fd
, int argc
, char *argv
[])
1585 return com_ps_ns(fd
, argc
, argv
);
1588 /* select next stream */
1589 int com_ns(int fd
, int argc
, char *argv
[])
1591 return com_ps_ns(fd
, argc
, argv
);
1595 int com_streams(int fd
, int argc
, __a_unused
char *argv
[])
1597 unsigned int num_rows
;
1598 int i
, ret
= -E_NORESULT
;
1602 if (argc
> 1 && strcmp(argv
[1], "current_stream"))
1603 return -E_MYSQL_SYNTAX
;
1605 char *cs
= get_current_stream();
1606 ret
= send_va_buffer(fd
, "%s\n", cs
);
1610 result
= get_result("select name from streams");
1613 num_rows
= mysql_num_rows(result
);
1618 for (i
= 0; i
< num_rows
; i
++) {
1619 row
= mysql_fetch_row(result
);
1620 if (!row
|| !row
[0])
1622 if (strcmp(row
[0], "current_stream"))
1623 send_va_buffer(fd
, "%s\n", row
[0]);
1628 mysql_free_result(result
);
1632 /* query stream definition */
1633 int com_strq(int fd
, int argc
, char *argv
[])
1641 ret
= -E_GET_STREAM
;
1642 name
= get_current_stream();
1645 name
= escaped_basename(argv
[1]);
1650 query
= make_message("select def from streams where name='%s'", name
);
1652 result
= get_result(query
);
1657 row
= mysql_fetch_row(result
);
1658 if (!row
|| !row
[0])
1660 /* no '\n' needed */
1661 ret
= send_buffer(fd
, row
[0]);
1664 mysql_free_result(result
);
1668 /* change stream / change stream and play */
1669 static int com_cs_csp(int fd
, int argc
, char *argv
[])
1671 int ret
, stream_change
;
1672 char *query
, *stream
= NULL
;
1673 char *old_stream
= get_current_stream();
1674 int csp
= !strcmp(argv
[0], "csp");
1676 ret
= -E_MYSQL_SYNTAX
;
1682 ret
= send_va_buffer(fd
, "%s\n", old_stream
);
1686 /* test if stream is valid, no need to escape argv[1] */
1687 query
= get_query(argv
[1], NULL
, 0);
1692 stream
= escape_str(argv
[1]);
1695 stream_change
= strcmp(stream
, old_stream
);
1696 if (stream_change
) {
1697 ret
= change_stream(stream
);
1700 refresh_selector_info();
1704 mmd
->new_vss_status_flags
|= VSS_PLAYING
;
1706 mmd
->new_vss_status_flags
|= VSS_NEXT
;
1717 int com_cs(int fd
, int argc
, char *argv
[])
1719 return com_cs_csp(fd
, argc
, argv
);
1722 /* change stream and play */
1723 int com_csp(int fd
, int argc
, char *argv
[])
1725 return com_cs_csp(fd
, argc
, argv
);
1728 /* score list / skip */
1729 static int com_sl_skip(int fd
, int argc
, char *argv
[])
1731 void *result
= NULL
;
1733 int ret
, i
, skip
= !strcmp(argv
[0], "skip");
1734 char *query
, *stream
, *tmp
;
1735 unsigned int num_rows
, num
;
1738 return -E_MYSQL_SYNTAX
;
1739 num
= atoi(argv
[1]);
1741 return -E_MYSQL_SYNTAX
;
1743 stream
= get_current_stream();
1745 return -E_GET_STREAM
;
1747 stream
= escape_str(argv
[2]);
1751 tmp
= get_query(stream
, NULL
, 0);
1754 return -E_GET_QUERY
;
1755 query
= make_message("%s limit %d", tmp
, num
);
1758 result
= get_result(query
);
1762 ret
= -E_EMPTY_RESULT
;
1763 num_rows
= mysql_num_rows(result
);
1766 for (i
= 0; i
< num_rows
&& i
< num
; i
++) {
1767 row
= mysql_fetch_row(result
);
1769 send_va_buffer(fd
, "Skipping %s\n", row
[0]);
1770 update_audio_file(row
[0]);
1772 send_va_buffer(fd
, "%s\n", row
[0]? row
[0]: "BUG");
1777 mysql_free_result(result
);
1782 int com_sl(int fd
, int argc
, char *argv
[])
1784 return com_sl_skip(fd
, argc
, argv
);
1788 int com_skip(int fd
, int argc
, char *argv
[])
1790 return com_sl_skip(fd
, argc
, argv
);
1794 * update attributes of name
1796 static int update_atts(int fd
, char *name
, char *atts
)
1799 char *ebn
, *q
, *old
, *new = NULL
;
1803 ebn
= escaped_basename(name
);
1806 q
= make_message("update data set %s where name = '%s'", atts
, ebn
);
1807 old
= get_atts(ebn
, 0);
1808 send_va_buffer(fd
, "old: %s\n", old
);
1810 ret
= real_query(q
);
1814 new = get_atts(ebn
, 0);
1815 ret
= send_va_buffer(fd
, "new: %s\n", new);
1825 int com_sa(int fd
, int argc
, char *argv
[])
1828 char *atts
= NULL
, *name
;
1831 return -E_MYSQL_SYNTAX
;
1832 for (i
= 1; i
< argc
; i
++) {
1834 char *esc
, *tmp
, *p
=argv
[i
];
1835 int len
= strlen(p
);
1839 switch (p
[len
- 1]) {
1850 esc
= escape_str(p
);
1853 tmp
= make_message("%s%s='%s'", atts
? "," : "", esc
,
1856 atts
= para_strcat(atts
, tmp
);
1862 if (i
>= argc
) { /* no name given, use current af */
1863 ret
= -E_GET_AUDIO_FILE
;
1864 if (!(name
= get_current_audio_file()))
1866 ret
= update_atts(fd
, name
, atts
);
1870 for (; argv
[i
] && ret
>= 0; i
++)
1871 ret
= update_atts(fd
, argv
[i
], atts
);
1873 refresh_selector_info();
1882 int com_cam(int fd
, int argc
, char *argv
[])
1884 char *name
= NULL
, *meta
= NULL
, *atts
= NULL
;
1888 return -E_MYSQL_SYNTAX
;
1889 if (!(name
= escaped_basename(argv
[1])))
1892 if (!(atts
= get_atts(name
, 1)))
1895 if (!(meta
= get_meta(name
, 0)))
1897 for (i
= 2; i
< argc
; i
++) {
1900 if (!(ebn
= escaped_basename(argv
[i
])))
1902 ret
= send_va_buffer(fd
, "updating %s\n", ebn
);
1907 q
= make_message("update data set %s where name = '%s'",
1909 if ((ret
= update_atts(fd
, ebn
, atts
)) >= 0)
1910 ret
= real_query(q
);
1930 static int com_vrfy_clean(int fd
, int argc
, __a_unused
char *argv
[])
1933 int ret
, vrfy_mode
= strcmp(argv
[0], "clean");
1934 void *result
= NULL
;
1935 unsigned int num_rows
;
1940 return -E_MYSQL_SYNTAX
;
1942 result
= get_result("select data.name from data left join dir on "
1943 "dir.name = data.name where dir.name is NULL");
1946 num_rows
= mysql_num_rows(result
);
1948 ret
= send_buffer(fd
, "No invalid entries\n");
1952 send_va_buffer(fd
, "found %i invalid entr%s\n", num_rows
,
1953 num_rows
== 1? "y" : "ies");
1954 ret
= print_results(fd
, result
, 0, 0, num_rows
- 1, 0);
1957 while ((row
= mysql_fetch_row(result
))) {
1962 escaped_name
= escape_str(row
[0]);
1965 send_va_buffer(fd
, "deleting %s\n", escaped_name
);
1966 query
= make_message("delete from data where name = '%s'",
1968 ret
= real_query(query
);
1976 mysql_free_result(result
);
1983 int com_vrfy(int fd
, int argc
, char **argv
)
1985 return com_vrfy_clean(fd
, argc
, argv
);
1991 int com_clean(int fd
, int argc
, char **argv
)
1993 return com_vrfy_clean(fd
, argc
, argv
);
1996 static FILE *out_file
;
1998 static int mysql_write_tmp_file(const char *dir
, const char *name
)
2000 int ret
= -E_TMPFILE
;
2001 char *msg
= make_message("%s\t%s\n", dir
, name
);
2002 if (fputs(msg
, out_file
) != EOF
)
2011 int com_upd(int fd
, int argc
, __a_unused
char *argv
[])
2013 char *tempname
= NULL
, *query
= NULL
;
2014 int ret
, out_fd
= -1, num
= 0;
2015 void *result
= NULL
;
2016 unsigned int num_rows
;
2020 return -E_MYSQL_SYNTAX
;
2022 tempname
= para_strdup("/tmp/mysql.tmp.XXXXXX");
2023 ret
= para_mkstemp(tempname
, S_IRUSR
| S_IWUSR
| S_IRGRP
| S_IROTH
);
2027 out_file
= fdopen(out_fd
, "w");
2032 if (find_audio_files(conf
.mysql_audio_file_dir_arg
, mysql_write_tmp_file
) < 0)
2034 num
= ftell(out_file
);
2036 * we have to make sure the file hit the disk before we call
2041 PARA_DEBUG_LOG("wrote tempfile %s (%d bytes)\n", tempname
, num
);
2044 if ((ret
= real_query("delete from dir")) < 0)
2046 query
= make_message("load data infile '%s' ignore into table dir "
2047 "fields terminated by '\t' lines terminated by '\n' "
2048 "(dir, name)", tempname
);
2049 ret
= real_query(query
);
2053 result
= get_result("select dir.name from dir left join data on "
2054 "data.name = dir.name where data.name is NULL");
2058 num_rows
= mysql_num_rows(result
);
2060 ret
= send_buffer(fd
, "no new entries\n");
2063 while ((row
= mysql_fetch_row(result
))) {
2068 send_va_buffer(fd
, "new entry: %s\n", row
[0]);
2069 erow
= escape_str(row
[0]);
2072 query
= make_message("insert into data (name, pic_id) values "
2073 "('%s','%s')", erow
, "1");
2075 ret
= real_query(query
);
2088 mysql_free_result(result
);
2092 static char **server_get_audio_file_list(unsigned int num
)
2094 char **list
= para_malloc((num
+ 1) * sizeof(char *));
2095 char *tmp
, *query
, *stream
= get_current_stream();
2096 void *result
= NULL
;
2097 unsigned int num_rows
;
2101 tmp
= get_query(stream
, NULL
, 1);
2105 query
= make_message("%s limit %d", tmp
, num
);
2107 result
= get_result(query
);
2111 num_rows
= mysql_num_rows(result
);
2114 for (i
= 0; i
< num_rows
&& i
< num
; i
++) {
2115 row
= mysql_fetch_row(result
);
2116 if (!row
|| !row
[0])
2118 list
[i
] = para_strdup(row
[0]);
2131 mysql_free_result(result
);
2136 * connect to mysql server, return mysql pointer on success, -E_NOTCONN
2137 * on errors. Called from parent on startup and also from com_cdb().
2139 static int init_mysql_server(void)
2141 char *u
= conf
.mysql_user_arg
? conf
.mysql_user_arg
: para_logname();
2143 mysql_ptr
= mysql_init(NULL
);
2145 PARA_CRIT_LOG("%s", "mysql init error\n");
2148 PARA_DEBUG_LOG("connecting: %s@%s:%d\n", u
, conf
.mysql_host_arg
,
2149 conf
.mysql_port_arg
);
2150 if (!conf
.mysql_user_arg
)
2153 * If host is NULL a connection to the local host is assumed,
2154 * If user is NULL, the current user is assumed
2156 if (!(mysql_ptr
= mysql_real_connect(mysql_ptr
,
2157 conf
.mysql_host_arg
,
2158 conf
.mysql_user_arg
,
2159 conf
.mysql_passwd_arg
,
2160 conf
.mysql_database_arg
,
2161 conf
.mysql_port_arg
, NULL
, 0))) {
2162 PARA_CRIT_LOG("%s", "connect error\n");
2165 PARA_INFO_LOG("%s", "success\n");
2169 /* mmd lock must be held */
2170 static void write_msg2mmd(int success
)
2172 sprintf(mmd
->selector_info
, "dbinfo1:%s\ndbinfo2:mysql-%s\ndbinfo3:\n",
2173 success
< 0? PARA_STRERROR(-success
) :
2174 "successfully connected to mysql server",
2175 success
< 0? "" : mysql_get_server_info(mysql_ptr
));
2178 /* create database */
2179 int com_cdb(int fd
, int argc
, char *argv
[])
2185 PARA_INFO_LOG("%s", "closing database\n");
2186 mysql_close(mysql_ptr
);
2188 /* dont use any database */
2189 conf
.mysql_database_arg
= NULL
; /* leak? */
2190 ret
= -E_MYSQL_INIT
;
2191 if (init_mysql_server() < 0 || !mysql_ptr
)
2194 conf
.mysql_database_arg
= para_strdup("paraslash");
2197 conf
.mysql_database_arg
= escape_str(argv
[1]);
2198 if (!conf
.mysql_database_arg
)
2201 query
= make_message("create database %s", conf
.mysql_database_arg
);
2202 ret
= real_query(query
);
2206 /* reconnect with database just created */
2207 mysql_close(mysql_ptr
);
2208 ret
= -E_MYSQL_INIT
;
2209 if (init_mysql_server() < 0 || !mysql_ptr
)
2215 if (real_query("create table data (name varchar(255) binary not null "
2217 "lastplayed datetime not null default "
2219 "numplayed int not null default 0, "
2220 "pic_id bigint unsigned not null default 1)") < 0)
2222 if (real_query("create table dir (name varchar(255) binary not null "
2223 "primary key, dir varchar(255) default null)") < 0)
2225 if (real_query("create table pics ("
2226 "id bigint(20) unsigned not null primary key "
2228 "name varchar(255) binary not null, "
2229 "pic mediumblob not null)") < 0)
2231 if (real_query("create table streams ("
2232 "name varchar(255) binary not null primary key, "
2233 "def blob not null)") < 0)
2235 if (real_query("insert into streams (name, def) values "
2236 "('current_stream', '(none)')") < 0)
2238 ret
= send_va_buffer(fd
, "successfully created database %s\n",
2239 conf
.mysql_database_arg
);
2244 static void shutdown_connection(void)
2247 PARA_NOTICE_LOG("%s", "shutting down mysql connection\n");
2248 mysql_close(mysql_ptr
);
2254 * the init function of the mysql-based audio file selector
2256 * \param db pointer to the struct to initialize
2258 * Check the command line options and initialize all function pointers of \a
2259 * db. Connect to the mysql server and initialize the info string.
2261 * \return This function returns success even if it could not connect
2262 * to the mysql server. This is because the connect is expected to fail
2263 * if there the paraslash database is not yet created. This gives the
2264 * user a chance to send the "cdb" to create the database.
2266 * \sa struct audio_file_selector, misc_meta_data::selector_info,
2269 int mysql_selector_init(struct audio_file_selector
*db
)
2273 if (!conf
.mysql_passwd_given
)
2274 return -E_NO_MYSQL_PASSWD
;
2275 if (!conf
.mysql_audio_file_dir_given
)
2276 return -E_NO_AF_DIR
;
2278 db
->cmd_list
= mysql_selector_cmds
;
2279 db
->get_audio_file_list
= server_get_audio_file_list
;
2280 db
->update_audio_file
= update_audio_file_server_handler
;
2281 db
->shutdown
= shutdown_connection
;
2282 ret
= init_mysql_server();
2284 PARA_WARNING_LOG("%s\n", PARA_STRERROR(-ret
));
2286 return 1; /* return success even if connect failed to give the
2287 * user the chance to exec com_cdb