Initial version of doldacond-shell
[doldaconnect.git] / clients / gui-shell / launch.c
1 /*
2  *  Dolda Connect - Modular multiuser Direct Connect-style client
3  *  Copyright (C) 2007 Fredrik Tolf <fredrik@dolda2000.com>
4  *  
5  *  This program is free software; you can redistribute it and/or modify
6  *  it under the terms of the GNU General Public License as published by
7  *  the Free Software Foundation; either version 2 of the License, or
8  *  (at your option) any later version.
9  *  
10  *  This program is distributed in the hope that it will be useful,
11  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
12  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  *  GNU General Public License for more details.
14  *  
15  *  You should have received a copy of the GNU General Public License
16  *  along with this program; if not, write to the Free Software
17  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18 */
19
20 #include <stdlib.h>
21 #include <stdio.h>
22 #include <unistd.h>
23 #include <string.h>
24 #include <pwd.h>
25 #include <libintl.h>
26 #include <signal.h>
27
28 #ifdef HAVE_CONFIG_H
29 #include <config.h>
30 #endif
31
32 int running(char *pf)
33 {
34     FILE *pfs;
35     char buf[1024];
36     int pid;
37     
38     if((pfs = fopen(pf, "r")) == NULL) {
39         perror(pf);
40         return(0);
41     }
42     fgets(buf, sizeof(buf), pfs);
43     fclose(pfs);
44     if((pid = atoi(buf)) == 0)
45         return(0);
46     return(!kill(pid, 0));
47 }
48
49 int main(int argc, char **argv)
50 {
51     char cf[1024], pf[1024];
52     
53     if(getenv("HOME") != NULL)
54         snprintf(cf, sizeof(cf), "%s/.doldacond.conf", getenv("HOME"));
55     else
56         snprintf(cf, sizeof(cf), "%s/.doldacond.conf", getpwuid(getuid())->pw_dir);
57     if(getenv("HOME") != NULL)
58         snprintf(pf, sizeof(pf), "%s/.doldacond.pid", getenv("HOME"));
59     else
60         snprintf(pf, sizeof(pf), "%s/.doldacond.pid", getpwuid(getuid())->pw_dir);
61     if(access(cf, F_OK)) {
62         execlp("dolconf", "dolconf", "-a", NULL);
63         perror("dolconf");
64     } else if(access(pf, F_OK) || !running(pf)) {
65         execlp("doldacond-shell", "doldacond-shell", NULL);
66         perror("doldacond-shell");
67     } else {
68         execlp("dolcon", "dolcon", NULL);
69         perror("dolcon");
70     }
71     return(127);
72 }