diff options
Diffstat (limited to 'libslang/demo')
| -rw-r--r-- | libslang/demo/Makefile.in | 66 | ||||
| -rw-r--r-- | libslang/demo/Makefile.w32 | 5 | ||||
| -rw-r--r-- | libslang/demo/README | 43 | ||||
| -rwxr-xr-x | libslang/demo/configure | 1597 | ||||
| -rw-r--r-- | libslang/demo/configure.in | 51 | ||||
| -rw-r--r-- | libslang/demo/demolib.c | 96 | ||||
| -rw-r--r-- | libslang/demo/keypad.c | 52 | ||||
| -rw-r--r-- | libslang/demo/modules.unx | 4 | ||||
| -rw-r--r-- | libslang/demo/pager.c | 280 | ||||
| -rw-r--r-- | libslang/demo/smgtest.c | 799 | ||||
| -rw-r--r-- | libslang/demo/useropen.c | 119 |
11 files changed, 3112 insertions, 0 deletions
diff --git a/libslang/demo/Makefile.in b/libslang/demo/Makefile.in new file mode 100644 index 0000000..963c274 --- /dev/null +++ b/libslang/demo/Makefile.in @@ -0,0 +1,66 @@ +# -*- sh -*- + +#--------------------------------------------------------------------------- +# Choose a C compiler. It must understand prototypes. +#----------------------------------------------------------------------------- +CC = @CC@ +CFLAGS = @CFLAGS@ +LDFLAGS = @LDFLAGS@ @DYNAMIC_LINK_FLAGS@ +#----------------------------------------------------------------------------- +# Location where object files are placed (Absolute path) +#----------------------------------------------------------------------------- +OBJDIR = @OBJDIR@ +SRCDIR = @SRCDIR@ +#----------------------------------------------------------------------------- +# Directory where the various libraries are located. +#----------------------------------------------------------------------------- +SLANG_INCLUDE = $(SRCDIR)/../src# location of slang.h +SLANG_LIB = $(SLANG_INCLUDE)/$(ARCH)objs# location of libslang.a + +#--------------------------------------------------------------------------- +# Other libraries +#--------------------------------------------------------------------------- +TCAPLIB = @TERMCAP@ @DYNAMIC_LINK_LIB@ +#TCAPLIB = -ltermcap + +#---------------------------------------------------------------------------- +# End of user configuration +#---------------------------------------------------------------------------- +@SET_MAKE@ +SHELL = /bin/sh +OTHERSTUFF = useropen pager keypad smgtest +CONFIG_H = config.h + +ALL_CFLAGS = $(CFLAGS) -Dunix -I$(SLANG_INCLUDE) + +COMPILE_CMD = $(CC) -c $(ALL_CFLAGS) +EXECLIBS = -L$(SLANG_LIB) -lslang -lm $(TCAPLIB) +EXECDEPS = $(SLANG_LIB)/libslang.a +DOT_O_DEPS = demolib.c + +#--------------------------------------------------------------------------- +all: $(OBJDIR) $(CONFIG_H) $(OTHERSTUFF) + +$(CONFIG_H) : $(SLANG_LIB)/libslang.a ../src/config.h + /bin/cp ../src/config.h $(CONFIG_H) +$(SLANG_LIB)/libslang.a : + cd ../src; $(MAKE) +# +$(OBJDIR): + @mkdir $(OBJDIR) +#--------------------------------------------------------------------------- +# Housekeeping +#--------------------------------------------------------------------------- +# The symlinks target is for my own private use. It simply creates the object +# directory as a symbolic link to a local disk instead of an NFS mounted one. +symlinks: + -/bin/rm -f $(ARCH)objs + mkdir -p $(HOME)/sys/$(ARCH)/objs/slang/demo + ln -s $(HOME)/sys/$(ARCH)/objs/slang/demo $(ARCH)objs +clean: + -/bin/rm -f $(OBJDIR)/* *~ +distclean: clean + -/bin/rm -rf $(OBJDIR) Makefile +#--------------------------------------------------------------------------- +# Everything else from configure script +#--------------------------------------------------------------------------- diff --git a/libslang/demo/Makefile.w32 b/libslang/demo/Makefile.w32 new file mode 100644 index 0000000..2455cb0 --- /dev/null +++ b/libslang/demo/Makefile.w32 @@ -0,0 +1,5 @@ +CC=gcc +smgtest: smgtest.c + $(CC) $(CFLAGS) smgtest.c -I../src -L../src/gw32objs -o smgtest -lslang +pager: pager.c + $(CC) $(CFLAGS) pager.c -I../src -L../src/gw32objs -o pager -lslang diff --git a/libslang/demo/README b/libslang/demo/README new file mode 100644 index 0000000..f50f7b0 --- /dev/null +++ b/libslang/demo/README @@ -0,0 +1,43 @@ +What's here? + +Each C file in this directory are heavily commented examples that illustrate +only one or two S-Lang features. Some C files are accompanied by a .sl file +that contains S-Lang code relevant to the example. + +If you find these demos confusing, please let me know so I can work on +improving them. + +Please note that these demos WILL NOT WORK under msdos unless the S-lang +library is compiled with the -DFLOAT_TYPE option. + +--------------------------------------------------------------------------- +pager.c: A simple file pager demo. Use pageup/down keys to scroll + through the file. It illustrates the SLsmg, SLsig, SLkp, + and SLscroll routines of the S-Lang library. This example + should be contrasted with the curses demo ../src/curses/view.c. + +keypad.c: Illustrates the slkeypad facility. + +simple.c: This file contains slightly more than the miniumum required to + embed S-Lang. It loads a file specified on the command line. + +simple.sl: An S-Lang script that prompts for a filename and returns + information about the file. Use this with the `simple' + executable. + +array.c: This example shows how to embed a C array into S-Lang allowing + access to the array from a S-Lang script. +array.sl: This script reads and writes the array specified in array.c. + +useropen.c This example shows how to specify an object that S-Lang will + interpret. S-lang already knows how to interpret code contained + in strings and files. Interpreting code from a `readline' + structure is illustrated here. The demo in ../src/calc.c uses + this technique to interpret data from S-Lang's readline routines. + +complex.c Adding an application defined data type is the focus of this + example. Specifically, a complex number type is added and the + binary and unary operators are overloaded to work with the new + type. +complex.sl A script that manipulates the complex number type defined in + complex.c. diff --git a/libslang/demo/configure b/libslang/demo/configure new file mode 100755 index 0000000..fe8e9cb --- /dev/null +++ b/libslang/demo/configure @@ -0,0 +1,1597 @@ +#! /bin/sh + +# Guess values for system-dependent variables and create Makefiles. +# Generated automatically using autoconf version 2.13 +# Copyright (C) 1992, 93, 94, 95, 96 Free Software Foundation, Inc. +# +# This configure script is free software; the Free Software Foundation +# gives unlimited permission to copy, distribute and modify it. + +# Defaults: +ac_help= +ac_default_prefix=/usr/local +# Any additions from configure.in: +ac_help="$ac_help + --enable-warnings turn on GCC compiler warnings" + +# Initialize some variables set by options. +# The variables have the same names as the options, with +# dashes changed to underlines. +build=NONE +cache_file=./config.cache +exec_prefix=NONE +host=NONE +no_create= +nonopt=NONE +no_recursion= +prefix=NONE +program_prefix=NONE +program_suffix=NONE +program_transform_name=s,x,x, +silent= +site= +srcdir= +target=NONE +verbose= +x_includes=NONE +x_libraries=NONE +bindir='${exec_prefix}/bin' +sbindir='${exec_prefix}/sbin' +libexecdir='${exec_prefix}/libexec' +datadir='${prefix}/share' +sysconfdir='${prefix}/etc' +sharedstatedir='${prefix}/com' +localstatedir='${prefix}/var' +libdir='${exec_prefix}/lib' +includedir='${prefix}/include' +oldincludedir='/usr/include' +infodir='${prefix}/info' +mandir='${prefix}/man' + +# Initialize some other variables. +subdirs= +MFLAGS= MAKEFLAGS= +SHELL=${CONFIG_SHELL-/bin/sh} +# Maximum number of lines to put in a shell here document. +ac_max_here_lines=12 + +ac_prev= +for ac_option +do + + # If the previous option needs an argument, assign it. + if test -n "$ac_prev"; then + eval "$ac_prev=\$ac_option" + ac_prev= + continue + fi + + case "$ac_option" in + -*=*) ac_optarg=`echo "$ac_option" | sed 's/[-_a-zA-Z0-9]*=//'` ;; + *) ac_optarg= ;; + esac + + # Accept the important Cygnus configure options, so we can diagnose typos. + + case "$ac_option" in + + -bindir | --bindir | --bindi | --bind | --bin | --bi) + ac_prev=bindir ;; + -bindir=* | --bindir=* | --bindi=* | --bind=* | --bin=* | --bi=*) + bindir="$ac_optarg" ;; + + -build | --build | --buil | --bui | --bu) + ac_prev=build ;; + -build=* | --build=* | --buil=* | --bui=* | --bu=*) + build="$ac_optarg" ;; + + -cache-file | --cache-file | --cache-fil | --cache-fi \ + | --cache-f | --cache- | --cache | --cach | --cac | --ca | --c) + ac_prev=cache_file ;; + -cache-file=* | --cache-file=* | --cache-fil=* | --cache-fi=* \ + | --cache-f=* | --cache-=* | --cache=* | --cach=* | --cac=* | --ca=* | --c=*) + cache_file="$ac_optarg" ;; + + -datadir | --datadir | --datadi | --datad | --data | --dat | --da) + ac_prev=datadir ;; + -datadir=* | --datadir=* | --datadi=* | --datad=* | --data=* | --dat=* \ + | --da=*) + datadir="$ac_optarg" ;; + + -disable-* | --disable-*) + ac_feature=`echo $ac_option|sed -e 's/-*disable-//'` + # Reject names that are not valid shell variable names. + if test -n "`echo $ac_feature| sed 's/[-a-zA-Z0-9_]//g'`"; then + { echo "configure: error: $ac_feature: invalid feature name" 1>&2; exit 1; } + fi + ac_feature=`echo $ac_feature| sed 's/-/_/g'` + eval "enable_${ac_feature}=no" ;; + + -enable-* | --enable-*) + ac_feature=`echo $ac_option|sed -e 's/-*enable-//' -e 's/=.*//'` + # Reject names that are not valid shell variable names. + if test -n "`echo $ac_feature| sed 's/[-_a-zA-Z0-9]//g'`"; then + { echo "configure: error: $ac_feature: invalid feature name" 1>&2; exit 1; } + fi + ac_feature=`echo $ac_feature| sed 's/-/_/g'` + case "$ac_option" in + *=*) ;; + *) ac_optarg=yes ;; + esac + eval "enable_${ac_feature}='$ac_optarg'" ;; + + -exec-prefix | --exec_prefix | --exec-prefix | --exec-prefi \ + | --exec-pref | --exec-pre | --exec-pr | --exec-p | --exec- \ + | --exec | --exe | --ex) + ac_prev=exec_prefix ;; + -exec-prefix=* | --exec_prefix=* | --exec-prefix=* | --exec-prefi=* \ + | --exec-pref=* | --exec-pre=* | --exec-pr=* | --exec-p=* | --exec-=* \ + | --exec=* | --exe=* | --ex=*) + exec_prefix="$ac_optarg" ;; + + -gas | --gas | --ga | --g) + # Obsolete; use --with-gas. + with_gas=yes ;; + + -help | --help | --hel | --he) + # Omit some internal or obsolete options to make the list less imposing. + # This message is too long to be a string in the A/UX 3.1 sh. + cat << EOF +Usage: configure [options] [host] +Options: [defaults in brackets after descriptions] +Configuration: + --cache-file=FILE cache test results in FILE + --help print this message + --no-create do not create output files + --quiet, --silent do not print \`checking...' messages + --version print the version of autoconf that created configure +Directory and file names: + --prefix=PREFIX install architecture-independent files in PREFIX + [$ac_default_prefix] + --exec-prefix=EPREFIX install architecture-dependent files in EPREFIX + [same as prefix] + --bindir=DIR user executables in DIR [EPREFIX/bin] + --sbindir=DIR system admin executables in DIR [EPREFIX/sbin] + --libexecdir=DIR program executables in DIR [EPREFIX/libexec] + --datadir=DIR read-only architecture-independent data in DIR + [PREFIX/share] + --sysconfdir=DIR read-only single-machine data in DIR [PREFIX/etc] + --sharedstatedir=DIR modifiable architecture-independent data in DIR + [PREFIX/com] + --localstatedir=DIR modifiable single-machine data in DIR [PREFIX/var] + --libdir=DIR object code libraries in DIR [EPREFIX/lib] + --includedir=DIR C header files in DIR [PREFIX/include] + --oldincludedir=DIR C header files for non-gcc in DIR [/usr/include] + --infodir=DIR info documentation in DIR [PREFIX/info] + --mandir=DIR man documentation in DIR [PREFIX/man] + --srcdir=DIR find the sources in DIR [configure dir or ..] + --program-prefix=PREFIX prepend PREFIX to installed program names + --program-suffix=SUFFIX append SUFFIX to installed program names + --program-transform-name=PROGRAM + run sed PROGRAM on installed program names +EOF + cat << EOF +Host type: + --build=BUILD configure for building on BUILD [BUILD=HOST] + --host=HOST configure for HOST [guessed] + --target=TARGET configure for TARGET [TARGET=HOST] +Features and packages: + --disable-FEATURE do not include FEATURE (same as --enable-FEATURE=no) + --enable-FEATURE[=ARG] include FEATURE [ARG=yes] + --with-PACKAGE[=ARG] use PACKAGE [ARG=yes] + --without-PACKAGE do not use PACKAGE (same as --with-PACKAGE=no) + --x-includes=DIR X include files are in DIR + --x-libraries=DIR X library files are in DIR +EOF + if test -n "$ac_help"; then + echo "--enable and --with options recognized:$ac_help" + fi + exit 0 ;; + + -host | --host | --hos | --ho) + ac_prev=host ;; + -host=* | --host=* | --hos=* | --ho=*) + host="$ac_optarg" ;; + + -includedir | --includedir | --includedi | --included | --include \ + | --includ | --inclu | --incl | --inc) + ac_prev=includedir ;; + -includedir=* | --includedir=* | --includedi=* | --included=* | --include=* \ + | --includ=* | --inclu=* | --incl=* | --inc=*) + includedir="$ac_optarg" ;; + + -infodir | --infodir | --infodi | --infod | --info | --inf) + ac_prev=infodir ;; + -infodir=* | --infodir=* | --infodi=* | --infod=* | --info=* | --inf=*) + infodir="$ac_optarg" ;; + + -libdir | --libdir | --libdi | --libd) + ac_prev=libdir ;; + -libdir=* | --libdir=* | --libdi=* | --libd=*) + libdir="$ac_optarg" ;; + + -libexecdir | --libexecdir | --libexecdi | --libexecd | --libexec \ + | --libexe | --libex | --libe) + ac_prev=libexecdir ;; + -libexecdir=* | --libexecdir=* | --libexecdi=* | --libexecd=* | --libexec=* \ + | --libexe=* | --libex=* | --libe=*) + libexecdir="$ac_optarg" ;; + + -localstatedir | --localstatedir | --localstatedi | --localstated \ + | --localstate | --localstat | --localsta | --localst \ + | --locals | --local | --loca | --loc | --lo) + ac_prev=localstatedir ;; + -localstatedir=* | --localstatedir=* | --localstatedi=* | --localstated=* \ + | --localstate=* | --localstat=* | --localsta=* | --localst=* \ + | --locals=* | --local=* | --loca=* | --loc=* | --lo=*) + localstatedir="$ac_optarg" ;; + + -mandir | --mandir | --mandi | --mand | --man | --ma | --m) + ac_prev=mandir ;; + -mandir=* | --mandir=* | --mandi=* | --mand=* | --man=* | --ma=* | --m=*) + mandir="$ac_optarg" ;; + + -nfp | --nfp | --nf) + # Obsolete; use --without-fp. + with_fp=no ;; + + -no-create | --no-create | --no-creat | --no-crea | --no-cre \ + | --no-cr | --no-c) + no_create=yes ;; + + -no-recursion | --no-recursion | --no-recursio | --no-recursi \ + | --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r) + no_recursion=yes ;; + + -oldincludedir | --oldincludedir | --oldincludedi | --oldincluded \ + | --oldinclude | --oldinclud | --oldinclu | --oldincl | --oldinc \ + | --oldin | --oldi | --old | --ol | --o) + ac_prev=oldincludedir ;; + -oldincludedir=* | --oldincludedir=* | --oldincludedi=* | --oldincluded=* \ + | --oldinclude=* | --oldinclud=* | --oldinclu=* | --oldincl=* | --oldinc=* \ + | --oldin=* | --oldi=* | --old=* | --ol=* | --o=*) + oldincludedir="$ac_optarg" ;; + + -prefix | --prefix | --prefi | --pref | --pre | --pr | --p) + ac_prev=prefix ;; + -prefix=* | --prefix=* | --prefi=* | --pref=* | --pre=* | --pr=* | --p=*) + prefix="$ac_optarg" ;; + + -program-prefix | --program-prefix | --program-prefi | --program-pref \ + | --program-pre | --program-pr | --program-p) + ac_prev=program_prefix ;; + -program-prefix=* | --program-prefix=* | --program-prefi=* \ + | --program-pref=* | --program-pre=* | --program-pr=* | --program-p=*) + program_prefix="$ac_optarg" ;; + + -program-suffix | --program-suffix | --program-suffi | --program-suff \ + | --program-suf | --program-su | --program-s) + ac_prev=program_suffix ;; + -program-suffix=* | --program-suffix=* | --program-suffi=* \ + | --program-suff=* | --program-suf=* | --program-su=* | --program-s=*) + program_suffix="$ac_optarg" ;; + + -program-transform-name | --program-transform-name \ + | --program-transform-nam | --program-transform-na \ + | --program-transform-n | --program-transform- \ + | --program-transform | --program-transfor \ + | --program-transfo | --program-transf \ + | --program-trans | --program-tran \ + | --progr-tra | --program-tr | --program-t) + ac_prev=program_transform_name ;; + -program-transform-name=* | --program-transform-name=* \ + | --program-transform-nam=* | --program-transform-na=* \ + | --program-transform-n=* | --program-transform-=* \ + | --program-transform=* | --program-transfor=* \ + | --program-transfo=* | --program-transf=* \ + | --program-trans=* | --program-tran=* \ + | --progr-tra=* | --program-tr=* | --program-t=*) + program_transform_name="$ac_optarg" ;; + + -q | -quiet | --quiet | --quie | --qui | --qu | --q \ + | -silent | --silent | --silen | --sile | --sil) + silent=yes ;; + + -sbindir | --sbindir | --sbindi | --sbind | --sbin | --sbi | --sb) + ac_prev=sbindir ;; + -sbindir=* | --sbindir=* | --sbindi=* | --sbind=* | --sbin=* \ + | --sbi=* | --sb=*) + sbindir="$ac_optarg" ;; + + -sharedstatedir | --sharedstatedir | --sharedstatedi \ + | --sharedstated | --sharedstate | --sharedstat | --sharedsta \ + | --sharedst | --shareds | --shared | --share | --shar \ + | --sha | --sh) + ac_prev=sharedstatedir ;; + -sharedstatedir=* | --sharedstatedir=* | --sharedstatedi=* \ + | --sharedstated=* | --sharedstate=* | --sharedstat=* | --sharedsta=* \ + | --sharedst=* | --shareds=* | --shared=* | --share=* | --shar=* \ + | --sha=* | --sh=*) + sharedstatedir="$ac_optarg" ;; + + -site | --site | --sit) + ac_prev=site ;; + -site=* | --site=* | --sit=*) + site="$ac_optarg" ;; + + -srcdir | --srcdir | --srcdi | --srcd | --src | --sr) + ac_prev=srcdir ;; + -srcdir=* | --srcdir=* | --srcdi=* | --srcd=* | --src=* | --sr=*) + srcdir="$ac_optarg" ;; + + -sysconfdir | --sysconfdir | --sysconfdi | --sysconfd | --sysconf \ + | --syscon | --sysco | --sysc | --sys | --sy) + ac_prev=sysconfdir ;; + -sysconfdir=* | --sysconfdir=* | --sysconfdi=* | --sysconfd=* | --sysconf=* \ + | --syscon=* | --sysco=* | --sysc=* | --sys=* | --sy=*) + sysconfdir="$ac_optarg" ;; + + -target | --target | --targe | --targ | --tar | --ta | --t) + ac_prev=target ;; + -target=* | --target=* | --targe=* | --targ=* | --tar=* | --ta=* | --t=*) + target="$ac_optarg" ;; + + -v | -verbose | --verbose | --verbos | --verbo | --verb) + verbose=yes ;; + + -version | --version | --versio | --versi | --vers) + echo "configure generated by autoconf version 2.13" + exit 0 ;; + + -with-* | --with-*) + ac_package=`echo $ac_option|sed -e 's/-*with-//' -e 's/=.*//'` + # Reject names that are not valid shell variable names. + if test -n "`echo $ac_package| sed 's/[-_a-zA-Z0-9]//g'`"; then + { echo "configure: error: $ac_package: invalid package name" 1>&2; exit 1; } + fi + ac_package=`echo $ac_package| sed 's/-/_/g'` + case "$ac_option" in + *=*) ;; + *) ac_optarg=yes ;; + esac + eval "with_${ac_package}='$ac_optarg'" ;; + + -without-* | --without-*) + ac_package=`echo $ac_option|sed -e 's/-*without-//'` + # Reject names that are not valid shell variable names. + if test -n "`echo $ac_package| sed 's/[-a-zA-Z0-9_]//g'`"; then + { echo "configure: error: $ac_package: invalid package name" 1>&2; exit 1; } + fi + ac_package=`echo $ac_package| sed 's/-/_/g'` + eval "with_${ac_package}=no" ;; + + --x) + # Obsolete; use --with-x. + with_x=yes ;; + + -x-includes | --x-includes | --x-include | --x-includ | --x-inclu \ + | --x-incl | --x-inc | --x-in | --x-i) + ac_prev=x_includes ;; + -x-includes=* | --x-includes=* | --x-include=* | --x-includ=* | --x-inclu=* \ + | --x-incl=* | --x-inc=* | --x-in=* | --x-i=*) + x_includes="$ac_optarg" ;; + + -x-libraries | --x-libraries | --x-librarie | --x-librari \ + | --x-librar | --x-libra | --x-libr | --x-lib | --x-li | --x-l) + ac_prev=x_libraries ;; + -x-libraries=* | --x-libraries=* | --x-librarie=* | --x-librari=* \ + | --x-librar=* | --x-libra=* | --x-libr=* | --x-lib=* | --x-li=* | --x-l=*) + x_libraries="$ac_optarg" ;; + + -*) { echo "configure: error: $ac_option: invalid option; use --help to show usage" 1>&2; exit 1; } + ;; + + *) + if test -n "`echo $ac_option| sed 's/[-a-z0-9.]//g'`"; then + echo "configure: warning: $ac_option: invalid host type" 1>&2 + fi + if test "x$nonopt" != xNONE; then + { echo "configure: error: can only configure for one host and one target at a time" 1>&2; exit 1; } + fi + nonopt="$ac_option" + ;; + + esac +done + +if test -n "$ac_prev"; then + { echo "configure: error: missing argument to --`echo $ac_prev | sed 's/_/-/g'`" 1>&2; exit 1; } +fi + +trap 'rm -fr conftest* confdefs* core core.* *.core $ac_clean_files; exit 1' 1 2 15 + +# File descriptor usage: +# 0 standard input +# 1 file creation +# 2 errors and warnings +# 3 some systems may open it to /dev/tty +# 4 used on the Kubota Titan +# 6 checking for... messages and results +# 5 compiler messages saved in config.log +if test "$silent" = yes; then + exec 6>/dev/null +else + exec 6>&1 +fi +exec 5>./config.log + +echo "\ +This file contains any messages produced by compilers while +running configure, to aid debugging if configure makes a mistake. +" 1>&5 + +# Strip out --no-create and --no-recursion so they do not pile up. +# Also quote any args containing shell metacharacters. +ac_configure_args= +for ac_arg +do + case "$ac_arg" in + -no-create | --no-create | --no-creat | --no-crea | --no-cre \ + | --no-cr | --no-c) ;; + -no-recursion | --no-recursion | --no-recursio | --no-recursi \ + | --no-recurs | --no-recur | --no-recu | --no-rec | --no-re | --no-r) ;; + *" "*|*" "*|*[\[\]\~\#\$\^\&\*\(\)\{\}\\\|\;\<\>\?]*) + ac_configure_args="$ac_configure_args '$ac_arg'" ;; + *) ac_configure_args="$ac_configure_args $ac_arg" ;; + esac +done + +# NLS nuisances. +# Only set these to C if already set. These must not be set unconditionally +# because not all systems understand e.g. LANG=C (notably SCO). +# Fixing LC_MESSAGES prevents Solaris sh from translating var values in `set'! +# Non-C LC_CTYPE values break the ctype check. +if test "${LANG+set}" = set; then LANG=C; export LANG; fi +if test "${LC_ALL+set}" = set; then LC_ALL=C; export LC_ALL; fi +if test "${LC_MESSAGES+set}" = set; then LC_MESSAGES=C; export LC_MESSAGES; fi +if test "${LC_CTYPE+set}" = set; then LC_CTYPE=C; export LC_CTYPE; fi + +# confdefs.h avoids OS command line length limits that DEFS can exceed. +rm -rf conftest* confdefs.h +# AIX cpp loses on an empty file, so make sure it contains at least a newline. +echo > confdefs.h + +# A filename unique to this package, relative to the directory that +# configure is in, which we can look for to find out if srcdir is correct. +ac_unique_file=smgtest.c + +# Find the source files, if location was not specified. +if test -z "$srcdir"; then + ac_srcdir_defaulted=yes + # Try the directory containing this script, then its parent. + ac_prog=$0 + ac_confdir=`echo $ac_prog|sed 's%/[^/][^/]*$%%'` + test "x$ac_confdir" = "x$ac_prog" && ac_confdir=. + srcdir=$ac_confdir + if test ! -r $srcdir/$ac_unique_file; then + srcdir=.. + fi +else + ac_srcdir_defaulted=no +fi +if test ! -r $srcdir/$ac_unique_file; then + if test "$ac_srcdir_defaulted" = yes; then + { echo "configure: error: can not find sources in $ac_confdir or .." 1>&2; exit 1; } + else + { echo "configure: error: can not find sources in $srcdir" 1>&2; exit 1; } + fi +fi +srcdir=`echo "${srcdir}" | sed 's%\([^/]\)/*$%\1%'` + +# Prefer explicitly selected file to automatically selected ones. +if test -z "$CONFIG_SITE"; then + if test "x$prefix" != xNONE; then + CONFIG_SITE="$prefix/share/config.site $prefix/etc/config.site" + else + CONFIG_SITE="$ac_default_prefix/share/config.site $ac_default_prefix/etc/config.site" + fi +fi +for ac_site_file in $CONFIG_SITE; do + if test -r "$ac_site_file"; then + echo "loading site script $ac_site_file" + . "$ac_site_file" + fi +done + +if test -r "$cache_file"; then + echo "loading cache $cache_file" + . $cache_file +else + echo "creating cache $cache_file" + > $cache_file +fi + +ac_ext=c +# CFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. +ac_cpp='$CPP $CPPFLAGS' +ac_compile='${CC-cc} -c $CFLAGS $CPPFLAGS conftest.$ac_ext 1>&5' +ac_link='${CC-cc} -o conftest${ac_exeext} $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' +cross_compiling=$ac_cv_prog_cc_cross + +ac_exeext= +ac_objext=o +if (echo "testing\c"; echo 1,2,3) | grep c >/dev/null; then + # Stardent Vistra SVR4 grep lacks -e, says ghazi@caip.rutgers.edu. + if (echo -n testing; echo 1,2,3) | sed s/-n/xn/ | grep xn >/dev/null; then + ac_n= ac_c=' +' ac_t=' ' + else + ac_n=-n ac_c= ac_t= + fi +else + ac_n= ac_c='\c' ac_t= +fi + + + +ac_aux_dir= +for ac_dir in ../autoconf $srcdir/../autoconf; do + if test -f $ac_dir/install-sh; then + ac_aux_dir=$ac_dir + ac_install_sh="$ac_aux_dir/install-sh -c" + break + elif test -f $ac_dir/install.sh; then + ac_aux_dir=$ac_dir + ac_install_sh="$ac_aux_dir/install.sh -c" + break + fi +done +if test -z "$ac_aux_dir"; then + { echo "configure: error: can not find install-sh or install.sh in ../autoconf $srcdir/../autoconf" 1>&2; exit 1; } +fi +ac_config_guess=$ac_aux_dir/config.guess +ac_config_sub=$ac_aux_dir/config.sub +ac_configure=$ac_aux_dir/configure # This should be Cygnus configure. + + + +#These variable are initialized by JD init function +CONFIG_DIR=`pwd` +cd $srcdir +if test "`pwd`" != "$CONFIG_DIR" + then + { echo "configure: error: "This software does not support configuring from another directory. See the INSTALL file"" 1>&2; exit 1; } + fi +# Note: these will differ if one is a symbolic link +if test -f /usr/bin/dirname; then + JD_Above_Dir=`dirname $CONFIG_DIR` +else +# system is a loser + JD_Above_Dir=`cd ..;pwd` +fi +JD_Above_Dir2=`cd ..;pwd` + + +# Extract the first word of "gcc", so it can be a program name with args. +set dummy gcc; ac_word=$2 +echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 +echo "configure:569: checking for $ac_word" >&5 +if eval "test \"`echo '$''{'ac_cv_prog_CC'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else + IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" + ac_dummy="$PATH" + for ac_dir in $ac_dummy; do + test -z "$ac_dir" && ac_dir=. + if test -f $ac_dir/$ac_word; then + ac_cv_prog_CC="gcc" + break + fi + done + IFS="$ac_save_ifs" +fi +fi +CC="$ac_cv_prog_CC" +if test -n "$CC"; then + echo "$ac_t""$CC" 1>&6 +else + echo "$ac_t""no" 1>&6 +fi + +if test -z "$CC"; then + # Extract the first word of "cc", so it can be a program name with args. +set dummy cc; ac_word=$2 +echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 +echo "configure:599: checking for $ac_word" >&5 +if eval "test \"`echo '$''{'ac_cv_prog_CC'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else + IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" + ac_prog_rejected=no + ac_dummy="$PATH" + for ac_dir in $ac_dummy; do + test -z "$ac_dir" && ac_dir=. + if test -f $ac_dir/$ac_word; then + if test "$ac_dir/$ac_word" = "/usr/ucb/cc"; then + ac_prog_rejected=yes + continue + fi + ac_cv_prog_CC="cc" + break + fi + done + IFS="$ac_save_ifs" +if test $ac_prog_rejected = yes; then + # We found a bogon in the path, so make sure we never use it. + set dummy $ac_cv_prog_CC + shift + if test $# -gt 0; then + # We chose a different compiler from the bogus one. + # However, it has the same basename, so the bogon will be chosen + # first if we set CC to just the basename; use the full file name. + shift + set dummy "$ac_dir/$ac_word" "$@" + shift + ac_cv_prog_CC="$@" + fi +fi +fi +fi +CC="$ac_cv_prog_CC" +if test -n "$CC"; then + echo "$ac_t""$CC" 1>&6 +else + echo "$ac_t""no" 1>&6 +fi + + if test -z "$CC"; then + case "`uname -s`" in + *win32* | *WIN32*) + # Extract the first word of "cl", so it can be a program name with args. +set dummy cl; ac_word=$2 +echo $ac_n "checking for $ac_word""... $ac_c" 1>&6 +echo "configure:650: checking for $ac_word" >&5 +if eval "test \"`echo '$''{'ac_cv_prog_CC'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + if test -n "$CC"; then + ac_cv_prog_CC="$CC" # Let the user override the test. +else + IFS="${IFS= }"; ac_save_ifs="$IFS"; IFS=":" + ac_dummy="$PATH" + for ac_dir in $ac_dummy; do + test -z "$ac_dir" && ac_dir=. + if test -f $ac_dir/$ac_word; then + ac_cv_prog_CC="cl" + break + fi + done + IFS="$ac_save_ifs" +fi +fi +CC="$ac_cv_prog_CC" +if test -n "$CC"; then + echo "$ac_t""$CC" 1>&6 +else + echo "$ac_t""no" 1>&6 +fi + ;; + esac + fi + test -z "$CC" && { echo "configure: error: no acceptable cc found in \$PATH" 1>&2; exit 1; } +fi + +echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works""... $ac_c" 1>&6 +echo "configure:682: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) works" >&5 + +ac_ext=c +# CFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. +ac_cpp='$CPP $CPPFLAGS' +ac_compile='${CC-cc} -c $CFLAGS $CPPFLAGS conftest.$ac_ext 1>&5' +ac_link='${CC-cc} -o conftest${ac_exeext} $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' +cross_compiling=$ac_cv_prog_cc_cross + +cat > conftest.$ac_ext << EOF + +#line 693 "configure" +#include "confdefs.h" + +main(){return(0);} +EOF +if { (eval echo configure:698: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then + ac_cv_prog_cc_works=yes + # If we can't run a trivial program, we are probably using a cross compiler. + if (./conftest; exit) 2>/dev/null; then + ac_cv_prog_cc_cross=no + else + ac_cv_prog_cc_cross=yes + fi +else + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + ac_cv_prog_cc_works=no +fi +rm -fr conftest* +ac_ext=c +# CFLAGS is not in ac_cpp because -g, -O, etc. are not valid cpp options. +ac_cpp='$CPP $CPPFLAGS' +ac_compile='${CC-cc} -c $CFLAGS $CPPFLAGS conftest.$ac_ext 1>&5' +ac_link='${CC-cc} -o conftest${ac_exeext} $CFLAGS $CPPFLAGS $LDFLAGS conftest.$ac_ext $LIBS 1>&5' +cross_compiling=$ac_cv_prog_cc_cross + +echo "$ac_t""$ac_cv_prog_cc_works" 1>&6 +if test $ac_cv_prog_cc_works = no; then + { echo "configure: error: installation or configuration problem: C compiler cannot create executables." 1>&2; exit 1; } +fi +echo $ac_n "checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler""... $ac_c" 1>&6 +echo "configure:724: checking whether the C compiler ($CC $CFLAGS $LDFLAGS) is a cross-compiler" >&5 +echo "$ac_t""$ac_cv_prog_cc_cross" 1>&6 +cross_compiling=$ac_cv_prog_cc_cross + +echo $ac_n "checking whether we are using GNU C""... $ac_c" 1>&6 +echo "configure:729: checking whether we are using GNU C" >&5 +if eval "test \"`echo '$''{'ac_cv_prog_gcc'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + cat > conftest.c <<EOF +#ifdef __GNUC__ + yes; +#endif +EOF +if { ac_try='${CC-cc} -E conftest.c'; { (eval echo configure:738: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; }; } | egrep yes >/dev/null 2>&1; then + ac_cv_prog_gcc=yes +else + ac_cv_prog_gcc=no +fi +fi + +echo "$ac_t""$ac_cv_prog_gcc" 1>&6 + +if test $ac_cv_prog_gcc = yes; then + GCC=yes +else + GCC= +fi + +ac_test_CFLAGS="${CFLAGS+set}" +ac_save_CFLAGS="$CFLAGS" +CFLAGS= +echo $ac_n "checking whether ${CC-cc} accepts -g""... $ac_c" 1>&6 +echo "configure:757: checking whether ${CC-cc} accepts -g" >&5 +if eval "test \"`echo '$''{'ac_cv_prog_cc_g'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + echo 'void f(){}' > conftest.c +if test -z "`${CC-cc} -g -c conftest.c 2>&1`"; then + ac_cv_prog_cc_g=yes +else + ac_cv_prog_cc_g=no +fi +rm -f conftest* + +fi + +echo "$ac_t""$ac_cv_prog_cc_g" 1>&6 +if test "$ac_test_CFLAGS" = set; then + CFLAGS="$ac_save_CFLAGS" +elif test $ac_cv_prog_cc_g = yes; then + if test "$GCC" = yes; then + CFLAGS="-g -O2" + else + CFLAGS="-g" + fi +else + if test "$GCC" = yes; then + CFLAGS="-O2" + else + CFLAGS= + fi +fi + +echo $ac_n "checking how to run the C preprocessor""... $ac_c" 1>&6 +echo "configure:789: checking how to run the C preprocessor" >&5 +# On Suns, sometimes $CPP names a directory. +if test -n "$CPP" && test -d "$CPP"; then + CPP= +fi +if test -z "$CPP"; then +if eval "test \"`echo '$''{'ac_cv_prog_CPP'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + # This must be in double quotes, not single quotes, because CPP may get + # substituted into the Makefile and "${CC-cc}" will confuse make. + CPP="${CC-cc} -E" + # On the NeXT, cc -E runs the code through the compiler's parser, + # not just through cpp. + cat > conftest.$ac_ext <<EOF +#line 804 "configure" +#include "confdefs.h" +#include <assert.h> +Syntax Error +EOF +ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" +{ (eval echo configure:810: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` +if test -z "$ac_err"; then + : +else + echo "$ac_err" >&5 + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + CPP="${CC-cc} -E -traditional-cpp" + cat > conftest.$ac_ext <<EOF +#line 821 "configure" +#include "confdefs.h" +#include <assert.h> +Syntax Error +EOF +ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" +{ (eval echo configure:827: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` +if test -z "$ac_err"; then + : +else + echo "$ac_err" >&5 + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + CPP="${CC-cc} -nologo -E" + cat > conftest.$ac_ext <<EOF +#line 838 "configure" +#include "confdefs.h" +#include <assert.h> +Syntax Error +EOF +ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" +{ (eval echo configure:844: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` +if test -z "$ac_err"; then + : +else + echo "$ac_err" >&5 + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + CPP=/lib/cpp +fi +rm -f conftest* +fi +rm -f conftest* +fi +rm -f conftest* + ac_cv_prog_CPP="$CPP" +fi + CPP="$ac_cv_prog_CPP" +else + ac_cv_prog_CPP="$CPP" +fi +echo "$ac_t""$CPP" 1>&6 + +if test $ac_cv_prog_gcc = yes; then + echo $ac_n "checking whether ${CC-cc} needs -traditional""... $ac_c" 1>&6 +echo "configure:870: checking whether ${CC-cc} needs -traditional" >&5 +if eval "test \"`echo '$''{'ac_cv_prog_gcc_traditional'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + ac_pattern="Autoconf.*'x'" + cat > conftest.$ac_ext <<EOF +#line 876 "configure" +#include "confdefs.h" +#include <sgtty.h> +Autoconf TIOCGETP +EOF +if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | + egrep "$ac_pattern" >/dev/null 2>&1; then + rm -rf conftest* + ac_cv_prog_gcc_traditional=yes +else + rm -rf conftest* + ac_cv_prog_gcc_traditional=no +fi +rm -f conftest* + + + if test $ac_cv_prog_gcc_traditional = no; then + cat > conftest.$ac_ext <<EOF +#line 894 "configure" +#include "confdefs.h" +#include <termio.h> +Autoconf TCGETA +EOF +if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | + egrep "$ac_pattern" >/dev/null 2>&1; then + rm -rf conftest* + ac_cv_prog_gcc_traditional=yes +fi +rm -f conftest* + + fi +fi + +echo "$ac_t""$ac_cv_prog_gcc_traditional" 1>&6 + if test $ac_cv_prog_gcc_traditional = yes; then + CC="$CC -traditional" + fi +fi + +echo $ac_n "checking for POSIXized ISC""... $ac_c" 1>&6 +echo "configure:916: checking for POSIXized ISC" >&5 +if test -d /etc/conf/kconfig.d && + grep _POSIX_VERSION /usr/include/sys/unistd.h >/dev/null 2>&1 +then + echo "$ac_t""yes" 1>&6 + ISC=yes # If later tests want to check for ISC. + cat >> confdefs.h <<\EOF +#define _POSIX_SOURCE 1 +EOF + + if test "$GCC" = yes; then + CC="$CC -posix" + else + CC="$CC -Xp" + fi +else + echo "$ac_t""no" 1>&6 + ISC= +fi + +echo $ac_n "checking for AIX""... $ac_c" 1>&6 +echo "configure:937: checking for AIX" >&5 +cat > conftest.$ac_ext <<EOF +#line 939 "configure" +#include "confdefs.h" +#ifdef _AIX + yes +#endif + +EOF +if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | + egrep "yes" >/dev/null 2>&1; then + rm -rf conftest* + echo "$ac_t""yes" 1>&6; cat >> confdefs.h <<\EOF +#define _ALL_SOURCE 1 +EOF + +else + rm -rf conftest* + echo "$ac_t""no" 1>&6 +fi +rm -f conftest* + + + +cat > conftest.$ac_ext <<EOF +#line 962 "configure" +#include "confdefs.h" +#ifdef hpux + yes +#endif + +EOF +if (eval "$ac_cpp conftest.$ac_ext") 2>&5 | + egrep "yes" >/dev/null 2>&1; then + rm -rf conftest* + +cat >> confdefs.h <<\EOF +#define _HPUX_SOURCE 1 +EOF + +if test "$CC" = cc; then CC="cc -Ae"; fi + +fi +rm -f conftest* +echo $ac_n "checking C compiler that understands ANSI prototypes""... $ac_c" 1>&6 +echo "configure:982: checking C compiler that understands ANSI prototypes" >&5 +cat > conftest.$ac_ext <<EOF +#line 984 "configure" +#include "confdefs.h" + +int main() { + + extern int silly (int); +; return 0; } +EOF +if { (eval echo configure:992: \"$ac_compile\") 1>&5; (eval $ac_compile) 2>&5; }; then + rm -rf conftest* + + echo "$ac_t""$CC looks ok. Good." 1>&6 +else + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + + echo "$ac_t""$CC is not a good enough compiler" 1>&6 + { echo "configure: error: Set env variable CC to your ANSI compiler and rerun configure." 1>&2; exit 1; } + +fi +rm -f conftest* + +echo $ac_n "checking whether ${MAKE-make} sets \${MAKE}""... $ac_c" 1>&6 +echo "configure:1008: checking whether ${MAKE-make} sets \${MAKE}" >&5 +set dummy ${MAKE-make}; ac_make=`echo "$2" | sed 'y%./+-%__p_%'` +if eval "test \"`echo '$''{'ac_cv_prog_make_${ac_make}_set'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + cat > conftestmake <<\EOF +all: + @echo 'ac_maketemp="${MAKE}"' +EOF +# GNU make sometimes prints "make[1]: Entering...", which would confuse us. +eval `${MAKE-make} -f conftestmake 2>/dev/null | grep temp=` +if test -n "$ac_maketemp"; then + eval ac_cv_prog_make_${ac_make}_set=yes +else + eval ac_cv_prog_make_${ac_make}_set=no +fi +rm -f conftestmake +fi +if eval "test \"`echo '$ac_cv_prog_make_'${ac_make}_set`\" = yes"; then + echo "$ac_t""yes" 1>&6 + SET_MAKE= +else + echo "$ac_t""no" 1>&6 + SET_MAKE="MAKE=${MAKE-make}" +fi + + + +# Make sure we can run config.sub. +if ${CONFIG_SHELL-/bin/sh} $ac_config_sub sun4 >/dev/null 2>&1; then : +else { echo "configure: error: can not run $ac_config_sub" 1>&2; exit 1; } +fi + +echo $ac_n "checking host system type""... $ac_c" 1>&6 +echo "configure:1042: checking host system type" >&5 + +host_alias=$host +case "$host_alias" in +NONE) + case $nonopt in + NONE) + if host_alias=`${CONFIG_SHELL-/bin/sh} $ac_config_guess`; then : + else { echo "configure: error: can not guess host type; you must specify one" 1>&2; exit 1; } + fi ;; + *) host_alias=$nonopt ;; + esac ;; +esac + +host=`${CONFIG_SHELL-/bin/sh} $ac_config_sub $host_alias` +host_cpu=`echo $host | sed 's/^\([^-]*\)-\([^-]*\)-\(.*\)$/\1/'` +host_vendor=`echo $host | sed 's/^\([^-]*\)-\([^-]*\)-\(.*\)$/\2/'` +host_os=`echo $host | sed 's/^\([^-]*\)-\([^-]*\)-\(.*\)$/\3/'` +echo "$ac_t""$host" 1>&6 + + +DYNAMIC_LINK_LIB="" +ac_safe=`echo "dlfcn.h" | sed 'y%./+-%__p_%'` +echo $ac_n "checking for dlfcn.h""... $ac_c" 1>&6 +echo "configure:1066: checking for dlfcn.h" >&5 +if eval "test \"`echo '$''{'ac_cv_header_$ac_safe'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + cat > conftest.$ac_ext <<EOF +#line 1071 "configure" +#include "confdefs.h" +#include <dlfcn.h> +EOF +ac_try="$ac_cpp conftest.$ac_ext >/dev/null 2>conftest.out" +{ (eval echo configure:1076: \"$ac_try\") 1>&5; (eval $ac_try) 2>&5; } +ac_err=`grep -v '^ *+' conftest.out | grep -v "^conftest.${ac_ext}\$"` +if test -z "$ac_err"; then + rm -rf conftest* + eval "ac_cv_header_$ac_safe=yes" +else + echo "$ac_err" >&5 + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + eval "ac_cv_header_$ac_safe=no" +fi +rm -f conftest* +fi +if eval "test \"`echo '$ac_cv_header_'$ac_safe`\" = yes"; then + echo "$ac_t""yes" 1>&6 + + cat >> confdefs.h <<\EOF +#define HAVE_DLFCN_H 1 +EOF + + echo $ac_n "checking for dlopen in -ldl""... $ac_c" 1>&6 +echo "configure:1098: checking for dlopen in -ldl" >&5 +ac_lib_var=`echo dl'_'dlopen | sed 'y%./+-%__p_%'` +if eval "test \"`echo '$''{'ac_cv_lib_$ac_lib_var'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + ac_save_LIBS="$LIBS" +LIBS="-ldl $LIBS" +cat > conftest.$ac_ext <<EOF +#line 1106 "configure" +#include "confdefs.h" +/* Override any gcc2 internal prototype to avoid an error. */ +/* We use char because int might match the return type of a gcc2 + builtin and then its argument prototype would still apply. */ +char dlopen(); + +int main() { +dlopen() +; return 0; } +EOF +if { (eval echo configure:1117: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then + rm -rf conftest* + eval "ac_cv_lib_$ac_lib_var=yes" +else + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + eval "ac_cv_lib_$ac_lib_var=no" +fi +rm -f conftest* +LIBS="$ac_save_LIBS" + +fi +if eval "test \"`echo '$ac_cv_lib_'$ac_lib_var`\" = yes"; then + echo "$ac_t""yes" 1>&6 + + DYNAMIC_LINK_LIB="-ldl" + cat >> confdefs.h <<\EOF +#define HAVE_DLOPEN 1 +EOF + + +else + echo "$ac_t""no" 1>&6 + + echo $ac_n "checking for dlopen""... $ac_c" 1>&6 +echo "configure:1143: checking for dlopen" >&5 +if eval "test \"`echo '$''{'ac_cv_func_dlopen'+set}'`\" = set"; then + echo $ac_n "(cached) $ac_c" 1>&6 +else + cat > conftest.$ac_ext <<EOF +#line 1148 "configure" +#include "confdefs.h" +/* System header to define __stub macros and hopefully few prototypes, + which can conflict with char dlopen(); below. */ +#include <assert.h> +/* Override any gcc2 internal prototype to avoid an error. */ +/* We use char because int might match the return type of a gcc2 + builtin and then its argument prototype would still apply. */ +char dlopen(); + +int main() { + +/* The GNU C library defines this for functions which it implements + to always fail with ENOSYS. Some functions are actually named + something starting with __ and the normal name is an alias. */ +#if defined (__stub_dlopen) || defined (__stub___dlopen) +choke me +#else +dlopen(); +#endif + +; return 0; } +EOF +if { (eval echo configure:1171: \"$ac_link\") 1>&5; (eval $ac_link) 2>&5; } && test -s conftest${ac_exeext}; then + rm -rf conftest* + eval "ac_cv_func_dlopen=yes" +else + echo "configure: failed program was:" >&5 + cat conftest.$ac_ext >&5 + rm -rf conftest* + eval "ac_cv_func_dlopen=no" +fi +rm -f conftest* +fi + +if eval "test \"`echo '$ac_cv_func_'dlopen`\" = yes"; then + echo "$ac_t""yes" 1>&6 + cat >> confdefs.h <<\EOF +#define HAVE_DLOPEN 1 +EOF + +else + echo "$ac_t""no" 1>&6 +fi + + if test "$ac_cv_func_dlopen" != yes + then + echo "configure: warning: cannot perform dynamic linking" 1>&2 + fi + +fi + +else + echo "$ac_t""no" 1>&6 +fi + + + +case "$host_os" in + linux ) + DYNAMIC_LINK_FLAGS="-Wl,-export-dynamic" + ;; + * ) + DYNAMIC_LINK_FLAGS="" + ;; +esac + + + +JD_Terminfo_Dirs="/usr/lib/terminfo \ + /usr/share/terminfo \ + /usr/share/lib/terminfo \ + /usr/local/lib/terminfo" + +TERMCAP=-ltermcap + +echo $ac_n "checking for Terminfo""... $ac_c" 1>&6 +echo "configure:1225: checking for Terminfo" >&5 +for terminfo_dir in $JD_Terminfo_Dirs +do + if test -d $terminfo_dir + then + echo "$ac_t""yes" 1>&6 + TERMCAP="" + break + fi +done +if test "$TERMCAP"; then + echo "$ac_t""no" 1>&6 + cat >> confdefs.h <<\EOF +#define USE_TERMCAP 1 +EOF + +fi + + +# Check whether --enable-warnings or --disable-warnings was given. +if test "${enable_warnings+set}" = set; then + enableval="$enable_warnings" + gcc_warnings=$enableval +fi + +if test -n "$GCC" +then + CFLAGS="$CFLAGS -fno-strength-reduce" + if test -n "$gcc_warnings" + then + CFLAGS="$CFLAGS -Wall -W -pedantic -Winline -Wmissing-prototypes \ + -Wnested-externs -Wpointer-arith -Wcast-align -Wshadow -Wstrict-prototypes" + # Now trim excess whitespace + CFLAGS=`echo $CFLAGS` + fi +fi + + + +#--------------------------------------------------------------------------- +# Set the source directory and object directory. The makefile assumes an +# abcolute path name. This is because src/Makefile cds to OBJDIR and compiles +# the src file which is in SRCDIR +#--------------------------------------------------------------------------- +SRCDIR=$CONFIG_DIR +if test "." != "." +then + if test -z "." + then + SRCDIR=$SRCDIR/src + else + SRCDIR=$SRCDIR/. + fi +fi + +OBJDIR=$SRCDIR/"$ARCH"objs +ELFDIR=$SRCDIR/elf"$ARCH"objs + + + PROGRAM_HFILES="" + PROGRAM_OFILES="" + PROGRAM_CFILES="" + PROGRAM_OBJECTS="" + PROGRAM_ELFOBJECTS="" + PROGRAM_OBJECT_RULES="" + PROGRAM_ELF_ORULES="" + if test -z "modules.unx" + then + Program_Modules="" + else + comment_re="^#" + Program_Modules=`grep -v '$comment_re' modules.unx | awk '{print $1}'` + Program_H_Modules=`grep -v '$comment_re' modules.unx | awk '{print $2}'` + for program_module in $Program_H_Modules; do + PROGRAM_HFILES="$PROGRAM_HFILES $program_module" + done + fi + for program_module in $Program_Modules; do + PROGRAM_OFILES="$PROGRAM_OFILES $program_module.o" + PROGRAM_CFILES="$PROGRAM_CFILES $program_module.c" + PROGRAM_OBJECTS="$PROGRAM_OBJECTS \$(OBJDIR)/$program_module.o" + PROGRAM_ELFOBJECTS="$PROGRAM_ELFOBJECTS \$(ELFDIR)/$program_module.o" + done + + +trap '' 1 2 15 +cat > confcache <<\EOF +# This file is a shell script that caches the results of configure +# tests run on this system so they can be shared between configure +# scripts and configure runs. It is not useful on other systems. +# If it contains results you don't want to keep, you may remove or edit it. +# +# By default, configure uses ./config.cache as the cache file, +# creating it if it does not exist already. You can give configure +# the --cache-file=FILE option to use a different cache file; that is +# what configure does when it calls configure scripts in +# subdirectories, so they share the cache. +# Giving --cache-file=/dev/null disables caching, for debugging configure. +# config.status only pays attention to the cache file if you give it the +# --recheck option to rerun configure. +# +EOF +# The following way of writing the cache mishandles newlines in values, +# but we know of no workaround that is simple, portable, and efficient. +# So, don't put newlines in cache variables' values. +# Ultrix sh set writes to stderr and can't be redirected directly, +# and sets the high bit in the cache file unless we assign to the vars. +(set) 2>&1 | + case `(ac_space=' '; set | grep ac_space) 2>&1` in + *ac_space=\ *) + # `set' does not quote correctly, so add quotes (double-quote substitution + # turns \\\\ into \\, and sed turns \\ into \). + sed -n \ + -e "s/'/'\\\\''/g" \ + -e "s/^\\([a-zA-Z0-9_]*_cv_[a-zA-Z0-9_]*\\)=\\(.*\\)/\\1=\${\\1='\\2'}/p" + ;; + *) + # `set' quotes correctly as required by POSIX, so do not add quotes. + sed -n -e 's/^\([a-zA-Z0-9_]*_cv_[a-zA-Z0-9_]*\)=\(.*\)/\1=${\1=\2}/p' + ;; + esac >> confcache +if cmp -s $cache_file confcache; then + : +else + if test -w $cache_file; then + echo "updating cache $cache_file" + cat confcache > $cache_file + else + echo "not updating unwritable cache $cache_file" + fi +fi +rm -f confcache + +trap 'rm -fr conftest* confdefs* core core.* *.core $ac_clean_files; exit 1' 1 2 15 + +test "x$prefix" = xNONE && prefix=$ac_default_prefix +# Let make expand exec_prefix. +test "x$exec_prefix" = xNONE && exec_prefix='${prefix}' + +# Any assignment to VPATH causes Sun make to only execute +# the first set of double-colon rules, so remove it if not needed. +# If there is a colon in the path, we need to keep it. +if test "x$srcdir" = x.; then + ac_vpsub='/^[ ]*VPATH[ ]*=[^:]*$/d' +fi + +trap 'rm -f $CONFIG_STATUS conftest*; exit 1' 1 2 15 + +# Transform confdefs.h into DEFS. +# Protect against shell expansion while executing Makefile rules. +# Protect against Makefile macro expansion. +cat > conftest.defs <<\EOF +s%#define \([A-Za-z_][A-Za-z0-9_]*\) *\(.*\)%-D\1=\2%g +s%[ `~#$^&*(){}\\|;'"<>?]%\\&%g +s%\[%\\&%g +s%\]%\\&%g +s%\$%$$%g +EOF +DEFS=`sed -f conftest.defs confdefs.h | tr '\012' ' '` +rm -f conftest.defs + + +# Without the "./", some shells look in PATH for config.status. +: ${CONFIG_STATUS=./config.status} + +echo creating $CONFIG_STATUS +rm -f $CONFIG_STATUS +cat > $CONFIG_STATUS <<EOF +#! /bin/sh +# Generated automatically by configure. +# Run this file to recreate the current configuration. +# This directory was configured as follows, +# on host `(hostname || uname -n) 2>/dev/null | sed 1q`: +# +# $0 $ac_configure_args +# +# Compiler output produced by configure, useful for debugging +# configure, is in ./config.log if it exists. + +ac_cs_usage="Usage: $CONFIG_STATUS [--recheck] [--version] [--help]" +for ac_option +do + case "\$ac_option" in + -recheck | --recheck | --rechec | --reche | --rech | --rec | --re | --r) + echo "running \${CONFIG_SHELL-/bin/sh} $0 $ac_configure_args --no-create --no-recursion" + exec \${CONFIG_SHELL-/bin/sh} $0 $ac_configure_args --no-create --no-recursion ;; + -version | --version | --versio | --versi | --vers | --ver | --ve | --v) + echo "$CONFIG_STATUS generated by autoconf version 2.13" + exit 0 ;; + -help | --help | --hel | --he | --h) + echo "\$ac_cs_usage"; exit 0 ;; + *) echo "\$ac_cs_usage"; exit 1 ;; + esac +done + +ac_given_srcdir=$srcdir + +trap 'rm -fr `echo "Makefile" | sed "s/:[^ ]*//g"` conftest*; exit 1' 1 2 15 +EOF +cat >> $CONFIG_STATUS <<EOF + +# Protect against being on the right side of a sed subst in config.status. +sed 's/%@/@@/; s/@%/@@/; s/%g\$/@g/; /@g\$/s/[\\\\&%]/\\\\&/g; + s/@@/%@/; s/@@/@%/; s/@g\$/%g/' > conftest.subs <<\\CEOF +$ac_vpsub +$extrasub +s%@SHELL@%$SHELL%g +s%@CFLAGS@%$CFLAGS%g +s%@CPPFLAGS@%$CPPFLAGS%g +s%@CXXFLAGS@%$CXXFLAGS%g +s%@FFLAGS@%$FFLAGS%g +s%@DEFS@%$DEFS%g +s%@LDFLAGS@%$LDFLAGS%g +s%@LIBS@%$LIBS%g +s%@exec_prefix@%$exec_prefix%g +s%@prefix@%$prefix%g +s%@program_transform_name@%$program_transform_name%g +s%@bindir@%$bindir%g +s%@sbindir@%$sbindir%g +s%@libexecdir@%$libexecdir%g +s%@datadir@%$datadir%g +s%@sysconfdir@%$sysconfdir%g +s%@sharedstatedir@%$sharedstatedir%g +s%@localstatedir@%$localstatedir%g +s%@libdir@%$libdir%g +s%@includedir@%$includedir%g +s%@oldincludedir@%$oldincludedir%g +s%@infodir@%$infodir%g +s%@mandir@%$mandir%g +s%@CONFIG_DIR@%$CONFIG_DIR%g +s%@CC@%$CC%g +s%@CPP@%$CPP%g +s%@SET_MAKE@%$SET_MAKE%g +s%@host@%$host%g +s%@host_alias@%$host_alias%g +s%@host_cpu@%$host_cpu%g +s%@host_vendor@%$host_vendor%g +s%@host_os@%$host_os%g +s%@DYNAMIC_LINK_LIB@%$DYNAMIC_LINK_LIB%g +s%@DYNAMIC_LINK_FLAGS@%$DYNAMIC_LINK_FLAGS%g +s%@TERMCAP@%$TERMCAP%g +s%@SRCDIR@%$SRCDIR%g +s%@OBJDIR@%$OBJDIR%g +s%@ELFDIR@%$ELFDIR%g +s%@PROGRAM_OFILES@%$PROGRAM_OFILES%g +s%@PROGRAM_CFILES@%$PROGRAM_CFILES%g +s%@PROGRAM_HFILES@%$PROGRAM_HFILES%g +s%@PROGRAM_OBJECTS@%$PROGRAM_OBJECTS%g +s%@PROGRAM_ELFOBJECTS@%$PROGRAM_ELFOBJECTS%g + +CEOF +EOF + +cat >> $CONFIG_STATUS <<\EOF + +# Split the substitutions into bite-sized pieces for seds with +# small command number limits, like on Digital OSF/1 and HP-UX. +ac_max_sed_cmds=90 # Maximum number of lines to put in a sed script. +ac_file=1 # Number of current file. +ac_beg=1 # First line for current file. +ac_end=$ac_max_sed_cmds # Line after last line for current file. +ac_more_lines=: +ac_sed_cmds="" +while $ac_more_lines; do + if test $ac_beg -gt 1; then + sed "1,${ac_beg}d; ${ac_end}q" conftest.subs > conftest.s$ac_file + else + sed "${ac_end}q" conftest.subs > conftest.s$ac_file + fi + if test ! -s conftest.s$ac_file; then + ac_more_lines=false + rm -f conftest.s$ac_file + else + if test -z "$ac_sed_cmds"; then + ac_sed_cmds="sed -f conftest.s$ac_file" + else + ac_sed_cmds="$ac_sed_cmds | sed -f conftest.s$ac_file" + fi + ac_file=`expr $ac_file + 1` + ac_beg=$ac_end + ac_end=`expr $ac_end + $ac_max_sed_cmds` + fi +done +if test -z "$ac_sed_cmds"; then + ac_sed_cmds=cat +fi +EOF + +cat >> $CONFIG_STATUS <<EOF + +CONFIG_FILES=\${CONFIG_FILES-"Makefile"} +EOF +cat >> $CONFIG_STATUS <<\EOF +for ac_file in .. $CONFIG_FILES; do if test "x$ac_file" != x..; then + # Support "outfile[:infile[:infile...]]", defaulting infile="outfile.in". + case "$ac_file" in + *:*) ac_file_in=`echo "$ac_file"|sed 's%[^:]*:%%'` + ac_file=`echo "$ac_file"|sed 's%:.*%%'` ;; + *) ac_file_in="${ac_file}.in" ;; + esac + + # Adjust a relative srcdir, top_srcdir, and INSTALL for subdirectories. + + # Remove last slash and all that follows it. Not all systems have dirname. + ac_dir=`echo $ac_file|sed 's%/[^/][^/]*$%%'` + if test "$ac_dir" != "$ac_file" && test "$ac_dir" != .; then + # The file is in a subdirectory. + test ! -d "$ac_dir" && mkdir "$ac_dir" + ac_dir_suffix="/`echo $ac_dir|sed 's%^\./%%'`" + # A "../" for each directory in $ac_dir_suffix. + ac_dots=`echo $ac_dir_suffix|sed 's%/[^/]*%../%g'` + else + ac_dir_suffix= ac_dots= + fi + + case "$ac_given_srcdir" in + .) srcdir=. + if test -z "$ac_dots"; then top_srcdir=. + else top_srcdir=`echo $ac_dots|sed 's%/$%%'`; fi ;; + /*) srcdir="$ac_given_srcdir$ac_dir_suffix"; top_srcdir="$ac_given_srcdir" ;; + *) # Relative path. + srcdir="$ac_dots$ac_given_srcdir$ac_dir_suffix" + top_srcdir="$ac_dots$ac_given_srcdir" ;; + esac + + + echo creating "$ac_file" + rm -f "$ac_file" + configure_input="Generated automatically from `echo $ac_file_in|sed 's%.*/%%'` by configure." + case "$ac_file" in + *Makefile*) ac_comsub="1i\\ +# $configure_input" ;; + *) ac_comsub= ;; + esac + + ac_file_inputs=`echo $ac_file_in|sed -e "s%^%$ac_given_srcdir/%" -e "s%:% $ac_given_srcdir/%g"` + sed -e "$ac_comsub +s%@configure_input@%$configure_input%g +s%@srcdir@%$srcdir%g +s%@top_srcdir@%$top_srcdir%g +" $ac_file_inputs | (eval "$ac_sed_cmds") > $ac_file +fi; done +rm -f conftest.s* + +EOF +cat >> $CONFIG_STATUS <<EOF + +EOF +cat >> $CONFIG_STATUS <<\EOF + +exit 0 +EOF +chmod +x $CONFIG_STATUS +rm -fr confdefs* $ac_clean_files +test "$no_create" = yes || ${CONFIG_SHELL-/bin/sh} $CONFIG_STATUS || exit 1 + + + + for program_module in $Program_Modules; do + +PROGRAM_OBJECT_RULES="$PROGRAM_OBJECT_RULES +$program_module : \$(OBJDIR)/$program_module + @echo $program_module created in \$(OBJDIR) +\$(OBJDIR)/$program_module : \$(OBJDIR)/$program_module.o \$("$program_module"_DEPS) \$(EXECDEPS) + \$(CC) -o \$(OBJDIR)/$program_module \$(LDFLAGS) \$(OBJDIR)/$program_module.o \$("$program_module"_LIBS) \$(EXECLIBS) +\$(OBJDIR)/$program_module.o : \$(SRCDIR)/$program_module.c \$(DOT_O_DEPS) \$("$program_module"_O_DEP) + cd \$(OBJDIR); \$(COMPILE_CMD) \$("$program_module"_INC) \$(EXECINC) \$(SRCDIR)/$program_module.c +" + + done + + + echo "$PROGRAM_OBJECT_RULES" >> Makefile + diff --git a/libslang/demo/configure.in b/libslang/demo/configure.in new file mode 100644 index 0000000..fc35785 --- /dev/null +++ b/libslang/demo/configure.in @@ -0,0 +1,51 @@ +dnl -*- sh -*- + +AC_INIT(smgtest.c) + +AC_CONFIG_AUX_DIR(../autoconf) + +JD_INIT +JD_ANSI_CC + +AC_PROG_MAKE_SET + +AC_CANONICAL_HOST + +dnl #------------------------------------------------------------------------- +dnl # Check for dynamic linker +dnl #------------------------------------------------------------------------- +DYNAMIC_LINK_LIB="" +AC_CHECK_HEADER(dlfcn.h,[ + AC_DEFINE(HAVE_DLFCN_H) + AC_CHECK_LIB(dl,dlopen,[ + DYNAMIC_LINK_LIB="-ldl" + AC_DEFINE(HAVE_DLOPEN) + ],[ + AC_CHECK_FUNC(dlopen,AC_DEFINE(HAVE_DLOPEN)) + if test "$ac_cv_func_dlopen" != yes + then + AC_MSG_WARN(cannot perform dynamic linking) + fi + ])]) +AC_SUBST(DYNAMIC_LINK_LIB) + +case "$host_os" in + linux ) + DYNAMIC_LINK_FLAGS="-Wl,-export-dynamic" + ;; + * ) + DYNAMIC_LINK_FLAGS="" + ;; +esac +AC_SUBST(DYNAMIC_LINK_FLAGS) + +JD_TERMCAP +JD_GCC_WARNINGS + +JD_SET_OBJ_SRC_DIR(.) +JD_GET_MODULES(modules.unx) + +AC_OUTPUT(Makefile) + +JD_CREATE_MODULE_EXEC_RULES +JD_APPEND_RULES(Makefile) diff --git a/libslang/demo/demolib.c b/libslang/demo/demolib.c new file mode 100644 index 0000000..7cb364a --- /dev/null +++ b/libslang/demo/demolib.c @@ -0,0 +1,96 @@ +/* These routines are used by several of the demos. */ +#include "config.h" +#include <stdio.h> +#include <signal.h> + +#ifdef HAVE_STDLIB_H +# include <stdlib.h> +#endif + +#include <slang.h> + +static void demolib_exit (int sig) +{ + SLang_reset_tty (); + SLsmg_reset_smg (); + + if (sig) + { + fprintf (stderr, "Exiting on signal %d\n", sig); + exit (1); + } + exit (sig); +} + +#ifdef SIGTSTP +static void sigtstp_handler (int sig) +{ + demolib_exit (sig); +} +#endif + +#ifdef SIGINT +static void sigint_handler (int sig) +{ + demolib_exit (sig); +} +#endif + +static void init_signals (void) +{ +#ifdef SIGTSTP + SLsignal (SIGTSTP, sigtstp_handler); +#endif +#ifdef SIGINT + SLsignal (SIGINT, sigint_handler); +#endif +} + +static void exit_error_hook (char *fmt, va_list ap) +{ + SLang_reset_tty (); + SLsmg_reset_smg (); + + vfprintf (stderr, fmt, ap); + fputc ('\n', stderr); + exit (1); +} + + + +static int demolib_init_terminal (int tty, int smg) +{ + SLang_Exit_Error_Hook = exit_error_hook; + + /* It is wise to block the occurance of display related signals while we are + * initializing. + */ + SLsig_block_signals (); + + SLtt_get_terminfo (); + + /* SLkp_init assumes that SLtt_get_terminfo has been called. */ + if (tty && (-1 == SLkp_init ())) + { + SLsig_unblock_signals (); + return -1; + } + + init_signals (); + + if (tty) SLang_init_tty (-1, 0, 1); +#ifdef REAL_UNIX_SYSTEM + if (tty) SLtty_set_suspend_state (1); +#endif + if (smg + && (-1 == SLsmg_init_smg ())) + { + SLsig_unblock_signals (); + return -1; + } + + SLsig_unblock_signals (); + + return 0; +} + diff --git a/libslang/demo/keypad.c b/libslang/demo/keypad.c new file mode 100644 index 0000000..ac2a736 --- /dev/null +++ b/libslang/demo/keypad.c @@ -0,0 +1,52 @@ +/* This routine illustrates the keypad interface. To implement + * detection of a single escape character, allow for timeout. + */ + +#include <stdio.h> +#include <slang.h> + +#include "demolib.c" + +#define TIMEOUT 2 /* 2/10 of a second */ + +static int getch (void) +{ + int ch; + + while (0 == SLang_input_pending (1000)) + continue; + + ch = SLang_getkey (); + + if (ch == 033) /* escape */ + { + if (0 == SLang_input_pending (TIMEOUT)) + return 033; + } + + SLang_ungetkey (ch); + + return SLkp_getkey (); +} + + +int main (int argc, char **argv) +{ + int ch; + + (void) argc; (void) argv; + + if (-1 == demolib_init_terminal (1, 0)) + return 1; + + fprintf (stderr, "This program illustrates the slkeypad facility.\n"); + fprintf (stderr, "Press any key ('q' quits).\n"); + while ('q' != (ch = getch ())) + { + fprintf (stderr, "Keysym: %d\r\n", ch); + } + + demolib_exit (0); + + return 0; +} diff --git a/libslang/demo/modules.unx b/libslang/demo/modules.unx new file mode 100644 index 0000000..ea2c37c --- /dev/null +++ b/libslang/demo/modules.unx @@ -0,0 +1,4 @@ +useropen +pager +keypad +smgtest diff --git a/libslang/demo/pager.c b/libslang/demo/pager.c new file mode 100644 index 0000000..b094a0a --- /dev/null +++ b/libslang/demo/pager.c @@ -0,0 +1,280 @@ +/* This file pager demo illustrates the screen management and + * keyboard routines. + */ + +#include <stdio.h> +#include <string.h> + +#include <stdlib.h> + +#include <signal.h> + +#ifdef unix +# include <unistd.h> +#endif + +#include <slang.h> + +#include "demolib.c" + +static void usage (char *pgm) +{ + fprintf (stderr, "Usage: %s [FILENAME]\n", pgm); + exit (1); +} + +static int read_file (char *); +static void main_loop (void); + +static char *File_Name; /* if NULL, use stdin */ + +int main (int argc, char **argv) +{ + if (argc == 2) + { + File_Name = argv[1]; + } + else if ((argc != 1) || (1 == isatty (fileno(stdin)))) + usage (argv[0]); + + + if (-1 == read_file (File_Name)) + { + fprintf (stderr, "Unable to read %s\n", File_Name); + return 1; + } + + /* This sets up the terminal, signals, screen management routines, etc... */ + if (-1 == demolib_init_terminal (1, 1)) + { + fprintf (stderr, "Unable to initialize terminal."); + return 1; + } + +#define APP_KEY_EOB 0x1001 +#define APP_KEY_BOB 0x1002 + + /* Add a few application defined keysyms. 0x1000 and above are for + * applications. + */ + (void) SLkp_define_keysym ("\033>", APP_KEY_EOB); + (void) SLkp_define_keysym ("\033<", APP_KEY_BOB); + + main_loop (); /* should not return */ + return 1; +} + + +/* The SLscroll routines will be used for pageup/down commands. They assume + * a linked list of lines. The first element of the structure MUST point to + * the NEXT line, the second MUST point to the PREVIOUS line. + */ +typedef struct _File_Line_Type +{ + struct _File_Line_Type *next; + struct _File_Line_Type *prev; + char *data; /* pointer to line data */ +} +File_Line_Type; + +static File_Line_Type *File_Lines; + +/* The SLscroll routines will use this structure. */ +static SLscroll_Window_Type Line_Window; + +static void free_lines (void) +{ + File_Line_Type *line, *next; + + line = File_Lines; + while (line != NULL) + { + next = line->next; + if (line->data != NULL) free (line->data); + free (line); + line = next; + } + File_Lines = NULL; +} + +static File_Line_Type *create_line (char *buf) +{ + File_Line_Type *line; + + line = (File_Line_Type *) malloc (sizeof (File_Line_Type)); + if (line == NULL) return NULL; + + memset ((char *) line, sizeof (File_Line_Type), 0); + + line->data = SLmake_string (buf); /* use a slang routine */ + if (line->data == NULL) + { + free (line); + return NULL; + } + + return line; +} + + +static int read_file (char *file) +{ + FILE *fp; + char buf [1024]; + File_Line_Type *line, *last_line; + unsigned int num_lines; + + if (file == NULL) + fp = stdin; + else fp = fopen (file, "r"); + + if (fp == NULL) return -1; + + last_line = NULL; + num_lines = 0; + + while (NULL != fgets (buf, sizeof(buf), fp)) + { + num_lines++; + + if (NULL == (line = create_line (buf))) + { + fprintf (stderr, "Out of memory."); + free_lines (); + return -1; + } + + if (last_line == NULL) + File_Lines = line; + else + last_line->next = line; + + line->prev = last_line; + line->next = NULL; + + last_line = line; + } + + memset ((char *)&Line_Window, 0, sizeof (SLscroll_Window_Type)); + + Line_Window.current_line = (SLscroll_Type *) File_Lines; + Line_Window.lines = (SLscroll_Type *) File_Lines; + Line_Window.line_num = 1; + Line_Window.num_lines = num_lines; + /* Line_Window.border = 3; */ + + return 0; +} + + +static void update_display (void) +{ + unsigned int row, nrows; + File_Line_Type *line; + + /* All well behaved applications should block signals that may affect + * the display while performing screen update. + */ + SLsig_block_signals (); + + Line_Window.nrows = nrows = SLtt_Screen_Rows - 1; + + /* Always make the current line equal to the top window line. */ + if (Line_Window.top_window_line != NULL) + Line_Window.current_line = Line_Window.top_window_line; + + SLscroll_find_top (&Line_Window); + + row = 0; + line = (File_Line_Type *) Line_Window.top_window_line; + + SLsmg_normal_video (); + + while (row < Line_Window.nrows) + { + SLsmg_gotorc (row, 0); + + if (line != NULL) + { + SLsmg_write_string (line->data); + line = line->next; + } + SLsmg_erase_eol (); + row++; + } + + SLsmg_gotorc (row, 0); + SLsmg_reverse_video (); + SLsmg_printf ("%s", (File_Name == NULL) ? "<stdin>" : File_Name); + SLsmg_erase_eol (); + SLsmg_refresh (); + + SLsig_unblock_signals (); +} + +static int Screen_Start; + +static void main_loop (void) +{ + int screen_start; + + while (1) + { + update_display (); + switch (SLkp_getkey ()) + { + case SL_KEY_ERR: + case 'q': + case 'Q': + demolib_exit (0); + break; + + case SL_KEY_RIGHT: + Screen_Start += 1; + screen_start = Screen_Start; + SLsmg_set_screen_start (NULL, &screen_start); + break; + + case SL_KEY_LEFT: + Screen_Start -= 1; + if (Screen_Start < 0) Screen_Start = 0; + screen_start = Screen_Start; + SLsmg_set_screen_start (NULL, &screen_start); + break; + + case SL_KEY_UP: + SLscroll_prev_n (&Line_Window, 1); + Line_Window.top_window_line = Line_Window.current_line; + break; + + case '\r': + case SL_KEY_DOWN: + SLscroll_next_n (&Line_Window, 1); + Line_Window.top_window_line = Line_Window.current_line; + break; + + case SL_KEY_NPAGE: + case ' ': case 4: + SLscroll_pagedown (&Line_Window); + break; + + case SL_KEY_PPAGE: + case 127: case 21: + SLscroll_pageup (&Line_Window); + break; + + case APP_KEY_BOB: + while (-1 != SLscroll_pageup (&Line_Window)) + ; + break; + + case APP_KEY_EOB: + while (-1 != SLscroll_pagedown (&Line_Window)) + ; + break; + + default: + SLtt_beep (); + } + } +} diff --git a/libslang/demo/smgtest.c b/libslang/demo/smgtest.c new file mode 100644 index 0000000..ee0d7fc --- /dev/null +++ b/libslang/demo/smgtest.c @@ -0,0 +1,799 @@ +/* This demo test some of the slsmg features. */ +#include "config.h" + +#include <stdio.h> +#ifdef HAVE_STDLIB_H +# include <stdlib.h> +#endif + +#include <string.h> +#include <slang.h> + +#include "demolib.c" + +static void menu_loop (void); +static int select_menu_item (int i); +static void init_colors (void); + +int main (int argc, char **argv) +{ + if (-1 == demolib_init_terminal (1, 1)) + return 1; + + init_colors (); + + (void) SLtt_set_mouse_mode (1, 0); + + if (argc <= 1) + menu_loop (); + + do + { + argc--; + argv++; + + if (-1 == select_menu_item (atoi (*argv))) + menu_loop (); + } + while (argc > 1); + + demolib_exit (0); + return 1; +} + +static void quit (void) +{ + demolib_exit (0); +} + +static void bce_color_test (void); +static void color_test (void); +static void color_test1 (void); +static void alt_char_test (void); +static void esc_seq_test (void); +static void ansi_esc_seq_test (void); +static void line_test (void); +static void mouse_test (void); +static void low_level_test (void); +static void box_test (void); +static void draw_symbols_test (void); +static void lr_corner_test (void); +static void mono_test (void); + +typedef struct +{ + char *name; + void (*funct) (void); +} +Menu_Type; + +static Menu_Type Root_Menu [] = +{ + {"Color Test", color_test}, + {"Another Color Test", color_test1}, + {"BCE Color Test", bce_color_test}, + {"Alt charset test", alt_char_test}, + {"Drawing Symbols", draw_symbols_test}, + {"Key Escape Sequence Report", esc_seq_test}, +#ifdef IBMPC_SYSTEM + {"ANSI Key Escape Sequence Report", ansi_esc_seq_test}, +#endif + {"Line Drawing Test", line_test}, + {"Test Mouse", mouse_test}, + {"Box Test", box_test}, + {"Write to Lower Right Corner Test", lr_corner_test}, + {"Test Low Level Functions", low_level_test}, + {"Test monochrome functions", mono_test}, + {"Quit", quit}, + {NULL, NULL} +}; + +Menu_Type *Current_Menu = Root_Menu; + +static void print_menu (void) +{ + int i; + int row; + Menu_Type *menu; + + menu = Current_Menu; + + SLsig_block_signals (); + + SLsmg_cls (); + + row = 2; + i = 1; + while (menu->name != NULL) + { + SLsmg_gotorc (row, 3); + SLsmg_printf ("%2X. %s", i, menu->name); + menu++; + row++; + i++; + } + + row = 0; + SLsmg_gotorc (row, 1); + SLsmg_write_string ("Choose number:"); + + SLsmg_refresh (); + SLsig_unblock_signals (); +} + + +static int select_menu_item (int num) +{ + int i = 1; + Menu_Type *m = Current_Menu; + + while (m->name != NULL) + { + if (i == num) + { + (*m->funct) (); + return 0; + } + i++; + m++; + } + + return -1; +} + + +static void menu_loop (void) +{ + int ch; + + print_menu (); + + while (1) + { + ch = SLkp_getkey (); + + if ((ch == 'q') || (ch == 'Q')) + quit (); + + if ((ch >= '0') + && (ch <= '9')) + ch -= '0'; + else if ((ch >= 'A') && (ch <= 'Z')) + ch = 10 + (ch - 'A'); + else + ch = 10 + (ch - 'a'); + + + if (-1 == select_menu_item (ch)) + { + SLtt_beep (); + continue; + } + print_menu (); + } +} + +static void write_centered_string (char *s, int row) +{ + unsigned int len; + int col; + + if (s == NULL) + return; + + len = strlen (s); + + /* Want 2 * col + len == SLtt_Screen_Rows */ + if (len >= (unsigned int) SLtt_Screen_Cols) col = 0; + else col = (SLtt_Screen_Cols - (int)len) / 2; + + SLsmg_gotorc (row, col); + SLsmg_write_string (s); +} + +static void pre_test (char *title) +{ + SLsig_block_signals (); + SLsmg_cls (); + write_centered_string (title, 0); +} + +static void post_test (void) +{ + write_centered_string ("Press any key to return.", SLtt_Screen_Rows - 1); + SLsmg_refresh (); + SLsig_unblock_signals (); + (void) SLkp_getkey (); +} + +/* Various tests */ + +#define NUM_COLORS 16 +static char *Colors [NUM_COLORS] = +{ + "black/default", + "red", + "green", + "brown", + "blue", + "magenta", + "cyan", + "lightgray", + "gray", + "brightred", + "brightgreen", + "yellow", + "brightblue", + "brightmagenta", + "brightcyan", + "white" +}; + +static void init_colors (void) +{ + int i; + char *fg, *bg; + + fg = "black"; + for (i = 0; i < NUM_COLORS; i++) + { + bg = Colors[i]; + SLtt_set_color (i + 1, NULL, fg, bg); + } +} + + +static void box_test (void) +{ + char *msg = "This is a box with changing background"; + int r, c, dr, dc; + int color; + + pre_test ("Box Test"); + + dr = 8; + dc = 4 + strlen (msg); + r = SLtt_Screen_Rows / 2 - dr/2; + c = SLtt_Screen_Cols / 2 - dc/2; + + SLsmg_set_color (1); + SLsmg_set_char_set (1); + SLsmg_fill_region (r + 1, c + 1, dr - 2, dc - 2, SLSMG_CKBRD_CHAR); + SLsmg_set_char_set (0); + SLsmg_set_color (0); + SLsmg_gotorc (r + dr/2, c + 2); SLsmg_write_string (msg); + SLsmg_draw_box (r, c, dr, dc); + + SLsmg_refresh (); + + color = 2; + while (0 == SLang_input_pending (10)) + { + SLsmg_set_color_in_region (color, r, c, dr, dc); + SLsmg_refresh (); + color++; + color = color % NUM_COLORS; + } + post_test (); +} + +static int check_color_support (void) +{ + if (SLtt_Use_Ansi_Colors) + return 0; + + pre_test ("Your terminal does not provide color support."); + post_test (); + return -1; +} + + +static void bce_color_test (void) +{ + int row; + + if (-1 == check_color_support ()) + return; + + pre_test ("Background Color Erase Test"); + + SLtt_set_color (0, NULL, "lightgray", "blue"); + + row = SLtt_Screen_Rows/2; + SLsmg_set_color (0); + SLsmg_gotorc (row, 1); + SLsmg_write_string ("The screen background should be blue."); + + row += 2; + SLsmg_gotorc (row++, 1); + SLsmg_write_string ("****If the screen update is slow, then your terminal"); + SLsmg_gotorc (row++, 1); + SLsmg_write_string (" does not support background-color-erase."); + SLsmg_set_color (0); + post_test (); +} + +static void lr_corner_test (void) +{ + pre_test ("Write to Lower Right Corner Test"); + + SLsmg_gotorc (SLtt_Screen_Rows-1, SLtt_Screen_Cols-1); + SLsmg_write_string ("X"); + + write_centered_string ("An 'X' should be in the lower-right corner.", + SLtt_Screen_Rows/2); + + SLsmg_refresh (); + SLsig_unblock_signals (); + (void) SLkp_getkey (); +} + +static void color_test (void) +{ + int color; + int row; + + if (-1 == check_color_support ()) + return; + + pre_test ("Color Test"); + + row = 1; + + color = 0; + while (row < SLtt_Screen_Rows - 1) + { + color = color % NUM_COLORS; + + SLsmg_gotorc (row, 0); + SLsmg_set_color (0); + SLsmg_write_string (Colors[color]); + color++; + SLsmg_set_color (color); + SLsmg_erase_eol (); + row++; + } + + SLsmg_set_color (0); + post_test (); +} + +static void color_test1 (void) +{ + int color; + int r0, r1; + int c0, c1; + unsigned int dr0, dr1, dc0, dc1; + + if (-1 == check_color_support ()) + return; + + pre_test ("Another Color Test"); + + r0 = 1; + r1 = SLtt_Screen_Rows / 2; + dr0 = r1; + dr1 = SLtt_Screen_Rows; + + c0 = 0; + c1 = SLtt_Screen_Cols / 2; + dc0 = c1; + dc1 = SLtt_Screen_Cols; + + color = 0; + do + { + SLsmg_gotorc (r1, 0); + SLsmg_set_color (color); color++; color = color % NUM_COLORS; + SLsmg_write_string (" "); + SLsmg_set_color (color); color++; color = color % NUM_COLORS; + SLsmg_write_string ("X"); + SLsmg_set_color (color); color++; color = color % NUM_COLORS; + SLsmg_erase_eol (); + SLsmg_refresh (); + } + while (0 == SLang_input_pending (30)); + SLang_flush_input (); + + color = 0; + do + { + SLsmg_set_color (color); color++; color = color % NUM_COLORS; + SLsmg_fill_region (r0, c0, dr0, dc0, ' '); + + SLsmg_set_color (color); color++; color = color % NUM_COLORS; + SLsmg_fill_region (r0, c1, dr0, dc1, ' '); + + SLsmg_set_color (color); color++; color = color % NUM_COLORS; + SLsmg_fill_region (r1, c0, dr1, dc0, ' '); + + SLsmg_set_color (color); color++; color = color % NUM_COLORS; + SLsmg_fill_region (r1, c1, dr1, dc1, ' '); + + SLsmg_refresh (); + } + while (0 == SLang_input_pending (30)); + + SLsmg_set_color (0); + post_test (); +} + +static void alt_char_test (void) +{ + int row, col; + int ch; + + pre_test ("Alternate Charset Test"); + + row = SLtt_Screen_Rows / 2 - 2; + col = 0; + for (ch = 32; ch < 128; ch++) + { + SLsmg_gotorc (row, col); + SLsmg_write_char (ch); + SLsmg_gotorc (row + 1, col); + SLsmg_set_char_set (1); + SLsmg_write_char (ch); + SLsmg_set_char_set (0); + col++; + + if (col > 40) + { + col = 0; + row += 4; + } + } + + post_test (); +} + +typedef struct +{ + char *name; + unsigned char value; +} +Draw_Symbols_Type; + +static Draw_Symbols_Type Draw_Symbols [] = +{ + {"SLSMG_HLINE_CHAR", SLSMG_HLINE_CHAR}, + {"SLSMG_VLINE_CHAR", SLSMG_VLINE_CHAR}, + {"SLSMG_ULCORN_CHAR", SLSMG_ULCORN_CHAR}, + {"SLSMG_URCORN_CHAR", SLSMG_URCORN_CHAR}, + {"SLSMG_LLCORN_CHAR", SLSMG_LLCORN_CHAR}, + {"SLSMG_LRCORN_CHAR", SLSMG_LRCORN_CHAR}, + {"SLSMG_RTEE_CHAR", SLSMG_RTEE_CHAR}, + {"SLSMG_LTEE_CHAR", SLSMG_LTEE_CHAR}, + {"SLSMG_UTEE_CHAR", SLSMG_UTEE_CHAR}, + {"SLSMG_DTEE_CHAR", SLSMG_DTEE_CHAR}, + {"SLSMG_PLUS_CHAR", SLSMG_PLUS_CHAR}, + {"SLSMG_CKBRD_CHAR", SLSMG_CKBRD_CHAR}, + {"SLSMG_DIAMOND_CHAR", SLSMG_DIAMOND_CHAR}, + {"SLSMG_DEGREE_CHAR", SLSMG_DEGREE_CHAR}, + {"SLSMG_PLMINUS_CHAR", SLSMG_PLMINUS_CHAR}, + {"SLSMG_BULLET_CHAR", SLSMG_BULLET_CHAR}, + {"SLSMG_LARROW_CHAR", SLSMG_LARROW_CHAR}, + {"SLSMG_RARROW_CHAR", SLSMG_RARROW_CHAR}, + {"SLSMG_DARROW_CHAR", SLSMG_DARROW_CHAR}, + {"SLSMG_UARROW_CHAR", SLSMG_UARROW_CHAR}, + {"SLSMG_BOARD_CHAR", SLSMG_BOARD_CHAR}, + {"SLSMG_BLOCK_CHAR", SLSMG_BLOCK_CHAR}, + {NULL} +}; + +static void draw_symbols_test (void) +{ + int row, col; + Draw_Symbols_Type *d; + + pre_test ("Alternate Charset Test"); + + row = 3; + col = 3; + d = Draw_Symbols; + while (d->name != NULL) + { + SLsmg_gotorc (row, col); + SLsmg_set_char_set (1); + SLsmg_write_char ((char) d->value); + SLsmg_set_char_set (0); + SLsmg_printf (":%s", d->name); + col += 40; + if (col >= 80) + { + col = 3; + row++; + } + d++; + } + post_test (); +} + +static void line_test (void) +{ + int row, col; + pre_test ("Line Test"); + + row = 4; + col = 2; + SLsmg_gotorc (row, col); + SLsmg_draw_hline (10); + SLsmg_write_string ("Result of SLsmg_draw_hline(10)"); + SLsmg_draw_vline (5); + SLsmg_write_string ("Result of SLsmg_draw_vline(5)"); + + post_test (); +} + + +static void do_esc_seq_test (char *testname) +{ + int row; + unsigned char ch; + unsigned char buf[80], *b; + + pre_test (testname); + + while (1) + { + row = SLtt_Screen_Rows / 2; + + SLsmg_gotorc (row, 0); + SLsmg_write_string ("Press key: (RETURN quits)"); + SLsmg_refresh (); + + ch = SLang_getkey (); + SLang_ungetkey (ch); + if (ch == '\r') + break; + + SLsmg_gotorc (row+1, 0); + SLsmg_write_string ("Key returned \""); + + b = buf; + do + { + ch = SLang_getkey (); + if (ch < ' ') + { + *b++ = '^'; + ch += '@'; + *b++ = ch; + } + else if (ch >= 127) + { + sprintf ((char *) b, "\\x%02X", ch); + b += strlen ((char *) b); + } + else if ((ch == '"') || (ch == '\\')) + { + *b++ = '\\'; + *b++ = ch; + } + else *b++ = ch; + } + while (SLang_input_pending (3) > 0); + *b++ = '"'; + *b = 0; + SLsmg_write_string ((char *) buf); + SLsmg_erase_eol (); + SLsmg_refresh (); + } + + post_test (); +} + +static void esc_seq_test (void) +{ +#ifdef IBMPC_SYSTEM + SLgetkey_map_to_ansi (0); +#endif + do_esc_seq_test ("Escape Sequence Report"); +} + +#ifdef IBMPC_SYSTEM +static void ansi_esc_seq_test (void) +{ + SLgetkey_map_to_ansi (1); + do_esc_seq_test ("ANSI Escape Sequence Report"); +} +#endif + +static void mouse_test (void) +{ + int row; + int b, x, y; + + pre_test ("Mouse Test"); + + row = SLtt_Screen_Rows / 2; + + SLsmg_gotorc (row, 0); + SLsmg_write_string ("Click Mouse: "); + SLsmg_refresh (); + + if ((27 != SLang_getkey ()) + || ('[' != SLang_getkey ()) + || ('M' != SLang_getkey ())) + { + SLsmg_gotorc (row, 0); + SLsmg_write_string ("That did not appear to be a mouse escape sequence"); + post_test (); + return; + } + + b = SLang_getkey () - ' '; + x = SLang_getkey () - ' '; + y = SLang_getkey () - ' '; + + SLsmg_gotorc (row, 0); SLsmg_printf ("Button: %d ", b); + SLsmg_gotorc (row + 1, 0); SLsmg_printf ("Column: %d", x); + SLsmg_gotorc (row + 2, 0); SLsmg_printf (" Row: %d", y); + + post_test (); +} + +static void mono_test (void) +{ + int row; + int c; + + c = SLtt_Use_Ansi_Colors; + SLtt_Use_Ansi_Colors = 0; + SLsmg_normal_video (); + SLsmg_cls (); + + pre_test ("Mono Test"); + + row = SLtt_Screen_Rows / 2; + SLsmg_set_color(1); + SLsmg_gotorc (row, 0); + + /* Make a gap for testing erase_eol in bw mode */ + SLsmg_write_string ("This line"); + SLsmg_set_color (2); + SLsmg_erase_eol (); + SLsmg_gotorc (row, 30); + SLsmg_write_string ("should be in reverse video"); + + SLsmg_refresh (); + (void) SLkp_getkey (); + SLsmg_gotorc (row, 20); + SLsmg_write_string ("xxxxx"); + SLsmg_refresh (); + post_test (); + SLtt_Use_Ansi_Colors = c; +} + +static void low_level_test (void) +{ + int mid, bot; + int r; + + if (SLtt_Term_Cannot_Scroll) + { + pre_test ("Sorry! Your terminal lacks scrolling capability."); + post_test (); + return; + } + + if (-1 == SLsmg_suspend_smg ()) + SLang_exit_error ("SLsmg_suspend_smg failed"); + + if (-1 == SLtt_init_video ()) + SLang_exit_error ("SLang_init_video failed"); + + SLtt_get_screen_size (); + + mid = SLtt_Screen_Rows/2; + bot = SLtt_Screen_Rows - 1; + + SLtt_cls (); + SLtt_goto_rc (0, 0); + SLtt_write_string ("The following set of tests are designed to test the display system."); + SLtt_goto_rc (1, 0); + SLtt_write_string ("There should be a line of text in the middle and one at the bottom."); + SLtt_goto_rc (mid, 0); + SLtt_write_string ("This line is in the middle."); + SLtt_goto_rc (bot, 0); + SLtt_write_string ("This line is at the bottom."); + + SLtt_goto_rc (2, 0); + SLtt_write_string ("Press return now."); + SLtt_flush_output (); + SLang_flush_input (); + (void) SLang_getkey (); + + SLtt_goto_rc (2, 0); + SLtt_write_string ("The middle row should slowly move down next the bottom and then back up."); + SLtt_goto_rc (mid - 1, 0); + SLtt_write_string ("This line should not move."); + SLtt_goto_rc (mid + 1, 0); + SLtt_write_string ("This line should vanish at the bottom"); + SLtt_goto_rc (mid + 1, SLtt_Screen_Cols - 5); + SLtt_write_string ("End->"); + SLtt_flush_output (); + + SLtt_set_scroll_region (mid, bot - 1); + + r = (bot - mid) - 1; + while (r > 0) + { + (void) SLang_input_pending (2); /* 3/10 sec delay */ + SLtt_goto_rc (0,0); /* relative to scroll region */ + SLtt_reverse_index (1); + SLtt_flush_output (); + r--; + } + + r = (bot - mid) - 1; + while (r > 0) + { + (void) SLang_input_pending (2); /* 3/10 sec delay */ + SLtt_goto_rc (0,0); /* relative to scroll region */ + SLtt_delete_nlines (1); + SLtt_flush_output (); + r--; + } + + SLtt_reset_scroll_region (); + SLtt_goto_rc (mid - 1, 0); + SLtt_write_string ("Now the bottom will come up and clear the lines below"); + + SLtt_set_scroll_region (mid, bot); + r = (bot - mid) + 1; + while (r > 0) + { + (void) SLang_input_pending (2); /* 3/10 sec delay */ + SLtt_goto_rc (0,0); /* relative to scroll region */ + SLtt_delete_nlines (1); + SLtt_flush_output (); + r--; + } + + SLtt_reset_scroll_region (); + SLtt_goto_rc (3,0); + SLtt_write_string ("This line will go down and vanish"); + SLtt_set_scroll_region (3, mid - 2); + + r = ((mid - 2) - 3) + 1; + while (r > 0) + { + (void) SLang_input_pending (3); /* 3/10 sec delay */ + SLtt_goto_rc (0,0); /* relative to scroll region */ + SLtt_reverse_index (1); + SLtt_flush_output (); + r--; + } + + + SLtt_reset_scroll_region (); + SLtt_set_scroll_region (1,1); SLtt_goto_rc (0,0); + SLtt_delete_nlines (1); + SLtt_reset_scroll_region (); + SLtt_set_scroll_region (2,2); SLtt_goto_rc (0,0); + SLtt_reverse_index (1); + SLtt_reset_scroll_region (); + + SLtt_goto_rc (1, 10); + SLtt_write_string ("Press Any Key To Continue."); + SLtt_flush_output (); + r = 15; + if (0 == SLtt_Term_Cannot_Insert) while (r) + { + r--; + SLtt_goto_rc (1, 0); + SLtt_begin_insert (); + SLtt_putchar (' '); + SLtt_end_insert (); + SLtt_flush_output (); + SLang_input_pending (2); + } + + SLang_flush_input (); + (void) SLang_getkey (); + + SLtt_reset_video (); + SLsmg_resume_smg (); +} + diff --git a/libslang/demo/useropen.c b/libslang/demo/useropen.c new file mode 100644 index 0000000..efb2f57 --- /dev/null +++ b/libslang/demo/useropen.c @@ -0,0 +1,119 @@ +/* This demo indicates how to read and parse a S-Lang file by bypassing the + * built-in routines. + */ +#include "config.h" +#include <stdio.h> +#include <string.h> +#ifdef HAVE_STDLIB_H +# include <stdlib.h> +#endif +#include <slang.h> + +/* Suppose that you want to read input using a read line package + * such as one provided by S-Lang. For generality, lets assume that this + * function is called 'readline' and it is prototyped as: + * int readline (char *prompt, char *buffer); + * where it returns the number of characters read and -1 if end of file. The + * first parameter is a prompt and the second represents the buffer where the + * characters are to placed. Also assume that this routine requires that the + * function 'init_readline' be called first before it can be used and + * 'reset_readline' must be called after using it. + * + * The goal here is to get S-Lang to call the readline function. + */ + +/* For the purposes of this demo, we will use just fgets */ +#define MAX_BUF_LEN 256 +static int readline (char *prompt, char *buf) +{ + fputs (prompt, stdout); fflush (stdout); + if (NULL == fgets (buf, MAX_BUF_LEN, stdin)) return -1; + return (int) strlen (buf); +} + +static int init_readline (void) +{ + puts ("Initializing readline."); fflush (stdout); + return 0; +} + +static void reset_readline (void) +{ + puts ("Resetting readline."); fflush (stdout); +} + +/* Now lets define the function that S-Lang will use to actually read the data. + * It calls readline. S-Lang will call this function and the function must + * return a pointer to the buffer containg the characters of the line or NULL + * upon end of file. In many ways, it is like fgets except that it is passed + * a pointer to SLang_Load_Type in stead of FILE. + */ + +typedef struct +{ + char buf[MAX_BUF_LEN]; + char *prompt; +} +Our_Client_Data_Type; + +static char *read_using_readline (SLang_Load_Type *x) +{ + Our_Client_Data_Type *client_data; + + client_data = (Our_Client_Data_Type *) x->client_data; + if (-1 == readline (client_data->prompt, client_data->buf)) + return NULL; + + return client_data->buf; +} + +/* Now, we all of this is tied together in this routine which will be called + * from main below. + */ + +static int read_input (void) +{ + SLang_Load_Type *x; + Our_Client_Data_Type client_data; + + if (NULL == (x = SLallocate_load_type ("<readline>"))) + return -1; + + client_data.prompt = "Demo> "; + + x->client_data = (VOID_STAR) &client_data; + x->read = read_using_readline; /* function to call to perform the read */ + SLang_load_object (x); + return 0; +} + +/* Now here is are some intrinsic functions */ + +int main (int argc, char **argv) +{ + /* usual stuff */ + + (void) argc; (void) argv; + + if ((-1 == SLang_init_slang ()) /* basic interpreter functions */ + || (-1 == SLang_init_slmath ()) /* sin, cos, etc... */ +#ifdef unix + || (-1 == SLang_init_slunix ()) /* unix system calls */ +#endif + || (-1 == SLang_init_slfile ())) /* file i/o */ + { + fprintf(stderr, "Unable to initialize S-Lang.\n"); + return 1; + } + + init_readline (); + + read_input (); + + reset_readline (); + return SLang_Error; +} + + + + |