AppRun.c

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