modules/gui/skins2/src/theme_repository.cpp

   1 /*****************************************************************************
   2  * theme_repository.cpp
   3  *****************************************************************************
   4  * Copyright (C) 2004 the VideoLAN team
   5  * $Id$
   6  *
   7  * Authors: Cyril Deguet     <asmax@via.ecp.fr>
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 2 of the License, or
  12  * (at your option) any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  22  *****************************************************************************/
  23
  24 #include "theme_repository.hpp"
  25 #include "os_factory.hpp"
  26 #include "../commands/async_queue.hpp"
  27 #include "../commands/cmd_dialogs.hpp"
  28 #ifdef HAVE_UNISTD_H
  29 #   include <unistd.h>
  30 #elif defined( WIN32 ) && !defined( UNDER_CE )
  31 #   include <direct.h>
  32 #endif
  33 #ifdef HAVE_DIRENT_H
  34 #   include <dirent.h>
  35 #endif
  36
  37 #include <fstream>
  38
  39
  40 ThemeRepository *ThemeRepository::instance( intf_thread_t *pIntf )
  41 {
  42     if( pIntf->p_sys->p_repository == NULL )
  43     {
  44         pIntf->p_sys->p_repository = new ThemeRepository( pIntf );
  45     }
  46
  47     return pIntf->p_sys->p_repository;
  48 }
  49
  50
  51 void ThemeRepository::destroy( intf_thread_t *pIntf )
  52 {
  53     delete pIntf->p_sys->p_repository;
  54     pIntf->p_sys->p_repository = NULL;
  55 }
  56
  57
  58 ThemeRepository::ThemeRepository( intf_thread_t *pIntf ): SkinObject( pIntf )
  59 {
  60     vlc_value_t val, text;
  61
  62     // Create a variable to add items in wxwindows popup menu
  63     var_Create( pIntf, "intf-skins", VLC_VAR_STRING |
  64                 VLC_VAR_HASCHOICE | VLC_VAR_ISCOMMAND );
  65     text.psz_string = _("Select skin");
  66     var_Change( pIntf, "intf-skins", VLC_VAR_SETTEXT, &text, NULL );
  67
  68     // Scan vlt files in the resource path
  69     OSFactory *pOsFactory = OSFactory::instance( pIntf );
  70     list<string> resPath = pOsFactory->getResourcePath();
  71     list<string>::const_iterator it;
  72     for( it = resPath.begin(); it != resPath.end(); it++ )
  73     {
  74         parseDirectory( *it );
  75     }
  76
  77     // retrieve skins from skins directories and locate default skins
  78     map<string,string>::const_iterator itmap, itdefault;
  79     for( itmap = m_skinsMap.begin(); itmap != m_skinsMap.end(); itmap++ )
  80     {
  81         string name = itmap->first;
  82         string path = itmap->second;
  83         val.psz_string = (char*) path.c_str();
  84         text.psz_string = (char*) name.c_str();
  85         var_Change( getIntf(), "intf-skins", VLC_VAR_ADDCHOICE, &val,
  86                     &text );
  87
  88         if( name == "Default" )
  89             itdefault = itmap;
  90     }
  91
  92     // retrieve last skins stored or skins requested by user
  93     char* psz_current = var_InheritString( getIntf(), "skins2-last" );
  94     string current = string( psz_current ? psz_current : "" );
  95     free( psz_current );
  96
  97     // check if skins exists and is readable
  98     bool b_readable = !ifstream( current.c_str() ).fail();
  99
 100     msg_Dbg( getIntf(), "requested skins %s is %s accessible",
 101                          current.c_str(), b_readable ? "" : "NOT" );
 102
 103     // set the default skins if given skins not accessible
 104     if( !b_readable )
 105         current = itdefault->second;
 106
 107     // save this valid skins for reuse
 108     config_PutPsz( getIntf(), "skins2-last", current.c_str() );
 109
 110     // Update repository
 111     updateRepository();
 112
 113     // Set the callback
 114     var_AddCallback( pIntf, "intf-skins", changeSkin, this );
 115
 116     // variable for opening a dialog box to change skins
 117     var_Create( pIntf, "intf-skins-interactive", VLC_VAR_VOID |
 118                 VLC_VAR_ISCOMMAND );
 119     text.psz_string = _("Open skin ...");
 120     var_Change( pIntf, "intf-skins-interactive", VLC_VAR_SETTEXT, &text, NULL );
 121
 122     // Set the callback
 123     var_AddCallback( pIntf, "intf-skins-interactive", changeSkin, this );
 124
 125 }
 126
 127
 128 ThemeRepository::~ThemeRepository()
 129 {
 130     m_skinsMap.clear();
 131
 132     var_DelCallback( getIntf(), "intf-skins", changeSkin, this );
 133     var_DelCallback( getIntf(), "intf-skins-interactive", changeSkin, this );
 134
 135     var_Destroy( getIntf(), "intf-skins" );
 136     var_Destroy( getIntf(), "intf-skins-interactive" );
 137 }
 138
 139
 140 void ThemeRepository::parseDirectory( const string &rDir_locale )
 141 {
 142     DIR *pDir;
 143     char *pszDirContent;
 144     vlc_value_t val, text;
 145     // Path separator
 146     const string &sep = OSFactory::instance( getIntf() )->getDirSeparator();
 147
 148     // Open the dir
 149     // FIXME: parseDirectory should be invoked with UTF-8 input instead!!
 150     string rDir = sFromLocale( rDir_locale );
 151     pDir = vlc_opendir( rDir.c_str() );
 152
 153     if( pDir == NULL )
 154     {
 155         // An error occurred
 156         msg_Dbg( getIntf(), "cannot open directory %s", rDir.c_str() );
 157         return;
 158     }
 159
 160     // While we still have entries in the directory
 161     while( ( pszDirContent = vlc_readdir( pDir ) ) != NULL )
 162     {
 163         string name = pszDirContent;
 164         string extension;
 165         if( name.size() > 4 )
 166         {
 167             extension = name.substr( name.size() - 4, 4 );
 168         }
 169         if( extension == ".vlt" || extension == ".wsz" )
 170         {
 171             string path = rDir + sep + name;
 172             string shortname = name.substr( 0, name.size() - 4 );
 173             for( int i = 0; i < shortname.size(); i++ )
 174                 shortname[i] = ( i == 0 ) ?
 175                                toupper( shortname[i] ) :
 176                                tolower( shortname[i] );
 177             m_skinsMap[shortname] = path;
 178
 179             msg_Dbg( getIntf(), "found skin %s", path.c_str() );
 180         }
 181
 182         free( pszDirContent );
 183     }
 184
 185     closedir( pDir );
 186 }
 187
 188
 189
 190 int ThemeRepository::changeSkin( vlc_object_t *pIntf, char const *pVariable,
 191                                  vlc_value_t oldval, vlc_value_t newval,
 192                                  void *pData )
 193 {
 194     ThemeRepository *pThis = (ThemeRepository*)(pData);
 195
 196     if( !strcmp( pVariable, "intf-skins-interactive" ) )
 197     {
 198         CmdDlgChangeSkin cmd( pThis->getIntf() );
 199         cmd.execute();
 200     }
 201     else if( !strcmp( pVariable, "intf-skins" ) )
 202     {
 203         // Try to load the new skin
 204         CmdChangeSkin *pCmd = new CmdChangeSkin( pThis->getIntf(),
 205                                                  newval.psz_string );
 206         AsyncQueue *pQueue = AsyncQueue::instance( pThis->getIntf() );
 207         pQueue->push( CmdGenericPtr( pCmd ) );
 208     }
 209
 210     return VLC_SUCCESS;
 211 }
 212
 213
 214 void ThemeRepository::updateRepository()
 215 {
 216     vlc_value_t val, text;
 217
 218     // retrieve the current skin
 219     char* psz_current = config_GetPsz( getIntf(), "skins2-last" );
 220     if( !psz_current )
 221         return;
 222
 223     val.psz_string = psz_current;
 224     text.psz_string = psz_current;
 225
 226     // add this new skins if not yet present in repository
 227     string current( psz_current );
 228     map<string,string>::const_iterator it;
 229     for( it = m_skinsMap.begin(); it != m_skinsMap.end(); it++ )
 230     {
 231         if( it->second == current )
 232             break;
 233     }
 234     if( it == m_skinsMap.end() )
 235     {
 236         var_Change( getIntf(), "intf-skins", VLC_VAR_ADDCHOICE, &val,
 237                     &text );
 238         string name = psz_current;
 239         m_skinsMap[name] = name;
 240     }
 241
 242     // mark this current skins as 'checked' in list
 243     var_Change( getIntf(), "intf-skins", VLC_VAR_SETVALUE, &val, NULL );
 244
 245     free( psz_current );
 246 }
 247