AppRun.c

   1 /**************************************************************************
   2
   3 Version 20110903
   4
   5 Copyright (c) 2010 RazZziel
   6 Copyright (c) 2005-11 Simon Peter
   7
   8 All Rights Reserved.
   9
  10 Permission is hereby granted, free of charge, to any person obtaining a copy
  11 of this software and associated documentation files (the "Software"), to deal
  12 in the Software without restriction, including without limitation the rights
  13 to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  14 copies of the Software, and to permit persons to whom the Software is
  15 furnished to do so, subject to the following conditions:
  16
  17 The above copyright notice and this permission notice shall be included in
  18 all copies or substantial portions of the Software.
  19
  20 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  21 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  22 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
  23 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  24 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  25 OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  26 THE SOFTWARE.
  27
  28 **************************************************************************/
  29
  30 #include <stdio.h>
  31 #include <stdlib.h>
  32 #include <unistd.h>
  33 #include <libgen.h>
  34 #include <dirent.h>
  35 #include <string.h>
  36
  37 #define die(...)                                \
  38     do {                                        \
  39         fprintf( stderr, "Error: " __VA_ARGS__ );   \
  40         exit( 1 );                              \
  41     } while (0);
  42
  43 #define NEW_LD_LIBRARY_PATH "LD_LIBRARY_PATH=./lib:%s"
  44 #define NEW_PATH "PATH=./bin/:./sbin/:./games/:%s"
  45 #define NEW_PYTHONPATH "PYTHONPATH=./share/pyshared/:%s"
  46 #define NEW_XDG_DATA_DIRS "XDG_DATA_DIRS=./share/:%s"
  47 #define NEW_QT_PLUGIN_PATH "QT_PLUGIN_PATH=./lib/qt4/plugins/:%s"
  48 #define NEW_PERLLIB "PERLLIB=./share/perl5/:./lib/perl5/:%s"
  49
  50 #define LINE_SIZE 255
  51
  52 int filter (const struct dirent *dir)
  53 {
  54     char *p = (char*) &dir->d_name;
  55     while (*++p);
  56     while (*--p != '.');
  57
  58     return !strcmp(p, ".desktop");
  59 }
  60
  61 int main(int argc, char *argv[])
  62 {
  63     char path[LINE_SIZE];
  64     int ret;
  65     FILE *f;
  66
  67     char *dir = realpath( "/proc/self/exe", NULL );
  68     if (!dir)
  69     {
  70         die( "Could not access /proc/self/exe\n" );
  71     }
  72
  73     sprintf( path, "%s", dirname(dir) );
  74
  75     // printf( "Moving to %s ...\n", path );
  76
  77     ret = chdir(path);
  78
  79     if ( ret != 0 )
  80     {
  81         die( "Could not cd into %s\n", path );
  82     }
  83
  84     struct dirent **namelist;
  85
  86     ret = scandir( ".", &namelist, filter, NULL );
  87
  88     if ( ret == 0 )
  89     {
  90         die( "No .desktop files found\n" );
  91     }
  92     else if ( ret == -1 )
  93     {
  94         die( "Could not scan directory %s\n", path );
  95     }
  96
  97
  98     /* Extract executable from .desktop file
  99     printf( "Extracting executable name from '%s' ...\n",
 100             namelist[0]->d_name ); */
 101
 102     f = fopen(namelist[0]->d_name, "r");
 103
 104     char *line = malloc(LINE_SIZE);
 105     unsigned int n = LINE_SIZE;
 106     int found = 0;
 107
 108     while (getline( &line, &n, f ) != -1)
 109     {
 110         if (!strncmp(line,"Exec=",5))
 111         {
 112             char *p = line+5;
 113             while (*++p && *p != ' ' &&  *p != '%'  &&  *p != '\n' );
 114             *p = 0;
 115             found = 1;
 116             break;
 117         }
 118     }
 119
 120     fclose( f );
 121
 122     if (!found)
 123     {
 124         die( "Executable not found, make sure there is a line starting with 'Exec='\n" );
 125     }
 126
 127     /* Execution */
 128     char *executable = basename(line+5);
 129     // printf( "Executing '%s' ...\n", executable );
 130
 131     ret = chdir("usr");
 132     if ( ret != 0 )
 133     {
 134         die( "Could not cd into %s\n", "usr" );
 135     }
 136
 137     /* Build environment */
 138     char *env, *new_env[2];
 139
 140     env = getenv("LD_LIBRARY_PATH") ?: "";
 141     new_env[0] = malloc( strlen(NEW_LD_LIBRARY_PATH) + strlen(env) );
 142     sprintf( new_env[0], NEW_LD_LIBRARY_PATH, env );
 143     // printf( "  using %s\n", new_env[0] );
 144     putenv( new_env[0] );
 145
 146     env = getenv("PATH") ?: "";
 147     new_env[1] = malloc( strlen(NEW_PATH) + strlen(env) );
 148     sprintf( new_env[1], NEW_PATH, env );
 149     // printf( "  using %s\n", new_env[1] );
 150     putenv( new_env[1] );
 151
 152     env = getenv("PYTHONPATH") ?: "";
 153     new_env[2] = malloc( strlen(NEW_PYTHONPATH) + strlen(env) );
 154     sprintf( new_env[2], NEW_PYTHONPATH, env );
 155     // printf( "  using %s\n", new_env[2] );
 156     putenv( new_env[2] );
 157
 158     env = getenv("XDG_DATA_DIRS") ?: "";
 159     new_env[3] = malloc( strlen(NEW_XDG_DATA_DIRS) + strlen(env) );
 160     sprintf( new_env[3], NEW_XDG_DATA_DIRS, env );
 161     // printf( "  using %s\n", new_env[3] );
 162     putenv( new_env[3] );
 163
 164     env = getenv("QT_PLUGIN_PATH") ?: "";
 165     new_env[4] = malloc( strlen(NEW_QT_PLUGIN_PATH) + strlen(env) );
 166     sprintf( new_env[4], NEW_QT_PLUGIN_PATH, env );
 167     // printf( "  using %s\n", new_env[4] );
 168     putenv( new_env[4] );
 169
 170     env = getenv("PERLLIB") ?: "";
 171     new_env[5] = malloc( strlen(NEW_PERLLIB) + strlen(env) );
 172     sprintf( new_env[5], NEW_PERLLIB, env );
 173     // printf( "  using %s\n", new_env[5] );
 174     putenv( new_env[5] );
 175
 176     /* Run */
 177     ret = execvp(executable, argv);
 178
 179     if (ret == -1)
 180     {
 181         die( "Error executing '%s'\n", line+5 );
 182     }
 183
 184     free(new_env[0]);
 185     free(new_env[1]);
 186     free(line);
 187     return 0;
 188 }