Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!sdd.hp.com!zaphod.mps.ohio-state.edu!uakari.primate.wisc.edu!news.larc.nasa.gov!amiga-request
From: amiga-request@ab20.larc.nasa.gov (Amiga Sources/Binaries Moderator)
Newsgroups: comp.sources.amiga
Subject: v91i057: Star - change wildcard character to an asterisk, Part01/01
Message-ID: <comp.sources.amiga:v91i057@ab20.larc.nasa.gov>
Date: 14 Mar 91 00:53:48 GMT
Reply-To: hclausen@adspdk.UUCP (Henrik Clausen)
Lines: 134
Approved: tadguy@uunet.UU.NET (Tad Guy)
X-Mail-Submissions-To: amiga@uunet.uu.net
X-Post-Discussions-To: comp.sys.amiga.misc

Submitted-by: hclausen@adspdk.UUCP (Henrik Clausen)
Posting-number: Volume 91, Issue 057
Archive-name: utilities/star/part01

[ includes uuencoded executable  ...tad ]

   This simply sets the RN_WILDSTAR in the RootNode, executing practically
instantly. 

   After this, the * character can be used for wildcard if mixed with other
characters. If used alone, two stars must be used ("**") to avoid confusion
with the CON: use of *. This makes sense, as CON: will open a separate
window unlike *.

#!/bin/sh
# This is a shell archive.  Remove anything before this line, then unpack
# it by saving it into a file and typing "sh file".  To overwrite existing
# files, type "sh file -c".  You can also feed this as standard input via
# unshar, or by typing "sh <file", e.g..  If this archive is complete, you
# will see the following message at the end:
#		"End of archive 1 (of 1)."
# Contents:  ReadMe Star.c Star.uu
# Wrapped by tadguy@ab20 on Wed Mar 13 19:53:46 1991
PATH=/bin:/usr/bin:/usr/ucb ; export PATH
if test -f 'ReadMe' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'ReadMe'\"
else
echo shar: Extracting \"'ReadMe'\" \(914 characters\)
sed "s/^X//" >'ReadMe' <<'END_OF_FILE'
X   Modelled after Doug Walker's Hello.c, here comes my smallest useful
Xprogram ever - 88 bytes executable, no Asm code! Might still be possible to
Xshave some bytes off, but this would damage the source's readability.
X
X   This simply sets the RN_WILDSTAR in the RootNode, executing practically
Xinstantly. 
X
X   To remove, change the line:
X
X		Root->rn_Flags |= 1 << 24;
X
X   into:
X
X		Root->rn_Flags &= ~(1 << 24);
X
X   and recompile. Feel free to implement removal as an option.
X
X   After this, the * character can be used for wildcard if mixed with other
Xcharacters. If used alone, two stars must be used ("**") to avoid confusion
Xwith the CON: use of *. This makes sense, as CON: will open a separate
Xwindow unlike *.
X
X   Permission granted for C= to include this in C:, or to Fred Fish and
Xeveryone else to distribute as much as you want.
X
X   Comments to:   Henrik Clausen  ...!rutgers!cbmvax!cbmehq!adspdk!hclausen
END_OF_FILE
if test 914 -ne `wc -c <'ReadMe'`; then
    echo shar: \"'ReadMe'\" unpacked with wrong size!
fi
# end of 'ReadMe'
fi
if test -f 'Star.c' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'Star.c'\"
else
echo shar: Extracting \"'Star.c'\" \(569 characters\)
sed "s/^X//" >'Star.c' <<'END_OF_FILE'
X; /* Star.c - set '*' for wildcard character (for "#?") under DOS 2.0
X;Execute this file as a Shell script, and it will compile and link itself.
X
Xlc -cwus -O -v -j73 Star
Xblink from Star.o to Star SmallData SmallCode
Xquit
X*/
X
X#include <exec/types.h>
X#include <dos/dosextens.h>
X#include <proto/exec.h>
X#include <proto/dos.h>
X
Xvoid star(void)
X{
X	struct DosLibrary *DOSBase;
X	struct RootNode *Root;
X
X	if (DOSBase = (struct DOSBase *)OpenLibrary("dos.library", 36)) {
X		Root = DOSBase->dl_Root;
X		Root->rn_Flags |= 1 << 24;
X		CloseLibrary((struct Library *)DOSBase);
X		}
X}
END_OF_FILE
if test 569 -ne `wc -c <'Star.c'`; then
    echo shar: \"'Star.c'\" unpacked with wrong size!
fi
# end of 'Star.c'
fi
if test -f 'Star.uu' -a "${1}" != "-c" ; then 
  echo shar: Will not clobber existing file \"'Star.uu'\"
else
echo shar: Extracting \"'Star.uu'\" \(156 characters\)
sed "s/^X//" >'Star.uu' <<'END_OF_FILE'
Xbegin 777 Star
XM```#\P`````````!```````````````-```#Z0````TO#D/Z`"1P)"QX``1.E
XKKOW82H!G$")`(&D`(@CH````-$ZN_F(L7TYU9&]S+FQI8G)A<GD````#\@1./
X``
Xend
Xsize 88
END_OF_FILE
if test 156 -ne `wc -c <'Star.uu'`; then
    echo shar: \"'Star.uu'\" unpacked with wrong size!
fi
# end of 'Star.uu'
fi
echo shar: End of archive 1 \(of 1\).
cp /dev/null ark1isdone
MISSING=""
for I in 1 ; do
    if test ! -f ark${I}isdone ; then
	MISSING="${MISSING} ${I}"
    fi
done
if test "${MISSING}" = "" ; then
    echo You have the archive.
    rm -f ark[1-9]isdone
else
    echo You still need to unpack the following archives:
    echo "        " ${MISSING}
fi
##  End of shell archive.
exit 0
-- 
Mail submissions (sources or binaries) to <amiga@uunet.uu.net>.
Mail comments to the moderator at <amiga-request@uunet.uu.net>.
Post requests for sources, and general discussion to comp.sys.amiga.misc.