jimzah/freebsd-src
1
0
Fork 0
mirror of https://github.com/freebsd/freebsd-src.git synced 2024-12-04 18:59:37 +00:00
Code Issues Actions 2 Packages Projects Releases Wiki Activity
54ff3ae038
freebsd-src/bin/csh/tc.defs.c
David E. O'Brien 325c70b76a Upgrade csh.
2000-04-18 07:31:36 +00:00

2710 lines
51 KiB
C
Raw Blame History

/* $FreeBSD$ */
/* Do not edit this file, make creates it */
/* $Header: /src/pub/tcsh/host.defs,v 1.25 1999/04/20 07:48:41 christos Exp $ */
/*
* host.defs: Hosttype/Machtype etc.
*/
/*-
* Copyright (c) 1980, 1991 The Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
* 3. All advertising materials mentioning features or use of this software
* must display the following acknowledgement:
* This product includes software developed by the University of
* California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#include "sh.h"
RCSID("$Id: host.defs,v 1.25 1999/04/20 07:48:41 christos Exp $")
#if (defined(mips) || defined(__mips)) && (defined(MIPSEL) || defined(__MIPSEL))
# define M_mipsel
#endif
#if (defined(mips) || defined(__mips)) && (defined(MIPSEB) || defined(__MIPSEB))
# define M_mipseb
#endif
#if (defined(i386) || defined(__i386__))
# define M_i386
#endif
#if (defined(i486) || defined(__i486__))
# define M_i486
#endif
#if (defined(i586) || defined(__i586__))
# define M_i586
#endif
#if (defined(M_i386) || defined(M_i486) || defined(M_i586))
# define M_intel
#endif
#if defined(ns32000)
static char *
isamultimax(flag)
int flag;
{
if (access("/Umax.image", F_OK) == 0)
return "multimax";
else
return flag ? "mach" : "ns32000";
}
#endif
#if defined(cray)
/*
* On crays, find the current machine type via the target() syscall
* We need ctype.h to convert the name returned to lower case
*/
# include <sys/target.h>
# include <ctype.h>
# include <string.h>
/* From: hpa@hook.eecs.nwu.edu (H. Peter Anvin) */
static char *
getcray()
{
# ifdef MC_GET_SYSTEM /* If we have target() */
struct target data;
if (target(MC_GET_SYSTEM, &data) != -1) {
static char hosttype_buf[sizeof(data.mc_pmt)+1];
char *p = (char *) &(data.mc_pmt);
char *q = hosttype_buf;
int n;
/*
* Copy to buffer and convert to lower case
* String may not be null-terminated, so keep a counter
*/
for (n = 0; *p && n < sizeof(data.mc_pmt); n++)
*q++ = tolower(p[n]);
*q = '\0';
/* replace dashes with underscores if present */
while ((q = strchr(hosttype_buf, '-')) != NULL)
*q = '_';
return hosttype_buf; /* Return in static buffer */
}
else
# endif /* MC_GET_SYSTEM */
return "cray"; /* target() failed */
}
#endif
#if defined(convex)
/*
* On convex, find the current machine type via the getsysinfo() syscall
*/
#include <sys/sysinfo.h>
/* From: fox@convex.com (David DeSimone) */
static char *
getconvex()
{
struct system_information sysinfo;
static char result[8];
if (getsysinfo(SYSINFO_SIZE, &sysinfo) == -1)
return "convex";
switch(sysinfo.cpu_type) {
#ifdef SI_CPUTYPE_C1
case SI_CPUTYPE_C1:
return "c1";
#endif
#ifdef SI_CPUTYPE_C2
case SI_CPUTYPE_C2:
return "c2";
#endif
#ifdef SI_CPUTYPE_C2MP
case SI_CPUTYPE_C2MP:
(void) strcpy(result, "c2X0");
result[2] = sysinfo.cpu_count + '0';
return result;
#endif
#ifdef SI_CPUTYPE_C34
case SI_CPUTYPE_C34:
(void) strcpy(result, "c34X0");
result[3] = sysinfo.cpu_count + '0';
return result;
#endif
#ifdef SI_CPUTYPE_C38
case SI_CPUTYPE_C38:
(void) strcpy(result, "c38X0");
result[3] = sysinfo.cpu_count + '0';
return result;
#endif
#ifdef SI_CPUTYPE_C46
case SI_CPUTYPE_C46:
(void) strcpy(result, "c46X0");
result[3] = sysinfo.cpu_count + '0';
return result;
#endif
default:
return "convex";
}
}
#endif
void
getmachine()
{
char *hosttype;
char *ostype;
char *vendor;
char *machtype;
#if defined(__PARAGON__)
/* Intel Paragon running OSF/1 */
# if !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "paragon";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "osf1";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(AMIX)
/* Amiga running Amix 2.02 */
# if !defined(_vendor_)
# define _vendor_
vendor = "commodore";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "amiga";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "Amix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(accel)
/* celerity Accel */
# if !defined(_vendor_)
# define _vendor_
vendor = "celerity";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "celerityACCEL";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "unix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "accel";
# endif
#endif
#if defined(_VMS_POSIX)
/* digital vax or alpha running vms posix */
# if !defined(_vendor_)
# define _vendor_
vendor = "dec";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "VMS-POSIX";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "vms";
# endif
# if (defined(__alpha)) && !defined(_machtype_)
# define _machtype_
machtype = "alpha";
# endif
# if (defined(__vax) || defined(vax)) && !defined(_machtype_)
# define _machtype_
machtype = "vax";
# endif
# if (defined(__vax__)) && !defined(_machtype_)
# define _machtype_
machtype = "vax";
# endif
#endif
#if defined(__hp_osf)
/* Hewlett Packard running OSF/1 */
# if !defined(_vendor_)
# define _vendor_
vendor = "hp";
# endif
# if (defined(__pa_risc)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "hp9000s700-osf1";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "hp-osf1";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "osf1";
# endif
# if (defined(__pa_risc)) && !defined(_machtype_)
# define _machtype_
machtype = "pa_risc";
# endif
#endif
#if defined(hp9000)
/* Hewlett Packard running MORE/bsd */
# if !defined(_vendor_)
# define _vendor_
vendor = "hp";
# endif
# if (defined(hp300)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "hp300";
# endif
# if (defined(hp800)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "hp800";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "hp9000";
# endif
# if (defined(BSD4_4)) && !defined(_ostype_)
# define _ostype_
ostype = "bsd44";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "mtXinu";
# endif
# if (defined(hp300)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
# if (defined(hp800)) && !defined(_machtype_)
# define _machtype_
machtype = "pa_risc";
# endif
#endif
#if defined(hpux) || defined(__hpux)
/* Hewlett Packard running HP/UX */
# if !defined(_vendor_)
# define _vendor_
vendor = "hp";
# endif
# if (defined(__hp9000s700)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "hp9000s700";
# endif
# if (defined(__hp9000s800) || defined(hp9000s800)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "hp9000s800";
# endif
# if (defined(hp9000s500)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "hp9000s500";
# endif
# if (defined(__hp9000s300) || defined(hp9000s300)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "hp9000s300";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "hp";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "hpux";
# endif
# if (defined(__hp9000s700)) && !defined(_machtype_)
# define _machtype_
machtype = "pa_risc";
# endif
# if (defined(__hp9000s800) || defined(hp9000s800)) && !defined(_machtype_)
# define _machtype_
machtype = "pa_risc";
# endif
# if (defined(hp9000s500)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
# if (defined(__hp9000s300) || defined(hp9000s300)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(apollo)
/* Hewlett Packard apollo running Domain/OS */
# if !defined(_vendor_)
# define _vendor_
vendor = "hp";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "apollo";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "DomainOS";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(sun) || defined(__sun__)
/* Sun Microsystems series 2 workstation (68010 based) */
/* Sun Microsystems series 3 workstation (68020 based) */
/* Sun Microsystems 386i workstation (386 based) */
/* Sun Microsystems series 4 workstation (SPARC based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "sun";
# endif
# if (defined(M_i386) && !defined(__SVR4)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "sun386i";
# endif
# if (defined(M_i386) && defined(__SVR4)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i86pc";
# endif
# if (defined(mc68010) || defined(__mc68010__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "sun2";
# endif
# if (defined(mc68020) || defined(__mc68020__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "sun3";
# endif
# if (defined(sparc) || defined(__sparc__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "sun4";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "sun";
# endif
# if (defined(SUNOS3)) && !defined(_ostype_)
# define _ostype_
ostype = "sunos3";
# endif
# if (defined(SUNOS4)) && !defined(_ostype_)
# define _ostype_
ostype = "sunos4";
# endif
# if (defined(SOLARIS2)) && !defined(_ostype_)
# define _ostype_
ostype = "solaris";
# endif
# if (defined(mc68010) || defined(__mc68010__)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
# if (defined(mc68020) || defined(__mc68020__)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
# if (defined(sparc) || defined(__sparc__)) && !defined(_machtype_)
# define _machtype_
machtype = "sparc";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(pyr)
/* Pyramid Technology */
# if !defined(_vendor_)
# define _vendor_
vendor = "pyramid";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "pyramid";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "pyramid";
# endif
#endif
#if defined(hcx) || defined(_CX_UX)
/* Harris Tahoe running CX/UX */
# if !defined(_vendor_)
# define _vendor_
vendor = "harris";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "hcx";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "hcx";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "tahoe";
# endif
#endif
#if defined(tahoe)
/* Harris Tahoe */
# if !defined(_vendor_)
# define _vendor_
vendor = "harris";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "tahoe";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "tahoe";
# endif
#endif
#if defined(ibm032)
/* RT running IBM AOS4.3 or MACH */
# if !defined(_vendor_)
# define _vendor_
vendor = "ibm";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "rt";
# endif
# if (defined(MACH)) && !defined(_ostype_)
# define _ostype_
ostype = "mach";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "aos";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "ibm032";
# endif
#endif
#if defined(aiws)
/* RT running IBM aix2.x */
# if !defined(_vendor_)
# define _vendor_
vendor = "ibm";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "rtpc";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "aix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "ibm032";
# endif
#endif
#if defined(_AIX370)
/* IBM/370 running aix */
# if !defined(_vendor_)
# define _vendor_
vendor = "ibm";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "aix370";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "aix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "ibm370";
# endif
#endif
#if defined(_IBMESA)
/* IBM/ESA running aix */
# if !defined(_vendor_)
# define _vendor_
vendor = "ibm";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "aixESA";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "aix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "esa";
# endif
#endif
#if defined(_IBMR2)
/* IBM/RS6000 running aix */
# if !defined(_vendor_)
# define _vendor_
vendor = "ibm";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "rs6000";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "aix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "rs6000";
# endif
#endif
#if defined(_AIXPS2)
/* IBM/PS2 running aix */
# if !defined(_vendor_)
# define _vendor_
vendor = "ibm";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "ps2";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "aix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(OREO)
/* Macintosh running AU/X */
# if !defined(_vendor_)
# define _vendor_
vendor = "apple";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "mac2";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "aux";
# endif
# if (defined(mc68020)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(u3b20d)
/* AT&T 3B/20 series running SVR2/3 */
# if !defined(_vendor_)
# define _vendor_
vendor = "att";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "att3b20";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "u3b20";
# endif
#endif
#if defined(u3b15)
/* AT&T 3B/15 series running SVR2/3 */
# if !defined(_vendor_)
# define _vendor_
vendor = "att";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "att3b15";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "u3b15";
# endif
#endif
#if defined(u3b5)
/* AT&T 3B/5 series running SVR2/3 */
# if !defined(_vendor_)
# define _vendor_
vendor = "att";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "att3b5";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "u3b5";
# endif
#endif
#if defined(u3b2)
/* AT&T 3B/2 series running SVR2/3 */
# if !defined(_vendor_)
# define _vendor_
vendor = "att";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "att3b2";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "u3b2";
# endif
#endif
#if defined(UNIXPC)
/* AT&T UnixPC att3b1/att7300 */
# if !defined(_vendor_)
# define _vendor_
vendor = "att";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "unixpc";
# endif
# if (defined(u3b1)) && !defined(_machtype_)
# define _machtype_
machtype = "u3b1";
# endif
# if (defined(att7300)) && !defined(_machtype_)
# define _machtype_
machtype = "att7300";
# endif
#endif
#if defined(_MINIX)
/* Andy Tanenbaum's minix */
# if (defined(M_i386)) && !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if (defined(M_i386)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "minix386";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "minix";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "minix";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(linux)
/* Linus Torvalds's linux */
# if (defined(M_intel)) && !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if (defined(M_i586)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i586-linux";
# endif
# if (defined(M_i486)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i486-linux";
# endif
# if (defined(M_i386)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i386-linux";
# endif
# if (!defined(PPC)) && !defined(_ostype_)
# define _ostype_
ostype = "linux";
# endif
# if (defined(PPC)) && !defined(_ostype_)
# define _ostype_
ostype = "mklinux";
# endif
# if (defined(M_i586)) && !defined(_machtype_)
# define _machtype_
machtype = "i586";
# endif
# if (defined(M_i486)) && !defined(_machtype_)
# define _machtype_
machtype = "i486";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(__alpha)) && !defined(_vendor_)
# define _vendor_
vendor = "dec";
# endif
# if (defined(PPC)) && !defined(_vendor_)
# define _vendor_
vendor = "apple";
# endif
# if (defined(__alpha)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "alpha";
# endif
# if (defined(PPC)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "powerpc";
# endif
# if (defined(__alpha)) && !defined(_machtype_)
# define _machtype_
machtype = "alpha";
# endif
# if (defined(PPC)) && !defined(_machtype_)
# define _machtype_
machtype = "powerpc";
# endif
#endif
#if defined(__EMX__)
/* OS/2 EMX [unix emulation under OS/2] */
# if (defined(M_intel)) && !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if (defined(M_i386)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i386-emx";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "os2";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(__NetBSD__)
/* NetBSD */
# if (defined(arm32)) && !defined(_vendor_)
# define _vendor_
vendor = "acorn";
# endif
# if (defined(alpha)) && !defined(_vendor_)
# define _vendor_
vendor = "digital";
# endif
# if (defined(amiga)) && !defined(_vendor_)
# define _vendor_
vendor = "commodore";
# endif
# if (defined(atari)) && !defined(_vendor_)
# define _vendor_
vendor = "atari";
# endif
# if (defined(hp300)) && !defined(_vendor_)
# define _vendor_
vendor = "hp";
# endif
# if (defined(M_intel)) && !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if (defined(m68k)) && !defined(_vendor_)
# define _vendor_
vendor = "motorola";
# endif
# if (defined(mac68k)) && !defined(_vendor_)
# define _vendor_
vendor = "apple";
# endif
# if (defined(pc532)) && !defined(_vendor_)
# define _vendor_
vendor = "national-semi";
# endif
# if (defined(pmax) || defined(mips)) && !defined(_vendor_)
# define _vendor_
vendor = "dec";
# endif
# if (defined(M_mipsel)) && !defined(_vendor_)
# define _vendor_
vendor = "dec";
# endif
# if (defined(sparc)) && !defined(_vendor_)
# define _vendor_
vendor = "sun";
# endif
# if (defined(sun3)) && !defined(_vendor_)
# define _vendor_
vendor = "sun";
# endif
# if (defined(vax)) && !defined(_vendor_)
# define _vendor_
vendor = "digital";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "NetBSD";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "NetBSD";
# endif
# if (defined(arm32)) && !defined(_machtype_)
# define _machtype_
machtype = "arm32";
# endif
# if (defined(sparc)) && !defined(_machtype_)
# define _machtype_
machtype = "sparc";
# endif
# if (defined(mc68020)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(M_mipsel)) && !defined(_machtype_)
# define _machtype_
machtype = "mipsel";
# endif
# if (defined(M_mipseb)) && !defined(_machtype_)
# define _machtype_
machtype = "mipseb";
# endif
# if (defined(mips)) && !defined(_machtype_)
# define _machtype_
machtype = "mips";
# endif
# if (defined(pc532)) && !defined(_machtype_)
# define _machtype_
machtype = "pc532";
# endif
# if (defined(vax)) && !defined(_machtype_)
# define _machtype_
machtype = "vax";
# endif
# if (defined(alpha)) && !defined(_machtype_)
# define _machtype_
machtype = "alpha";
# endif
#endif
#if defined(__FreeBSD__)
/* FreeBSD */
# if (defined(__alpha)) && !defined(_vendor_)
# define _vendor_
vendor = "digital";
# endif
# if (defined(M_intel)) && !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "FreeBSD";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "FreeBSD";
# endif
# if (defined(__alpha)) && !defined(_machtype_)
# define _machtype_
machtype = "alpha";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(__386BSD__)
/* Bill Jolitz's 386BSD */
# if (defined(M_intel)) && !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "386BSD";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "386BSD";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(bsdi)
/* BSDI's unix */
# if (defined(M_intel)) && !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if (defined(sparc)) && !defined(_vendor_)
# define _vendor_
vendor = "sun";
# endif
# if (defined(__powerpc__)) && !defined(_vendor_)
# define _vendor_
vendor = "motorola";
# endif
# if (defined(M_intel)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "bsd386";
# endif
# if (defined(sparc)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "bsd-sparc";
# endif
# if (defined(__powerpc__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "bsd-powerpc";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "bsdi";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(sparc)) && !defined(_machtype_)
# define _machtype_
machtype = "sparc";
# endif
# if (defined(__powerpc__)) && !defined(_machtype_)
# define _machtype_
machtype = "powerpc";
# endif
#endif
#if defined(COHERENT)
/* COHERENT's unix */
# if (defined(_I386)) && !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "coh386";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "coherent";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "coherent";
# endif
# if (defined(_I386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(SCO)
/* SCO UNIX System V/386 Release 3.2 */
# if !defined(_vendor_)
# define _vendor_
vendor = "sco";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "sco386";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "sco_unix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(M_XENIX) && !defined(M_UNIX)
/* SCO XENIX */
# if !defined(_vendor_)
# define _vendor_
vendor = "sco";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "sco_xenix";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "sco_xenix";
# endif
# if (defined(M_I386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(M_I286)) && !defined(_machtype_)
# define _machtype_
machtype = "i286";
# endif
#endif
#if defined(ISC) || defined(ISC202)
/* Interactive Unix */
# if !defined(_vendor_)
# define _vendor_
vendor = "isc";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "isc386";
# endif
# if (defined(POSIX)) && !defined(_ostype_)
# define _ostype_
ostype = "POSIX";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "SVR3";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(INTEL)
/* Intel Unix */
# if !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "intel386";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "intel_unix";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(MACH)
/* cmu's mach */
# if !defined(_vendor_)
# define _vendor_
vendor = "cmu";
# endif
# if (defined(M_i386)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i386-mach";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "mach";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(alliant)
/* Alliants FSX */
# if !defined(_vendor_)
# define _vendor_
vendor = "alliant";
# endif
# if (defined(mc68000)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "alliant-fx80";
# endif
# if (defined(i860)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "alliant-fx2800";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "alliant";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "fsx";
# endif
# if (defined(mc68000)) && !defined(_machtype_)
# define _machtype_
machtype = "mc68000";
# endif
# if (defined(i860)) && !defined(_machtype_)
# define _machtype_
machtype = "i860";
# endif
#endif
#if defined(_FTX)
/* Stratus Computer, Inc FTX2 (i860 based) */
/* Stratus Computer, Inc FTX3 (HPPA based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "stratus";
# endif
# if (defined(i860) && defined(_FTX)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "atlantic";
# endif
# if (defined(__hppa) && defined(_FTX)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "continuum";
# endif
# if (defined(i860) && defined(_FTX)) && !defined(_ostype_)
# define _ostype_
ostype = "ftx2";
# endif
# if (defined(__hppa) && defined(_FTX)) && !defined(_ostype_)
# define _ostype_
ostype = "ftx3";
# endif
# if (defined(i860)) && !defined(_machtype_)
# define _machtype_
machtype = "i860";
# endif
# if (defined(__hppa)) && !defined(_machtype_)
# define _machtype_
machtype = "hppa";
# endif
#endif
#if defined(sequent) || defined(_SEQUENT_)
/* Sequent Balance (32000 based) */
/* Sequent Symmetry running DYNIX/ptx (386/486 based) */
/* Sequent Symmetry running DYNIX 3 (386/486 based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "sequent";
# endif
# if (defined(M_i386) && defined(sequent)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "symmetry";
# endif
# if (defined(M_i386)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "ptx";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "balance";
# endif
# if (defined(M_i386) && !defined(sequent)) && !defined(_ostype_)
# define _ostype_
ostype = "ptx";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "dynix3";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(ns32000)) && !defined(_machtype_)
# define _machtype_
machtype = "ns32000";
# endif
#endif
#if defined(ns32000)
/* Encore Computer Corp. Multimax (32000 based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "encore";
# endif
# if (defined(CMUCS)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "multimax";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = isamultimax(0);
# endif
# if (defined(CMUCS)) && !defined(_ostype_)
# define _ostype_
ostype = "mach";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = isamultimax(1);
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "ns32000";
# endif
#endif
#if defined(iconuxv)
/* Icon 88k running Unix */
# if !defined(_vendor_)
# define _vendor_
vendor = "icon";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "icon";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "iconuxv";
# endif
# if (defined(m88k) || defined(__m88k__)) && !defined(_machtype_)
# define _machtype_
machtype = "m88k";
# endif
#endif
#if defined(_CRAY) && defined(_CRAYCOM)
/* Cray Computer Corp. running CSOS */
# if !defined(_vendor_)
# define _vendor_
vendor = "ccc";
# endif
# if (defined(_CRAY2)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "cray";
# endif
# if (defined(_CRAY3)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "cray";
# endif
# if (defined(_CRAY4)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "cray";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "CSOS";
# endif
# if (defined(_CRAY2)) && !defined(_machtype_)
# define _machtype_
machtype = "cray2";
# endif
# if (defined(_CRAY3)) && !defined(_machtype_)
# define _machtype_
machtype = "cray3";
# endif
# if (defined(_CRAY4)) && !defined(_machtype_)
# define _machtype_
machtype = "cray4";
# endif
#endif
#if defined(cray) && !defined(_CRAYMPP)
/* Cray Research Inc. PVP running UNICOS */
# if !defined(_vendor_)
# define _vendor_
vendor = "cri";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = getcray();
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "unicos";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = getcray();
# endif
#endif
#if defined(cray) && defined(_CRAYT3D)
/* Cray Research Inc. running UNICOS MAX */
# if !defined(_vendor_)
# define _vendor_
vendor = "cri";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = getcray();
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "unicosmax";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = getcray();
# endif
#endif
#if defined(cray) && defined(_CRAYT3E)
/* Cray Research Inc. running UNICOS/mk */
# if !defined(_vendor_)
# define _vendor_
vendor = "cri";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = getcray();
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "unicosmk";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = getcray();
# endif
#endif
#if defined(convex)
/* Convex */
# if !defined(_vendor_)
# define _vendor_
vendor = "convex";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "convex";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "convexos";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = getconvex();
# endif
#endif
#if defined(butterfly)
/* BBN Butterfly 1000 */
# if !defined(_vendor_)
# define _vendor_
vendor = "bbn";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "butterfly";
# endif
# if (defined(mc68020) || defined(__mc68020__)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(NeXT)
/* NeXTStep */
# if !defined(_vendor_)
# define _vendor_
vendor = "next";
# endif
# if (defined(mc68020) || defined(__mc68020__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "next";
# endif
# if (defined(M_i386) || defined(__i386__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "intel-pc";
# endif
# if (defined(hppa) || defined(__hppa__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "hp";
# endif
# if (defined(sparc) || defined(__sparc__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "sun";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "nextstep";
# endif
# if (defined(mc68020) || defined(__mc68020__)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
# if (defined(M_i386) || defined(__i386__)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(hppa) || defined(__hppa__)) && !defined(_machtype_)
# define _machtype_
machtype = "hppa";
# endif
# if (defined(sparc) || defined(__sparc__)) && !defined(_machtype_)
# define _machtype_
machtype = "sparc";
# endif
#endif
#if defined(__APPLE__)
/* Rhapsody */
# if !defined(_vendor_)
# define _vendor_
vendor = "apple";
# endif
# if (defined(__i386__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "intel-pc";
# endif
# if (defined(__ppc__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "macintosh";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "rhapsody";
# endif
# if (defined(__i386__)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(__ppc__)) && !defined(_machtype_)
# define _machtype_
machtype = "powerpc";
# endif
#endif
#if defined(sony_news)
/* Sony NEWS 800 or 1700 workstation */
# if !defined(_vendor_)
# define _vendor_
vendor = "sony";
# endif
# if (defined(mips)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "news_mips";
# endif
# if (defined(mc68020) || defined(__mc68020__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "news_m68k";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "News";
# endif
# if (defined(mc68020) || defined(__mc68020__)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
# if (defined(M_mipsel)) && !defined(_machtype_)
# define _machtype_
machtype = "mipsel";
# endif
# if (defined(M_mipseb)) && !defined(_machtype_)
# define _machtype_
machtype = "mipseb";
# endif
#endif
#if defined(sgi)
/* Silicon Graphics */
# if !defined(_vendor_)
# define _vendor_
vendor = "sgi";
# endif
# if (defined(M_mipsel)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "iris4d";
# endif
# if (defined(M_mipseb)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "iris4d";
# endif
# if (defined(mc68000)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "iris3d";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "irix";
# endif
# if (defined(M_mipsel)) && !defined(_machtype_)
# define _machtype_
machtype = "mipsel";
# endif
# if (defined(M_mipseb)) && !defined(_machtype_)
# define _machtype_
machtype = "mipseb";
# endif
# if (defined(mc68000)) && !defined(_machtype_)
# define _machtype_
machtype = "mc68000";
# endif
#endif
#if defined(ultrix) || defined(__ultrix)
/* Digital's Ultrix */
# if !defined(_vendor_)
# define _vendor_
vendor = "dec";
# endif
# if (defined(M_mipsel)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "decstation";
# endif
# if (defined(M_mipseb)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "decmips";
# endif
# if (defined(vax) || defined(__vax)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "vax";
# endif
# if (defined(__vax__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "vax";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "ultrix";
# endif
# if (defined(M_mipsel)) && !defined(_machtype_)
# define _machtype_
machtype = "mipsel";
# endif
# if (defined(M_mipseb)) && !defined(_machtype_)
# define _machtype_
machtype = "mipseb";
# endif
# if (defined(vax) || defined (__vax)) && !defined(_machtype_)
# define _machtype_
machtype = "vax";
# endif
# if (defined(__vax__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "vax";
# endif
#endif
#if defined(MIPS)
/* Mips OS */
# if !defined(_vendor_)
# define _vendor_
vendor = "mips";
# endif
# if (defined(M_mipsel)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "mips";
# endif
# if (defined(M_mipseb)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "mips";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "mips";
# endif
# if (defined(M_mipsel)) && !defined(_machtype_)
# define _machtype_
machtype = "mipsel";
# endif
# if (defined(M_mipseb)) && !defined(_machtype_)
# define _machtype_
machtype = "mipseb";
# endif
#endif
#if defined(DECOSF1)
/* Digital's alpha running osf1 */
# if !defined(_vendor_)
# define _vendor_
vendor = "dec";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "osf1";
# endif
# if (defined(__alpha)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "alpha";
# endif
# if (defined(__alpha)) && !defined(_machtype_)
# define _machtype_
machtype = "alpha";
# endif
#endif
#if defined(Lynx)
/* Lynx OS 2.1 */
# if !defined(_vendor_)
# define _vendor_
vendor = "Lynx";
# endif
# if (defined(M_mipsel)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "lynxos-mips";
# endif
# if (defined(M_mipseb)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "lynxos-mips";
# endif
# if (defined(M_i386)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "lynxos-i386";
# endif
# if (defined(i860) || defined(__i860__)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "lynxos-i860";
# endif
# if (defined(m68k)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "lynxos-m68k";
# endif
# if (defined(m88k)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "lynxos-m88k";
# endif
# if (defined(sparc)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "lynxos-sparc";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "lynxos-unknown";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "LynxOS";
# endif
# if (defined(M_mipsel)) && !defined(_machtype_)
# define _machtype_
machtype = "mipsel";
# endif
# if (defined(M_mipseb)) && !defined(_machtype_)
# define _machtype_
machtype = "mipseb";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(i860) || defined(__i860__)) && !defined(_machtype_)
# define _machtype_
machtype = "i860";
# endif
# if (defined(m68k)) && !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
# if (defined(m88k)) && !defined(_machtype_)
# define _machtype_
machtype = "m88k";
# endif
# if (defined(sparc)) && !defined(_machtype_)
# define _machtype_
machtype = "sparc";
# endif
#endif
#if defined(masscomp)
/* Masscomp */
# if !defined(_vendor_)
# define _vendor_
vendor = "masscomp";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "masscomp";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "masscomp";
# endif
#endif
#if defined(__MACHTEN__)
/* Machintosh */
# if !defined(_vendor_)
# define _vendor_
vendor = "Tenon";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "Macintosh";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "MachTen";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "Macintosh";
# endif
#endif
#if defined(GOULD_NP1)
/* Gould */
# if !defined(_vendor_)
# define _vendor_
vendor = "gould";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "gould_np1";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "gould";
# endif
#endif
#if defined(MULTIFLOW)
/* Multiflow running 4.3BSD */
# if !defined(_vendor_)
# define _vendor_
vendor = "multiflow";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "multiflow";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "multiflow";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "bsd43";
# endif
#endif
#if defined(SXA)
/* PFU/Fujitsu A-xx computer */
# if !defined(_vendor_)
# define _vendor_
vendor = "sxa";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "pfa50";
# endif
# if (defined(_BSDX_)) && !defined(_ostype_)
# define _ostype_
ostype = "e60-bsdx";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "e60";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "pfa50";
# endif
#endif
#if defined(titan)
/* (St)Ardent Titan */
# if !defined(_vendor_)
# define _vendor_
vendor = "ardent";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "titan";
# endif
#endif
#if defined(stellar)
/* Stellar */
# if !defined(_vendor_)
# define _vendor_
vendor = "stellar";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "stellar";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "stellix";
# endif
#endif
#if defined(atari)
/* Atari TT running SVR4. This machine was never */
/* commercially available. */
# if !defined(_vendor_)
# define _vendor_
vendor = "atari";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "atari";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "asv";
# endif
#endif
#if defined(OPUS)
/* ??? */
# if !defined(_vendor_)
# define _vendor_
vendor = "opus";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "opus";
# endif
#endif
#if defined(eta10)
/* ETA running SVR3 */
# if !defined(_vendor_)
# define _vendor_
vendor = "eta";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "eta10";
# endif
#endif
#if defined(hk68)
/* Heurikon HK68 running Uniplus+ 5.0 */
# if !defined(_vendor_)
# define _vendor_
vendor = "heurikon";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "hk68";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "uniplus";
# endif
#endif
#if defined(NDIX)
/* Norsk Data ND 500/5000 running Ndix */
# if !defined(_vendor_)
# define _vendor_
vendor = "norsk";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "nd500";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "ndix";
# endif
#endif
#if defined(AMIGA)
/* Amiga running AmigaOS+GG */
# if !defined(_vendor_)
# define _vendor_
vendor = "commodore";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "amiga";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "AmigaOS";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(uts)
/* Amdahl running uts 2.1 */
# if !defined(_vendor_)
# define _vendor_
vendor = "amdahl";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "amdahl";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "uts";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "amdahl";
# endif
#endif
#if defined(UTek)
/* Tektronix 4300 running UTek (BSD 4.2 / 68020 based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "tektronix";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "tek4300";
# endif
#endif
#if defined(UTekV)
/* Tektronix XD88/10 running UTekV 3.2e (SVR3/88100 based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "tektronix";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "tekXD88";
# endif
#endif
#if defined(__DGUX__)
/* Data-General AViiON running DGUX */
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "aviion";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "dgux";
# endif
# if !defined(_vendor_)
# define _vendor_
vendor = "dg";
# endif
# if (defined(__m88k__)) && !defined(_machtype_)
# define _machtype_
machtype = "m88k";
# endif
# if (defined(__i386__)) && !defined(_machtype_)
# define _machtype_
machtype = "pentium";
# endif
#endif
#if defined(sysV68)
/* Motorola MPC running System V/68 R32V2 (SVR3/68020 based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "motorola";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "sysV68";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(supermax)
/* DDE Supermax running System V/68 R3 (SVR3/68020 based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "supermax";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "supermax";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(sysV88)
/* Motorola MPC running System V/88 R32V2 (SVR3/88100 based) */
# if !defined(_vendor_)
# define _vendor_
vendor = "motorola";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "sysV88";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "m88k";
# endif
#endif
#if defined(__clipper__)
/* Clipper Chipset (Intergraph) */
# if !defined(_vendor_)
# define _vendor_
vendor = "intergraph";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "clipper";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "clipper";
# endif
#endif
#if defined(SNI) || defined(sinix)
/* Siemens Nixdorf Informationssysteme SINIX */
# if !defined(_vendor_)
# define _vendor_
vendor = "sni";
# endif
# if (defined(M_intel)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "wx200i";
# endif
# if (defined(MIPSEB)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "rm400";
# endif
# if (defined(sinix)) && !defined(_ostype_)
# define _ostype_
ostype = "sinix";
# endif
# if (defined(M_i586)) && !defined(_machtype_)
# define _machtype_
machtype = "i586";
# endif
# if (defined(M_i486)) && !defined(_machtype_)
# define _machtype_
machtype = "i486";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
# if (defined(M_mipsel)) && !defined(_machtype_)
# define _machtype_
machtype = "mipsel";
# endif
# if (defined(M_mipseb)) && !defined(_machtype_)
# define _machtype_
machtype = "mipseb";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "mips";
# endif
#endif
#if defined(_OSD_POSIX)
/* Siemens Nixdorf Informationssysteme BS2000 POSIX (mainframe, EBCDIC) */
# if !defined(_vendor_)
# define _vendor_
vendor = "sni";
# endif
# if (defined(M_intel)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "bs2000";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "posix";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "bs2000";
# endif
#endif
#if defined(_SX)
/* NEC Corporation (SX-4) */
# if !defined(_vendor_)
# define _vendor_
vendor = "nec";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "superux";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "sx4";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "sx4";
# endif
#endif
#if !defined(SOLARIS2) && (SYSVREL == 4)
/* Unix System V Release 4.0 */
# if (defined(DELL)) && !defined(_vendor_)
# define _vendor_
vendor = "dell";
# endif
# if (defined(M_i386)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i386";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "svr4";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(__uxp__) || defined(__uxps__)
/* FUJITSU DS/90 7000 */
# if !defined(_vendor_)
# define _vendor_
vendor = "fujitsu";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "ds90";
# endif
# if !defined(_ostype_)
# define _ostype_
ostype = "sysv4";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "sparc";
# endif
#endif
#if defined(_UWIN)
/* AT&T Research Unix for Windows */
# if !defined(_vendor_)
# define _vendor_
vendor = "att";
# endif
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "win32.i386";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(mc68000) || defined(__mc68000__) || defined(mc68k32) || defined(m68k) || defined(mc68010) || defined(mc68020)
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "m68k";
# endif
# if (defined(m68k)) && !defined(_vendor_)
# define _vendor_
vendor = "motorola";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "m68k";
# endif
#endif
#if defined(m88k) || defined(__m88k__)
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "m88k";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "m88k";
# endif
#endif
#if defined(M_intel)
# if (defined(M_i586)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i586";
# endif
# if (defined(M_i486)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i486";
# endif
# if (defined(M_i386)) && !defined(_hosttype_)
# define _hosttype_
hosttype = "i386";
# endif
# if !defined(_vendor_)
# define _vendor_
vendor = "intel";
# endif
# if (defined(M_i586)) && !defined(_machtype_)
# define _machtype_
machtype = "i586";
# endif
# if (defined(M_i486)) && !defined(_machtype_)
# define _machtype_
machtype = "i486";
# endif
# if (defined(M_i386)) && !defined(_machtype_)
# define _machtype_
machtype = "i386";
# endif
#endif
#if defined(sparc) || defined(__sparc__)
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "sparc";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "sparc";
# endif
#endif
#if defined(i860) || defined(__i860__)
# if !defined(_hosttype_)
# define _hosttype_
hosttype = "i860";
# endif
# if !defined(_machtype_)
# define _machtype_
machtype = "i860";
# endif
#endif
#if defined(osf1)
# if !defined(_ostype_)
# define _ostype_
ostype = "osf1";
# endif
#endif
#if SYSVREL == 0
# if (defined(BSD4_4)) && !defined(_ostype_)
# define _ostype_
ostype = "bsd44";
# endif
# if (defined(BSD)) && !defined(_ostype_)
# define _ostype_
ostype = "bsd";
# endif
# if (defined(POSIX)) && !defined(_ostype_)
# define _ostype_
ostype = "posix";
# endif
# if (defined(unix) || defined(__unix__)) && !defined(_ostype_)
# define _ostype_
ostype = "unix";
# endif
#endif
#if SYSVREL == 1
# if !defined(_ostype_)
# define _ostype_
ostype = "svr1";
# endif
#endif
#if SYSVREL == 2
# if !defined(_ostype_)
# define _ostype_
ostype = "svr2";
# endif
#endif
#if SYSVREL == 3
# if !defined(_ostype_)
# define _ostype_
ostype = "svr3";
# endif
#endif
#if SYSVREL == 4
# if !defined(_ostype_)
# define _ostype_
ostype = "svr4";
# endif
#endif
#ifndef _hosttype_
hosttype = "unknown";
#endif
#ifndef _ostype_
ostype = "unknown";
#endif
#ifndef _vendor_
vendor = "unknown";
#endif
#ifndef _machtype_
machtype = "unknown";
#endif
tsetenv(STRHOSTTYPE, str2short(hosttype));
tsetenv(STRVENDOR, str2short(vendor));
tsetenv(STROSTYPE, str2short(ostype));
tsetenv(STRMACHTYPE, str2short(machtype));
} /* end setmachine */
Reference in New Issue View Git Blame Copy Permalink