Do not attempt to run doldacond from dolcon-launch if it does not exist.

[doldaconnect.git] / clients / gui-shell / launch.c

/*
 *  Dolda Connect - Modular multiuser Direct Connect-style client
 *  Copyright (C) 2007 Fredrik Tolf <fredrik@dolda2000.com>
 *  
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *  
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *  
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/

#include <stdlib.h>
#include <stdio.h>
#include <unistd.h>
#include <string.h>
#include <pwd.h>
#include <libintl.h>
#include <signal.h>

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

int running(char *pf)
{
    FILE *pfs;
    char buf[1024];
    int pid;
    
    if((pfs = fopen(pf, "r")) == NULL) {
	perror(pf);
	return(0);
    }
    fgets(buf, sizeof(buf), pfs);
    fclose(pfs);
    if((pid = atoi(buf)) == 0)
	return(0);
    return(!kill(pid, 0));
}

int haveprogram(char *name)
{
    char buf[1024];
    char *p, *p2;
    
    p = getenv("PATH");
    while(p != NULL) {
	if((p2 = strchr(p, ':')) != NULL) {
	    memcpy(buf, p, p2 - p);
	    buf[p2 - p] = 0;
	    p = p2 + 1;
	} else {
	    strcpy(buf, p);
	    p = NULL;
	}
	strcat(buf, "/");
	strcat(buf, name);
	if(!access(buf, X_OK))
	    return(1);
    }
    return(0);
}

int main(int argc, char **argv)
{
    int c;
    char cf[1024], pf[1024];
    
    while((c = getopt(argc, argv, "hV")) != -1) {
	switch(c) {
	case 'h':
	    printf("usage: dolcon-launch [-hV]\n");
	    printf("\t-h\tDisplay this help message\n");
	    printf("\t-V\tDisplay version info and exit\n");
	    printf("\n");
	    printf("\tIf $HOME/.doldacond.conf does not exist, dolcon-launch will run\n");
	    printf("\tdolconf. Otherwise, if $HOME/.doldacond.pid does not exist,\n");
	    printf("\tor does not contain a valid PID, dolcon-launch will run\n");
	    printf("\tdoldacond-shell. Otherwise, dolcon-launch will run dolcon. All\n");
	    printf("\tthese programs must be somewhere in $PATH for dolcon-launch to work.\n");
	    printf("\n");
	    printf("\tIf doldacond is not in $PATH, only running dolcon is attempted.\n");
	    exit(0);
	case 'V':
	    printf("%s", RELEASEINFO);
	    exit(0);
	default:
	    fprintf(stderr, "usage: dolcon-launch [-h]\n");
	    exit(1);
	}
    }
    if(haveprogram("doldacond")) {
	if(getenv("HOME") != NULL)
	    snprintf(cf, sizeof(cf), "%s/.doldacond.conf", getenv("HOME"));
	else
	    snprintf(cf, sizeof(cf), "%s/.doldacond.conf", getpwuid(getuid())->pw_dir);
	if(getenv("HOME") != NULL)
	    snprintf(pf, sizeof(pf), "%s/.doldacond.pid", getenv("HOME"));
	else
	    snprintf(pf, sizeof(pf), "%s/.doldacond.pid", getpwuid(getuid())->pw_dir);
	if(access(cf, F_OK)) {
	    execlp("dolconf", "dolconf", "-a", NULL);
	    perror("dolconf");
	} else if(access(pf, F_OK) || !running(pf)) {
	    execlp("doldacond-shell", "doldacond-shell", NULL);
	    perror("doldacond-shell");
	} else {
	    execlp("dolcon", "dolcon", "-l", NULL);
	    perror("dolcon");
	}
    } else {
	execlp("dolcon", "dolcon", NULL);
	perror("dolcon");
    }
    return(127);
}