Add Mark Borgerding to CREDITS, for kiss_fft which is used by the fft plugin
[kugel-rb.git] / apps / filetree.c
blob6062080baacb2121b0e7c23d8078ed469f11f0ce
1 /***************************************************************************
2 * __________ __ ___.
3 * Open \______ \ ____ ____ | | _\_ |__ _______ ___
4 * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
5 * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
6 * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
7 * \/ \/ \/ \/ \/
8 * $Id$
10 * Copyright (C) 2005 by Björn Stenberg
12 * This program is free software; you can redistribute it and/or
13 * modify it under the terms of the GNU General Public License
14 * as published by the Free Software Foundation; either version 2
15 * of the License, or (at your option) any later version.
17 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
18 * KIND, either express or implied.
20 ****************************************************************************/
21 #include <stdlib.h>
22 #include <file.h>
23 #include <dir.h>
24 #include <string.h>
25 #include <kernel.h>
26 #include <lcd.h>
27 #include <debug.h>
28 #include <font.h>
29 #include <limits.h>
30 #include "bookmark.h"
31 #include "tree.h"
32 #include "settings.h"
33 #include "filetypes.h"
34 #include "talk.h"
35 #include "playlist.h"
36 #include "lang.h"
37 #include "language.h"
38 #include "screens.h"
39 #include "plugin.h"
40 #include "rolo.h"
41 #include "sprintf.h"
42 #include "splash.h"
43 #include "cuesheet.h"
44 #include "filetree.h"
45 #include "misc.h"
46 #include "strnatcmp.h"
47 #ifdef HAVE_LCD_BITMAP
48 #include "keyboard.h"
49 #endif
51 #if CONFIG_TUNER
52 #include "radio.h"
53 #endif
54 #include "wps.h"
56 static int compare_sort_dir; /* qsort key for sorting directories */
58 int ft_build_playlist(struct tree_context* c, int start_index)
60 int i;
61 int start=start_index;
63 struct entry *dircache = c->dircache;
65 for(i = 0;i < c->filesindir;i++)
67 if((dircache[i].attr & FILE_ATTR_MASK) == FILE_ATTR_AUDIO)
69 if (playlist_add(dircache[i].name) < 0)
70 break;
72 else
74 /* Adjust the start index when se skip non-MP3 entries */
75 if(i < start)
76 start_index--;
80 return start_index;
83 /* Start playback of a playlist, checking for bookmark autoload, modified
84 * playlists, etc., as required. Returns false if playback wasn't started,
85 * or started via bookmark autoload, true otherwise.
87 * Pointers to both the full pathname and the separated parts needed to
88 * avoid allocating yet another path buffer on the stack (and save some
89 * code; the caller typically needs to create the full pathname anyway)...
91 bool ft_play_playlist(char* pathname, char* dirname, char* filename)
93 if (global_settings.party_mode && audio_status())
95 splash(HZ, ID2P(LANG_PARTY_MODE));
96 return false;
99 if (bookmark_autoload(pathname))
101 return false;
104 splash(0, ID2P(LANG_WAIT));
106 /* about to create a new current playlist...
107 allow user to cancel the operation */
108 if (!warn_on_pl_erase())
109 return false;
111 if (playlist_create(dirname, filename) != -1)
113 if (global_settings.playlist_shuffle)
115 playlist_shuffle(current_tick, -1);
118 playlist_start(0, 0);
119 return true;
122 return false;
125 /* walk a directory and check all dircache entries if a .talk file exists */
126 static void check_file_thumbnails(struct tree_context* c)
128 int i;
129 struct dirent *entry;
130 struct entry* dircache = c->dircache;
131 DIR *dir;
133 dir = opendir(c->currdir);
134 if(!dir)
135 return;
136 /* mark all files as non talking, except the .talk ones */
137 for (i=0; i < c->filesindir; i++)
139 if (dircache[i].attr & ATTR_DIRECTORY)
140 continue; /* we're not touching directories */
142 if (strcasecmp(file_thumbnail_ext,
143 &dircache[i].name[strlen(dircache[i].name)
144 - strlen(file_thumbnail_ext)]))
145 { /* no .talk file */
146 dircache[i].attr &= ~FILE_ATTR_THUMBNAIL; /* clear */
148 else
149 { /* .talk file, we later let them speak themselves */
150 dircache[i].attr |= FILE_ATTR_THUMBNAIL; /* set */
154 while((entry = readdir(dir)) != 0) /* walk directory */
156 int ext_pos;
158 ext_pos = strlen((char *)entry->d_name) - strlen(file_thumbnail_ext);
159 if (ext_pos <= 0 /* too short to carry ".talk" */
160 || (entry->attribute & ATTR_DIRECTORY) /* no file */
161 || strcasecmp((char *)&entry->d_name[ext_pos], file_thumbnail_ext))
162 { /* or doesn't end with ".talk", no candidate */
163 continue;
166 /* terminate the (disposable) name in dir buffer,
167 this truncates off the ".talk" without needing an extra buffer */
168 entry->d_name[ext_pos] = '\0';
170 /* search corresponding file in dir cache */
171 for (i=0; i < c->filesindir; i++)
173 if (!strcasecmp(dircache[i].name, (char *)entry->d_name))
174 { /* match */
175 dircache[i].attr |= FILE_ATTR_THUMBNAIL; /* set the flag */
176 break; /* exit search loop, because we found it */
180 closedir(dir);
183 /* support function for qsort() */
184 static int compare(const void* p1, const void* p2)
186 struct entry* e1 = (struct entry*)p1;
187 struct entry* e2 = (struct entry*)p2;
188 int criteria;
190 if (e1->attr & ATTR_DIRECTORY && e2->attr & ATTR_DIRECTORY)
191 { /* two directories */
192 criteria = compare_sort_dir;
194 #ifdef HAVE_MULTIVOLUME
195 if (e1->attr & ATTR_VOLUME || e2->attr & ATTR_VOLUME)
196 { /* a volume identifier is involved */
197 if (e1->attr & ATTR_VOLUME && e2->attr & ATTR_VOLUME)
198 criteria = SORT_ALPHA; /* two volumes: sort alphabetically */
199 else /* only one is a volume: volume first */
200 return (e2->attr & ATTR_VOLUME) - (e1->attr & ATTR_VOLUME);
202 #endif
205 else if (!(e1->attr & ATTR_DIRECTORY) && !(e2->attr & ATTR_DIRECTORY))
206 { /* two files */
207 criteria = global_settings.sort_file;
209 else /* dir and file, dir goes first */
210 return (e2->attr & ATTR_DIRECTORY) - (e1->attr & ATTR_DIRECTORY);
212 switch(criteria)
214 case SORT_TYPE:
215 case SORT_TYPE_REVERSED:
217 int t1 = e1->attr & FILE_ATTR_MASK;
218 int t2 = e2->attr & FILE_ATTR_MASK;
220 if (!t1) /* unknown type */
221 t1 = INT_MAX; /* gets a high number, to sort after known */
222 if (!t2) /* unknown type */
223 t2 = INT_MAX; /* gets a high number, to sort after known */
225 if (t1 != t2) /* if different */
226 return (t1 - t2) * (criteria == SORT_TYPE_REVERSED ? -1 : 1);
227 /* else fall through to alphabetical sorting */
230 case SORT_DATE:
231 case SORT_DATE_REVERSED:
232 /* Ignore SORT_TYPE */
233 if (criteria == SORT_DATE || criteria == SORT_DATE_REVERSED)
235 if (e1->time_write != e2->time_write)
236 return (e1->time_write - e2->time_write)
237 * (criteria == SORT_DATE_REVERSED ? -1 : 1);
238 /* else fall through to alphabetical sorting */
241 case SORT_ALPHA:
242 case SORT_ALPHA_REVERSED:
244 if (global_settings.sort_case)
246 if (global_settings.interpret_numbers == SORT_INTERPRET_AS_NUMBER)
247 return strnatcmp(e1->name, e2->name)
248 * (criteria == SORT_ALPHA_REVERSED ? -1 : 1);
249 else
250 return strncmp(e1->name, e2->name, MAX_PATH)
251 * (criteria == SORT_ALPHA_REVERSED ? -1 : 1);
253 else
255 if (global_settings.interpret_numbers == SORT_INTERPRET_AS_NUMBER)
256 return strnatcasecmp(e1->name, e2->name)
257 * (criteria == SORT_ALPHA_REVERSED ? -1 : 1);
258 else
259 return strncasecmp(e1->name, e2->name, MAX_PATH)
260 * (criteria == SORT_ALPHA_REVERSED ? -1 : 1);
265 return 0; /* never reached */
268 /* load and sort directory into dircache. returns NULL on failure. */
269 int ft_load(struct tree_context* c, const char* tempdir)
271 int i;
272 int name_buffer_used = 0;
273 DIR *dir;
275 if (tempdir)
276 dir = opendir(tempdir);
277 else
278 dir = opendir(c->currdir);
279 if(!dir)
280 return -1; /* not a directory */
282 c->dirsindir = 0;
283 c->dirfull = false;
285 for ( i=0; i < global_settings.max_files_in_dir; i++ ) {
286 int len;
287 struct dirent *entry = readdir(dir);
288 struct entry* dptr =
289 (struct entry*)(c->dircache + i * sizeof(struct entry));
290 if (!entry)
291 break;
293 len = strlen((char *)entry->d_name);
295 /* skip directories . and .. */
296 if ((entry->attribute & ATTR_DIRECTORY) &&
297 (((len == 1) && (!strncmp((char *)entry->d_name, ".", 1))) ||
298 ((len == 2) && (!strncmp((char *)entry->d_name, "..", 2))))) {
299 i--;
300 continue;
303 /* Skip FAT volume ID */
304 if (entry->attribute & ATTR_VOLUME_ID) {
305 i--;
306 continue;
309 /* filter out dotfiles and hidden files */
310 if (*c->dirfilter != SHOW_ALL &&
311 ((entry->d_name[0]=='.') ||
312 (entry->attribute & ATTR_HIDDEN))) {
313 i--;
314 continue;
317 dptr->attr = entry->attribute;
319 /* check for known file types */
320 if ( !(dptr->attr & ATTR_DIRECTORY) )
321 dptr->attr |= filetype_get_attr((char *)entry->d_name);
323 /* filter out non-visible files */
324 if ((!(dptr->attr & ATTR_DIRECTORY) && (
325 (*c->dirfilter == SHOW_PLAYLIST &&
326 (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_M3U) ||
327 ((*c->dirfilter == SHOW_MUSIC &&
328 (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_AUDIO) &&
329 (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_M3U) ||
330 (*c->dirfilter == SHOW_SUPPORTED && !filetype_supported(dptr->attr)))) ||
331 (*c->dirfilter == SHOW_WPS && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_WPS) ||
332 #ifdef HAVE_LCD_BITMAP
333 (*c->dirfilter == SHOW_FONT && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_FONT) ||
334 (*c->dirfilter == SHOW_SBS && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_SBS) ||
335 #endif
336 #ifdef HAVE_REMOTE_LCD
337 (*c->dirfilter == SHOW_RWPS && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_RWPS) ||
338 (*c->dirfilter == SHOW_RSBS && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_RSBS) ||
339 #endif
340 #if CONFIG_TUNER
341 (*c->dirfilter == SHOW_FMR && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_FMR) ||
342 #endif
343 (*c->dirfilter == SHOW_CFG && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_CFG) ||
344 (*c->dirfilter == SHOW_LNG && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_LNG) ||
345 (*c->dirfilter == SHOW_MOD && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_MOD) ||
346 (*c->dirfilter == SHOW_PLUGINS && (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_ROCK &&
347 (dptr->attr & FILE_ATTR_MASK) != FILE_ATTR_LUA))
349 i--;
350 continue;
353 if (len > c->name_buffer_size - name_buffer_used - 1) {
354 /* Tell the world that we ran out of buffer space */
355 c->dirfull = true;
356 break;
358 dptr->name = &c->name_buffer[name_buffer_used];
359 dptr->time_write =
360 (long)entry->wrtdate<<16 |
361 (long)entry->wrttime; /* in one # */
362 strcpy(dptr->name, (char *)entry->d_name);
363 name_buffer_used += len + 1;
365 if (dptr->attr & ATTR_DIRECTORY) /* count the remaining dirs */
366 c->dirsindir++;
368 c->filesindir = i;
369 c->dirlength = i;
370 closedir(dir);
372 compare_sort_dir = c->sort_dir;
373 qsort(c->dircache,i,sizeof(struct entry),compare);
375 /* If thumbnail talking is enabled, make an extra run to mark files with
376 associated thumbnails, so we don't do unsuccessful spinups later. */
377 if (global_settings.talk_file_clip)
378 check_file_thumbnails(c); /* map .talk to ours */
380 return 0;
383 int ft_enter(struct tree_context* c)
385 int rc = 0;
386 char buf[MAX_PATH];
387 struct entry *dircache = c->dircache;
388 struct entry* file = &dircache[c->selected_item];
389 bool reload_dir = false;
390 bool start_wps = false;
391 bool exit_func = false;
393 if (c->currdir[1])
394 snprintf(buf,sizeof(buf),"%s/%s",c->currdir, file->name);
395 else
396 snprintf(buf,sizeof(buf),"/%s",file->name);
398 if (file->attr & ATTR_DIRECTORY) {
399 memcpy(c->currdir, buf, sizeof(c->currdir));
400 if ( c->dirlevel < MAX_DIR_LEVELS )
401 c->selected_item_history[c->dirlevel] = c->selected_item;
402 c->dirlevel++;
403 c->selected_item=0;
405 else {
406 int seed = current_tick;
407 bool play = false;
408 int start_index=0;
410 switch ( file->attr & FILE_ATTR_MASK ) {
411 case FILE_ATTR_M3U:
412 play = ft_play_playlist(buf, c->currdir, file->name);
414 if (play)
416 start_index = 0;
419 break;
421 case FILE_ATTR_AUDIO:
422 if (bookmark_autoload(c->currdir))
423 break;
425 splash(0, ID2P(LANG_WAIT));
427 /* about to create a new current playlist...
428 allow user to cancel the operation */
429 if (!warn_on_pl_erase())
430 break;
432 if (global_settings.party_mode && audio_status())
434 playlist_insert_track(NULL, buf,
435 PLAYLIST_INSERT_LAST, true, true);
436 splash(HZ, ID2P(LANG_QUEUE_LAST));
438 else if (playlist_create(c->currdir, NULL) != -1)
440 start_index = ft_build_playlist(c, c->selected_item);
441 if (global_settings.playlist_shuffle)
443 start_index = playlist_shuffle(seed, start_index);
445 /* when shuffling dir.: play all files
446 even if the file selected by user is
447 not the first one */
448 if (!global_settings.play_selected)
449 start_index = 0;
452 playlist_start(start_index, 0);
453 play = true;
455 break;
457 #if CONFIG_TUNER
458 /* fmr preset file */
459 case FILE_ATTR_FMR:
460 splash(0, ID2P(LANG_WAIT));
462 /* Preset inside the default folder. */
463 if(!strncasecmp(FMPRESET_PATH, buf, strlen(FMPRESET_PATH)))
465 set_file(buf, global_settings.fmr_file, MAX_FILENAME);
466 radio_load_presets(global_settings.fmr_file);
467 if(!in_radio_screen())
468 radio_screen();
471 * Preset outside default folder, we can choose such only
472 * if we are out of the radio screen, so the check for the
473 * radio status isn't neccessary
475 else
477 radio_load_presets(buf);
478 radio_screen();
481 break;
482 #endif
484 #ifdef HAVE_LCD_BITMAP
485 case FILE_ATTR_SBS:
486 splash(0, ID2P(LANG_WAIT));
487 set_file(buf, (char *)global_settings.sbs_file,
488 MAX_FILENAME);
489 global_settings.statusbar = STATUSBAR_CUSTOM;
490 settings_apply_skins();
491 break;
492 #endif
493 #ifdef HAVE_REMOTE_LCD
494 case FILE_ATTR_RSBS:
495 splash(0, ID2P(LANG_WAIT));
496 set_file(buf, (char *)global_settings.rsbs_file,
497 MAX_FILENAME);
498 global_settings.remote_statusbar = STATUSBAR_CUSTOM;
499 settings_apply_skins();
500 break;
501 #endif
502 /* wps config file */
503 case FILE_ATTR_WPS:
504 splash(0, ID2P(LANG_WAIT));
505 set_file(buf, (char *)global_settings.wps_file,
506 MAX_FILENAME);
507 settings_apply_skins();
508 break;
510 #if defined(HAVE_REMOTE_LCD) && (NB_SCREENS > 1)
511 /* remote-wps config file */
512 case FILE_ATTR_RWPS:
513 splash(0, ID2P(LANG_WAIT));
514 set_file(buf, (char *)global_settings.rwps_file,
515 MAX_FILENAME);
516 settings_apply_skins();
517 break;
518 #endif
520 case FILE_ATTR_CFG:
521 splash(0, ID2P(LANG_WAIT));
522 if (!settings_load_config(buf,true))
523 break;
524 splash(HZ, ID2P(LANG_SETTINGS_LOADED));
525 break;
527 case FILE_ATTR_BMARK:
528 splash(0, ID2P(LANG_WAIT));
529 bookmark_load(buf, false);
530 reload_dir = true;
531 break;
533 case FILE_ATTR_LNG:
534 splash(0, ID2P(LANG_WAIT));
535 if (lang_core_load(buf))
537 splash(HZ, ID2P(LANG_FAILED));
538 break;
540 set_file(buf, (char *)global_settings.lang_file,
541 MAX_FILENAME);
542 talk_init(); /* use voice of same language */
543 viewportmanager_theme_changed(THEME_LANGUAGE);
544 settings_apply_skins();
545 splash(HZ, ID2P(LANG_LANGUAGE_LOADED));
546 break;
548 #ifdef HAVE_LCD_BITMAP
549 case FILE_ATTR_FONT:
550 splash(0, ID2P(LANG_WAIT));
551 font_load(buf);
552 set_file(buf, (char *)global_settings.font_file, MAX_FILENAME);
553 break;
555 case FILE_ATTR_KBD:
556 splash(0, ID2P(LANG_WAIT));
557 if (!load_kbd(buf))
558 splash(HZ, ID2P(LANG_KEYBOARD_LOADED));
559 set_file(buf, (char *)global_settings.kbd_file, MAX_FILENAME);
560 break;
561 #endif
563 #ifndef SIMULATOR
564 /* firmware file */
565 case FILE_ATTR_MOD:
566 splash(0, ID2P(LANG_WAIT));
567 rolo_load(buf);
568 break;
569 #endif
571 /* plugin file */
572 case FILE_ATTR_ROCK:
573 case FILE_ATTR_LUA:
575 char *plugin = buf, *argument = NULL;
576 int ret;
578 if ((file->attr & FILE_ATTR_MASK) == FILE_ATTR_LUA) {
579 plugin = VIEWERS_DIR "/lua.rock"; /* Use a #define here ? */
580 argument = buf;
583 if (global_settings.party_mode && audio_status()) {
584 splash(HZ, ID2P(LANG_PARTY_MODE));
585 break;
587 ret = plugin_load(plugin, argument);
588 switch (ret)
590 case PLUGIN_GOTO_WPS:
591 play = true;
592 break;
593 case PLUGIN_USB_CONNECTED:
594 if(*c->dirfilter > NUM_FILTER_MODES)
595 /* leave sub-browsers after usb, doing
596 otherwise might be confusing to the user */
597 exit_func = true;
598 else
599 reload_dir = true;
600 break;
602 case PLUGIN_ERROR:
603 case PLUGIN_OK:
605 default:
606 break;
608 break;
610 case FILE_ATTR_CUE:
611 display_cuesheet_content(buf);
612 break;
614 default:
616 const char* plugin;
618 if (global_settings.party_mode && audio_status()) {
619 splash(HZ, ID2P(LANG_PARTY_MODE));
620 break;
623 plugin = filetype_get_plugin(file);
624 if (plugin)
626 switch (plugin_load(plugin,buf))
628 case PLUGIN_USB_CONNECTED:
629 reload_dir = true;
630 break;
631 case PLUGIN_GOTO_WPS:
632 play = true;
633 break;
635 case PLUGIN_OK:
636 case PLUGIN_ERROR:
638 default:
639 break;
642 break;
646 if ( play ) {
647 /* the resume_index must always be the index in the
648 shuffled list in case shuffle is enabled */
649 global_status.resume_index = start_index;
650 global_status.resume_offset = 0;
651 status_save();
653 start_wps = true;
655 else {
656 if (*c->dirfilter > NUM_FILTER_MODES &&
657 *c->dirfilter != SHOW_CFG &&
658 *c->dirfilter != SHOW_FONT &&
659 *c->dirfilter != SHOW_PLUGINS)
661 exit_func = true;
666 if (reload_dir)
667 rc = 1;
668 if (start_wps)
669 rc = 2;
670 if (exit_func)
671 rc = 3;
673 return rc;
676 int ft_exit(struct tree_context* c)
678 extern char lastfile[]; /* from tree.c */
679 char buf[MAX_PATH];
680 int rc = 0;
681 bool exit_func = false;
683 int i = strlen(c->currdir);
684 if (i>1) {
685 while (c->currdir[i-1]!='/')
686 i--;
687 strcpy(buf,&c->currdir[i]);
688 if (i==1)
689 c->currdir[i]=0;
690 else
691 c->currdir[i-1]=0;
693 if (*c->dirfilter > NUM_FILTER_MODES && c->dirlevel < 1)
694 exit_func = true;
696 c->dirlevel--;
697 if ( c->dirlevel < MAX_DIR_LEVELS )
698 c->selected_item=c->selected_item_history[c->dirlevel];
699 else
700 c->selected_item=0;
702 /* if undefined position */
703 if (c->selected_item == -1)
704 strcpy(lastfile, buf);
706 else
708 if (*c->dirfilter > NUM_FILTER_MODES && c->dirlevel < 1)
709 exit_func = true;
712 if (exit_func)
713 rc = 3;
715 return rc;