annotate Plugins/General/lirc/lirc.c @ 156:23726a5a74bc trunk

[svn] Add LIRC general plugin.
author chainsaw
date Sat, 12 Nov 2005 17:11:46 -0800
parents
children 894e9c4a0051
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
156
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
1 /* Lirc plugin
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
2
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
3 Copyright (C) 2005 Audacious development team
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
4
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
5 Copyright (c) 1998-1999 Carl van Schaik (carl@leg.uct.ac.za)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
6
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
7 Copyright (C) 2000 Christoph Bartelmus (xmms@bartelmus.de)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
8
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
9 some code was stolen from:
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
10 IRman plugin for xmms by Charles Sielski (stray@teklabs.net)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
11
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
12 This program is free software; you can redistribute it and/or modify
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
13 it under the terms of the GNU General Public License as published by
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
14 the Free Software Foundation; either version 2 of the License, or
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
15 (at your option) any later version.
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
16
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
17 This program is distributed in the hope that it will be useful,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
18 but WITHOUT ANY WARRANTY; without even the implied warranty of
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
19 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
20 GNU General Public License for more details.
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
21
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
22 You should have received a copy of the GNU General Public License
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
23 along with this program; if not, write to the Free Software
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
24 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
25 */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
26
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
27 #ifdef HAVE_CONFIG_H
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
28 # include "config.h"
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
29 #endif
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
30
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
31 #include <stdio.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
32 #include <unistd.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
33 #include <fcntl.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
34 #include <string.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
35 #include <signal.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
36 #include <stdlib.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
37 #include <ctype.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
38
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
39 #include <gtk/gtk.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
40
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
41 #include <glib.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
42
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
43 #include "audacious/plugin.h"
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
44 #include "libaudacious/configfile.h"
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
45 #include "libaudacious/beepctrl.h"
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
46
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
47 #include <lirc/lirc_client.h>
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
48
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
49 #include "lirc.h"
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
50
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
51 const char *plugin_name="LIRC Plugin " VERSION;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
52
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
53 GeneralPlugin lirc_plugin = {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
54 NULL,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
55 NULL,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
56 -1,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
57 NULL,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
58 init,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
59 about,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
60 configure,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
61 cleanup,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
62 };
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
63
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
64 GeneralPlugin *get_gplugin_info(void)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
65 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
66 lirc_plugin.description = g_strdup_printf("LIRC Plugin");
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
67 return(&lirc_plugin);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
68 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
69
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
70 int lirc_fd=-1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
71 struct lirc_config *config=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
72 gint tracknr=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
73 gint mute=0; /* mute flag */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
74 gint mute_vol=0; /* holds volume before mute */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
75
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
76 gint input_tag;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
77
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
78 int select_tag=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
79 GtkWidget *select_popup=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
80 GtkStyle *popup_style=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
81 GList *select_list=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
82 GtkWidget *fsd;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
83 gchar *fontname;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
84
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
85 struct select_info
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
86 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
87 char *s;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
88 size_t common;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
89 };
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
90
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
91 struct title_info
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
92 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
93 char *s;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
94 int pos;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
95 };
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
96
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
97 void clear_select_list(GList **list)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
98 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
99 GList *l;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
100
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
101 l=*list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
102 while(l!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
103 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
104 free(((struct select_info *) (l->data))->s);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
105 free(l->data);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
106 l=g_list_remove_link(l,l);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
107 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
108 *list=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
109 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
110
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
111 void clear_title_list(GList **list)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
112 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
113 GList *l;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
114
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
115 l=*list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
116 while(l!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
117 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
118 free(((struct title_info *) (l->data))->s);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
119 free(l->data);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
120 l=g_list_remove_link(l,l);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
121 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
122 *list=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
123 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
124
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
125 gchar *get_title_postfix(gchar *title)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
126 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
127 gchar *match;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
128 GList *scan_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
129 struct select_info *si;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
130 size_t skip;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
131
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
132 match=title;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
133 scan_list=select_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
134 si=(struct select_info *) (scan_list->data);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
135 while(*match)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
136 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
137 if(!isalnum(*match))
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
138 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
139 match++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
140 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
141 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
142 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
143 if(strchr(si->s,toupper(*match))!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
144 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
145 skip=si->common;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
146 while(skip>0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
147 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
148 if(isalnum(*match))
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
149 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
150 skip--;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
151 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
152 match++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
153 if(!*match)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
154 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
155 break;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
156 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
157 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
158 scan_list=g_list_next(scan_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
159 if(scan_list==NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
160 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
161 while(!isalnum(*match) && *match)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
162 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
163 match++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
164 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
165 return(match);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
166 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
167 si=(struct select_info *) (scan_list->data);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
168 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
169 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
170 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
171 break;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
172 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
173 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
174 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
175 return(NULL);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
176 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
177
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
178 #define SELECT_BORDER 8
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
179
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
180 gint remove_select_popup(GtkWidget **select_popup)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
181 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
182 gtk_widget_destroy(*select_popup);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
183 *select_popup=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
184 select_tag=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
185 return(FALSE);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
186 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
187
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
188 /*void select_title(char *s,int num)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
189 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
190 GdkFont *font;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
191 GtkStyle *style;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
192 int gap,baseline_skip;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
193 int width,height,x,y;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
194 GList *new_list,*scan_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
195 GList *title_list=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
196 int length,i;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
197 gchar *title;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
198 struct select_info *si;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
199 struct title_info *ti;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
200
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
201 if(select_tag!=0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
202 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
203 gtk_timeout_remove(select_tag);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
204 remove_select_popup(&select_popup);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
205 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
206 if(s!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
207 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
208 si=malloc(sizeof(*si));
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
209 if(si==NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
210 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
211 return;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
212 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
213 si->s=strdup(s);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
214 si->common=1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
215 if(si->s==NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
216 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
217 free(si);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
218 return;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
219 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
220 new_list=g_list_append(select_list,si);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
221 if(new_list==NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
222 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
223 free(si->s);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
224 free(si);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
225 return;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
226 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
227
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
228 select_list=new_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
229 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
230
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
231 scan_list=select_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
232 while(scan_list)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
233 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
234 scan_list=g_list_next(scan_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
235 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
236
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
237 length=xmms_remote_get_playlist_length
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
238 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
239 for(i=0;i<length;i++)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
240 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
241 title=xmms_remote_get_playlist_title
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
242 (lirc_plugin.xmms_session,i);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
243 if(get_title_postfix(title)!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
244 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
245 ti=malloc(sizeof(*ti));
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
246 if(ti==NULL) break;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
247 ti->s=strdup(title);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
248 if(ti->s==NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
249 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
250 free(ti);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
251 break;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
252 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
253 ti->pos=i;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
254 new_list=g_list_append(title_list,ti);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
255 if(new_list==NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
256 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
257 free(ti->s);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
258 free(ti);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
259 break;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
260 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
261 title_list=new_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
262 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
263 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
264 select_popup=gtk_window_new(GTK_WINDOW_POPUP);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
265 if(popup_style)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
266 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
267 if(fontname!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
268 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
269 font=gdk_font_load(fontname);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
270 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
271 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
272 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
273 font=gdk_font_load
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
274 ("-xxl-*-medium-r-semicondensed-*-*-*-75-75-*-*-*-*");
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
275 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
276 if(font) popup_style->font=font;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
277 gtk_widget_set_style(select_popup,popup_style);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
278 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
279 gtk_widget_set_app_paintable(select_popup,TRUE);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
280 gtk_window_set_policy(GTK_WINDOW(select_popup),FALSE,FALSE,TRUE);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
281 gtk_widget_set_name(select_popup,"LIRC select list");
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
282 style=select_popup->style;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
283 font=style->font;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
284 gap=(font->ascent+font->descent)/4;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
285 if(gap<2) gap=2;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
286 baseline_skip=font->ascent+font->descent+gap;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
287
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
288 if(title_list==NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
289 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
290 gchar *text="No match.";
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
291
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
292 x=gdk_string_width(font,text);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
293 width=SELECT_BORDER*2+x;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
294 height=SELECT_BORDER*2+baseline_skip-gap;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
295 gtk_widget_set_usize(select_popup,width,height);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
296 x=(gdk_screen_width()-width)/2;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
297 if(x<0) x=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
298 y=(gdk_screen_height()-height)/2;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
299 if(y<0) y=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
300 gtk_widget_popup(select_popup,x,y);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
301 gtk_paint_box(select_popup->style,select_popup->window,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
302 GTK_STATE_NORMAL,GTK_SHADOW_OUT,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
303 NULL,GTK_WIDGET(select_popup),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
304 "LIRC select list",0,0,-1,-1);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
305
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
306 gtk_paint_string(style,select_popup->window,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
307 GTK_STATE_NORMAL,NULL,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
308 GTK_WIDGET(select_popup),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
309 "LIRC select item",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
310 SELECT_BORDER,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
311 SELECT_BORDER+font->ascent,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
312 "No match.");
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
313
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
314 clear_select_list(&select_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
315 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
316 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
317 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
318 int count;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
319 int common;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
320 int pass;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
321 int x1,x2,x3;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
322
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
323 if(s==NULL && num>0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
324 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
325 scan_list=title_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
326 while(scan_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
327 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
328 num--;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
329 if(num==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
330 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
331 clear_select_list(&select_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
332 xmms_remote_set_playlist_pos
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
333 (lirc_plugin.xmms_session,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
334 ((struct title_info *) (scan_list->data))->pos);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
335 break;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
336 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
337 scan_list=g_list_next(scan_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
338 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
339 clear_title_list(&title_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
340 return;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
341 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
342
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
343 check how many chars are common
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
344 scan_list=title_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
345 title=get_title_postfix
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
346 (((struct title_info *) scan_list->data)->s);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
347 common=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
348 count=strlen(title);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
349 for(i=0;i<count;i++)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
350 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
351 if(isalnum(title[i])) common++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
352 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
353 scan_list=g_list_next(scan_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
354 while(scan_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
355 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
356 gchar *title1,*title2;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
357
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
358 count=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
359 title1=title;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
360 title2=get_title_postfix
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
361 (((struct title_info *) scan_list->data)->s);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
362 while(*title1 && *title2)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
363 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
364 if(!isalnum(*title1)) {title1++;continue;}
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
365 if(!isalnum(*title2)) {title2++;continue;}
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
366 if(toupper(*title1)==toupper(*title2))
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
367 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
368 count++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
369 title1++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
370 title2++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
371 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
372 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
373 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
374 break;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
375 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
376 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
377 if(count<common) common=count;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
378 scan_list=g_list_next(scan_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
379 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
380 scan_list=select_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
381 while(g_list_next(scan_list)!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
382 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
383 scan_list=g_list_next(scan_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
384 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
385 ((struct select_info *) (scan_list->data))->common=common+1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
386
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
387 print out selected titles
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
388 x1=x2=x3=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
389 count=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
390 pass=1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
391 scan_list=title_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
392 while(scan_list!=NULL || pass==1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
393 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
394 gchar *title,*postfix,help;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
395 char buffer[20];
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
396
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
397 count++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
398 title=((struct title_info *) scan_list->data)->s;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
399 postfix=get_title_postfix(title);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
400 help=postfix[0];
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
401 postfix[0]=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
402
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
403 snprintf(buffer,20,"%2d:",count);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
404 if(pass==1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
405 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
406 x=gdk_string_width
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
407 (select_popup->style->font,buffer);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
408 if(x>x1) x1=x;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
409 x2=gdk_string_width
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
410 (select_popup->style->font,title);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
411 postfix[0]=help;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
412 x=gdk_string_width(select_popup->style->font,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
413 postfix);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
414 if(x>x3) x3=x;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
415 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
416 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
417 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
418 gtk_paint_string(style,select_popup->window,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
419 GTK_STATE_NORMAL,NULL,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
420 GTK_WIDGET(select_popup),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
421 "LIRC select item",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
422 SELECT_BORDER,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
423 SELECT_BORDER+font->ascent+
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
424 (count-1)*baseline_skip,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
425 buffer);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
426 gtk_paint_string(style,select_popup->window,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
427 GTK_STATE_NORMAL,NULL,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
428 GTK_WIDGET(select_popup),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
429 "LIRC select item",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
430 SELECT_BORDER+x1,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
431 SELECT_BORDER+font->ascent+
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
432 (count-1)*baseline_skip,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
433 title);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
434 postfix[0]=help;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
435 gtk_paint_string(style,select_popup->window,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
436 GTK_STATE_NORMAL,NULL,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
437 GTK_WIDGET(select_popup),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
438 "LIRC select item",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
439 SELECT_BORDER+x1+x2+10,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
440 SELECT_BORDER+font->ascent+
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
441 (count-1)*baseline_skip,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
442 postfix);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
443
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
444 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
445 scan_list=g_list_next(scan_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
446 if(scan_list==NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
447 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
448 if(pass==1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
449 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
450 int x,y;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
451
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
452 width=SELECT_BORDER*2+x1+x2+10+x3;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
453 height=SELECT_BORDER*2+count*baseline_skip-gap;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
454
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
455 gtk_widget_set_usize(select_popup,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
456 width,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
457 height);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
458 x=(gdk_screen_width()-width)/2;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
459 if(x<0) x=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
460 y=(gdk_screen_height()-height)/2;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
461 if(y<0) y=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
462 gtk_widget_popup(select_popup,x,y);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
463 gtk_paint_box(style,select_popup->window,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
464 GTK_STATE_NORMAL,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
465 GTK_SHADOW_OUT,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
466 NULL,GTK_WIDGET(select_popup),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
467 "LIRC select list",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
468 0,0,-1,-1);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
469 scan_list=title_list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
470 count=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
471 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
472 pass++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
473 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
474 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
475 if(count==1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
476 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
477 clear_select_list(&select_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
478 xmms_remote_set_playlist_pos
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
479 (lirc_plugin.xmms_session,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
480 ((struct title_info *) title_list->data)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
481 ->pos);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
482 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
483 clear_title_list(&title_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
484
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
485 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
486 select_tag=gtk_timeout_add(3000,(GtkFunction) remove_select_popup,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
487 (gpointer) &select_popup);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
488 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
489 */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
490 void init(void)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
491 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
492 int flags;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
493 ConfigFile *cfg;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
494
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
495 if((lirc_fd=lirc_init("audacious",1))==-1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
496 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
497 fprintf(stderr,"%s: could not init LIRC support\n",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
498 plugin_name);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
499 return;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
500 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
501 if(lirc_readconfig(NULL,&config,NULL)==-1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
502 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
503 lirc_deinit();
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
504 fprintf(stderr,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
505 "%s: could not read LIRC config file\n"
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
506 "%s: please read the documentation of LIRC \n"
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
507 "%s: how to create a proper config file\n",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
508 plugin_name,plugin_name,plugin_name);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
509 return;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
510 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
511 input_tag=gdk_input_add(lirc_fd,GDK_INPUT_READ,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
512 lirc_input_callback,NULL);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
513 fcntl(lirc_fd,F_SETOWN,getpid());
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
514 flags=fcntl(lirc_fd,F_GETFL,0);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
515 if(flags!=-1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
516 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
517 fcntl(lirc_fd,F_SETFL,flags|O_NONBLOCK);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
518 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
519 fflush(stdout);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
520 cfg=xmms_cfg_open_default_file();
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
521 if(cfg)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
522 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
523 xmms_cfg_read_string(cfg,"LIRC","font",&fontname);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
524 xmms_cfg_free(cfg);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
525 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
526 popup_style=gtk_style_new();
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
527 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
528
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
529 void lirc_input_callback(gpointer data,gint source,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
530 GdkInputCondition condition)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
531 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
532 char *code;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
533 char *c;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
534 gint playlist_time,playlist_pos,output_time,v;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
535 int ret;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
536 char *ptr;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
537 gint balance;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
538 gboolean show_pl;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
539 int n;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
540
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
541 while((ret=lirc_nextcode(&code))==0 && code!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
542 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
543 while((ret=lirc_code2char(config,code,&c))==0 && c!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
544 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
545 if(strcasecmp("PLAY",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
546 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
547 xmms_remote_play(lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
548 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
549 else if(strcasecmp("STOP",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
550 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
551 xmms_remote_stop(lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
552 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
553 else if(strcasecmp("PAUSE",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
554 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
555 xmms_remote_pause(lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
556 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
557 else if(strcasecmp("PLAYPAUSE",c) == 0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
558 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
559 if(xmms_remote_is_playing(lirc_plugin.
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
560 xmms_session))
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
561 xmms_remote_pause
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
562 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
563 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
564 xmms_remote_play
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
565 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
566 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
567 else if(strncasecmp("NEXT",c,4)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
568 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
569 ptr=c+4;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
570 while(isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
571 n=atoi(ptr);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
572
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
573 if(n<=0) n=1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
574 for(;n>0;n--)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
575 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
576 xmms_remote_playlist_next
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
577 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
578 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
579 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
580 else if(strncasecmp("PREV",c,4)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
581 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
582 ptr=c+4;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
583 while(isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
584 n=atoi(ptr);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
585
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
586 if(n<=0) n=1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
587 for(;n>0;n--)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
588 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
589 xmms_remote_playlist_prev
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
590 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
591 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
592 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
593 else if(strcasecmp("SHUFFLE",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
594 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
595 xmms_remote_toggle_shuffle(lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
596 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
597 else if(strcasecmp("REPEAT",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
598 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
599 xmms_remote_toggle_repeat(lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
600 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
601 else if(strncasecmp("FWD",c,3)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
602 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
603 ptr=c+3;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
604 while(isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
605 n=atoi(ptr)*1000;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
606
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
607 if(n<=0) n=5000;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
608 output_time=xmms_remote_get_output_time
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
609 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
610 playlist_pos=xmms_remote_get_playlist_pos
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
611 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
612 playlist_time=xmms_remote_get_playlist_time
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
613 (lirc_plugin.xmms_session,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
614 playlist_pos);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
615 if(playlist_time-output_time<n)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
616 output_time=playlist_time-n;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
617 xmms_remote_jump_to_time
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
618 (lirc_plugin.xmms_session,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
619 output_time+n);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
620 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
621 else if(strncasecmp("BWD",c,3)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
622 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
623 ptr=c+3;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
624 while(isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
625 n=atoi(ptr)*1000;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
626
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
627 if(n<=0) n=5000;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
628 output_time=xmms_remote_get_output_time
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
629 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
630 if(output_time<n)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
631 output_time=n;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
632 xmms_remote_jump_to_time
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
633 (lirc_plugin.xmms_session,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
634 output_time-n);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
635 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
636 else if(strncasecmp("VOL_UP",c,6)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
637 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
638 ptr=c+6;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
639 while(isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
640 n=atoi(ptr);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
641 if(n<=0) n=5;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
642
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
643 v = xmms_remote_get_main_volume
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
644 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
645 if(v > (100-n)) v=100-n;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
646 xmms_remote_set_main_volume
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
647 (lirc_plugin.xmms_session,v+n);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
648 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
649 else if(strncasecmp("VOL_DOWN",c,8)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
650 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
651 ptr=c+8;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
652 while (isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
653 n=atoi(ptr);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
654 if(n<=0) n=5;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
655
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
656 v = xmms_remote_get_main_volume
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
657 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
658 if(v<n) v=n;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
659 xmms_remote_set_main_volume
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
660 (lirc_plugin.xmms_session,v-n);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
661 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
662 else if(strcasecmp("QUIT",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
663 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
664 #ifdef HAVE_XMMS_REMOTE_QUIT
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
665 xmms_remote_quit(lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
666 #else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
667 raise(SIGTERM);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
668 #endif
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
669 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
670 else if(strcasecmp("SETPOS",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
671 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
672 xmms_remote_set_playlist_pos(lirc_plugin.xmms_session,tracknr-1);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
673 xmms_remote_play(lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
674 tracknr=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
675 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
676 else if(strcasecmp("ONE",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
677 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
678 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
679 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
680 /* select_title(NULL,1); */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
681 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
682 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
683 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
684 tracknr=tracknr*10+1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
685 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
686 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
687 else if(strcasecmp("TWO",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
688 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
689 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
690 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
691 /* select_title(NULL,2); */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
692 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
693 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
694 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
695 tracknr=tracknr*10+2;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
696 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
697 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
698 else if(strcasecmp("THREE",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
699 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
700 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
701 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
702 /* select_title(NULL,3);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
703 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
704 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
705 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
706 tracknr=tracknr*10+3;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
707 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
708 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
709 else if(strcasecmp("FOUR",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
710 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
711 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
712 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
713 /* select_title(NULL,4);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
714 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
715 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
716 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
717 tracknr=tracknr*10+4;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
718 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
719 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
720 else if(strcasecmp("FIVE",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
721 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
722 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
723 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
724 /*select_title(NULL,5);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
725 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
726 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
727 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
728 tracknr=tracknr*10+5;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
729 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
730 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
731 else if(strcasecmp("SIX",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
732 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
733 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
734 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
735 /*select_title(NULL,6);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
736 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
737 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
738 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
739 tracknr=tracknr*10+6;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
740 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
741 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
742 else if(strcasecmp("SEVEN",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
743 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
744 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
745 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
746 /*select_title(NULL,7);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
747 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
748 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
749 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
750 tracknr=tracknr*10+7;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
751 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
752 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
753 else if(strcasecmp("EIGHT",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
754 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
755 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
756 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
757 /*select_title(NULL,8);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
758 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
759 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
760 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
761 tracknr=tracknr*10+8;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
762 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
763 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
764 else if(strcasecmp("NINE",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
765 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
766 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
767 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
768 /*select_title(NULL,9);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
769 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
770 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
771 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
772 tracknr=tracknr*10+9;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
773 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
774 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
775 else if(strcasecmp("ZERO",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
776 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
777 if(select_list!=NULL)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
778 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
779 /*select_title(NULL,10);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
780 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
781 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
782 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
783 tracknr=tracknr*10;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
784 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
785 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
786 else if(strcasecmp("MUTE",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
787 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
788 if(mute==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
789 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
790 mute=1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
791 /* store the master volume so
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
792 we can restore it on unmute. */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
793 mute_vol = xmms_remote_get_main_volume
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
794 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
795 xmms_remote_set_main_volume
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
796 (lirc_plugin.xmms_session, 0);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
797 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
798 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
799 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
800 mute=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
801 xmms_remote_set_main_volume
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
802 (lirc_plugin.xmms_session,
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
803 mute_vol);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
804 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
805 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
806 else if(strncasecmp("BAL_LEFT",c,8)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
807 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
808 ptr=c+8;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
809 while(isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
810 n=atoi(ptr);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
811 if(n<=0) n=5;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
812
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
813 balance=xmms_remote_get_balance
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
814 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
815 balance-=n;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
816 if(balance<-100) balance=-100;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
817 xmms_remote_set_balance
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
818 (lirc_plugin.xmms_session,balance);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
819 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
820 else if(strncasecmp("BAL_RIGHT",c,9)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
821 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
822 ptr=c+9;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
823 while(isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
824 n=atoi(ptr);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
825 if(n<=0) n=5;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
826
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
827 balance=xmms_remote_get_balance
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
828 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
829 balance+=n;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
830 if(balance>100) balance=100;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
831 xmms_remote_set_balance
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
832 (lirc_plugin.xmms_session,balance);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
833 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
834 else if(strcasecmp("BAL_CENTER",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
835 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
836 balance=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
837 xmms_remote_set_balance
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
838 (lirc_plugin.xmms_session,balance);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
839 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
840 else if(strcasecmp("LIST",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
841 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
842 show_pl=xmms_remote_is_pl_win
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
843 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
844 show_pl=(show_pl) ? 0:1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
845 xmms_remote_pl_win_toggle
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
846 (lirc_plugin.xmms_session,show_pl);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
847 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
848 else if(strcasecmp("PLAYLIST_CLEAR",c)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
849 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
850 gboolean pl_visible;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
851
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
852 pl_visible=xmms_remote_is_pl_win
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
853 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
854 xmms_remote_stop(lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
855 xmms_remote_playlist_clear
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
856 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
857 /* This is to refresh window content */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
858 xmms_remote_pl_win_toggle
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
859 (lirc_plugin.xmms_session,pl_visible);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
860 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
861 else if(strncasecmp("PLAYLIST_ADD ",c,13)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
862 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
863 gboolean pl_visible;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
864 GList list;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
865
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
866 pl_visible=xmms_remote_is_pl_win
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
867 (lirc_plugin.xmms_session);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
868 list.prev=list.next=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
869 list.data=c+13;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
870 xmms_remote_playlist_add
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
871 (lirc_plugin.xmms_session,&list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
872 /* This is to refresh window content */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
873 xmms_remote_pl_win_toggle
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
874 (lirc_plugin.xmms_session,pl_visible);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
875 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
876 else if(strncasecmp("SELECT",c,6)==0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
877 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
878 char *sel;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
879 int i;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
880
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
881 ptr=c+6;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
882 while(isspace(*ptr)) ptr++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
883
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
884 sel=ptr;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
885 for(i=0;*ptr;ptr++)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
886 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
887 if(isalnum(*ptr))
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
888 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
889 sel[i]=toupper(*ptr);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
890 i++;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
891 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
892 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
893 sel[i]=0;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
894
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
895 if(strlen(sel)>0)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
896 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
897 /*select_title(sel,0);*/
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
898 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
899 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
900 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
901 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
902 fprintf(stderr,"%s: unknown command \"%s\"\n",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
903 plugin_name,c);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
904 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
905 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
906 free(code);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
907 if(ret==-1) break;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
908 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
909 if(ret==-1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
910 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
911 /* something went badly wrong */
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
912 fprintf(stderr,"%s: disconnected from LIRC\n",plugin_name);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
913 cleanup();
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
914 return;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
915 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
916 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
917
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
918 void configure(void)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
919 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
920 if(!fsd)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
921 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
922 GtkWidget *window;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
923
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
924 window=gtk_font_selection_dialog_new
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
925 ("Please choose font for SELECT popup.");
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
926 g_return_if_fail(GTK_IS_FONT_SELECTION_DIALOG(window));
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
927
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
928 fsd=window;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
929 gtk_window_position(GTK_WINDOW(fsd),GTK_WIN_POS_MOUSE);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
930 gtk_signal_connect(GTK_OBJECT(fsd), "destroy",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
931 GTK_SIGNAL_FUNC(gtk_widget_destroyed),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
932 &fsd);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
933 gtk_signal_connect(GTK_OBJECT(GTK_FONT_SELECTION_DIALOG
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
934 (fsd)->ok_button),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
935 "clicked",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
936 GTK_SIGNAL_FUNC(font_selection_ok),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
937 NULL);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
938 gtk_signal_connect_object(GTK_OBJECT(GTK_FONT_SELECTION_DIALOG(fsd)->cancel_button),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
939 "clicked",
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
940 GTK_SIGNAL_FUNC(gtk_widget_destroy),
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
941 GTK_OBJECT(fsd));
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
942 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
943 if(!GTK_WIDGET_VISIBLE(fsd))
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
944 gtk_widget_show(fsd);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
945 else
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
946 gtk_widget_destroy(fsd);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
947 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
948
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
949 void font_selection_ok(GtkWidget *button,gpointer *data)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
950 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
951 gchar *new_fontname;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
952
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
953 new_fontname=gtk_font_selection_dialog_get_font_name
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
954 (GTK_FONT_SELECTION_DIALOG(fsd));
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
955 if(new_fontname)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
956 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
957 if(fontname) free(fontname);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
958 fontname=new_fontname;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
959 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
960 gtk_widget_destroy(fsd);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
961 fsd=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
962 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
963
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
964 void cleanup()
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
965 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
966 ConfigFile *cfg;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
967
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
968 if(config)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
969 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
970 gtk_input_remove(input_tag);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
971 lirc_freeconfig(config);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
972 config=NULL;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
973 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
974 if(lirc_fd!=-1)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
975 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
976 lirc_deinit();
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
977 lirc_fd=-1;
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
978 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
979 clear_select_list(&select_list);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
980 if(fontname)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
981 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
982 cfg=xmms_cfg_open_default_file();
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
983 if(cfg)
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
984 {
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
985 xmms_cfg_write_string(cfg,"LIRC","font",fontname);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
986 xmms_cfg_write_default_file(cfg);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
987 xmms_cfg_free(cfg);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
988 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
989 free(fontname);
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
990 }
23726a5a74bc [svn] Add LIRC general plugin.
chainsaw
parents:
diff changeset
991 }