NetNews Usenet Archive 1992 #27

home *** CD-ROM | disk | FTP | other *** search

/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / alt / sources / 2578 < prev next >

Wrap

Internet Message Format | 1992-11-20 | 48.2 KB

Path: sparky!uunet!stanford.edu!morrow.stanford.edu!sep!steve From: steve@sep.Stanford.EDU (Steve Cole) Newsgroups: alt.sources Subject: xtpanel 2.0 - interactive program builder - part 02/10 Followup-To: alt.sources.d Date: 21 Nov 1992 00:28:56 GMT Organization: Stanford Exploration Project Lines: 1383 Distribution: world Message-ID: <1ejvs8INN194@morrow.stanford.edu> NNTP-Posting-Host: taal.stanford.edu Submitted-by: steve@sep.Stanford.EDU Archive-name: xtpanel/part02 #!/bin/sh # This is part 02 of a multipart archive # ============= xtpanel/examples/Makefile ============== if test ! -d 'xtpanel'; then echo 'x - creating directory xtpanel' mkdir 'xtpanel' fi if test ! -d 'xtpanel/examples'; then echo 'x - creating directory xtpanel/examples' mkdir 'xtpanel/examples' fi if test -f 'xtpanel/examples/Makefile' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/Makefile (File already exists)' else echo 'x - extracting xtpanel/examples/Makefile (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/Makefile' && # Makefile generated by imake - do not edit! # $XConsortium: imake.c,v 1.51 89/12/12 12:37:30 jim Exp $ # # The cpp used on this machine replaces all newlines and multiple tabs and # spaces in a macro expansion with a single space. Imake tries to compensate # for this, but is not always successful. # X # ------------------------------------------------------------------------- # Makefile generated from "Imake.tmpl" and <Imakefile> # $XConsortium: Imake.tmpl,v 1.139 91/09/16 08:52:48 rws Exp $ # # Platform-specific parameters may be set in the appropriate <vendor>.cf # configuration files. Site-specific parameters should be set in the file # site.def. Full rebuilds are recommended if any parameters are changed. # # If your C preprocessor does not define any unique symbols, you will need # to set BOOTSTRAPCFLAGS when rebuilding imake (usually when doing # "make World" the first time). # X # ------------------------------------------------------------------------- # site-specific configuration parameters that need to come before # the platform-specific parameters - edit site.def to change X # site: $XConsortium: site.def,v 1.2 91/07/30 20:26:44 rws Exp $ X # ------------------------------------------------------------------------- # platform-specific configuration parameters - edit sun.cf to change X # platform: $XConsortium: sun.cf,v 1.72.1.1 92/03/18 13:13:37 rws Exp $ X # operating system: SunOS 4.1.1 X # $XConsortium: sunLib.rules,v 1.7 91/12/20 11:19:47 rws Exp $ X # ------------------------------------------------------------------------- # site-specific configuration parameters that go after # the platform-specific parameters - edit site.def to change X # site: $XConsortium: site.def,v 1.2 91/07/30 20:26:44 rws Exp $ X X SHELL = /bin/sh X X TOP = ../. X CURRENT_DIR = ./examples X X AR = ar clq X BOOTSTRAPCFLAGS = X CC = cc X AS = as X X COMPRESS = compress X CPP = /lib/cpp $(STD_CPP_DEFINES) X PREPROCESSCMD = cc -E $(STD_CPP_DEFINES) X INSTALL = install X LD = ld X LINT = lint X LINTLIBFLAG = -C X LINTOPTS = -axz X LN = ln -s X MAKE = make X MV = mv X CP = cp X X RANLIB = ranlib X RANLIBINSTFLAGS = X X RM = rm -f X TROFF = psroff X MSMACROS = -ms X TBL = tbl X EQN = eqn X STD_INCLUDES = X STD_CPP_DEFINES = -D_NO_PROTO X STD_DEFINES = -D_NO_PROTO X EXTRA_LOAD_FLAGS = X EXTRA_LIBRARIES = X TAGS = ctags X X SHAREDCODEDEF = -DSHAREDCODE X SHLIBDEF = -DSUNSHLIB X X PROTO_DEFINES = X X INSTPGMFLAGS = X X INSTBINFLAGS = -m 0755 X INSTUIDFLAGS = -m 4755 X INSTLIBFLAGS = -m 0644 X INSTINCFLAGS = -m 0444 X INSTMANFLAGS = -m 0444 X INSTDATFLAGS = -m 0444 X INSTKMEMFLAGS = -g kmem -m 2755 X X PROJECTROOT = /usr/local X X TOP_INCLUDES = -I$(INCROOT) X X CDEBUGFLAGS = -O X CCOPTIONS = -pipe X X ALLINCLUDES = $(INCLUDES) $(EXTRA_INCLUDES) $(TOP_INCLUDES) $(STD_INCLUDES) X ALLDEFINES = $(ALLINCLUDES) $(STD_DEFINES) $(EXTRA_DEFINES) $(PROTO_DEFINES) $(DEFINES) X CFLAGS = $(CDEBUGFLAGS) $(CCOPTIONS) $(ALLDEFINES) X LINTFLAGS = $(LINTOPTS) -DLINT $(ALLDEFINES) X X LDLIBS = $(SYS_LIBRARIES) $(EXTRA_LIBRARIES) X X LDOPTIONS = $(CDEBUGFLAGS) $(CCOPTIONS) $(LOCAL_LDFLAGS) -L$(USRLIBDIR) X X LDCOMBINEFLAGS = -X -r X DEPENDFLAGS = X X MACROFILE = sun.cf X RM_CMD = $(RM) *.CKP *.ln *.BAK *.bak *.o core errs ,* *~ *.a .emacs_* tags TAGS make.log MakeOut X X IMAKE_DEFINES = X X IRULESRC = $(CONFIGDIR) X IMAKE_CMD = $(IMAKE) -DUseInstalled -I$(IRULESRC) $(IMAKE_DEFINES) X X ICONFIGFILES = $(IRULESRC)/Imake.tmpl $(IRULESRC)/Imake.rules \ X $(IRULESRC)/Project.tmpl $(IRULESRC)/site.def \ X $(IRULESRC)/$(MACROFILE) $(EXTRA_ICONFIGFILES) X # ------------------------------------------------------------------------- # X Window System Build Parameters # $XConsortium: Project.tmpl,v 1.138 91/09/10 09:02:12 rws Exp $ X # ------------------------------------------------------------------------- # X Window System make variables; this need to be coordinated with rules X X PATHSEP = / X USRLIBDIR = /usr/local/lib X BINDIR = /usr/local/bin/X5 X INCROOT = /usr/local/include X BUILDINCROOT = $(TOP) X BUILDINCDIR = $(BUILDINCROOT)/X11 X BUILDINCTOP = .. X INCDIR = $(INCROOT)/X11 X ADMDIR = /usr/adm X LIBDIR = $(USRLIBDIR)/X11 X CONFIGDIR = $(LIBDIR)/config X LINTLIBDIR = $(USRLIBDIR)/lint X X FONTDIR = $(LIBDIR)/fonts X XINITDIR = $(LIBDIR)/xinit X XDMDIR = $(LIBDIR)/xdm X TWMDIR = $(LIBDIR)/twm X MANPATH = /usr/local/man X MANSOURCEPATH = $(MANPATH)/man X MANSUFFIX = n X LIBMANSUFFIX = 3 X MANDIR = $(MANSOURCEPATH)$(MANSUFFIX) X LIBMANDIR = $(MANSOURCEPATH)$(LIBMANSUFFIX) X NLSDIR = $(LIBDIR)/nls X PEXAPIDIR = $(LIBDIR)/PEX X XAPPLOADDIR = $(LIBDIR)/app-defaults X FONTCFLAGS = -t X X INSTAPPFLAGS = $(INSTDATFLAGS) X X IMAKE = imake X DEPEND = makedepend X RGB = rgb X X FONTC = bdftopcf X X MKFONTDIR = mkfontdir X MKDIRHIER = /bin/sh $(BINDIR)/mkdirhier X X CONFIGSRC = $(TOP)/config X DOCUTILSRC = $(TOP)/doc/util X CLIENTSRC = $(TOP)/clients X DEMOSRC = $(TOP)/demos X LIBSRC = $(TOP)/lib X FONTSRC = $(TOP)/fonts X INCLUDESRC = $(TOP)/X11 X SERVERSRC = $(TOP)/server X UTILSRC = $(TOP)/util X SCRIPTSRC = $(UTILSRC)/scripts X EXAMPLESRC = $(TOP)/examples X CONTRIBSRC = $(TOP)/../contrib X DOCSRC = $(TOP)/doc X RGBSRC = $(TOP)/rgb X DEPENDSRC = $(UTILSRC)/makedepend X IMAKESRC = $(CONFIGSRC) X XAUTHSRC = $(LIBSRC)/Xau X XLIBSRC = $(LIBSRC)/X X XMUSRC = $(LIBSRC)/Xmu X TOOLKITSRC = $(LIBSRC)/Xt X AWIDGETSRC = $(LIBSRC)/Xaw X OLDXLIBSRC = $(LIBSRC)/oldX X XDMCPLIBSRC = $(LIBSRC)/Xdmcp X BDFTOSNFSRC = $(FONTSRC)/bdftosnf X BDFTOSNFSRC = $(FONTSRC)/clients/bdftosnf X BDFTOPCFSRC = $(FONTSRC)/clients/bdftopcf X MKFONTDIRSRC = $(FONTSRC)/clients/mkfontdir X FSLIBSRC = $(FONTSRC)/lib/fs X FONTSERVERSRC = $(FONTSRC)/server X EXTENSIONSRC = $(TOP)/extensions X XILIBSRC = $(EXTENSIONSRC)/lib/xinput X PHIGSLIBSRC = $(EXTENSIONSRC)/lib/PEX X # $XConsortium: sunLib.tmpl,v 1.14.1.1 92/03/17 14:58:46 rws Exp $ X SHLIBLDFLAGS = -assert pure-text PICFLAGS = -pic X X DEPEXTENSIONLIB = X EXTENSIONLIB = -lXext X X DEPXLIB = $(DEPEXTENSIONLIB) X XLIB = $(EXTENSIONLIB) -lX11 X X DEPXMULIB = $(USRLIBDIR)/libXmu.sa.$(SOXMUREV) X XMULIBONLY = -lXmu X XMULIB = -lXmu X X DEPOLDXLIB = X OLDXLIB = -loldX X X DEPXTOOLLIB = $(USRLIBDIR)/libXt.sa.$(SOXTREV) X XTOOLLIB = -lXt X X DEPXAWLIB = $(USRLIBDIR)/libXaw.sa.$(SOXAWREV) X XAWLIB = -lXaw X X DEPXILIB = X XILIB = -lXi X X SOXLIBREV = 4.10 X SOXTREV = 4.10 X SOXAWREV = 5.0 X SOOLDXREV = 4.10 X SOXMUREV = 4.10 X SOXEXTREV = 4.10 X SOXINPUTREV = 4.10 X X DEPXAUTHLIB = $(USRLIBDIR)/libXau.a X XAUTHLIB = -lXau X DEPXDMCPLIB = $(USRLIBDIR)/libXdmcp.a X XDMCPLIB = -lXdmcp X X DEPPHIGSLIB = $(USRLIBDIR)/libphigs.a X PHIGSLIB = -lphigs X X DEPXBSDLIB = $(USRLIBDIR)/libXbsd.a X XBSDLIB = -lXbsd X X LINTEXTENSIONLIB = $(LINTLIBDIR)/llib-lXext.ln X LINTXLIB = $(LINTLIBDIR)/llib-lX11.ln X LINTXMU = $(LINTLIBDIR)/llib-lXmu.ln X LINTXTOOL = $(LINTLIBDIR)/llib-lXt.ln X LINTXAW = $(LINTLIBDIR)/llib-lXaw.ln X LINTXI = $(LINTLIBDIR)/llib-lXi.ln X LINTPHIGS = $(LINTLIBDIR)/llib-lphigs.ln X X DEPLIBS = $(DEPXAWLIB) $(DEPXMULIB) $(DEPXTOOLLIB) $(DEPXLIB) X X DEPLIBS1 = $(DEPLIBS) X DEPLIBS2 = $(DEPLIBS) X DEPLIBS3 = $(DEPLIBS) X # ------------------------------------------------------------------------- # Imake rules for building libraries, programs, scripts, and data files # rules: $XConsortium: Imake.rules,v 1.123 91/09/16 20:12:16 rws Exp $ X # ------------------------------------------------------------------------- # start of Imakefile X SYS_XTPANELDIR = $(LIBDIR)/xtpanel X SUBDIRS = commandline script X FILES = all_examples X all_examples: all_examples.sed X sed -e 's,CPP,$(CPP),g' <$? >$@ X install:: X @case '${MFLAGS}' in *[i]*) set +e;; esac; X @for i in $(SYS_XTPANELDIR)/examples \ X $(SYS_XTPANELDIR)/examples/commandline \ X $(SYS_XTPANELDIR)/examples/script; do if [ -d $(DESTDIR)$$i ]; then \ X set +x; else (set -x; $(MKDIRHIER) $(DESTDIR)$$i); fi \ X done X install:: $(FILES) X @if [ -d $(DESTDIR) $(SYS_XTPANELDIR)/examples ]; then set +x; \ X else (set -x; $(MKDIRHIER) $(DESTDIR) $(SYS_XTPANELDIR)/examples); fi X @case '${MFLAGS}' in *[i]*) set +e;; esac; \ X for i in $(FILES); do \ X (set -x; $(INSTALL) -c -m 644 $$i $(DESTDIR) $(SYS_XTPANELDIR)/examples); \ X done X Makefiles:: X @case '${MFLAGS}' in *[ik]*) set +e;; esac; \ X for i in $(SUBDIRS) ;\ X do \ X echo "making Makefiles in $(CURRENT_DIR)/$$i..."; \ X case "$$i" in \ X ./?*/?*/?*/?*) newtop=../../../../ sub=subsubsubsub;; \ X ./?*/?*/?*) newtop=../../../ sub=subsubsub;; \ X ./?*/?*) newtop=../../ sub=subsub;; \ X ./?*) newtop=../ sub=sub;; \ X */?*/?*/?*) newtop=../../../../ sub=subsubsubsub;; \ X */?*/?*) newtop=../../../ sub=subsubsub;; \ X */?*) newtop=../../ sub=subsub;; \ X *) newtop=../ sub=sub;; \ X esac; \ X case "$(TOP)" in \ X /?*) newtop= upprefix= ;; \ X *) upprefix=../ ;; \ X esac; \ X $(MAKE) $${sub}dirMakefiles UPPREFIX=$$upprefix NEWTOP=$$newtop \ X MAKEFILE_SUBDIR=$$i NEW_CURRENT_DIR=$(CURRENT_DIR)/$$i;\ X done X subdirMakefiles: X $(RM) $(MAKEFILE_SUBDIR)/Makefile.bak X -@if [ -f $(MAKEFILE_SUBDIR)/Makefile ]; then set -x; \ X $(MV) $(MAKEFILE_SUBDIR)/Makefile $(MAKEFILE_SUBDIR)/Makefile.bak; \ X else exit 0; fi X cd $(MAKEFILE_SUBDIR); $(IMAKE_CMD) -DTOPDIR=$(UPPREFIX)$(TOP) -DCURDIR=$(NEW_CURRENT_DIR); \ X $(MAKE) $(MFLAGS) Makefiles X subsubdirMakefiles: X $(RM) $(MAKEFILE_SUBDIR)/Makefile.bak X -@if [ -f $(MAKEFILE_SUBDIR)/Makefile ]; then set -x; \ X $(MV) $(MAKEFILE_SUBDIR)/Makefile $(MAKEFILE_SUBDIR)/Makefile.bak; \ X else exit 0; fi X cd $(MAKEFILE_SUBDIR); $(IMAKE_CMD) -DTOPDIR=$(UPPREFIX)$(UPPREFIX)$(TOP) -DCURDIR=$(NEW_CURRENT_DIR); \ X $(MAKE) $(MFLAGS) Makefiles X subsubsubdirMakefiles: X $(RM) $(MAKEFILE_SUBDIR)/Makefile.bak X -@if [ -f $(MAKEFILE_SUBDIR)/Makefile ]; then set -x; \ X $(MV) $(MAKEFILE_SUBDIR)/Makefile $(MAKEFILE_SUBDIR)/Makefile.bak; \ X else exit 0; fi X cd $(MAKEFILE_SUBDIR); $(IMAKE_CMD) -DTOPDIR=$(UPPREFIX)$(UPPREFIX)$(UPPREFIX)$(TOP) -DCURDIR=$(NEW_CURRENT_DIR); \ X $(MAKE) $(MFLAGS) Makefiles X subsubsubsubdirMakefiles: X $(RM) $(MAKEFILE_SUBDIR)/Makefile.bak X -@if [ -f $(MAKEFILE_SUBDIR)/Makefile ]; then set -x; \ X $(MV) $(MAKEFILE_SUBDIR)/Makefile $(MAKEFILE_SUBDIR)/Makefile.bak; \ X else exit 0; fi X cd $(MAKEFILE_SUBDIR); $(IMAKE_CMD) -DTOPDIR=$(UPPREFIX)$(UPPREFIX)$(UPPREFIX)$(UPPREFIX)$(TOP) -DCURDIR=$(NEW_CURRENT_DIR); \ X $(MAKE) $(MFLAGS) Makefiles X install:: X @case '${MFLAGS}' in *[ik]*) set +e;; esac; \ X for i in $(SUBDIRS) ;\ X do \ X (cd $$i ; echo "installing" "in $(CURRENT_DIR)/$$i..."; \ X $(MAKE) $(MFLAGS) DESTDIR='$(DESTDIR)' install); \ X done X clean:: X @case '${MFLAGS}' in *[ik]*) set +e;; esac; \ X for i in $(SUBDIRS) ;\ X do \ X (cd $$i ; echo "cleaning" "in $(CURRENT_DIR)/$$i..."; \ X $(MAKE) $(MFLAGS) RM_CMD='$(RM_CMD)' clean); \ X done X clean:: X $(RM) all_examples X # ------------------------------------------------------------------------- # common rules for all Makefiles - do not edit X emptyrule:: X clean:: X $(RM_CMD) "#"* X Makefile:: X -@if [ -f Makefile ]; then set -x; \ X $(RM) Makefile.bak; $(MV) Makefile Makefile.bak; \ X else exit 0; fi X $(IMAKE_CMD) -DTOPDIR=$(TOP) -DCURDIR=$(CURRENT_DIR) X tags:: X $(TAGS) -w *.[ch] X $(TAGS) -xw *.[ch] > TAGS X saber: X # load $(ALLDEFINES) $(SRCS) X osaber: X # load $(ALLDEFINES) $(OBJS) X # ------------------------------------------------------------------------- # empty rules for directories that do not have SUBDIRS - do not edit X install:: X @echo "install in $(CURRENT_DIR) done" X install.man:: X @echo "install.man in $(CURRENT_DIR) done" X Makefiles:: X includes:: X # ------------------------------------------------------------------------- # dependencies generated by makedepend X SHAR_EOF chmod 0664 xtpanel/examples/Makefile || echo 'restore of xtpanel/examples/Makefile failed' Wc_c="`wc -c < 'xtpanel/examples/Makefile'`" test 12622 -eq "$Wc_c" || echo 'xtpanel/examples/Makefile: original size 12622, current size' "$Wc_c" fi # ============= xtpanel/examples/all_examples.sed ============== if test -f 'xtpanel/examples/all_examples.sed' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/all_examples.sed (File already exists)' else echo 'x - extracting xtpanel/examples/all_examples.sed (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/all_examples.sed' && X button={ label=QUIT action=QUIT } X text={ value="This panel lets you examine and run the example files.\n\ Highlight a file in the list and then choose \n\ ""Look at file"" to see the file, \nor ""Run file"" to run it." } X hbox={ name=noborder X vbox={ message={ value="These examples use xtpanel script files" } list={ name=choice1 label="Choose a file" X itemlist={ list=`cd script; echo *`} } X hbox={ name=noborder button={ label="Look at file" X action="cd script; xterm -T $choice1 -e view $choice1 &" } X button={ label="Run file" action="cd script; xtpanel < $choice1 &" } } } X vbox={ message={ value="These examples are run from the command line" } X list={ name=choice2 label="Choose a file" X itemlist={ list=`cd commandline; echo *`} } X hbox={ name=noborder button={ label="Look at file" X action="cd commandline; xterm -T $choice2 -e view $choice2 &" } X button={ label="Run file" action="cd commandline; sh $choice2 &" } } } X } SHAR_EOF chmod 0664 xtpanel/examples/all_examples.sed || echo 'restore of xtpanel/examples/all_examples.sed failed' Wc_c="`wc -c < 'xtpanel/examples/all_examples.sed'`" test 947 -eq "$Wc_c" || echo 'xtpanel/examples/all_examples.sed: original size 947, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/all ============== if test ! -d 'xtpanel/examples/commandline'; then echo 'x - creating directory xtpanel/examples/commandline' mkdir 'xtpanel/examples/commandline' fi if test -f 'xtpanel/examples/commandline/all' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/all (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/all (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/all' && xtpanel -quit -text "`cat all`" -message "this is a message" -button \ "this is a button" 'PRINT $val' button "hello world" -slider \ "this is a slider" 'PRINT slider value is $val' slider 5 0 10 %.0f 100 20 \ -dialog "this is a dialog" 'PRINT dialog value is $val' dialog "hello world" \ -choice "this is a choice" 'PRINT choice is $val' toggle 2 3 one 1 two \ 2 three 3 -list "this is a list" 'PRINT list choice is $val' list five 6 one \ 1 two 2 three 3 four 4 five 5 six 6 -menubutton "this is a menubutton" \ 'PRINT menubutton choice is $val' menubutton 1 3 one 1 two 2 three 3 SHAR_EOF chmod 0775 xtpanel/examples/commandline/all || echo 'restore of xtpanel/examples/commandline/all failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/all'`" test 583 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/all: original size 583, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/message ============== if test -f 'xtpanel/examples/commandline/message' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/message (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/message (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/message' && xtpanel -quit -message "this is a message" SHAR_EOF chmod 0775 xtpanel/examples/commandline/message || echo 'restore of xtpanel/examples/commandline/message failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/message'`" test 43 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/message: original size 43, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/button ============== if test -f 'xtpanel/examples/commandline/button' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/button (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/button (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/button' && xtpanel -quit -button "this is a button" 'PRINT $val' name "hello world" SHAR_EOF chmod 0775 xtpanel/examples/commandline/button || echo 'restore of xtpanel/examples/commandline/button failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/button'`" test 73 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/button: original size 73, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/slider ============== if test -f 'xtpanel/examples/commandline/slider' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/slider (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/slider (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/slider' && xtpanel -quit -slider "this is a slider" 'PRINT slider says $val' \ name 5 0 10 %.0f 100 20 SHAR_EOF chmod 0775 xtpanel/examples/commandline/slider || echo 'restore of xtpanel/examples/commandline/slider failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/slider'`" test 92 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/slider: original size 92, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/list ============== if test -f 'xtpanel/examples/commandline/list' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/list (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/list (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/list' && xtpanel -quit -list "this is a list" 'PRINT choice is $val' name 2 6 one \ 1 two 2 three 3 four 4 five 5 six 6 SHAR_EOF chmod 0775 xtpanel/examples/commandline/list || echo 'restore of xtpanel/examples/commandline/list failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/list'`" test 111 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/list: original size 111, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/menubutton ============== if test -f 'xtpanel/examples/commandline/menubutton' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/menubutton (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/menubutton (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/menubutton' && xtpanel -quit -menubutton "this is a menubutton" 'PRINT choice is $val' \ name 2 3 one 1 two 2 three 3 SHAR_EOF chmod 0775 xtpanel/examples/commandline/menubutton || echo 'restore of xtpanel/examples/commandline/menubutton failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/menubutton'`" test 103 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/menubutton: original size 103, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/dialog ============== if test -f 'xtpanel/examples/commandline/dialog' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/dialog (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/dialog (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/dialog' && xtpanel -quit -dialog "this is a dialog" 'PRINT dialog says $val' name \ "hello world" SHAR_EOF chmod 0775 xtpanel/examples/commandline/dialog || echo 'restore of xtpanel/examples/commandline/dialog failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/dialog'`" test 87 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/dialog: original size 87, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/text ============== if test -f 'xtpanel/examples/commandline/text' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/text (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/text (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/text' && xtpanel -quit -text "`cat all`" SHAR_EOF chmod 0775 xtpanel/examples/commandline/text || echo 'restore of xtpanel/examples/commandline/text failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/text'`" test 32 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/text: original size 32, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/choice ============== if test -f 'xtpanel/examples/commandline/choice' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/choice (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/choice (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/choice' && xtpanel -quit -choice "this is a choice" 'PRINT choice is $val' name 1 3 \ one 1 two 2 three 3 SHAR_EOF chmod 0775 xtpanel/examples/commandline/choice || echo 'restore of xtpanel/examples/commandline/choice failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/choice'`" test 95 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/choice: original size 95, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/Imakefile ============== if test -f 'xtpanel/examples/commandline/Imakefile' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/Imakefile (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/Imakefile (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/Imakefile' && X #include "../../Imake.config" X X FILES = all choice list message text \ X button dialog menubutton slider graph \ X scrollbar X X InstallMultipleFlags($(FILES),$(SYS_XTPANELDIR)/examples/commandline,-m 644) X X X SHAR_EOF chmod 0664 xtpanel/examples/commandline/Imakefile || echo 'restore of xtpanel/examples/commandline/Imakefile failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/Imakefile'`" test 256 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/Imakefile: original size 256, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/Makefile ============== if test -f 'xtpanel/examples/commandline/Makefile' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/Makefile (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/Makefile (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/Makefile' && # Makefile generated by imake - do not edit! # $XConsortium: imake.c,v 1.51 89/12/12 12:37:30 jim Exp $ # # The cpp used on this machine replaces all newlines and multiple tabs and # spaces in a macro expansion with a single space. Imake tries to compensate # for this, but is not always successful. # X # ------------------------------------------------------------------------- # Makefile generated from "Imake.tmpl" and <Imakefile> # $XConsortium: Imake.tmpl,v 1.139 91/09/16 08:52:48 rws Exp $ # # Platform-specific parameters may be set in the appropriate <vendor>.cf # configuration files. Site-specific parameters should be set in the file # site.def. Full rebuilds are recommended if any parameters are changed. # # If your C preprocessor does not define any unique symbols, you will need # to set BOOTSTRAPCFLAGS when rebuilding imake (usually when doing # "make World" the first time). # X # ------------------------------------------------------------------------- # site-specific configuration parameters that need to come before # the platform-specific parameters - edit site.def to change X # site: $XConsortium: site.def,v 1.2 91/07/30 20:26:44 rws Exp $ X # ------------------------------------------------------------------------- # platform-specific configuration parameters - edit sun.cf to change X # platform: $XConsortium: sun.cf,v 1.72.1.1 92/03/18 13:13:37 rws Exp $ X # operating system: SunOS 4.1.1 X # $XConsortium: sunLib.rules,v 1.7 91/12/20 11:19:47 rws Exp $ X # ------------------------------------------------------------------------- # site-specific configuration parameters that go after # the platform-specific parameters - edit site.def to change X # site: $XConsortium: site.def,v 1.2 91/07/30 20:26:44 rws Exp $ X X SHELL = /bin/sh X X TOP = ../../. X CURRENT_DIR = ./examples/commandline X X AR = ar clq X BOOTSTRAPCFLAGS = X CC = cc X AS = as X X COMPRESS = compress X CPP = /lib/cpp $(STD_CPP_DEFINES) X PREPROCESSCMD = cc -E $(STD_CPP_DEFINES) X INSTALL = install X LD = ld X LINT = lint X LINTLIBFLAG = -C X LINTOPTS = -axz X LN = ln -s X MAKE = make X MV = mv X CP = cp X X RANLIB = ranlib X RANLIBINSTFLAGS = X X RM = rm -f X TROFF = psroff X MSMACROS = -ms X TBL = tbl X EQN = eqn X STD_INCLUDES = X STD_CPP_DEFINES = -D_NO_PROTO X STD_DEFINES = -D_NO_PROTO X EXTRA_LOAD_FLAGS = X EXTRA_LIBRARIES = X TAGS = ctags X X SHAREDCODEDEF = -DSHAREDCODE X SHLIBDEF = -DSUNSHLIB X X PROTO_DEFINES = X X INSTPGMFLAGS = X X INSTBINFLAGS = -m 0755 X INSTUIDFLAGS = -m 4755 X INSTLIBFLAGS = -m 0644 X INSTINCFLAGS = -m 0444 X INSTMANFLAGS = -m 0444 X INSTDATFLAGS = -m 0444 X INSTKMEMFLAGS = -g kmem -m 2755 X X PROJECTROOT = /usr/local X X TOP_INCLUDES = -I$(INCROOT) X X CDEBUGFLAGS = -O X CCOPTIONS = -pipe X X ALLINCLUDES = $(INCLUDES) $(EXTRA_INCLUDES) $(TOP_INCLUDES) $(STD_INCLUDES) X ALLDEFINES = $(ALLINCLUDES) $(STD_DEFINES) $(EXTRA_DEFINES) $(PROTO_DEFINES) $(DEFINES) X CFLAGS = $(CDEBUGFLAGS) $(CCOPTIONS) $(ALLDEFINES) X LINTFLAGS = $(LINTOPTS) -DLINT $(ALLDEFINES) X X LDLIBS = $(SYS_LIBRARIES) $(EXTRA_LIBRARIES) X X LDOPTIONS = $(CDEBUGFLAGS) $(CCOPTIONS) $(LOCAL_LDFLAGS) -L$(USRLIBDIR) X X LDCOMBINEFLAGS = -X -r X DEPENDFLAGS = X X MACROFILE = sun.cf X RM_CMD = $(RM) *.CKP *.ln *.BAK *.bak *.o core errs ,* *~ *.a .emacs_* tags TAGS make.log MakeOut X X IMAKE_DEFINES = X X IRULESRC = $(CONFIGDIR) X IMAKE_CMD = $(IMAKE) -DUseInstalled -I$(IRULESRC) $(IMAKE_DEFINES) X X ICONFIGFILES = $(IRULESRC)/Imake.tmpl $(IRULESRC)/Imake.rules \ X $(IRULESRC)/Project.tmpl $(IRULESRC)/site.def \ X $(IRULESRC)/$(MACROFILE) $(EXTRA_ICONFIGFILES) X # ------------------------------------------------------------------------- # X Window System Build Parameters # $XConsortium: Project.tmpl,v 1.138 91/09/10 09:02:12 rws Exp $ X # ------------------------------------------------------------------------- # X Window System make variables; this need to be coordinated with rules X X PATHSEP = / X USRLIBDIR = /usr/local/lib X BINDIR = /usr/local/bin/X5 X INCROOT = /usr/local/include X BUILDINCROOT = $(TOP) X BUILDINCDIR = $(BUILDINCROOT)/X11 X BUILDINCTOP = .. X INCDIR = $(INCROOT)/X11 X ADMDIR = /usr/adm X LIBDIR = $(USRLIBDIR)/X11 X CONFIGDIR = $(LIBDIR)/config X LINTLIBDIR = $(USRLIBDIR)/lint X X FONTDIR = $(LIBDIR)/fonts X XINITDIR = $(LIBDIR)/xinit X XDMDIR = $(LIBDIR)/xdm X TWMDIR = $(LIBDIR)/twm X MANPATH = /usr/local/man X MANSOURCEPATH = $(MANPATH)/man X MANSUFFIX = n X LIBMANSUFFIX = 3 X MANDIR = $(MANSOURCEPATH)$(MANSUFFIX) X LIBMANDIR = $(MANSOURCEPATH)$(LIBMANSUFFIX) X NLSDIR = $(LIBDIR)/nls X PEXAPIDIR = $(LIBDIR)/PEX X XAPPLOADDIR = $(LIBDIR)/app-defaults X FONTCFLAGS = -t X X INSTAPPFLAGS = $(INSTDATFLAGS) X X IMAKE = imake X DEPEND = makedepend X RGB = rgb X X FONTC = bdftopcf X X MKFONTDIR = mkfontdir X MKDIRHIER = /bin/sh $(BINDIR)/mkdirhier X X CONFIGSRC = $(TOP)/config X DOCUTILSRC = $(TOP)/doc/util X CLIENTSRC = $(TOP)/clients X DEMOSRC = $(TOP)/demos X LIBSRC = $(TOP)/lib X FONTSRC = $(TOP)/fonts X INCLUDESRC = $(TOP)/X11 X SERVERSRC = $(TOP)/server X UTILSRC = $(TOP)/util X SCRIPTSRC = $(UTILSRC)/scripts X EXAMPLESRC = $(TOP)/examples X CONTRIBSRC = $(TOP)/../contrib X DOCSRC = $(TOP)/doc X RGBSRC = $(TOP)/rgb X DEPENDSRC = $(UTILSRC)/makedepend X IMAKESRC = $(CONFIGSRC) X XAUTHSRC = $(LIBSRC)/Xau X XLIBSRC = $(LIBSRC)/X X XMUSRC = $(LIBSRC)/Xmu X TOOLKITSRC = $(LIBSRC)/Xt X AWIDGETSRC = $(LIBSRC)/Xaw X OLDXLIBSRC = $(LIBSRC)/oldX X XDMCPLIBSRC = $(LIBSRC)/Xdmcp X BDFTOSNFSRC = $(FONTSRC)/bdftosnf X BDFTOSNFSRC = $(FONTSRC)/clients/bdftosnf X BDFTOPCFSRC = $(FONTSRC)/clients/bdftopcf X MKFONTDIRSRC = $(FONTSRC)/clients/mkfontdir X FSLIBSRC = $(FONTSRC)/lib/fs X FONTSERVERSRC = $(FONTSRC)/server X EXTENSIONSRC = $(TOP)/extensions X XILIBSRC = $(EXTENSIONSRC)/lib/xinput X PHIGSLIBSRC = $(EXTENSIONSRC)/lib/PEX X # $XConsortium: sunLib.tmpl,v 1.14.1.1 92/03/17 14:58:46 rws Exp $ X SHLIBLDFLAGS = -assert pure-text PICFLAGS = -pic X X DEPEXTENSIONLIB = X EXTENSIONLIB = -lXext X X DEPXLIB = $(DEPEXTENSIONLIB) X XLIB = $(EXTENSIONLIB) -lX11 X X DEPXMULIB = $(USRLIBDIR)/libXmu.sa.$(SOXMUREV) X XMULIBONLY = -lXmu X XMULIB = -lXmu X X DEPOLDXLIB = X OLDXLIB = -loldX X X DEPXTOOLLIB = $(USRLIBDIR)/libXt.sa.$(SOXTREV) X XTOOLLIB = -lXt X X DEPXAWLIB = $(USRLIBDIR)/libXaw.sa.$(SOXAWREV) X XAWLIB = -lXaw X X DEPXILIB = X XILIB = -lXi X X SOXLIBREV = 4.10 X SOXTREV = 4.10 X SOXAWREV = 5.0 X SOOLDXREV = 4.10 X SOXMUREV = 4.10 X SOXEXTREV = 4.10 X SOXINPUTREV = 4.10 X X DEPXAUTHLIB = $(USRLIBDIR)/libXau.a X XAUTHLIB = -lXau X DEPXDMCPLIB = $(USRLIBDIR)/libXdmcp.a X XDMCPLIB = -lXdmcp X X DEPPHIGSLIB = $(USRLIBDIR)/libphigs.a X PHIGSLIB = -lphigs X X DEPXBSDLIB = $(USRLIBDIR)/libXbsd.a X XBSDLIB = -lXbsd X X LINTEXTENSIONLIB = $(LINTLIBDIR)/llib-lXext.ln X LINTXLIB = $(LINTLIBDIR)/llib-lX11.ln X LINTXMU = $(LINTLIBDIR)/llib-lXmu.ln X LINTXTOOL = $(LINTLIBDIR)/llib-lXt.ln X LINTXAW = $(LINTLIBDIR)/llib-lXaw.ln X LINTXI = $(LINTLIBDIR)/llib-lXi.ln X LINTPHIGS = $(LINTLIBDIR)/llib-lphigs.ln X X DEPLIBS = $(DEPXAWLIB) $(DEPXMULIB) $(DEPXTOOLLIB) $(DEPXLIB) X X DEPLIBS1 = $(DEPLIBS) X DEPLIBS2 = $(DEPLIBS) X DEPLIBS3 = $(DEPLIBS) X # ------------------------------------------------------------------------- # Imake rules for building libraries, programs, scripts, and data files # rules: $XConsortium: Imake.rules,v 1.123 91/09/16 20:12:16 rws Exp $ X # ------------------------------------------------------------------------- # start of Imakefile X SYS_XTPANELDIR = $(LIBDIR)/xtpanel X FILES = all choice list message text \ X button dialog menubutton slider graph \ X scrollbar X install:: $(FILES) X @if [ -d $(DESTDIR)$(SYS_XTPANELDIR)/examples/commandline ]; then set +x; \ X else (set -x; $(MKDIRHIER) $(DESTDIR)$(SYS_XTPANELDIR)/examples/commandline); fi X @case '${MFLAGS}' in *[i]*) set +e;; esac; \ X for i in $(FILES); do \ X (set -x; $(INSTALL) -c -m 644 $$i $(DESTDIR)$(SYS_XTPANELDIR)/examples/commandline); \ X done X # ------------------------------------------------------------------------- # common rules for all Makefiles - do not edit X emptyrule:: X clean:: X $(RM_CMD) "#"* X Makefile:: X -@if [ -f Makefile ]; then set -x; \ X $(RM) Makefile.bak; $(MV) Makefile Makefile.bak; \ X else exit 0; fi X $(IMAKE_CMD) -DTOPDIR=$(TOP) -DCURDIR=$(CURRENT_DIR) X tags:: X $(TAGS) -w *.[ch] X $(TAGS) -xw *.[ch] > TAGS X saber: X # load $(ALLDEFINES) $(SRCS) X osaber: X # load $(ALLDEFINES) $(OBJS) X # ------------------------------------------------------------------------- # empty rules for directories that do not have SUBDIRS - do not edit X install:: X @echo "install in $(CURRENT_DIR) done" X install.man:: X @echo "install.man in $(CURRENT_DIR) done" X Makefiles:: X includes:: X # ------------------------------------------------------------------------- # dependencies generated by makedepend X SHAR_EOF chmod 0664 xtpanel/examples/commandline/Makefile || echo 'restore of xtpanel/examples/commandline/Makefile failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/Makefile'`" test 9860 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/Makefile: original size 9860, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/scrollbar ============== if test -f 'xtpanel/examples/commandline/scrollbar' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/scrollbar (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/scrollbar (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/scrollbar' && xtpanel -quit -scrollbar 'PRINT $val' \ name 5 0 10 %.0f 100 20 SHAR_EOF chmod 0775 xtpanel/examples/commandline/scrollbar || echo 'restore of xtpanel/examples/commandline/scrollbar failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/scrollbar'`" test 64 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/scrollbar: original size 64, current size' "$Wc_c" fi # ============= xtpanel/examples/commandline/graph ============== if test -f 'xtpanel/examples/commandline/graph' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/examples/commandline/graph (File already exists)' else echo 'x - extracting xtpanel/examples/commandline/graph (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/examples/commandline/graph' && xtpanel -quit -graph 50 "this is a graph" 'NONE' \ graph 5 0 10 %.0f 100 10 -button PRINT 'PRINT $graph' SHAR_EOF chmod 0775 xtpanel/examples/commandline/graph || echo 'restore of xtpanel/examples/commandline/graph failed' Wc_c="`wc -c < 'xtpanel/examples/commandline/graph'`" test 105 -eq "$Wc_c" || echo 'xtpanel/examples/commandline/graph: original size 105, current size' "$Wc_c" fi # ============= xtpanel/generator/actionstring ============== if test ! -d 'xtpanel/generator'; then echo 'x - creating directory xtpanel/generator' mkdir 'xtpanel/generator' fi if test -f 'xtpanel/generator/actionstring' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/actionstring (File already exists)' else echo 'x - extracting xtpanel/generator/actionstring (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/actionstring' && button={ label=Help action="xtpanel -file help/actions &" } button={ label=Cancel action="QUIT" } vbox={ name=noborder vbox={ message={ X value="The following string is what gets printed," } message={ X value="passed to the system, or saved." } message={ X value="In it, you can refer to the value of this object as $(val)." } message={ X value="You can also refer to the values of other objects" } message={ X value="using the names you have given the objects." } text={ X name=outstring X editType=edit X value="$(val)" X height=50 width=500 } } button={ label="Click here when done" X action="echo 'action=""$(acttype) $(outstring)"" ' " X action=QUIT } } SHAR_EOF chmod 0664 xtpanel/generator/actionstring || echo 'restore of xtpanel/generator/actionstring failed' Wc_c="`wc -c < 'xtpanel/generator/actionstring'`" test 663 -eq "$Wc_c" || echo 'xtpanel/generator/actionstring: original size 663, current size' "$Wc_c" fi # ============= xtpanel/generator/box ============== if test -f 'xtpanel/generator/box' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/box (File already exists)' else echo 'x - extracting xtpanel/generator/box (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/box' && button={ label=Help action="xtpanel -file help/boxes &" } choice={ name=boxtype label="What kind of box would you like?" item={ label="vertical box" value="vbox" } item={ label="horizontal box" value="hbox" } item={ label="vertical paned box" value="vpane" } item={ label="horizontal paned box" value="hpane" } } choice={ label="Box border visible?" name=border item={ label=Yes value=" " } item={ label=No value="name=noborder" } } var={ name=out value="" } button={ label="more parameters" X action="ASSIGN out $(out)`xtpanel -name ""more button parameters"" \ X -file generator/extras`" } button={ X label="Click here when done to add box to script" X action='echo ''$(boxtype)={ $(border) $(out) '' >> $fileout ' X action=QUIT } button={ label="Or click here to cancel" action=QUIT } SHAR_EOF chmod 0664 xtpanel/generator/box || echo 'restore of xtpanel/generator/box failed' Wc_c="`wc -c < 'xtpanel/generator/box'`" test 787 -eq "$Wc_c" || echo 'xtpanel/generator/box: original size 787, current size' "$Wc_c" fi # ============= xtpanel/generator/button ============== if test -f 'xtpanel/generator/button' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/button (File already exists)' else echo 'x - extracting xtpanel/generator/button (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/button' && button={ label=Help action="xtpanel -file help/button &" } vbox={ message={ value="Click to specify any of the following button parameters" } button={ label="label" X action="ASSIGN out $(out)\n`xtpanel -name ""button label"" \ X -var varname label -file generator/field`" } button={ label="action" X action="ASSIGN out $(out)\n `xtpanel -name ""button action"" \ X -file generator/action`" } button={ label="name" X action="ASSIGN out $(out)\n`xtpanel -name ""button name"" \ X -var varname name -file generator/field`" } button={ label="value" X action="ASSIGN out $(out)\n`xtpanel -name ""button value"" \ X -var varname value -file generator/field`" } button={ label="more parameters" X action="ASSIGN out $(out)`xtpanel -name ""more button parameters"" \ X -file generator/extras`" } } message={ value="Or edit below to add new parameters or make changes" } text={ name=out value="" editType=edit height=75 width=400 } button={ label="Click here when done to add button to script" X action='echo ''button={ $(out) \n} '' >> $fileout ' X action=QUIT } button={ label="Or click here to cancel" action=QUIT } SHAR_EOF chmod 0664 xtpanel/generator/button || echo 'restore of xtpanel/generator/button failed' Wc_c="`wc -c < 'xtpanel/generator/button'`" test 1121 -eq "$Wc_c" || echo 'xtpanel/generator/button: original size 1121, current size' "$Wc_c" fi # ============= xtpanel/generator/choice ============== if test -f 'xtpanel/generator/choice' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/choice (File already exists)' else echo 'x - extracting xtpanel/generator/choice (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/choice' && button={ label=Help action="xtpanel -file help/choice &" } vbox={ message={ value="Click to specify any of the following choice parameters" } button={ label="label" X action="ASSIGN out $(out)\n`xtpanel -name ""choice label"" \ X -var varname label -file generator/field`" } button={ label="action" X action="ASSIGN out $(out)\n `xtpanel -name ""choice action"" \ X -file generator/action`" } button={ label="name" X action="ASSIGN out $(out)\n`xtpanel -name ""choice name"" \ X -var varname name -file generator/field`" } button={ label="value" X action="ASSIGN out $(out)\n`xtpanel -name ""choice value"" \ X -var varname value -file generator/field`" } button={ label="more parameters" X action="ASSIGN out $(out)`xtpanel -name ""more choice parameters"" \ X -file generator/extras`" } } button={ X label="Click here to add an item to the choice" X action="ASSIGN out $(out)\n `xtpanel -name ""add a choice item"" \ X -file generator/item`" } message={ value="Or edit below to add new parameters or make changes" } text={ name=out value="" editType=edit height=75 width=400 } button={ label="Click here when done to add choice to script" X action='echo ''choice={ $out \n} '' >> $fileout ' X action=QUIT } button={ label="Or click here to cancel" action=QUIT } SHAR_EOF chmod 0664 xtpanel/generator/choice || echo 'restore of xtpanel/generator/choice failed' Wc_c="`wc -c < 'xtpanel/generator/choice'`" test 1276 -eq "$Wc_c" || echo 'xtpanel/generator/choice: original size 1276, current size' "$Wc_c" fi # ============= xtpanel/generator/confirm ============== if test -f 'xtpanel/generator/confirm' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/confirm (File already exists)' else echo 'x - extracting xtpanel/generator/confirm (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/confirm' && message={ value="Do you really want to delete the script file?" } button={ label=Yes action="SYSTEM rm $(fileout)" } button={ label=No action=SYSTEM } SHAR_EOF chmod 0664 xtpanel/generator/confirm || echo 'restore of xtpanel/generator/confirm failed' Wc_c="`wc -c < 'xtpanel/generator/confirm'`" test 151 -eq "$Wc_c" || echo 'xtpanel/generator/confirm: original size 151, current size' "$Wc_c" fi # ============= xtpanel/generator/dialog ============== if test -f 'xtpanel/generator/dialog' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/dialog (File already exists)' else echo 'x - extracting xtpanel/generator/dialog (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/dialog' && button={ label=Help action="xtpanel -file help/dialog &" } vbox={ message={ value="Click to specify any of the following dialog parameters" } button={ label="label" X action="ASSIGN out $(out)\n`xtpanel -name ""dialog label"" \ X -var varname label -file generator/field`" } button={ label="action" X action="ASSIGN out $(out)\n `xtpanel -name ""dialog action"" \ X -file generator/action`" } button={ label="name" X action="ASSIGN out $(out)\n`xtpanel -name ""dialog name"" \ X -var varname name -file generator/field`" } button={ label="value" X action="ASSIGN out $(out)\n`xtpanel -name ""dialog value"" \ X -var varname value -file generator/field`" } button={ label="more parameters" X action="ASSIGN out $(out)`xtpanel -name ""more dialog parameters"" \ X -file generator/extras`" } } message={ value="Or edit below to add new parameters or make changes" } text={ name=out value="" editType=edit height=75 width=400 } button={ label="Click here when done to add dialog to script" X action='echo ''dialog={ $(out) \n} '' >> $fileout ' X action=QUIT } button={ label="Or click here to cancel" action=QUIT } SHAR_EOF chmod 0664 xtpanel/generator/dialog || echo 'restore of xtpanel/generator/dialog failed' Wc_c="`wc -c < 'xtpanel/generator/dialog'`" test 1127 -eq "$Wc_c" || echo 'xtpanel/generator/dialog: original size 1127, current size' "$Wc_c" fi # ============= xtpanel/generator/field ============== if test -f 'xtpanel/generator/field' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/field (File already exists)' else echo 'x - extracting xtpanel/generator/field (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/field' && dialog={ name=value label="Enter the value: " X action="PRINT $(varname)=""$(value)"" " X action="QUIT" } button={ label=Cancel action=QUIT } SHAR_EOF chmod 0664 xtpanel/generator/field || echo 'restore of xtpanel/generator/field failed' Wc_c="`wc -c < 'xtpanel/generator/field'`" test 158 -eq "$Wc_c" || echo 'xtpanel/generator/field: original size 158, current size' "$Wc_c" fi # ============= xtpanel/generator/item ============== if test -f 'xtpanel/generator/item' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/item (File already exists)' else echo 'x - extracting xtpanel/generator/item (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/item' && button={ label=Help action="xtpanel -file help/item &" } vbox={ name=noborder vbox={ message={ X value="Items can have a label (what appears on the screen)" } message={ X value="and a value (what gets output when the item is selected)" } message={ X value="You should specify the label here; the value is optional" } message={ X value="and will default to the label if not specified." } } vbox={ message={ X value="Click to specify any of the following item parameters" } button={ label="label" X action="ASSIGN out $(out)\n `xtpanel -name ""button label"" \ X -var varname label -file generator/field`" } button={ label="value" X action="ASSIGN out $(out)\n `xtpanel -name ""button value"" \ X -var varname value -file generator/field`" } button={ label="more parameters" X action="ASSIGN out $(out) `xtpanel -name ""more item parameters"" \ X -file generator/extras`" } } } message={ value="Or edit below to add new parameters or make changes" } text={ name=out value="" editType=edit height=75 width=400 } button={ label="Click here when done to add this item to the object" X action='echo -n ''item={ $(out) \n }'' ' X action=QUIT } button={ label="Or click here to cancel" action=QUIT } SHAR_EOF chmod 0664 xtpanel/generator/item || echo 'restore of xtpanel/generator/item failed' Wc_c="`wc -c < 'xtpanel/generator/item'`" test 1208 -eq "$Wc_c" || echo 'xtpanel/generator/item: original size 1208, current size' "$Wc_c" fi # ============= xtpanel/generator/list ============== if test -f 'xtpanel/generator/list' -a X"$1" != X"-c"; then echo 'x - skipping xtpanel/generator/list (File already exists)' else echo 'x - extracting xtpanel/generator/list (Text)' sed 's/^X//' << 'SHAR_EOF' > 'xtpanel/generator/list' && button={ label=Help action="xtpanel -file help/list &" } vbox={ message={ value="Click to specify any of the following list parameters" } button={ label="label" X action="ASSIGN out $(out)\n`xtpanel -name ""list label"" \ X -var varname label -file generator/field`" } button={ label="action" X action="ASSIGN out $(out)\n `xtpanel -name ""list action"" \ X -file generator/action`" } button={ label="name" X action="ASSIGN out $(out)\n`xtpanel -name ""list name"" \ X -var varname name -file generator/field`" } button={ label="value" X action="ASSIGN out $(out)\n`xtpanel -name ""list value"" \ X -var varname value -file generator/field`" } button={ label="more parameters" X action="ASSIGN out $(out)`xtpanel -name ""more list parameters"" \ X -file generator/extras`" } } button={ X label="Click here to add an item to the list" X action="ASSIGN out $(out)\n `xtpanel -name ""add a list item"" \ X -file generator/item`" } message={ value="Or edit below to add new parameters or make changes" } text={ name=out value="" editType=edit height=75 width=400 } button={ label="Click here when done to add list to script" X action='echo ''list={ $out \n} '' >> $fileout ' X action=QUIT } button={ label="Or click here to cancel" action=QUIT } SHAR_EOF chmod 0664 xtpanel/generator/list || echo 'restore of xtpanel/generator/list failed' Wc_c="`wc -c < 'xtpanel/generator/list'`" test 1253 -eq "$Wc_c" || echo 'xtpanel/generator/list: original size 1253, current size' "$Wc_c" fi true || echo 'restore of xtpanel/generator/Makefile failed' echo End of part 2, continue with part 3 exit 0 ----------------------------------------------------------------- Steve Cole (steve@sep.stanford.edu, apple!sep!steve) Department of Geophysics, Stanford University, Stanford, CA 94305