sic_launch.c

Go to the documentation of this file.

/***************************************************************************** 
 *                              Dependencies                                 * 
 *****************************************************************************/

#include "sic_launch.h"

#include <stdio.h>
#include <fcntl.h>
#ifndef WIN32
#include <stdlib.h>
#include <unistd.h>
#include <strings.h>
#else
#include "win32.h"
#include "keyboard.h"
#include "xinput.h"
#include "win-dialogs.h"
#endif
#include "getcar.h"
#include "sic_comm.h"
#include "sic_error.h"
#include "sic_util.h"

/***************************************************************************** 
 *                             Function bodies                               * 
 *****************************************************************************/

static int start_gtv_xwindow( void *data)
{
    int i;
    char **argv;

    argv = sic_get_static_argv( );
    i = 0;
    sprintf( argv[i++], "%s", "gtv_xwindow");
#ifdef cygwin
    strcat( argv[i - 1], ".exe");
#endif
    sprintf( argv[i++], "%d", sic_get_comm_id( ));
    argv[i++] = NULL;

    if (sic_execvp( argv) == -1) {
        sic_perror( "sic_execvp");
        return -1;
    }

    return 0;
}

task_t launch_gtv_xwindow( )
{
    static task_t gtv_xwindow_pid = SIC_TASK_NULL;

    if (gtv_xwindow_pid != SIC_TASK_NULL)
        return SIC_TASK_NULL;

    gtv_xwindow_pid = sic_launch( start_gtv_xwindow, NULL);

    return gtv_xwindow_pid;
}

static int start_xinput( void *data)
{
#ifndef WIN32
    char **argv;
    char *widgets;
    char *ext = "_";
    int i;

    widgets = sic_s_get_translation( "GAG_WIDGETS");
    if (strcasecmp( widgets, "XML") == 0)
        ext = "_xml_";
    else if (strcasecmp( widgets, "MOTIF") == 0)
        ext = "_";
    else if (strcasecmp( widgets, "XFORMS") == 0)
        ext = "_xf_";

    /* child initialize Motif and wait for user's actions */
    argv = sic_get_static_argv( );
    i = 0;
    sprintf( argv[i++], "%s%s%s", "sic", ext, "xinput");
#ifdef cygwin
    strcat( argv[i - 1], ".exe");
#endif
    sprintf( argv[i++], "%d", sic_get_comm_id( ));
    argv[i++] = NULL;

    if (sic_execvp( argv) == -1) {
        sic_perror( "sic_execvp");
        return -1;
    }
#else /* WIN32 */
    return run_xinput( 0, NULL);
#endif /* WIN32 */
    return 0;
}

task_t launch_xinput( )
{
    return sic_launch( start_xinput, NULL);
}

typedef struct {
    unsigned long win_graph;
    unsigned long cmap;
    int *pix_colors;
    int ncells;
    int *named_colors;
    int *pencil_colors;
    int ncells_pen;
} gtv_motif_args_t;

static int start_gtv_motif( void *data)
{
    int i;
    char colorcells[129][2];
    char namedcells[9][2];
    char pencells[17][2];
    int debugMode = 0;          /* test for debug */
    char **argv;
    char *widgets;
    char *ext;
    gtv_motif_args_t *args = data;

    if (getenv( "DEBUG_LAUNCH_GTV_MOTIF") != 0)
        debugMode = 1;

    for (i = 0; i < args->ncells; i++) {
        sprintf( colorcells[i], "%02X", (unsigned char)args->pix_colors[i]);
        /* if (debugMode)   printf( "pix_colors[%d]= %s\n",i, colorcells[i]); */
    }
    colorcells[args->ncells][0] = (unsigned char)0;

    for (i = 0; i < 8; i++) {
        sprintf( namedcells[i], "%02X", (unsigned char)args->named_colors[i]);
        /* if (debugMode)   printf( "named_colors[%d]= %s\n", i, namedcells[i]); */
    }
    namedcells[8][0] = (unsigned char)0;

    for (i = 0; i < args->ncells_pen; i++) {
        sprintf( pencells[i], "%02X", (unsigned char)args->pencil_colors[i]);
        /* if (debugMode)   printf( "fill_colors[%d]= %s\n", i, pencells[i]); */
    }
    pencells[args->ncells_pen][0] = (unsigned char)0;

    widgets = sic_s_get_translation( "GAG_WIDGETS");
    if (strcasecmp( widgets, "MOTIF") == 0)
        ext = "_";
    else if (strcasecmp( widgets, "XFORMS") == 0)
        ext = "_xf_";
    else
        exit( 1);

    /* child initialize Motif and wait for user's actions */
    argv = sic_get_static_argv( );
    i = 0;
    sprintf( argv[i++], "%s%s%s", "gtv", ext, "motif");
#ifdef cygwin
    strcat( argv[i - 1], ".exe");
#endif
    sprintf( argv[i++], "%d", sic_get_comm_id( ));
    sprintf( argv[i++], "%lu", args->cmap);
    sprintf( argv[i++], "%lu", args->win_graph);
    sprintf( argv[i++], sic_s_get_translation( "LUT_DIR:"));
    sprintf( argv[i++], sic_s_get_translation( "GAG_TMP:"));
    sprintf( argv[i++], "%s", (char *)namedcells);
    sprintf( argv[i++], "%d", args->ncells_pen);
    sprintf( argv[i++], "%s", (char *)pencells);
    sprintf( argv[i++], "%d", args->ncells);
    sprintf( argv[i++], "%s", (char *)colorcells);
    argv[i++] = NULL;

    if (debugMode) {
        printf( "namedcells: %s\n", (char *)namedcells);
        printf( "pencells: %s\n", (char *)pencells);
        printf( "colorcells: %s\n", (char *)colorcells);
    }

    if (sic_execvp( argv) == -1) {
        sic_perror( "sic_execvp");
        return -1;
    }

    return 0;
}

task_t launch_gtv_motif( unsigned long win_graph, unsigned long cmap, int *pix_colors
                     , int ncells, int *named_colors, int *pencil_colors
                     , int ncells_pen)
{
    static gtv_motif_args_t args;
    static task_t gtv_motif_pid = SIC_TASK_NULL;

    if (cmap == 0) {
#ifndef WIN32
        kill( gtv_motif_pid, SIGUSR2);
#endif
    } else {
        if (gtv_motif_pid != SIC_TASK_NULL) {
            sic_terminate( gtv_motif_pid);
        }

        args.win_graph = win_graph;
        args.cmap = cmap;
        args.pix_colors = pix_colors;
        args.ncells = ncells;
        args.named_colors = named_colors;
        args.pencil_colors = pencil_colors;
        args.ncells_pen = ncells_pen;

        gtv_motif_pid = sic_launch( start_gtv_motif, &args);
    }

    return gtv_motif_pid;
}

/* Create the detached X-Window process */
static int start_xmenu( void *data)
{
    const char *temporary_file = data;
#ifndef WIN32
    int i;
    char **argv;
    char *widgets;
    char *ext = "_";

    widgets = sic_s_get_translation( "GAG_WIDGETS");
    if (strcasecmp( widgets, "XML") == 0)
        ext = "_xml_";
    else if (strcasecmp( widgets, "MOTIF") == 0)
        ext = "_";
    else if (strcasecmp( widgets, "XFORMS") == 0)
        ext = "_xf_";

    /* child initialize panel server and wait for user's actions */
    argv = sic_get_static_argv( );
    i = 0;
    sprintf( argv[i++], "%s%s%s", "sic", ext, "xmenu");
#ifdef cygwin
    strcat( argv[i - 1], ".exe");
#endif
    sprintf( argv[i++], "%d", sic_get_comm_id( ));
    sprintf( argv[i++], "%s", temporary_file);
    argv[i++] = NULL;

    if (sic_execvp( argv) == -1) {
        sic_perror( "sic_execvp");
        return -1;
    }
#else /* WIN32 */
    MenuFunc( temporary_file);
#endif /* WIN32 */

    return 0;
}

task_t launch_xmenu( const char *temporary_file)
{
    static task_t xmenu_pid = SIC_TASK_NULL;

    xmenu_pid = sic_launch( start_xmenu, (void *)temporary_file);

    return xmenu_pid;
}

static int start_keyboard( void *data)
{
#ifndef WIN32
    char **argv;
    char *widgets;
    char *ext;
    int i;

    widgets = sic_s_get_translation( "GAG_WIDGETS");
    if (strcasecmp( widgets, "XML") == 0)
        ext = "_xml_";
    else
        ext = "_";

    /* child initialize pseudo-keyboard catchall & wait for user's actions */
    argv = sic_get_static_argv( );
    i = 0;
    sprintf( argv[i++], "%s%s%s", "sic", ext, "keyboard");
#ifdef cygwin
    strcat( argv[i - 1], ".exe");
#endif
    sprintf( argv[i++], "%d", sic_get_comm_id( ));
    argv[i++] = NULL;

    if (sic_execvp( argv) == -1) {
        sic_perror( "sic_execvp");
        return -1;
    }

    return 0;
#else
    return run_keyboard( );
#endif
}

task_t launch_keyboard( )
{
    static task_t keyboard_pid = SIC_TASK_NULL;

    keyboard_pid = sic_launch( start_keyboard, NULL);

    return keyboard_pid;
}

void run_xremote( )
{
    int i;
    char **argv = sic_get_static_argv( );

    i = 0;
    sprintf( argv[i++], "sic_xremote");
#ifdef cygwin
    strcat( argv[i - 1], ".exe");
#endif
    sprintf( argv[i++], "%d", sic_get_comm_id( ));
    argv[i++] = NULL;

    if (sic_execvp( argv) == -1) {  /* never returns */
        sic_perror( "sic_execvp");
    }
}

---