/* ********************************************************************** *\ * Copyright IBM Corporation 1988,1991 - All Rights Reserved * * For full copyright information see:'andrew/config/COPYRITE' * \* ********************************************************************** */ /* $Disclaimer: * Permission to use, copy, modify, and distribute this software and its * documentation for any purpose is hereby granted without fee, * provided that the above copyright notice appear in all copies and that * both that copyright notice, this permission notice, and the following * disclaimer appear in supporting documentation, and that the names of * IBM, Carnegie Mellon University, and other copyright holders, not be * used in advertising or publicity pertaining to distribution of the software * without specific, written prior permission. * * IBM, CARNEGIE MELLON UNIVERSITY, AND THE OTHER COPYRIGHT HOLDERS * DISCLAIM ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS. IN NO EVENT * SHALL IBM, CARNEGIE MELLON UNIVERSITY, OR ANY OTHER COPYRIGHT HOLDER * BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY * DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE * OF THIS SOFTWARE. * $ */ #ifndef NORCSID #define NORCSID static char rcsid[]="$Header: /afs/cs.cmu.edu/project/atk-dist/6.2/atk/apps/RCS/runapp.c,v 2.20 1994/02/17 04:10:01 rr2b Exp $"; #endif #if 0 void plumber() { } void MallocStats() { } void resetmstats() { } #endif /* driver for generic applications */ #include #include #include #include #include #include #include extern int errno; #ifndef RUNAPP #define RUNAPP "runapp" #endif /* RUNAPP */ #define APPSUFFIX "app" #define DEFAULTAPP "eza" static void usage() { fprintf(stderr,"usage:\t%s [-npdD] {-l classname} appclass args...\n",RUNAPP); exit(-1); } static void initClass() { char *classPath; classPath = (char *) AndrewDir("/dlib/atk"); class_Init(classPath); } static char *leaf(path) char *path; { char *p=rindex(path,'/'); if(p==NULL) return path; else return p+1; } /* strip off the suffix, if any */ static void stripSuffix(buf,suffix) char *buf,*suffix; { char *end=buf+strlen(buf)-strlen(suffix); if(strcmp(suffix,end)==0) *end='\0'; } main(argc,argv) int argc; char **argv; { struct application *app; char appclass[200]; boolean NoSub=FALSE,addedSuffix; boolean staticLoad=TRUE; int exitCode = -1; #if sys_sun3_41 || sys_sun4_41 int fd; /* * XXX - force "/dev/zero" to be open as a file descriptor one * greater than the first available one, as a workaround for a * 4.1 bug (also present in 4.1.1) in the run-time loader. * (Fixed in System V Release 4, allegedly.) */ fd = open("/dev/zero", O_RDWR); dup(fd); /* one greater */ close(fd); #endif #if defined(UNLIMIT_ENV) || defined(CMUCS) { struct rlimit r; getrlimit (RLIMIT_STACK, &r); r.rlim_cur = r.rlim_max; setrlimit (RLIMIT_STACK, &r); getrlimit (RLIMIT_DATA, &r); r.rlim_cur = r.rlim_max; setrlimit (RLIMIT_DATA, &r); } #endif initClass(); argv[0] = leaf(argv[0]); /* Canonicalize the name of the application so we don't have to worry about it anywhere else... */ if(strcmp(argv[0],RUNAPP)==0){ boolean prependDir=TRUE; extern int doload_trace; if(*++argv==NULL) usage(); while(**argv=='-'){ switch(*++*argv){ case 'n': NoSub=TRUE; break; case 'p': prependDir=FALSE; break; case 'd': /* the hp800 doload supports different * levels of debugging */ doload_trace++; break; case 'l': if(*++*argv=='\0') argv++; if(*argv==NULL || **argv=='\0') fprintf(stderr, "%s: The -l switch requires a classname as an argument.\n", RUNAPP); else if(class_Load(*argv)==NULL) fprintf(stderr, "%s: Couldn't load the class %s.\n", RUNAPP, *argv); *argv+=strlen(*argv)-1; break; case 'D': staticLoad=FALSE; break; default: usage(); } if(*++*argv!='\0') fprintf(stderr, "%s: switches cannot be concatenated in a single argument.\n", RUNAPP); argv++; argc--; } /* search the directory we got the app from for other do's? */ if(prependDir){ char *dirEnd=rindex(*argv,'/'); if(dirEnd!=NULL){ int tempChar = dirEnd[1]; dirEnd[1]='\0'; /* temporarily. Use [1] to handle application in root correctly. */ class_PrependClassPath(*argv); dirEnd[1]=tempChar; /* restore it */ } } strcpy(appclass,leaf(*argv)); argc--; addedSuffix=FALSE; stripSuffix(*argv,APPSUFFIX); }else{ strcpy(appclass,leaf(*argv)); strcat(appclass,APPSUFFIX); addedSuffix=TRUE; } if(staticLoad) doStaticLoads(); if(!class_IsTypeByName(appclass,"application")) if(class_Error!=class_ErrNone){ if(class_Error==class_ErrLoad && errno!=0) perror(RUNAPP); fprintf(stderr,"%s: Error loading the application %s.\n",RUNAPP,appclass); exit(-1); }else if(NoSub){ fprintf(stderr,"%s: There is no known application called %s.\n",RUNAPP,appclass); exit(-1); }else{ if(addedSuffix) stripSuffix(appclass,APPSUFFIX); if(!class_IsTypeByName(appclass,"dataobject")){ if(class_Error==class_ErrLoad && errno!=0) perror(RUNAPP); if(class_Error==class_ErrNone) fprintf(stderr,"%s: There is no known application or datatype called %s.\n",RUNAPP,appclass); else fprintf(stderr,"%s: Error loading the %s object.\n",RUNAPP,appclass); exit(-1); }else strcpy(appclass,DEFAULTAPP); } app=(struct application *)class_NewObject(appclass); if(app==NULL){ fprintf(stderr,"%s: Error creating the %s object.\n",RUNAPP,appclass); exit(-1); } if(application_GetName(app)==NULL){ application_SetName(app,leaf(*argv)); /* just make sure */ im_SetProgramName(leaf(*argv)); } else im_SetProgramName(application_GetName(app)); if(application_GetPrintVersionFlag(app) == TRUE){ application_PrintVersionNumber(app); } /* From now on, it's assumed that applications will print their own error messages */ if(application_ParseArgs(app,argc,argv)){ application_ReadInitFile(app); if(application_Start(app)){ exitCode=application_Run(app); application_Stop(app); } } exit(exitCode); }