mirror of
https://github.com/Interlisp/maiko.git
synced 2026-01-27 12:22:24 +00:00
Reformat all C source files with Clang-format in Google style w/ 100 col width.
This commit is contained in:
Nick Briggs
566
src/xrdopt.c
Executable file → Normal file
566
src/xrdopt.c
Executable file → Normal file
@@ -1,8 +1,7 @@
|
||||
/* $Id: xrdopt.c,v 1.6 2001/12/26 22:17:07 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved */
|
||||
/* $Id: xrdopt.c,v 1.6 2001/12/26 22:17:07 sybalsky Exp $ (C) Copyright Venue, All Rights Reserved
|
||||
*/
|
||||
static char *id = "$Id: xrdopt.c,v 1.6 2001/12/26 22:17:07 sybalsky Exp $ Copyright (C) Venue";
|
||||
|
||||
|
||||
|
||||
/************************************************************************/
|
||||
/* */
|
||||
/* (C) Copyright 1989, 1990, 1990, 1991, 1992, 1993, 1994, 1995 Venue. */
|
||||
@@ -18,20 +17,15 @@ static char *id = "$Id: xrdopt.c,v 1.6 2001/12/26 22:17:07 sybalsky Exp $ Copyri
|
||||
|
||||
#include "version.h"
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
#include <stdio.h>
|
||||
#include <string.h>
|
||||
#include <sys/file.h>
|
||||
#include <sys/time.h>
|
||||
#ifndef NOETHER
|
||||
#ifndef USE_DLPI
|
||||
#include <net/nit.h> /* needed for Ethernet stuff below */
|
||||
#endif /* USE_DLPI */
|
||||
#endif /* NOETHER */
|
||||
#include <net/nit.h> /* needed for Ethernet stuff below */
|
||||
#endif /* USE_DLPI */
|
||||
#endif /* NOETHER */
|
||||
#ifdef SYSVONLY
|
||||
#include <unistd.h>
|
||||
#endif /* SYSVONLY */
|
||||
@@ -48,57 +42,53 @@ static char *id = "$Id: xrdopt.c,v 1.6 2001/12/26 22:17:07 sybalsky Exp $ Copyri
|
||||
|
||||
XrmDatabase commandlineDB, applicationDB, serverDB, homeDB, rDB;
|
||||
int opTableEntries = 33;
|
||||
extern int LispWindowRequestedX,
|
||||
LispWindowRequestedY,
|
||||
LispWindowRequestedWidth,
|
||||
LispWindowRequestedHeight;
|
||||
extern int LispWindowRequestedX, LispWindowRequestedY, LispWindowRequestedWidth,
|
||||
LispWindowRequestedHeight;
|
||||
|
||||
extern int LispDisplayRequestedX,
|
||||
LispDisplayRequestedY,
|
||||
LispDisplayRequestedWidth,
|
||||
LispDisplayRequestedHeight;
|
||||
extern int LispDisplayRequestedX, LispDisplayRequestedY, LispDisplayRequestedWidth,
|
||||
LispDisplayRequestedHeight;
|
||||
|
||||
extern int xsync;
|
||||
|
||||
XrmOptionDescRec opTable[] = {
|
||||
{"-help", "*help", XrmoptionIsArg, (caddr_t) NULL},
|
||||
{"-h", "*help", XrmoptionIsArg, (caddr_t) NULL},
|
||||
{"-sysout", "*sysout", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-display", "*display", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-d", "*display", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-borderWidth", "*borderWidth", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-bw", "*borderWidth", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-screen", "*screen", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-sc", "*screen", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-geometry", "*geometry", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-g", "*geometry", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-foreground", "*foreground", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-fg", "*foreground", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-background", "*background", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-bg", "*background", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-title", "*title", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-t", "*title", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-icontitle", "*icontitle", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-it", "*icontitle", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-iconbitmap", "*iconbitmap", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-ibm", "*iconbitmap", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-key", "*key", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-k", "*key", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-timer", "*timer", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-xpages", "*maxpages", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-m", "*memory", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-NF", "*NoFork", XrmoptionIsArg, (caddr_t) NULL},
|
||||
{"-NoFork", "*NoFork", XrmoptionIsArg, (caddr_t) NULL},
|
||||
{"-INIT", "*Init", XrmoptionIsArg, (caddr_t) NULL},
|
||||
{"-EtherNet", "*EtherNet", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-E", "*EtherNet", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-autorepeat", "*autorepeat", XrmoptionSepArg, (caddr_t) NULL},
|
||||
{"-xsync", "*xsync", XrmoptionIsArg, (caddr_t) NULL},
|
||||
};
|
||||
/* autorepeat is a global setting for X, not anything that
|
||||
Medley has to be concerned with. Item kept for historical
|
||||
reasons /jarl
|
||||
*/
|
||||
{"-help", "*help", XrmoptionIsArg, (caddr_t)NULL},
|
||||
{"-h", "*help", XrmoptionIsArg, (caddr_t)NULL},
|
||||
{"-sysout", "*sysout", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-display", "*display", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-d", "*display", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-borderWidth", "*borderWidth", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-bw", "*borderWidth", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-screen", "*screen", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-sc", "*screen", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-geometry", "*geometry", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-g", "*geometry", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-foreground", "*foreground", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-fg", "*foreground", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-background", "*background", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-bg", "*background", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-title", "*title", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-t", "*title", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-icontitle", "*icontitle", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-it", "*icontitle", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-iconbitmap", "*iconbitmap", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-ibm", "*iconbitmap", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-key", "*key", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-k", "*key", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-timer", "*timer", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-xpages", "*maxpages", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-m", "*memory", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-NF", "*NoFork", XrmoptionIsArg, (caddr_t)NULL},
|
||||
{"-NoFork", "*NoFork", XrmoptionIsArg, (caddr_t)NULL},
|
||||
{"-INIT", "*Init", XrmoptionIsArg, (caddr_t)NULL},
|
||||
{"-EtherNet", "*EtherNet", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-E", "*EtherNet", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-autorepeat", "*autorepeat", XrmoptionSepArg, (caddr_t)NULL},
|
||||
{"-xsync", "*xsync", XrmoptionIsArg, (caddr_t)NULL},
|
||||
};
|
||||
/* autorepeat is a global setting for X, not anything that
|
||||
Medley has to be concerned with. Item kept for historical
|
||||
reasons /jarl
|
||||
*/
|
||||
|
||||
char Display_Name[128];
|
||||
char iconpixmapfile[1024];
|
||||
@@ -107,7 +97,7 @@ char Icon_Title[255];
|
||||
|
||||
extern char sysout_name[], keystring[];
|
||||
extern int sysout_size, for_makeinit, please_fork, Scroll_Border;
|
||||
/* diagnostic flag for sysout dumping */
|
||||
/* diagnostic flag for sysout dumping */
|
||||
/* extern int maxpages; */
|
||||
|
||||
extern char keystring[];
|
||||
@@ -118,7 +108,7 @@ int Lisp_Border = 2;
|
||||
#ifndef NOETHER
|
||||
extern int ether_fd;
|
||||
extern u_char ether_host[6];
|
||||
#ifndef USE_DLPI
|
||||
#ifndef USE_DLPI
|
||||
extern struct sockaddr_nit snit;
|
||||
#endif /* USE_DLPI */
|
||||
#endif /* NOETHER */
|
||||
@@ -131,24 +121,27 @@ extern struct sockaddr_nit snit;
|
||||
/* */
|
||||
/************************************************************************/
|
||||
|
||||
void print_Xusage( prog )
|
||||
char *prog;
|
||||
{
|
||||
fprintf(stderr, " %s options:\n", prog);
|
||||
fprintf(stderr, " [-sysout] [<sysout>] -path to the Medley image\n");
|
||||
fprintf(stderr, " -k[ey] <access-key> -see manual for details\n");
|
||||
fprintf(stderr, " -h[elp] -prints this text\n");
|
||||
fprintf(stderr, " -d[isplay] <host>:<display>.<screen>\n");
|
||||
fprintf(stderr, " -g[eometry] <geom> -size & placement for the medley window on your X screen\n");
|
||||
fprintf(stderr, " -sc[reen] <geom> -size & placement for the medley display\n");
|
||||
fprintf(stderr, " -t[itle] <string> -titlebar text for the window manager\n");
|
||||
fprintf(stderr, " -icontitle <string> | -it <string> -text for the medley icon\n");
|
||||
fprintf(stderr, " -iconbitmap <path> | -ibm <path> -bitmap for the medley icon\n");
|
||||
fprintf(stderr, " -xsync -turn XSyncronize on. (default is off)\n\n");
|
||||
fprintf(stderr, "If you have any further questions, please refer to the manual or\n");
|
||||
fprintf(stderr, "call our tech support at (800)228-5325 or (510)763-0516.\n\n");
|
||||
exit(0);
|
||||
} /* end print_Xusage() */
|
||||
void print_Xusage(prog) char *prog;
|
||||
{
|
||||
fprintf(stderr, " %s options:\n", prog);
|
||||
fprintf(stderr, " [-sysout] [<sysout>] -path to the Medley image\n");
|
||||
fprintf(stderr, " -k[ey] <access-key> -see manual for details\n");
|
||||
fprintf(stderr, " -h[elp] -prints this text\n");
|
||||
fprintf(stderr, " -d[isplay] <host>:<display>.<screen>\n");
|
||||
fprintf(stderr,
|
||||
" -g[eometry] <geom> -size & placement for the medley window on your X "
|
||||
"screen\n");
|
||||
fprintf(stderr,
|
||||
" -sc[reen] <geom> -size & placement for the medley display\n");
|
||||
fprintf(stderr, " -t[itle] <string> -titlebar text for the window manager\n");
|
||||
fprintf(stderr, " -icontitle <string> | -it <string> -text for the medley icon\n");
|
||||
fprintf(stderr, " -iconbitmap <path> | -ibm <path> -bitmap for the medley icon\n");
|
||||
fprintf(stderr,
|
||||
" -xsync -turn XSyncronize on. (default is off)\n\n");
|
||||
fprintf(stderr, "If you have any further questions, please refer to the manual or\n");
|
||||
fprintf(stderr, "call our tech support at (800)228-5325 or (510)763-0516.\n\n");
|
||||
exit(0);
|
||||
} /* end print_Xusage() */
|
||||
|
||||
/************************************************************************/
|
||||
/* */
|
||||
@@ -158,17 +151,16 @@ void print_Xusage( prog )
|
||||
/* */
|
||||
/************************************************************************/
|
||||
|
||||
void print_lispusage( prog )
|
||||
char *prog;
|
||||
{
|
||||
TPRINT(( "TRACE: print_lisp_usage()\n" ));
|
||||
void print_lispusage(prog) char *prog;
|
||||
{
|
||||
TPRINT(("TRACE: print_lisp_usage()\n"));
|
||||
|
||||
/* Lisp Option */
|
||||
fprintf(stderr,"lde[ether] [sysout] [-k access-key]");
|
||||
fprintf(stderr," [-E <ethernet-info>]");
|
||||
fprintf(stderr,"\n");
|
||||
/* Lisp Option */
|
||||
fprintf(stderr, "lde[ether] [sysout] [-k access-key]");
|
||||
fprintf(stderr, " [-E <ethernet-info>]");
|
||||
fprintf(stderr, "\n");
|
||||
|
||||
} /* end print_lisp_usage() */
|
||||
} /* end print_lisp_usage() */
|
||||
|
||||
/************************************************************************/
|
||||
/* */
|
||||
@@ -178,261 +170,195 @@ void print_lispusage( prog )
|
||||
/* */
|
||||
/************************************************************************/
|
||||
|
||||
void read_Xoption( argc, argv )
|
||||
int *argc;
|
||||
char **argv;
|
||||
void read_Xoption(argc, argv) int *argc;
|
||||
char **argv;
|
||||
{
|
||||
int bitmask;
|
||||
XrmValue value;
|
||||
char *str_type[30], tmp[1024], *envname;
|
||||
Display *xdisplay;
|
||||
int i;
|
||||
int bitmask;
|
||||
XrmValue value;
|
||||
char *str_type[30], tmp[1024], *envname;
|
||||
Display *xdisplay;
|
||||
int i;
|
||||
|
||||
/**********************************************/
|
||||
/* */
|
||||
/* Take care of -help & -info flags, which */
|
||||
/* aren't handled correctly by the X code. */
|
||||
/* */
|
||||
/**********************************************/
|
||||
/**********************************************/
|
||||
/* */
|
||||
/* Take care of -help & -info flags, which */
|
||||
/* aren't handled correctly by the X code. */
|
||||
/* */
|
||||
/**********************************************/
|
||||
|
||||
for (i = 1; i < *argc; i++)
|
||||
{
|
||||
if (argv[i] && ((strcmp(argv[i], "-info") == 0) ||
|
||||
(strcmp(argv[i], "-INFO") == 0))) {
|
||||
print_info_lines();
|
||||
for (i = 1; i < *argc; i++) {
|
||||
if (argv[i] && ((strcmp(argv[i], "-info") == 0) || (strcmp(argv[i], "-INFO") == 0))) {
|
||||
print_info_lines();
|
||||
}
|
||||
|
||||
if (argv[i] &&
|
||||
((strcmp(argv[i], "-help") == 0) ||
|
||||
(strcmp(argv[i], "-HELP") == 0)))
|
||||
{
|
||||
print_Xusage( argv[0] );
|
||||
if (argv[i] && ((strcmp(argv[i], "-help") == 0) || (strcmp(argv[i], "-HELP") == 0))) {
|
||||
print_Xusage(argv[0]);
|
||||
exit(0);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
/* Now let X handle the parsing. */
|
||||
|
||||
/* Now let X handle the parsing. */
|
||||
|
||||
(void)XrmInitialize();
|
||||
/* If the first argv lacks '-' in front it is the sysout. */
|
||||
(void)XrmInitialize();
|
||||
/* If the first argv lacks '-' in front it is the sysout. */
|
||||
#ifdef NEVEFR
|
||||
/* JDS 12/20/01: app name should always be "ldex", not what's in argv?? */
|
||||
XrmParseCommand(&commandlineDB, opTable, opTableEntries, argv[0], argc, argv);
|
||||
/* JDS 12/20/01: app name should always be "ldex", not what's in argv?? */
|
||||
XrmParseCommand(&commandlineDB, opTable, opTableEntries, argv[0], argc, argv);
|
||||
#endif
|
||||
XrmParseCommand(&commandlineDB, opTable, opTableEntries, "ldex", argc, argv);
|
||||
XrmParseCommand(&commandlineDB, opTable, opTableEntries, "ldex", argc, argv);
|
||||
|
||||
if (XrmGetResource(commandlineDB, "ldex.help", "Ldex.Help",
|
||||
str_type, &value) == True) {
|
||||
print_Xusage( argv[0] );
|
||||
}
|
||||
|
||||
if(*argc == 2) /* There was probably a sysoutarg */
|
||||
{
|
||||
sysout_name[0] = '\0';
|
||||
(void)strcat(sysout_name, argv[1]);
|
||||
}
|
||||
else if ((envname = (char *)getenv("LDESRCESYSOUT")) != NULL)
|
||||
{
|
||||
strcpy(sysout_name, envname);
|
||||
}
|
||||
else if ((envname = (char *)getenv("LDESOURCESYSOUT")) != NULL)
|
||||
strcpy(sysout_name, envname);
|
||||
else {
|
||||
envname = (char *)getenv("HOME");
|
||||
(void)strcat(sysout_name, envname);
|
||||
(void)strcat(sysout_name, "/lisp.virtualmem");
|
||||
|
||||
if( access(sysout_name, R_OK) != 0)
|
||||
{
|
||||
(void)strcat(sysout_name, "");
|
||||
}
|
||||
}
|
||||
|
||||
/* In order to access other DB's we have to open the main display now */
|
||||
/* This is just temporary. We'll need this display struct to open the */
|
||||
/* main databases for medley. After it is used the display will be */
|
||||
/* closed and the opening of the other displays will follow the standard */
|
||||
/* protocoll. */
|
||||
|
||||
if (XrmGetResource(commandlineDB,
|
||||
"ldex.display", "Ldex.Display",
|
||||
str_type, &value) == True) {
|
||||
(void) strncpy(Display_Name, value.addr, (int)value.size);
|
||||
}
|
||||
else if (getenv("DISPLAY") == (char *)NULL){
|
||||
fprintf( stderr, "Can't find a display. Either set the shell\n");
|
||||
fprintf( stderr, "variabel DISPLAY to an appropriate display\n");
|
||||
fprintf( stderr, "or provide a -display argument.\n");
|
||||
print_Xusage( argv[0] );
|
||||
}
|
||||
else {
|
||||
envname = (char *)getenv("DISPLAY");
|
||||
(void)strcpy(Display_Name, envname);
|
||||
}
|
||||
if( (xdisplay = XOpenDisplay( Display_Name )) != NULL )
|
||||
{
|
||||
/* read the other databases */
|
||||
/* Start with app-defaults/medley */
|
||||
(void)strcpy(tmp, "/usr/lib/X11/app-defaults/");
|
||||
(void)strcat(tmp, "medley");
|
||||
applicationDB = XrmGetFileDatabase(tmp);
|
||||
if (applicationDB != NULL){
|
||||
(void)XrmMergeDatabases(applicationDB, &rDB);
|
||||
}
|
||||
/* Then try the displays defaults */
|
||||
if (XResourceManagerString(xdisplay) != NULL) {
|
||||
serverDB = XrmGetStringDatabase(XResourceManagerString(xdisplay));
|
||||
if (serverDB != NULL){
|
||||
(void)XrmMergeDatabases(serverDB, &rDB);
|
||||
}
|
||||
}
|
||||
XCloseDisplay(xdisplay);
|
||||
} else {
|
||||
fprintf( stderr, "Open_Display: cannot connect to display %s."
|
||||
,XDisplayName(Display_Name));
|
||||
exit(-1);
|
||||
}
|
||||
if (XrmGetResource(commandlineDB, "ldex.help", "Ldex.Help", str_type, &value) == True) {
|
||||
print_Xusage(argv[0]);
|
||||
}
|
||||
|
||||
if (*argc == 2) /* There was probably a sysoutarg */
|
||||
{
|
||||
sysout_name[0] = '\0';
|
||||
(void)strcat(sysout_name, argv[1]);
|
||||
} else if ((envname = (char *)getenv("LDESRCESYSOUT")) != NULL) {
|
||||
strcpy(sysout_name, envname);
|
||||
} else if ((envname = (char *)getenv("LDESOURCESYSOUT")) != NULL)
|
||||
strcpy(sysout_name, envname);
|
||||
else {
|
||||
envname = (char *)getenv("HOME");
|
||||
(void)strcat(tmp, envname);
|
||||
(void)strcat(tmp, "/.Xdefaults");
|
||||
if( access(tmp, R_OK) != 0) {
|
||||
serverDB = XrmGetFileDatabase(tmp);
|
||||
if (serverDB != NULL){
|
||||
(void)XrmMergeDatabases(serverDB, &rDB);
|
||||
(void)strcat(sysout_name, envname);
|
||||
(void)strcat(sysout_name, "/lisp.virtualmem");
|
||||
|
||||
if (access(sysout_name, R_OK) != 0) { (void)strcat(sysout_name, ""); }
|
||||
}
|
||||
|
||||
/* In order to access other DB's we have to open the main display now */
|
||||
/* This is just temporary. We'll need this display struct to open the */
|
||||
/* main databases for medley. After it is used the display will be */
|
||||
/* closed and the opening of the other displays will follow the standard */
|
||||
/* protocoll. */
|
||||
|
||||
if (XrmGetResource(commandlineDB, "ldex.display", "Ldex.Display", str_type, &value) == True) {
|
||||
(void)strncpy(Display_Name, value.addr, (int)value.size);
|
||||
} else if (getenv("DISPLAY") == (char *)NULL) {
|
||||
fprintf(stderr, "Can't find a display. Either set the shell\n");
|
||||
fprintf(stderr, "variabel DISPLAY to an appropriate display\n");
|
||||
fprintf(stderr, "or provide a -display argument.\n");
|
||||
print_Xusage(argv[0]);
|
||||
} else {
|
||||
envname = (char *)getenv("DISPLAY");
|
||||
(void)strcpy(Display_Name, envname);
|
||||
}
|
||||
if ((xdisplay = XOpenDisplay(Display_Name)) != NULL) {
|
||||
/* read the other databases */
|
||||
/* Start with app-defaults/medley */
|
||||
(void)strcpy(tmp, "/usr/lib/X11/app-defaults/");
|
||||
(void)strcat(tmp, "medley");
|
||||
applicationDB = XrmGetFileDatabase(tmp);
|
||||
if (applicationDB != NULL) { (void)XrmMergeDatabases(applicationDB, &rDB); }
|
||||
/* Then try the displays defaults */
|
||||
if (XResourceManagerString(xdisplay) != NULL) {
|
||||
serverDB = XrmGetStringDatabase(XResourceManagerString(xdisplay));
|
||||
if (serverDB != NULL) { (void)XrmMergeDatabases(serverDB, &rDB); }
|
||||
}
|
||||
XCloseDisplay(xdisplay);
|
||||
} else {
|
||||
fprintf(stderr, "Open_Display: cannot connect to display %s.", XDisplayName(Display_Name));
|
||||
exit(-1);
|
||||
}
|
||||
|
||||
envname = (char *)getenv("HOME");
|
||||
(void)strcat(tmp, envname);
|
||||
(void)strcat(tmp, "/.Xdefaults");
|
||||
if (access(tmp, R_OK) != 0) {
|
||||
serverDB = XrmGetFileDatabase(tmp);
|
||||
if (serverDB != NULL) { (void)XrmMergeDatabases(serverDB, &rDB); }
|
||||
}
|
||||
|
||||
/* Now for the commandline */
|
||||
(void)XrmMergeDatabases(commandlineDB, &rDB);
|
||||
|
||||
if (XrmGetResource(rDB, "ldex.sysout", "Ldex.Sysout", str_type, &value) == True) {
|
||||
/* Get Sysout */
|
||||
(void)strncpy(sysout_name, value.addr, (int)value.size);
|
||||
}
|
||||
if (sysout_name == NULL) {
|
||||
fprintf(stderr, "Coudn't find a sysout to run;\n");
|
||||
print_Xusage(argv[0]);
|
||||
}
|
||||
|
||||
if (XrmGetResource(rDB, "ldex.title", "Ldex.Title", str_type, &value) == True) {
|
||||
(void)strncpy(Window_Title, value.addr, (int)value.size);
|
||||
} else {
|
||||
(void)strcpy(Window_Title, WINDOW_NAME);
|
||||
}
|
||||
if (XrmGetResource(rDB, "ldex.icontitle", "Ldex.icontitle", str_type, &value) == True) {
|
||||
(void)strncpy(Icon_Title, value.addr, (int)value.size);
|
||||
} else {
|
||||
(void)strcpy(Icon_Title, "Medley");
|
||||
}
|
||||
|
||||
if (XrmGetResource(rDB, "ldex.iconbitmap", "Ldex.Iconbitmap", str_type, &value) == True) {
|
||||
(void)strncpy(iconpixmapfile, value.addr, (int)value.size);
|
||||
}
|
||||
|
||||
/* Old style geometry definition. */
|
||||
if (XrmGetResource(rDB, "ldex.geometry", "Ldex.geometry", str_type, &value) == True) {
|
||||
/* Get Geometry */
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
bitmask = XParseGeometry(tmp, &LispWindowRequestedX, &LispWindowRequestedY,
|
||||
&LispWindowRequestedWidth, &LispWindowRequestedHeight);
|
||||
}
|
||||
if (XrmGetResource(rDB, "ldex.screen", "Ldex.screen", str_type, &value) == True) {
|
||||
/* Get Geometry */
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
bitmask = XParseGeometry(tmp, &LispDisplayRequestedX, &LispDisplayRequestedY,
|
||||
&LispDisplayRequestedWidth, &LispDisplayRequestedHeight);
|
||||
}
|
||||
|
||||
(void)strcpy(tmp, ""); /* Clear the string */
|
||||
|
||||
if (XrmGetResource(rDB, "ldex.NoFork", "Ldex.NoFork", str_type, &value) == True) {
|
||||
please_fork = 0;
|
||||
}
|
||||
|
||||
/* if (XrmGetResource(rDB,
|
||||
"ldex.maxpages",
|
||||
"Ldex.maxpages",
|
||||
str_type, &value) == True) {
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
maxpages = atoi(tmp);
|
||||
}
|
||||
}
|
||||
*/
|
||||
if (XrmGetResource(rDB, "ldex.memory", "Ldex.memory", str_type, &value) == True) {
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
sysout_size = atoi(tmp);
|
||||
}
|
||||
|
||||
/* Now for the commandline */
|
||||
(void)XrmMergeDatabases(commandlineDB, &rDB);
|
||||
if (XrmGetResource(rDB, "ldex.Init", "Ldex.Init", str_type, &value) == True) { for_makeinit = 1; }
|
||||
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.sysout",
|
||||
"Ldex.Sysout",
|
||||
str_type, &value) == True) {
|
||||
/* Get Sysout */
|
||||
(void)strncpy(sysout_name, value.addr, (int)value.size);
|
||||
}
|
||||
if (sysout_name == NULL) {
|
||||
fprintf(stderr, "Coudn't find a sysout to run;\n");
|
||||
print_Xusage( argv[0] );
|
||||
}
|
||||
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.title",
|
||||
"Ldex.Title",
|
||||
str_type, &value) == True) {
|
||||
(void)strncpy(Window_Title, value.addr, (int)value.size);
|
||||
} else {
|
||||
(void)strcpy(Window_Title,
|
||||
WINDOW_NAME);
|
||||
}
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.icontitle",
|
||||
"Ldex.icontitle",
|
||||
str_type, &value) == True) {
|
||||
(void)strncpy(Icon_Title, value.addr, (int)value.size);
|
||||
} else {
|
||||
(void)strcpy(Icon_Title, "Medley");
|
||||
}
|
||||
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.iconbitmap",
|
||||
"Ldex.Iconbitmap",
|
||||
str_type, &value) == True) {
|
||||
(void)strncpy(iconpixmapfile, value.addr, (int)value.size);
|
||||
}
|
||||
|
||||
/* Old style geometry definition. */
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.geometry",
|
||||
"Ldex.geometry",
|
||||
str_type, &value) == True) {
|
||||
/* Get Geometry */
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
bitmask = XParseGeometry(tmp , &LispWindowRequestedX, &LispWindowRequestedY
|
||||
, &LispWindowRequestedWidth, &LispWindowRequestedHeight ); }
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.screen",
|
||||
"Ldex.screen",
|
||||
str_type, &value) == True) {
|
||||
/* Get Geometry */
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
bitmask = XParseGeometry(tmp , &LispDisplayRequestedX, &LispDisplayRequestedY
|
||||
, &LispDisplayRequestedWidth, &LispDisplayRequestedHeight );
|
||||
}
|
||||
|
||||
(void)strcpy(tmp, ""); /* Clear the string */
|
||||
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.NoFork",
|
||||
"Ldex.NoFork",
|
||||
str_type, &value) == True) {
|
||||
please_fork = 0;
|
||||
}
|
||||
|
||||
/* if (XrmGetResource(rDB,
|
||||
"ldex.maxpages",
|
||||
"Ldex.maxpages",
|
||||
str_type, &value) == True) {
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
maxpages = atoi(tmp);
|
||||
}
|
||||
*/
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.memory",
|
||||
"Ldex.memory",
|
||||
str_type, &value) == True) {
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
sysout_size = atoi(tmp);
|
||||
}
|
||||
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.Init",
|
||||
"Ldex.Init",
|
||||
str_type, &value) == True) {
|
||||
for_makeinit = 1;
|
||||
}
|
||||
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.key",
|
||||
"Ldex.key",
|
||||
str_type, &value) == True) {
|
||||
(void)strncpy(keystring, value.addr, (int)value.size);
|
||||
}
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.xsync",
|
||||
"Ldex.xsync",
|
||||
str_type, &value) == True) {
|
||||
xsync = True;
|
||||
}
|
||||
if (XrmGetResource(rDB, "ldex.key", "Ldex.key", str_type, &value) == True) {
|
||||
(void)strncpy(keystring, value.addr, (int)value.size);
|
||||
}
|
||||
if (XrmGetResource(rDB, "ldex.xsync", "Ldex.xsync", str_type, &value) == True) { xsync = True; }
|
||||
#ifdef NOETHER
|
||||
#else
|
||||
if (XrmGetResource(rDB,
|
||||
"ldex.EtherNet",
|
||||
"Ldex.EtherNet",
|
||||
str_type, &value) == True) {
|
||||
int b0, b1, b2, b3, b4, b5;
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
if (XrmGetResource(rDB, "ldex.EtherNet", "Ldex.EtherNet", str_type, &value) == True) {
|
||||
int b0, b1, b2, b3, b4, b5;
|
||||
(void)strncpy(tmp, value.addr, (int)value.size);
|
||||
#ifdef USE_DLPI
|
||||
if (sscanf(tmp,"%d:%x:%x:%x:%x:%x:%x",ðer_fd,
|
||||
&b0, &b1, &b2, &b3, &b4, &b5) == 7)
|
||||
if (sscanf(tmp, "%d:%x:%x:%x:%x:%x:%x", ðer_fd, &b0, &b1, &b2, &b3, &b4, &b5) == 7)
|
||||
#else
|
||||
if (sscanf(tmp,"%d:%x:%x:%x:%x:%x:%x:%s",ðer_fd,
|
||||
&b0, &b1, &b2, &b3, &b4, &b5, snit.snit_ifname) == 8)
|
||||
if (sscanf(tmp, "%d:%x:%x:%x:%x:%x:%x:%s", ðer_fd, &b0, &b1, &b2, &b3, &b4, &b5,
|
||||
snit.snit_ifname) == 8)
|
||||
#endif /* USE_DLPI */
|
||||
{
|
||||
ether_host[0] = b0; ether_host[1] = b1;
|
||||
ether_host[2] = b2; ether_host[3] = b3;
|
||||
ether_host[4] = b4; ether_host[5] = b5;
|
||||
} else {
|
||||
fprintf(stderr, "Missing or bogus -E argument\n");
|
||||
ether_fd = -1;
|
||||
exit(1);
|
||||
}
|
||||
{
|
||||
ether_host[0] = b0;
|
||||
ether_host[1] = b1;
|
||||
ether_host[2] = b2;
|
||||
ether_host[3] = b3;
|
||||
ether_host[4] = b4;
|
||||
ether_host[5] = b5;
|
||||
} else {
|
||||
fprintf(stderr, "Missing or bogus -E argument\n");
|
||||
ether_fd = -1;
|
||||
exit(1);
|
||||
}
|
||||
}
|
||||
#endif /* NOETHER */
|
||||
} /* end readXoption */
|
||||
|
||||
|
||||
} /* end readXoption */
|
||||
|
||||
Reference in New Issue
Block a user