apps/plugins/search.c

   1 /***************************************************************************
   2  *
   3  *             __________               __   ___.
   4  *   Open      \______   \ ____   ____ |  | _\_ |__   _______  ___
   5  *   Source     |       _//  _ \_/ ___\|  |/ /| __ \ /  _ \  \/  /
   6  *   Jukebox    |    |   (  <_> )  \___|    < | \_\ (  <_> > <  <
   7  *   Firmware   |____|_  /\____/ \___  >__|_ \|___  /\____/__/\_ \
   8  *                     \/            \/     \/    \/            \/
   9  * $Id$
  10  *
  11  * Copyright (C) 2003 Stefan Meyer
  12  *
  13  * This program is free software; you can redistribute it and/or
  14  * modify it under the terms of the GNU General Public License
  15  * as published by the Free Software Foundation; either version 2
  16  * of the License, or (at your option) any later version.
  17  *
  18  * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
  19  * KIND, either express or implied.
  20  *
  21  ****************************************************************************/
  22 #include "plugin.h"
  23 #include "ctype.h"
  24
  25 PLUGIN_HEADER
  26
  27 #define BUFFER_SIZE 16384
  28
  29 static int fd;
  30 static int fdw;
  31
  32 static int file_size;
  33 static int results = 0;
  34
  35 static char buffer[BUFFER_SIZE+1];
  36 static char search_string[60] ;
  37
  38 static int buffer_pos; /* Position of the buffer in the file */
  39
  40 static int line_end;   /* Index of the end of line */
  41
  42 char resultfile[MAX_PATH];
  43 char path[MAX_PATH];
  44
  45 static int strpcasecmp(const char *s1, const char *s2){
  46     while (*s1 != '\0' && tolower(*s1) == tolower(*s2)) {
  47         s1++;
  48         s2++;
  49     }
  50
  51     return (*s1 == '\0');
  52 }
  53
  54 static void fill_buffer(int pos){
  55     int numread;
  56     int i;
  57     int found = false ;
  58     const char crlf = '\n';
  59
  60     if (pos>=file_size-BUFFER_SIZE)
  61         pos = file_size-BUFFER_SIZE;
  62     if (pos<0)
  63         pos = 0;
  64
  65     rb->lseek(fd, pos, SEEK_SET);
  66     numread = rb->read(fd, buffer, BUFFER_SIZE);
  67
  68     buffer[numread] = 0;
  69     line_end = 0;
  70
  71     for(i=0;i<numread;i++) {
  72         switch(buffer[i]) {
  73             case '\r':
  74                 buffer[i] = ' ';
  75                 break;
  76             case '\n':
  77                 buffer[i] = 0;
  78                 buffer_pos = pos + i +1 ;
  79
  80                 if (found){
  81                     /* write to playlist */
  82                     rb->write(fdw, &buffer[line_end],
  83                               rb->strlen( &buffer[line_end] ));
  84                     rb->write(fdw, &crlf, 1);
  85
  86                     found = false ;
  87                     results++ ;
  88                 }
  89                 line_end = i +1 ;
  90
  91                 break;
  92
  93             default:
  94                 if (!found && tolower(buffer[i]) == tolower(search_string[0]))
  95                     found = strpcasecmp(&search_string[0],&buffer[i]) ;
  96                 break;
  97         }
  98     }
  99     DEBUGF("\n-------------------\n");
 100 }
 101
 102 static void search_buffer(void){
 103     buffer_pos = 0;
 104
 105     fill_buffer(0);
 106     while ((buffer_pos+1) < file_size)
 107         fill_buffer(buffer_pos);
 108 }
 109
 110 static void clear_display(void){
 111     int i;
 112     FOR_NB_SCREENS(i){
 113         rb->screens[i]->clear_display();
 114     }
 115 }
 116
 117 static bool search_init(const char* file){
 118     rb->memset(search_string, 0, sizeof(search_string));
 119
 120     if (!rb->kbd_input(search_string,sizeof search_string)){
 121         clear_display();
 122         rb->splash(0, "Searching...");
 123         fd = rb->open(file, O_RDONLY);
 124         if (fd==-1)
 125             return false;
 126
 127         fdw = rb->creat(resultfile);
 128
 129         if (fdw < 0) {
 130 #ifdef HAVE_LCD_BITMAP
 131             rb->splash(HZ, "Failed to create result file!");
 132 #else
 133             rb->splash(HZ, "File creation failed");
 134 #endif
 135             return false;
 136         }
 137
 138         file_size = rb->lseek(fd, 0, SEEK_END);
 139
 140         return true;
 141     }
 142
 143     return false ;
 144 }
 145
 146 /* this is the plugin entry point */
 147 enum plugin_status plugin_start(const void* parameter)
 148 {
 149     int ok;
 150     const char *filename = parameter;
 151     char *p;
 152     if(!parameter) return PLUGIN_ERROR;
 153
 154     DEBUGF("%s - %s\n", (char *)parameter, &filename[rb->strlen(filename)-4]);
 155     /* Check the extension. We only allow .m3u files. */
 156     if(rb->strcasecmp(&filename[rb->strlen(filename)-4], ".m3u") &&
 157        rb->strcasecmp(&filename[rb->strlen(filename)-5], ".m3u8")) {
 158         rb->splash(HZ, "Not a .m3u or .m3u8 file");
 159         return PLUGIN_ERROR;
 160     }
 161
 162     rb->strcpy(path, filename);
 163
 164     p = rb->strrchr(path, '/');
 165     if(p)
 166         *p = 0;
 167
 168     rb->snprintf(resultfile, MAX_PATH, "%s/search_result.m3u", path);
 169     ok = search_init(parameter);
 170     if (!ok)
 171         return PLUGIN_ERROR;
 172     search_buffer();
 173
 174     clear_display();
 175     rb->splash(HZ, "Done");
 176     rb->close(fdw);
 177     rb->close(fd);
 178
 179     /* We fake a USB connection to force a reload of the file browser */
 180     return PLUGIN_USB_CONNECTED;
 181 }