Mercurial > hg > xmms-sid
annotate src/xs_fileinfo.c @ 232:e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
properly locked and no race conditions should be present.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Tue, 21 Dec 2004 13:13:05 +0000 |
parents | 608f31f6c095 |
children | 6f9764fbd693 |
rev | line source |
---|---|
222 | 1 /* |
2 XMMS-SID - SIDPlay input plugin for X MultiMedia System (XMMS) | |
3 | |
4 File information window | |
5 | |
6 Written by Matti "ccr" Hamalainen <ccr@tnsp.org> | |
7 | |
8 This program is free software; you can redistribute it and/or modify | |
9 it under the terms of the GNU General Public License as published by | |
10 the Free Software Foundation; either version 2 of the License, or | |
11 (at your option) any later version. | |
12 | |
13 This program is distributed in the hope that it will be useful, | |
14 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 GNU General Public License for more details. | |
17 | |
18 You should have received a copy of the GNU General Public License | |
19 along with this program; if not, write to the Free Software | |
20 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | |
21 */ | |
22 #include <gdk/gdkkeysyms.h> | |
23 #include <gtk/gtk.h> | |
24 | |
25 #include "xmms-sid.h" | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
26 #include "xs_support.h" |
222 | 27 #include "xs_stil.h" |
28 #include "xs_config.h" | |
29 #include "xs_interface.h" | |
30 #include "xs_glade.h" | |
31 | |
32 static GtkWidget *xs_fileinfowin = NULL; | |
230 | 33 static t_xs_stil_node *xs_fileinfostil = NULL; |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
34 XS_MUTEX(xs_fileinfowin); |
222 | 35 |
36 #define LUW(x...) lookup_widget(xs_fileinfowin, ## x) | |
37 | |
38 | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
39 void xs_fileinfo_update(void) |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
40 { |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
41 gboolean isEnabled; |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
42 GtkAdjustment *tmpAdj; |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
43 |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
44 XS_MUTEX_LOCK(xs_status); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
45 XS_MUTEX_LOCK(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
46 |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
47 /* Check if control window exists, we are currently playing and have a tune */ |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
48 if (xs_fileinfowin) |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
49 { |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
50 if (xs_status.tuneInfo && xs_status.isPlaying && (xs_status.tuneInfo->nsubTunes > 1)) |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
51 { |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
52 tmpAdj = gtk_range_get_adjustment(GTK_RANGE(LUW("fileinfo_subctrl_adj"))); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
53 |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
54 tmpAdj->value = xs_status.currSong; |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
55 tmpAdj->lower = 1; |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
56 tmpAdj->upper = xs_status.tuneInfo->nsubTunes; |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
57 XS_MUTEX_UNLOCK(xs_status); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
58 XS_MUTEX_UNLOCK(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
59 gtk_adjustment_value_changed(tmpAdj); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
60 XS_MUTEX_LOCK(xs_status); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
61 XS_MUTEX_LOCK(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
62 isEnabled = TRUE; |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
63 } else |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
64 isEnabled = FALSE; |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
65 |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
66 /* Enable or disable subtune-control in fileinfo window */ |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
67 gtk_widget_set_sensitive(LUW("fileinfo_subctrl_prev"), isEnabled); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
68 gtk_widget_set_sensitive(LUW("fileinfo_subctrl_adj"), isEnabled); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
69 gtk_widget_set_sensitive(LUW("fileinfo_subctrl_next"), isEnabled); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
70 } |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
71 |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
72 XS_MUTEX_UNLOCK(xs_status); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
73 XS_MUTEX_UNLOCK(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
74 } |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
75 |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
76 |
230 | 77 void xs_fileinfo_setsong(void) |
78 { | |
79 } | |
80 | |
81 | |
222 | 82 void xs_fileinfo_ok(void) |
83 { | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
84 XS_MUTEX_LOCK(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
85 if (xs_fileinfowin) |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
86 { |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
87 gtk_widget_destroy(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
88 xs_fileinfowin = NULL; |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
89 } |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
90 XS_MUTEX_UNLOCK(xs_fileinfowin); |
222 | 91 } |
92 | |
93 | |
94 void xs_fileinfo_subtune(GtkWidget *widget, void *data) | |
95 { | |
96 t_xs_stil_subnode *tmpNode; | |
97 GtkWidget *tmpItem, *tmpText; | |
98 gint tmpIndex; | |
99 gchar *subName, *subAuthor; | |
100 | |
101 /* Freeze text-widget and delete the old text */ | |
102 tmpText = LUW("fileinfo_sub_info"); | |
103 gtk_text_freeze(GTK_TEXT(tmpText)); | |
104 gtk_text_set_point(GTK_TEXT(tmpText), 0); | |
105 gtk_text_forward_delete(GTK_TEXT(tmpText), | |
106 gtk_text_get_length(GTK_TEXT(tmpText))); | |
107 | |
108 if (xs_fileinfostil) | |
109 { | |
110 /* Get subtune number */ | |
111 tmpItem = gtk_menu_get_active(GTK_MENU(data)); | |
112 tmpIndex = g_list_index(GTK_MENU_SHELL(data)->children, tmpItem); | |
113 | |
114 /* Get subtune information */ | |
115 tmpNode = &xs_fileinfostil->subTune[tmpIndex]; | |
116 subName = tmpNode->pName; | |
117 subAuthor = tmpNode->pAuthor; | |
118 | |
119 /* Put in the new text, if available */ | |
120 if (tmpNode->pInfo) | |
121 { | |
122 gtk_text_insert (GTK_TEXT (tmpText), NULL, NULL, NULL, | |
123 tmpNode->pInfo, strlen(tmpNode->pInfo)); | |
124 } | |
125 } else { | |
126 /* We don't have any information */ | |
127 subName = NULL; | |
128 subAuthor = NULL; | |
129 } | |
130 | |
131 /* Get and set subtune information */ | |
132 gtk_entry_set_text(GTK_ENTRY(LUW("fileinfo_sub_name")), subName ? subName : ""); | |
133 gtk_entry_set_text(GTK_ENTRY(LUW("fileinfo_sub_author")), subAuthor ? subAuthor : ""); | |
134 | |
135 /* Un-freeze the widget */ | |
136 gtk_text_thaw(GTK_TEXT(tmpText)); | |
137 } | |
138 | |
139 | |
140 void xs_fileinfo(gchar *pcFilename) | |
141 { | |
142 GtkWidget *tmpMenuItem, *tmpMenu, *tmpOptionMenu; | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
143 t_xs_tuneinfo *tmpInfo; |
222 | 144 t_xs_stil_subnode *tmpNode; |
145 gchar tmpStr[32], *tmpS; | |
146 gint n; | |
147 | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
148 /* Current implementation leaves old fileinfo window untouched if |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
149 * no information can be found for the new file. Hmm... |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
150 */ |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
151 |
222 | 152 /* Get new tune information */ |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
153 XS_MUTEX_LOCK(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
154 XS_MUTEX_LOCK(xs_status); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
155 if ((tmpInfo = xs_status.sidPlayer->plrGetSIDInfo(pcFilename)) == NULL) |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
156 { |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
157 XS_MUTEX_UNLOCK(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
158 XS_MUTEX_UNLOCK(xs_status); |
222 | 159 return; |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
160 } |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
161 XS_MUTEX_UNLOCK(xs_status); |
222 | 162 |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
163 xs_fileinfostil = xs_stil_get(pcFilename); |
222 | 164 |
165 /* Check if there already is an open fileinfo window */ | |
166 if (xs_fileinfowin) | |
167 { | |
168 /* Raise old window */ | |
169 gdk_window_raise(xs_fileinfowin->window); | |
170 | |
171 /* Delete items */ | |
172 tmpOptionMenu = LUW("fileinfo_sub_tune"); | |
173 gtk_widget_destroy(GTK_OPTION_MENU(tmpOptionMenu)->menu); | |
174 GTK_OPTION_MENU(tmpOptionMenu)->menu = gtk_menu_new(); | |
175 } else { | |
176 /* If not, create a new one */ | |
177 xs_fileinfowin = create_xs_fileinfowin(); | |
178 | |
179 /* Connect additional signals */ | |
180 gtk_signal_connect(GTK_OBJECT( | |
181 gtk_range_get_adjustment(GTK_RANGE(LUW("fileinfo_subctrl_adj")))), | |
182 "value_changed", GTK_SIGNAL_FUNC (xs_fileinfo_setsong), NULL); | |
183 } | |
184 | |
185 | |
186 /* Set the generic song information */ | |
187 gtk_entry_set_text(GTK_ENTRY(LUW("fileinfo_filename")), pcFilename); | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
188 gtk_entry_set_text(GTK_ENTRY(LUW("fileinfo_songname")), tmpInfo->sidName); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
189 gtk_entry_set_text(GTK_ENTRY(LUW("fileinfo_composer")), tmpInfo->sidComposer); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
190 gtk_entry_set_text(GTK_ENTRY(LUW("fileinfo_copyright")), tmpInfo->sidCopyright); |
222 | 191 |
192 | |
193 /* Main tune - the pseudo tune */ | |
194 tmpOptionMenu = LUW("fileinfo_sub_tune"); | |
195 tmpMenu = GTK_OPTION_MENU(tmpOptionMenu)->menu; | |
196 | |
197 tmpMenuItem = gtk_menu_item_new_with_label ("General info"); | |
198 gtk_widget_show (tmpMenuItem); | |
199 gtk_menu_append (GTK_MENU(tmpMenu), tmpMenuItem); | |
200 gtk_signal_connect (GTK_OBJECT (tmpMenuItem), "activate", | |
201 GTK_SIGNAL_FUNC (xs_fileinfo_subtune), tmpMenu); | |
202 | |
203 /* Other menu items */ | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
204 for (n = 1; n <= tmpInfo->nsubTunes; n++) |
222 | 205 { |
206 if (xs_fileinfostil) | |
207 { | |
208 tmpNode = &xs_fileinfostil->subTune[n]; | |
209 if (tmpNode->pName) | |
210 tmpS = tmpNode->pName; | |
211 else | |
212 if (tmpNode->pInfo) | |
213 tmpS = tmpNode->pInfo; | |
214 else | |
215 tmpS = "---"; | |
216 | |
217 snprintf(tmpStr, sizeof(tmpStr), "Tune #%i: %s", n, tmpS); | |
218 } else | |
219 snprintf(tmpStr, sizeof(tmpStr), "Tune #%i", n); | |
220 | |
221 tmpMenuItem = gtk_menu_item_new_with_label(tmpStr); | |
222 gtk_widget_show (tmpMenuItem); | |
223 gtk_menu_append (GTK_MENU(tmpMenu), tmpMenuItem); | |
224 | |
225 gtk_signal_connect (GTK_OBJECT(tmpMenuItem), "activate", | |
226 GTK_SIGNAL_FUNC(xs_fileinfo_subtune), tmpMenu); | |
227 } | |
228 | |
229 /* Set the subtune information */ | |
230 xs_fileinfo_subtune(NULL, tmpMenu); | |
231 | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
232 /* Free temporary tuneinfo */ |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
233 xs_tuneinfo_free(tmpInfo); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
234 |
222 | 235 /* Show the window */ |
236 gtk_widget_show(xs_fileinfowin); | |
232
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
237 |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
238 XS_MUTEX_UNLOCK(xs_fileinfowin); |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
239 |
e613873c3379
Thread locking now final. All parts, including GTK GUI, should be(?)
Matti Hamalainen <ccr@tnsp.org>
parents:
230
diff
changeset
|
240 xs_fileinfo_update(); |
222 | 241 } |
242 |