lib/pnd_apps.c

   1
   2 #include <stdio.h> /* for FILE etc */
   3 #include <stdlib.h> /* for malloc */
   4 #include <string.h> /* for memset */
   5 #include <unistd.h> /* for fork/exec */
   6
   7 #include <sys/types.h> /* for wait */
   8 #include <sys/wait.h> /* for wait */
   9
  10 #include "pnd_container.h"
  11 #include "pnd_pxml.h"
  12 #include "pnd_apps.h"
  13 #include "pnd_logger.h"
  14
  15 static char apps_exec_runline [ 1024 ];
  16
  17 char *pnd_apps_exec_runline ( void ) {
  18   return ( apps_exec_runline );
  19 }
  20
  21 unsigned char pnd_apps_exec ( char *pndrun, char *fullpath, char *unique_id,
  22                               char *rel_exec, char *rel_startdir,
  23                               char *args,
  24                               unsigned int clockspeed, unsigned int options )
  25 {
  26   char *argv [ 60 ];
  27   char s_clockspeed [ 100 ];
  28   int f;
  29
  30   //printf ( "Entering pnd_apps_exec\n" );
  31
  32   if ( ! pndrun ) {
  33     return ( 0 );
  34   }
  35
  36   if ( ! fullpath ) {
  37     return ( 0 );
  38   }
  39
  40   if ( ! unique_id ) {
  41     return ( 0 );
  42   }
  43
  44   if ( ! rel_exec ) {
  45     return ( 0 );
  46   }
  47
  48 #if 0
  49   printf ( "  runscript: %s\n", pndrun );
  50   printf ( "  path: %s\n", fullpath );
  51   printf ( "  id: %s\n", unique_id );
  52   printf ( "  exec: %s\n", rel_exec );
  53   printf ( "  cwd: %s\n", rel_startdir );
  54   printf ( "  clock: %u\n", clockspeed );
  55 #endif
  56
  57   memset ( argv, '\0', sizeof(char*) * 20 );
  58
  59   f = 0;
  60   argv [ f++ ] = pndrun;
  61   argv [ f++ ] = "-p";
  62   argv [ f++ ] = fullpath;
  63   argv [ f++ ] = "-e";
  64   argv [ f++ ] = rel_exec;
  65   if ( rel_startdir ) {
  66     argv [ f++ ] = "-s";
  67     argv [ f++ ] = rel_startdir;
  68   }
  69   if ( args ) {
  70     argv [ f++ ] = "-a";
  71     argv [ f++ ] = args;
  72   }
  73   argv [ f++ ] = "-b";
  74   argv [ f++ ] = unique_id;
  75   if ( clockspeed ) {
  76     argv [ f++ ] = "-c";
  77     snprintf ( s_clockspeed, 100, "%u", clockspeed );
  78     argv [ f++ ] = s_clockspeed;
  79   }
  80
  81   // skip -a (arguments) for now
  82
  83   if ( options & PND_EXEC_OPTION_NOUNION ) {
  84     argv [ f++ ] = "-n"; // no union for now
  85   }
  86
  87   if ( options & PND_EXEC_OPTION_NOX11 ) {
  88     argv [ f++ ] = "-x"; // shut down X!
  89   }
  90
  91   // finish
  92   argv [ f++ ] = NULL; // for execv
  93
  94   // stop here?
  95   if ( options & PND_EXEC_OPTION_NORUN ) {
  96     unsigned char i;
  97     bzero ( apps_exec_runline, 1024 );
  98     //pnd_log ( PND_LOG_DEFAULT, "Norun %u\n", f );
  99     for ( i = 0; i < ( f - 1 ); i++ ) {
 100       //pnd_log ( PND_LOG_DEFAULT, "Norun %u: %s\n", i, argv [ i ] );
 101
 102       // add spacing between args
 103       if ( i > 0 ) {
 104         strncat ( apps_exec_runline, " ", 1000 );
 105       }
 106
 107       // if this is for -a, we need to wrap with quotes
 108       if ( i > 0 && strcmp ( argv [ i - 1 ], "-a" ) == 0 ) {
 109         strncat ( apps_exec_runline, "\"", 1000 );
 110       }
 111
 112       strncat ( apps_exec_runline, argv [ i ], 1000 );
 113
 114       // if this is for -a, we need to wrap with quotes
 115       if ( i > 0 && strcmp ( argv [ i - 1 ], "-a" ) == 0 ) {
 116         strncat ( apps_exec_runline, "\"", 1000 );
 117       }
 118
 119     }
 120     return ( 1 );
 121   }
 122
 123   // debug
 124 #if 0
 125   int i;
 126   for ( i = 0; i < f; i++ ) {
 127     printf ( "exec's argv %u [ %s ]\n", i, argv [ i ] );
 128   }
 129 #endif
 130
 131   // invoke it!
 132
 133   if ( ( f = fork() ) < 0 ) {
 134     // error forking
 135   } else if ( f > 0 ) {
 136     // parent
 137   } else {
 138     // child, do it
 139     execv ( pndrun, argv );
 140   }
 141
 142   // by definition, either error occurred or we are the original application.
 143
 144   // do we wish to wait until the child process completes? (we don't
 145   // care if it crashed, was killed, was suspended, whatever.)
 146   if ( options & PND_EXEC_OPTION_BLOCK ) {
 147     int status = 0;
 148     waitpid ( f, &status, 0 /* no options */ );
 149     //wait ( &status );
 150   }
 151
 152   // printf ( "Exiting pnd_apps_exec\n" );
 153
 154   return ( 1 );
 155 }
 156
 157 void pnd_get_ro_mountpoint ( char *fullpath, char *unique_id, char *r_mountpoint, unsigned int mountpoint_len ) {
 158
 159   if ( ! r_mountpoint ) {
 160     return; // sillyness
 161   }
 162
 163   snprintf ( r_mountpoint, mountpoint_len, "%s/%s/", PND_MOUNT_PATH, unique_id );
 164
 165   return;
 166 }
 167
 168 unsigned char pnd_get_appdata_path ( char *fullpath, char *unique_id, char *r_path, unsigned int path_len ) {
 169   // you know, determining the 'mount point' used is sort of a pain in the rear
 170   // use df <file>, skip header line, grab first token. Cheap and should work.
 171   // (Rather than just assume first two path chunks in path, say, which would be pretty darned
 172   // accurate, but whose to say they're not using NFS or crazy mountpoints?)
 173   FILE *df;
 174   char cmdbuf [ 1024 ];
 175
 176   snprintf ( cmdbuf, 1023, "/bin/df %s", fullpath );
 177
 178   df = popen ( cmdbuf, "r" );
 179
 180   if ( ! df ) {
 181     return ( 0 ); // tunefs: you can tune a filesystem but you can't tune a fish
 182   }
 183
 184   // fetch and discard header
 185   if ( ! fgets ( cmdbuf, 1023, df ) ) {
 186     pclose ( df );
 187     return ( 0 );
 188   }
 189
 190   // grab df result line
 191   if ( ! fgets ( cmdbuf, 1023, df ) ) {
 192     pclose ( df );
 193     return ( 0 );
 194   }
 195
 196   pclose ( df );
 197
 198   // parse
 199   char *ws = strchr ( cmdbuf, ' ' );
 200
 201   if ( ! ws ) {
 202     return ( 0 );
 203   }
 204
 205   *ws = '\0';
 206
 207   if ( r_path && path_len ) {
 208     snprintf ( r_path, path_len, "%s/appdata/%s/", cmdbuf, unique_id );
 209   }
 210
 211   return ( 1 );
 212 }