summaryrefslogtreecommitdiff
path: root/gnu/usr.bin/awk/version.c
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/usr.bin/awk/version.c')
-rw-r--r--gnu/usr.bin/awk/version.c128
1 files changed, 118 insertions, 10 deletions
diff --git a/gnu/usr.bin/awk/version.c b/gnu/usr.bin/awk/version.c
index a06ea186040..6aaee40cde6 100644
--- a/gnu/usr.bin/awk/version.c
+++ b/gnu/usr.bin/awk/version.c
@@ -1,7 +1,7 @@
/********************************************
version.c
-copyright 1991, Michael D. Brennan
+copyright 1991, 1992. Michael D. Brennan
This is a source file for mawk, an implementation of
the AWK programming language.
@@ -11,12 +11,30 @@ the GNU General Public License, version 2, 1991.
********************************************/
/*$Log: version.c,v $
-/*Revision 1.1.1.1 1993/03/21 09:45:37 cgd
-/*initial import of 386bsd-0.1 sources
+/*Revision 1.2 1993/07/02 23:58:02 jtc
+/*Updated to mawk 1.1.4
/*
- * Revision 5.3 92/03/03 16:42:23 brennan
+ * Revision 5.6.1.3 1993/05/05 00:02:18 mike
+ * patch4
+ *
+ * Revision 5.6.1.2 1993/01/20 12:53:13 mike
+ * d_to_l()
+ *
+ * Revision 5.6.1.1 1993/01/15 03:33:54 mike
+ * patch3: safer double to int conversion
+ *
+ * Revision 5.6 1992/12/17 02:48:01 mike
+ * 1.1.2d changes for DOS
+ *
+ * Revision 5.5 1992/12/02 03:18:12 mike
+ * coherent patch
+ *
+ * Revision 5.4 1992/08/27 11:50:38 mike
+ * patch2
+ *
+ * Revision 5.3 1992/03/03 16:42:23 brennan
* patch 1
- *
+ *
* Revision 5.2 92/01/22 05:34:10 brennan
* version 1.1
*
@@ -28,8 +46,11 @@ the GNU General Public License, version 2, 1991.
#include "mawk.h"
#include "patchlev.h"
+static char rcsid[] =
+"@(#) $Id: version.c,v 1.2 1993/07/02 23:58:02 jtc Exp $" ;
+
#define VERSION_STRING \
- "mawk 1.1%s%s Feb 1992, Copyright (C) Michael D. Brennan\n\n"
+ "mawk 1.1%s%s %s, Copyright (C) Michael D. Brennan\n\n"
#define DOS_STRING ""
@@ -63,14 +84,101 @@ the GNU General Public License, version 2, 1991.
#define DOS_STRING ":Mac"
#endif
+static char fmt[] = "%-14s%10lu\n" ;
+
/* print VERSION and exit */
void print_version()
-{ static char fmt[] = "%-14s%10u\n" ;
+{
- printf(VERSION_STRING, PATCH_STRING, DOS_STRING) ;
+ printf(VERSION_STRING, PATCH_STRING, DOS_STRING, DATE_STRING) ;
fflush(stdout) ;
+
+ print_compiler_id() ;
fprintf(stderr, "compiled limits:\n") ;
- fprintf(stderr, fmt, "largest field", MAX_FIELD) ;
- fprintf(stderr, fmt, "sprintf buffer",SPRINTF_SZ) ;
+ fprintf(stderr, fmt, "largest field", (long)MAX_FIELD) ;
+ fprintf(stderr, fmt, "sprintf buffer", (long)SPRINTF_SZ) ;
+ print_aux_limits() ;
exit(0) ;
}
+
+
+/*
+ Extra info for MSDOS. This code contributed by
+ Ben Myers
+*/
+
+#ifdef __TURBOC__
+#include <alloc.h> /* coreleft() */
+#define BORL
+#endif
+
+#ifdef __BORLANDC__
+#include <alloc.h> /* coreleft() */
+#define BORL
+#endif
+
+#ifdef BORL
+#if LM_DOS
+extern unsigned _stklen = 16 * 1024U ;
+ /* 4K of stack is enough for a user function call
+ nesting depth of 75 so this is enough for 300 */
+#endif
+#endif
+
+#ifdef _MSC_VER
+#include <malloc.h>
+#endif
+
+#ifdef __ZTC__
+#include <dos.h> /* _chkstack */
+#endif
+
+
+int print_compiler_id()
+{
+
+#ifdef __TURBOC__
+ fprintf(stderr, "MsDOS Turbo C++ %d.%d\n",
+ __TURBOC__>>8, __TURBOC__&0xff) ;
+#endif
+
+#ifdef __BORLANDC__
+ fprintf (stderr, "MS-DOS Borland C++ __BORLANDC__ %x\n",
+ __BORLANDC__ );
+#endif
+
+#ifdef _MSC_VER
+ fprintf (stderr, "MS-DOS Microsoft C/C++ _MSC_VER %u\n", _MSC_VER );
+#endif
+
+#ifdef __ZTC__
+ fprintf (stderr, "MS-DOS Zortech C++ __ZTC__ %x\n", __ZTC__ );
+#endif
+
+ return 0 ; /*shut up */
+}
+
+
+int print_aux_limits()
+{
+#ifdef BORL
+ extern unsigned _stklen ;
+ fprintf(stderr, fmt, "stack size", (unsigned long)_stklen) ;
+ fprintf(stderr, fmt, "heap size", (unsigned long) coreleft()) ;
+#endif
+
+#ifdef _MSC_VER
+ fprintf(stderr, fmt, "stack size", (unsigned long)_stackavail()) ;
+#if SM_DOS
+ fprintf(stderr, fmt, "heap size", (unsigned long) _memavl()) ;
+#endif
+#endif
+
+#ifdef __ZTC__
+/* large memory model only with ztc */
+ fprintf(stderr, fmt, "stack size??", (unsigned long)_chkstack()) ;
+ fprintf(stderr, fmt, "heap size", farcoreleft()) ;
+#endif
+
+ return 0 ;
+}