Context Navigation

host.defs @ 12039

Visit:

Revision 12039, 26.3 KB checked in by danw, 26 years ago (diff)
This commit was generated by cvs2svn to compensate for changes in r12038, which included commits to RCS files with non-trunk default branches.

Line
1	newcode :
2	/* $Header: /afs/dev.mit.edu/source/repository/third/tcsh/host.defs,v 1.1.1.1 1998-10-03 21:09:51 danw Exp $ */
3	/*
4	* host.defs: Hosttype/Machtype etc.
5	*/
6	/*-
7	* Copyright (c) 1980, 1991 The Regents of the University of California.
8	* All rights reserved.
9	*
10	* Redistribution and use in source and binary forms, with or without
11	* modification, are permitted provided that the following conditions
12	* are met:
13	* 1. Redistributions of source code must retain the above copyright
14	* notice, this list of conditions and the following disclaimer.
15	* 2. Redistributions in binary form must reproduce the above copyright
16	* notice, this list of conditions and the following disclaimer in the
17	* documentation and/or other materials provided with the distribution.
18	* 3. All advertising materials mentioning features or use of this software
19	* must display the following acknowledgement:
20	* This product includes software developed by the University of
21	* California, Berkeley and its contributors.
22	* 4. Neither the name of the University nor the names of its contributors
23	* may be used to endorse or promote products derived from this software
24	* without specific prior written permission.
25	*
26	* THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
27	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
28	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
29	* ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
30	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
31	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
32	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
33	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
34	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
35	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36	* SUCH DAMAGE.
37	*/
38	#include "sh.h"
39
40	RCSID("$Id: host.defs,v 1.1.1.1 1998-10-03 21:09:51 danw Exp $")
41
42	endcode :
43
44	macro : M_mipsel : (defined(mips) \|\| defined(__mips)) && (defined(MIPSEL) \|\| defined(__MIPSEL))
45	macro : M_mipseb : (defined(mips) \|\| defined(__mips)) && (defined(MIPSEB) \|\| defined(__MIPSEB))
46	macro : M_i386 : (defined(i386) \|\| defined(__i386__))
47	macro : M_i486 : (defined(i486) \|\| defined(__i486__))
48	macro : M_i586 : (defined(i586) \|\| defined(__i586__))
49	macro : M_intel : (defined(M_i386) \|\| defined(M_i486) \|\| defined(M_i586))
50
51	newdef : defined(ns32000)
52	newcode :
53	static char *
54	isamultimax(flag)
55	int flag;
56	{
57	if (access("/Umax.image", F_OK) == 0)
58	return "multimax";
59	else
60	return flag ? "mach" : "ns32000";
61	}
62	endcode :
63	enddef :
64
65
66	newdef : defined(cray)
67	newcode :
68	/*
69	* On crays, find the current machine type via the target() syscall
70	* We need ctype.h to convert the name returned to lower case
71	*/
72	# include <sys/target.h>
73	# include <ctype.h>
74	# include <string.h>
75
76	/* From: hpa@hook.eecs.nwu.edu (H. Peter Anvin) */
77	static char *
78	getcray()
79	{
80	# ifdef MC_GET_SYSTEM /* If we have target() */
81	struct target data;
82
83	if (target(MC_GET_SYSTEM, &data) != -1) {
84	static char hosttype_buf[sizeof(data.mc_pmt)+1];
85	char p = (char ) &(data.mc_pmt);
86	char *q = hosttype_buf;
87	int n;
88
89	/*
90	* Copy to buffer and convert to lower case
91	* String may not be null-terminated, so keep a counter
92	*/
93	for (n = 0; *p && n < sizeof(data.mc_pmt); n++)
94	*q++ = tolower(p[n]);
95
96	*q = '\0';
97
98	/* replace dashes with underscores if present */
99	while ((q = strchr(hosttype_buf, '-')) != NULL)
100	*q = '_';
101	return hosttype_buf; /* Return in static buffer */
102	}
103	else
104	# endif /* MC_GET_SYSTEM */
105	return "cray"; /* target() failed */
106	}
107	endcode :
108	enddef :
109
110
111	newdef : defined(convex)
112	newcode :
113	/*
114	* On convex, find the current machine type via the getsysinfo() syscall
115	*/
116	#include <sys/sysinfo.h>
117
118	/* From: fox@convex.com (David DeSimone) */
119	static char *
120	getconvex()
121	{
122	struct system_information sysinfo;
123	static char result[8];
124
125	if (getsysinfo(SYSINFO_SIZE, &sysinfo) == -1)
126	return "convex";
127
128	switch(sysinfo.cpu_type) {
129	#ifdef SI_CPUTYPE_C1
130	case SI_CPUTYPE_C1:
131	return "c1";
132	#endif
133
134	#ifdef SI_CPUTYPE_C2
135	case SI_CPUTYPE_C2:
136	return "c2";
137	#endif
138
139	#ifdef SI_CPUTYPE_C2MP
140	case SI_CPUTYPE_C2MP:
141	(void) strcpy(result, "c2X0");
142	result[2] = sysinfo.cpu_count + '0';
143	return result;
144	#endif
145
146	#ifdef SI_CPUTYPE_C34
147	case SI_CPUTYPE_C34:
148	(void) strcpy(result, "c34X0");
149	result[3] = sysinfo.cpu_count + '0';
150	return result;
151	#endif
152
153	#ifdef SI_CPUTYPE_C38
154	case SI_CPUTYPE_C38:
155	(void) strcpy(result, "c38X0");
156	result[3] = sysinfo.cpu_count + '0';
157	return result;
158	#endif
159
160	#ifdef SI_CPUTYPE_C46
161	case SI_CPUTYPE_C46:
162	(void) strcpy(result, "c46X0");
163	result[3] = sysinfo.cpu_count + '0';
164	return result;
165	#endif
166
167	default:
168	return "convex";
169	}
170	}
171	endcode :
172	enddef :
173
174
175	newcode :
176	void
177	getmachine()
178	{
179	char *hosttype;
180	char *ostype;
181	char *vendor;
182	char *machtype;
183
184	endcode :
185
186
187	newdef : defined(__PARAGON__)
188	comment : Intel Paragon running OSF/1
189	vendor : : "intel"
190	hosttype: : "paragon"
191	ostype : : "osf1"
192	machtype: defined(M_i386) : "i386"
193	enddef :
194
195
196	newdef : defined(AMIX)
197	comment : Amiga running Amix 2.02
198	vendor : : "commodore"
199	hosttype: : "amiga"
200	ostype : : "Amix"
201	machtype: : "m68k"
202	enddef :
203
204
205	newdef : defined(accel)
206	comment : celerity Accel
207	vendor : : "celerity"
208	hosttype: : "celerityACCEL"
209	ostype : : "unix"
210	machtype: : "accel"
211	enddef :
212
213
214	newdef : defined(_VMS_POSIX)
215	comment : digital vax or alpha running vms posix
216	vendor : : "dec"
217	hosttype: : "VMS-POSIX"
218	ostype : : "vms"
219	machtype: defined(__alpha) : "alpha"
220	machtype: defined(__vax) \|\| defined(vax) : "vax"
221	machtype: defined(__vax__) : "vax"
222	enddef :
223
224
225	newdef : defined(__hp_osf)
226	comment : Hewlett Packard running OSF/1
227	vendor : : "hp"
228	hosttype: defined(__pa_risc) : "hp9000s700-osf1"
229	hosttype: : "hp-osf1"
230	ostype : : "osf1"
231	machtype: defined(__pa_risc) : "pa_risc"
232	enddef :
233
234
235	newdef : defined(hp9000)
236	comment : Hewlett Packard running MORE/bsd
237	vendor : : "hp"
238	hosttype: defined(hp300) : "hp300"
239	hosttype: defined(hp800) : "hp800"
240	hosttype: : "hp9000"
241	ostype : defined(BSD4_4) : "bsd44"
242	ostype : : "mtXinu"
243	machtype: defined(hp300) : "m68k"
244	machtype: defined(hp800) : "pa_risc"
245	enddef :
246
247
248	newdef : defined(hpux) \|\| defined(__hpux)
249	comment : Hewlett Packard running HP/UX
250	vendor : : "hp"
251	hosttype: defined(__hp9000s700) : "hp9000s700"
252	hosttype: defined(__hp9000s800) \|\| defined(hp9000s800) : "hp9000s800"
253	hosttype: defined(hp9000s500) : "hp9000s500"
254	hosttype: defined(__hp9000s300) \|\| defined(hp9000s300) : "hp9000s300"
255	hosttype: : "hp"
256	ostype : : "hpux"
257	machtype: defined(__hp9000s700) : "pa_risc"
258	machtype: defined(__hp9000s800) \|\| defined(hp9000s800) : "pa_risc"
259	machtype: defined(hp9000s500) : "m68k"
260	machtype: defined(__hp9000s300) \|\| defined(hp9000s300) : "m68k"
261	enddef :
262
263
264	newdef : defined(apollo)
265	comment : Hewlett Packard apollo running Domain/OS
266	vendor : : "hp"
267	hosttype: : "apollo"
268	ostype : : "DomainOS"
269	machtype: : "m68k"
270	enddef :
271
272
273	newdef : defined(sun) \|\| defined(__sun__)
274	comment : Sun Microsystems series 2 workstation (68010 based)
275	comment : Sun Microsystems series 3 workstation (68020 based)
276	comment : Sun Microsystems 386i workstation (386 based)
277	comment : Sun Microsystems series 4 workstation (SPARC based)
278	vendor : : "sun"
279	hosttype: defined(M_i386) && !defined(__SVR4) : "sun386i"
280	hosttype: defined(M_i386) && defined(__SVR4) : "i86pc"
281	hosttype: defined(mc68010) \|\| defined(__mc68010__) : "sun2"
282	hosttype: defined(mc68020) \|\| defined(__mc68020__) : "sun3"
283	hosttype: defined(sparc) \|\| defined(__sparc__) : "sun4"
284	hosttype: : "sun"
285	ostype : defined(SUNOS3) : "sunos3"
286	ostype : defined(SUNOS4) : "sunos4"
287	ostype : defined(SOLARIS2) : "solaris"
288	machtype: defined(mc68010) \|\| defined(__mc68010__) : "m68k"
289	machtype: defined(mc68020) \|\| defined(__mc68020__) : "m68k"
290	machtype: defined(sparc) \|\| defined(__sparc__) : "sparc"
291	machtype: defined(M_i386) : "i386"
292	enddef :
293
294
295	newdef : defined(pyr)
296	comment : Pyramid Technology
297	vendor : : "pyramid"
298	hosttype: : "pyramid"
299	machtype: : "pyramid"
300	enddef :
301
302
303	newdef : defined(hcx) \|\| defined(_CX_UX)
304	comment : Harris Tahoe running CX/UX
305	vendor : : "harris"
306	hosttype: : "hcx"
307	ostype : : "hcx"
308	machtype: : "tahoe"
309	enddef :
310
311
312	newdef : defined(tahoe)
313	comment : Harris Tahoe
314	vendor : : "harris"
315	hosttype: : "tahoe"
316	machtype: : "tahoe"
317	enddef :
318
319
320	newdef : defined(ibm032)
321	comment : RT running IBM AOS4.3 or MACH
322	vendor : : "ibm"
323	hosttype: : "rt"
324	ostype : defined(MACH) : "mach"
325	ostype : : "aos"
326	machtype: : "ibm032"
327	enddef :
328
329
330	newdef : defined(aiws)
331	comment : RT running IBM aix2.x
332	vendor : : "ibm"
333	hosttype: : "rtpc"
334	ostype : : "aix"
335	machtype: : "ibm032"
336	enddef :
337
338
339	newdef : defined(_AIX370)
340	comment : IBM/370 running aix
341	vendor : : "ibm"
342	hosttype: : "aix370"
343	ostype : : "aix"
344	machtype: : "ibm370"
345	enddef :
346
347
348	newdef : defined(_IBMESA)
349	comment : IBM/ESA running aix
350	vendor : : "ibm"
351	hosttype: : "aixESA"
352	ostype : : "aix"
353	machtype: : "esa"
354	enddef :
355
356
357	newdef : defined(_IBMR2)
358	comment : IBM/RS6000 running aix
359	vendor : : "ibm"
360	hosttype: : "rs6000"
361	ostype : : "aix"
362	machtype: : "rs6000"
363	enddef :
364
365
366	newdef : defined(_AIXPS2)
367	comment : IBM/PS2 running aix
368	vendor : : "ibm"
369	hosttype: : "ps2"
370	ostype : : "aix"
371	machtype: : "i386"
372	enddef :
373
374
375	newdef : defined(OREO)
376	comment : Macintosh running AU/X
377	vendor : : "apple"
378	hosttype: : "mac2"
379	ostype : : "aux"
380	machtype: defined(mc68020) : "m68k"
381	enddef :
382
383
384	newdef : defined(u3b20d)
385	comment : AT&T 3B/20 series running SVR2/3
386	vendor : : "att"
387	hosttype: : "att3b20"
388	machtype: : "u3b20"
389	enddef :
390
391
392	newdef : defined(u3b15)
393	comment : AT&T 3B/15 series running SVR2/3
394	vendor : : "att"
395	hosttype: : "att3b15"
396	machtype: : "u3b15"
397	enddef :
398
399
400	newdef : defined(u3b5)
401	comment : AT&T 3B/5 series running SVR2/3
402	vendor : : "att"
403	hosttype: : "att3b5"
404	machtype: : "u3b5"
405	enddef :
406
407
408	newdef : defined(u3b2)
409	comment : AT&T 3B/2 series running SVR2/3
410	vendor : : "att"
411	hosttype: : "att3b2"
412	machtype: : "u3b2"
413	enddef :
414
415
416	newdef : defined(UNIXPC)
417	comment : AT&T UnixPC att3b1/att7300
418	vendor : : "att"
419	hosttype: : "unixpc"
420	machtype: defined(u3b1) : "u3b1"
421	machtype: defined(att7300) : "att7300"
422	enddef :
423
424
425	newdef : defined(_MINIX)
426	comment : Andy Tanenbaum's minix
427	vendor : defined(M_i386) : "intel"
428	hosttype: defined(M_i386) : "minix386"
429	hosttype: : "minix"
430	ostype : : "minix"
431	machtype: defined(M_i386) : "i386"
432	enddef :
433
434
435	newdef : defined(linux)
436	comment : Linus Torvalds's linux
437	vendor : defined(M_intel) : "intel"
438	hosttype: defined(M_i586) : "i586-linux"
439	hosttype: defined(M_i486) : "i486-linux"
440	hosttype: defined(M_i386) : "i386-linux"
441	ostype : !defined(PPC) : "linux"
442	ostype : defined(PPC) : "mklinux"
443	machtype: defined(M_i586) : "i586"
444	machtype: defined(M_i486) : "i486"
445	machtype: defined(M_i386) : "i386"
446	vendor : defined(__alpha) : "dec"
447	vendor : defined(PPC) : "apple"
448	hosttype: defined(__alpha) : "alpha"
449	hosttype: defined(PPC) : "powerpc"
450	machtype: defined(__alpha) : "alpha"
451	machtype: defined(PPC) : "powerpc"
452	enddef :
453
454
455	newdef : defined(__EMX__)
456	comment : OS/2 EMX [unix emulation under OS/2]
457	vendor : defined(M_intel) : "intel"
458	hosttype: defined(M_i386) : "i386-emx"
459	ostype : : "os2"
460	machtype: defined(M_i386) : "i386"
461	enddef :
462
463
464	newdef : defined(__NetBSD__)
465	comment : NetBSD
466	vendor : defined(arm32) : "acorn"
467	vendor : defined(alpha) : "digital"
468	vendor : defined(amiga) : "commodore"
469	vendor : defined(atari) : "atari"
470	vendor : defined(hp300) : "hp"
471	vendor : defined(M_intel) : "intel"
472	vendor : defined(m68k) : "motorola"
473	vendor : defined(mac68k) : "apple"
474	vendor : defined(pc532) : "national-semi"
475	vendor : defined(pmax) \|\| defined(mips) : "dec"
476	vendor : defined(M_mipsel) : "dec"
477	vendor : defined(sparc) : "sun"
478	vendor : defined(sun3) : "sun"
479	vendor : defined(vax) : "digital"
480	hosttype: : "NetBSD"
481	ostype : : "NetBSD"
482	machtype: defined(arm32) : "arm32"
483	machtype: defined(sparc) : "sparc"
484	machtype: defined(mc68020) : "m68k"
485	machtype: defined(M_i386) : "i386"
486	machtype: defined(M_mipsel) : "mipsel"
487	machtype: defined(M_mipseb) : "mipseb"
488	machtype: defined(mips) : "mips"
489	machtype: defined(pc532) : "pc532"
490	machtype: defined(vax) : "vax"
491	machtype: defined(alpha) : "alpha"
492	enddef :
493
494
495	newdef : defined(__FreeBSD__)
496	comment : FreeBSD
497	vendor : defined(M_intel) : "intel"
498	hosttype: : "FreeBSD"
499	ostype : : "FreeBSD"
500	machtype: : "i386"
501	enddef :
502
503
504	newdef : defined(__386BSD__)
505	comment : Bill Jolitz's 386BSD
506	vendor : defined(M_intel) : "intel"
507	hosttype: : "386BSD"
508	ostype : : "386BSD"
509	machtype: : "i386"
510	enddef :
511
512
513	newdef : defined(bsdi)
514	comment : BSDI's unix
515	vendor : defined(M_intel) : "intel"
516	vendor : defined(sparc) : "sun"
517	vendor : defined(__powerpc__) : "motorola"
518	hosttype: defined(M_intel) : "bsd386"
519	hosttype: defined(sparc) : "bsd-sparc"
520	hosttype: defined(__powerpc__) : "bsd-powerpc"
521	ostype : : "bsdi"
522	machtype: defined(M_i386) : "i386"
523	machtype: defined(sparc) : "sparc"
524	machtype: defined(__powerpc__) : "powerpc"
525	enddef :
526
527
528	newdef : defined(COHERENT)
529	comment : COHERENT's unix
530	vendor : defined(_I386) : "intel"
531	hosttype: : "coh386"
532	hosttype: : "coherent"
533	ostype : : "coherent"
534	machtype: defined(_I386) : "i386"
535	enddef :
536
537	newdef : defined(SCO)
538	comment : SCO UNIX System V/386 Release 3.2
539	vendor : : "sco"
540	hosttype: : "sco386"
541	ostype : : "sco_unix"
542	machtype: : "i386"
543	enddef :
544
545	newdef : defined(M_XENIX) && !defined(M_UNIX)
546	comment : SCO XENIX
547	vendor : : "sco"
548	hosttype: : "sco_xenix"
549	ostype : : "sco_xenix"
550	machtype: defined(M_I386) : "i386"
551	machtype: defined(M_I286) : "i286"
552	enddef :
553
554
555	newdef : defined(ISC) \|\| defined(ISC202)
556	comment : Interactive Unix
557	vendor : : "isc"
558	hosttype: : "isc386"
559	ostype : defined(POSIX) : "POSIX"
560	ostype : : "SVR3"
561	machtype: defined(M_i386) : "i386"
562	enddef :
563
564
565	newdef : defined(INTEL)
566	comment : Intel Unix
567	vendor : : "intel"
568	hosttype: : "intel386"
569	ostype : : "intel_unix"
570	machtype: defined(M_i386) : "i386"
571	enddef :
572
573
574	newdef : defined(MACH)
575	comment : cmu's mach
576	vendor : : "cmu"
577	hosttype: defined(M_i386) : "i386-mach"
578	ostype : : "mach"
579	machtype: defined(M_i386) : "i386"
580	enddef :
581
582
583	newdef : defined(alliant)
584	comment : Alliants FSX
585	vendor : : "alliant"
586	hosttype: defined(mc68000) : "alliant-fx80"
587	hosttype: defined(i860) : "alliant-fx2800"
588	hosttype: : "alliant"
589	ostype : : "fsx"
590	machtype: defined(mc68000) : "mc68000"
591	machtype: defined(i860) : "i860"
592	enddef :
593
594
595	newdef : defined(_FTX)
596	comment : Stratus Computer, Inc FTX2 (i860 based)
597	comment : Stratus Computer, Inc FTX3 (HPPA based)
598	vendor : : "stratus"
599	hosttype: defined(i860) && defined(_FTX) : "atlantic"
600	hosttype: defined(__hppa) && defined(_FTX) : "continuum"
601	ostype : defined(i860) && defined(_FTX) : "ftx2"
602	ostype : defined(__hppa) && defined(_FTX) : "ftx3"
603	machtype: defined(i860) : "i860"
604	machtype: defined(__hppa) : "hppa"
605	enddef :
606
607
608	newdef : defined(sequent) \|\| defined(_SEQUENT_)
609	comment : Sequent Balance (32000 based)
610	comment : Sequent Symmetry running DYNIX/ptx (386/486 based)
611	comment : Sequent Symmetry running DYNIX 3 (386/486 based)
612	vendor : : "sequent"
613	hosttype: defined(M_i386) && defined(sequent) : "symmetry"
614	hosttype: defined(M_i386) : "ptx"
615	hosttype: : "balance"
616	ostype : defined(M_i386) && !defined(sequent) : "ptx"
617	ostype : : "dynix3"
618	machtype: defined(M_i386) : "i386"
619	machtype: defined(ns32000) : "ns32000"
620	enddef :
621
622
623	newdef : defined(ns32000)
624	comment : Encore Computer Corp. Multimax (32000 based)
625	vendor : : "encore"
626	hosttype: defined(CMUCS) : "multimax"
627	hosttype: : isamultimax(0)
628	ostype : defined(CMUCS) : "mach"
629	ostype : : isamultimax(1)
630	machtype: : "ns32000"
631	enddef :
632
633
634	newdef : defined(iconuxv)
635	comment : Icon 88k running Unix
636	vendor : : "icon"
637	hosttype: : "icon"
638	ostype : : "iconuxv"
639	machtype: defined(m88k) \|\| defined(__m88k__) : "m88k"
640	enddef :
641
642
643	newdef : defined(_CRAY) && defined(_CRAYCOM)
644	comment : Cray Computer Corp. running CSOS
645	vendor : : "ccc"
646	hosttype: defined(_CRAY2) : "cray"
647	hosttype: defined(_CRAY3) : "cray"
648	hosttype: defined(_CRAY4) : "cray"
649	ostype : : "CSOS"
650	machtype: defined(_CRAY2) : "cray2"
651	machtype: defined(_CRAY3) : "cray3"
652	machtype: defined(_CRAY4) : "cray4"
653	enddef :
654
655
656	newdef : defined(cray) && !defined(_CRAYMPP)
657	comment : Cray Research Inc. PVP running UNICOS
658	vendor : : "cri"
659	hosttype: : getcray()
660	ostype : : "unicos"
661	machtype: : getcray()
662	enddef :
663
664
665	newdef : defined(cray) && defined(_CRAYT3D)
666	comment : Cray Research Inc. running UNICOS MAX
667	vendor : : "cri"
668	hosttype: : getcray()
669	ostype : : "unicosmax"
670	machtype: : getcray()
671	enddef :
672
673
674	newdef : defined(cray) && defined(_CRAYT3E)
675	comment : Cray Research Inc. running UNICOS/mk
676	vendor : : "cri"
677	hosttype: : getcray()
678	ostype : : "unicosmk"
679	machtype: : getcray()
680	enddef :
681
682
683	newdef : defined(convex)
684	comment : Convex
685	vendor : : "convex"
686	hosttype: : "convex"
687	ostype : : "convexos"
688	machtype: : getconvex()
689	enddef :
690
691
692	newdef : defined(butterfly)
693	comment : BBN Butterfly 1000
694	vendor : : "bbn"
695	hosttype: : "butterfly"
696	machtype: defined(mc68020) \|\| defined(__mc68020__) : "m68k"
697	enddef :
698
699
700	newdef : defined(NeXT)
701	comment : NeXT
702	vendor : : "next"
703	hosttype: : "next"
704	ostype : : "mach"
705	machtype: defined(mc68020) \|\| defined(__mc68020__) : "m68k"
706	machtype: defined(M_i386) : "i386"
707	machtype: defined(hppa) \|\| defined(__hppa__) : "hppa"
708	machtype: defined(sparc) \|\| defined(__sparc__) : "sparc"
709	enddef :
710
711
712	newdef : defined(sony_news)
713	comment : Sony NEWS 800 or 1700 workstation
714	vendor : : "sony"
715	hosttype: defined(mips) : "news_mips"
716	hosttype: defined(mc68020) \|\| defined(__mc68020__) : "news_m68k"
717	ostype : : "News"
718	machtype: defined(mc68020) \|\| defined(__mc68020__) : "m68k"
719	machtype: defined(M_mipsel) : "mipsel"
720	machtype: defined(M_mipseb) : "mipseb"
721	enddef :
722
723
724	newdef : defined(sgi)
725	comment : Silicon Graphics
726	vendor : : "sgi"
727	hosttype: defined(M_mipsel) : "iris4d"
728	hosttype: defined(M_mipseb) : "iris4d"
729	hosttype: defined(mc68000) : "iris3d"
730	ostype : : "irix"
731	machtype: defined(M_mipsel) : "mipsel"
732	machtype: defined(M_mipseb) : "mipseb"
733	machtype: defined(mc68000) : "mc68000"
734	enddef :
735
736
737	newdef : defined(ultrix) \|\| defined(__ultrix)
738	comment : Digital's Ultrix
739	vendor : : "dec"
740	hosttype: defined(M_mipsel) : "decstation"
741	hosttype: defined(M_mipseb) : "decmips"
742	hosttype: defined(vax) \|\| defined(__vax) : "vax"
743	hosttype: defined(__vax__) : "vax"
744	ostype : : "ultrix"
745	machtype: defined(M_mipsel) : "mipsel"
746	machtype: defined(M_mipseb) : "mipseb"
747	machtype: defined(vax) \|\| defined (__vax) : "vax"
748	hosttype: defined(__vax__) : "vax"
749	enddef :
750
751
752	newdef : defined(MIPS)
753	comment : Mips OS
754	vendor : : "mips"
755	hosttype: defined(M_mipsel) : "mips"
756	hosttype: defined(M_mipseb) : "mips"
757	ostype : : "mips"
758	machtype: defined(M_mipsel) : "mipsel"
759	machtype: defined(M_mipseb) : "mipseb"
760	enddef :
761
762
763	newdef : defined(DECOSF1)
764	comment : Digital's alpha running osf1
765	vendor : : "dec"
766	ostype : : "osf1"
767	hosttype: defined(__alpha) : "alpha"
768	machtype: defined(__alpha) : "alpha"
769	enddef :
770
771
772	newdef : defined(Lynx)
773	comment : Lynx OS 2.1
774	vendor : : "Lynx"
775	hosttype: defined(M_mipsel) : "lynxos-mips"
776	hosttype: defined(M_mipseb) : "lynxos-mips"
777	hosttype: defined(M_i386) : "lynxos-i386"
778	hosttype: defined(i860) \|\| defined(__i860__) : "lynxos-i860"
779	hosttype: defined(m68k) : "lynxos-m68k"
780	hosttype: defined(m88k) : "lynxos-m88k"
781	hosttype: defined(sparc) : "lynxos-sparc"
782	hosttype: : "lynxos-unknown"
783	ostype : : "LynxOS"
784	machtype: defined(M_mipsel) : "mipsel"
785	machtype: defined(M_mipseb) : "mipseb"
786	machtype: defined(M_i386) : "i386"
787	machtype: defined(i860) \|\| defined(__i860__) : "i860"
788	machtype: defined(m68k) : "m68k"
789	machtype: defined(m88k) : "m88k"
790	machtype: defined(sparc) : "sparc"
791	enddef :
792
793
794	newdef : defined(masscomp)
795	comment : Masscomp
796	vendor : : "masscomp"
797	hosttype: : "masscomp"
798	ostype : : "masscomp"
799	enddef :
800
801	newdef : defined(__MACHTEN__)
802	comment : Machintosh
803	vendor : : "Tenon"
804	hosttype: : "Macintosh"
805	ostype : : "MachTen"
806	machtype: : "Macintosh"
807	enddef :
808
809
810
811	newdef : defined(GOULD_NP1)
812	comment : Gould
813	vendor : : "gould"
814	hosttype: : "gould_np1"
815	machtype: : "gould"
816	enddef :
817
818
819	newdef : defined(MULTIFLOW)
820	comment : Multiflow running 4.3BSD
821	vendor : : "multiflow"
822	hosttype: : "multiflow"
823	machtype: : "multiflow"
824	ostype : : "bsd43"
825	enddef :
826
827
828	newdef : defined(SXA)
829	comment : PFU/Fujitsu A-xx computer
830	vendor : : "sxa"
831	hosttype: : "pfa50"
832	ostype : defined(_BSDX_) : "e60-bsdx"
833	ostype : : "e60"
834	machtype: : "pfa50"
835	enddef :
836
837
838	newdef : defined(titan)
839	comment : (St)Ardent Titan
840	vendor : : "ardent"
841	hosttype: : "titan"
842	enddef :
843
844
845	newdef : defined(stellar)
846	comment : Stellar
847	vendor : : "stellar"
848	hosttype: : "stellar"
849	ostype : : "stellix"
850	enddef :
851
852
853	newdef : defined(atari)
854	comment : Atari TT running SVR4. This machine was never
855	comment : commercially available.
856	vendor : : "atari"
857	hosttype: : "atari"
858	ostype : : "asv"
859	enddef :
860
861
862	newdef : defined(OPUS)
863	comment : ???
864	vendor : : "opus"
865	hosttype: : "opus"
866	enddef :
867
868
869	newdef : defined(eta10)
870	comment : ETA running SVR3
871	vendor : : "eta"
872	hosttype: : "eta10"
873	enddef :
874
875
876	newdef : defined(hk68)
877	comment : Heurikon HK68 running Uniplus+ 5.0
878	vendor : : "heurikon"
879	hosttype: : "hk68"
880	ostype : : "uniplus"
881	enddef :
882
883
884	newdef : defined(NDIX)
885	comment : Norsk Data ND 500/5000 running Ndix
886	vendor : : "norsk"
887	hosttype: : "nd500"
888	ostype : : "ndix"
889	enddef :
890
891
892	newdef : defined(uts)
893	comment : Amdahl running uts 2.1
894	vendor : : "amdahl"
895	hosttype: : "amdahl"
896	ostype : : "uts"
897	machtype: : "amdahl"
898	enddef :
899
900
901	newdef : defined(UTek)
902	comment : Tektronix 4300 running UTek (BSD 4.2 / 68020 based)
903	vendor : : "tektronix"
904	hosttype: : "tek4300"
905	enddef :
906
907
908	newdef : defined(UTekV)
909	comment : Tektronix XD88/10 running UTekV 3.2e (SVR3/88100 based)
910	vendor : : "tektronix"
911	hosttype: : "tekXD88"
912	enddef :
913
914
915	newdef : defined(__DGUX__)
916	comment : Data-General AViiON running DGUX
917	hosttype: : "aviion"
918	ostype : : "dgux"
919	vendor : : "dg"
920	machtype: defined(__m88k__) : "m88k"
921	machtype: defined(__i386__) : "pentium"
922	enddef :
923
924
925	newdef : defined(sysV68)
926	comment : Motorola MPC running System V/68 R32V2 (SVR3/68020 based)
927	vendor : : "motorola"
928	hosttype: : "sysV68"
929	machtype: : "m68k"
930	enddef :
931
932
933	newdef : defined(supermax)
934	comment : DDE Supermax running System V/68 R3 (SVR3/68020 based)
935	vendor : : "supermax"
936	hosttype: : "supermax"
937	machtype: : "m68k"
938	enddef :
939
940
941	newdef : defined(sysV88)
942	comment : Motorola MPC running System V/88 R32V2 (SVR3/88100 based)
943	vendor : : "motorola"
944	hosttype: : "sysV88"
945	machtype: : "m88k"
946	enddef :
947
948
949	newdef : defined(__clipper__)
950	comment : Clipper Chipset (Intergraph)
951	vendor : : "intergraph"
952	hosttype: : "clipper"
953	machtype: : "clipper"
954	enddef :
955
956
957	newdef : defined(SNI) \|\| defined(sinix)
958	comment : Siemens Nixdorf Informationssysteme SINIX
959	vendor : : "sni"
960	hosttype: defined(M_intel) : "wx200i"
961	hosttype: defined(MIPSEB) : "rm400"
962	ostype : defined(sinix) : "sinix"
963	machtype: defined(M_i586) : "i586"
964	machtype: defined(M_i486) : "i486"
965	machtype: defined(M_i386) : "i386"
966	machtype: defined(M_mipsel) : "mipsel"
967	machtype: defined(M_mipseb) : "mipseb"
968	machtype: : "mips"
969	enddef :
970
971	newdef : defined(_OSD_POSIX)
972	comment : Siemens Nixdorf Informationssysteme BS2000 POSIX (mainframe, EBCDIC)
973	vendor : : "sni"
974	hosttype: defined(M_intel) : "bs2000"
975	ostype : : "posix"
976	machtype: : "bs2000"
977	enddef :
978
979	newdef : !defined(SOLARIS2) && (SYSVREL == 4)
980	comment : Unix System V Release 4.0
981	vendor : defined(DELL) : "dell"
982	hosttype: defined(M_i386) : "i386"
983	ostype : : "svr4"
984	machtype: defined(M_i386) : "i386"
985	enddef :
986
987	newdef : defined(__uxp__) \|\| defined(__uxps__)
988	comment : FUJITSU DS/90 7000
989	vendor : : "fujitsu"
990	hosttype: : "ds90"
991	ostype : : "sysv4"
992	machtype: : "sparc"
993	enddef :
994
995	newdef : defined(mc68000) \|\| defined(__mc68000__) \|\| defined(mc68k32) \|\| defined(m68k) \|\| defined(mc68010) \|\| defined(mc68020)
996	hosttype: : "m68k"
997	vendor : defined(m68k) : "motorola"
998	machtype: : "m68k"
999	enddef :
1000
1001
1002	newdef : defined(m88k) \|\| defined(__m88k__)
1003	hosttype: : "m88k"
1004	machtype: : "m88k"
1005	enddef :
1006
1007
1008	newdef : defined(M_intel)
1009	hosttype: defined(M_i586) : "i586"
1010	hosttype: defined(M_i486) : "i486"
1011	hosttype: defined(M_i386) : "i386"
1012	vendor : : "intel"
1013	machtype: defined(M_i586) : "i586"
1014	machtype: defined(M_i486) : "i486"
1015	machtype: defined(M_i386) : "i386"
1016	enddef :
1017
1018
1019	newdef : defined(sparc) \|\| defined(__sparc__)
1020	hosttype: : "sparc"
1021	machtype: : "sparc"
1022	enddef :
1023
1024
1025	newdef : defined(i860) \|\| defined(__i860__)
1026	hosttype: : "i860"
1027	machtype: : "i860"
1028	enddef :
1029
1030
1031	newdef : defined(osf1)
1032	ostype : : "osf1"
1033	enddef :
1034
1035
1036	newdef : SYSVREL == 0
1037	ostype : defined(BSD4_4) : "bsd44"
1038	ostype : defined(BSD) : "bsd"
1039	ostype : defined(POSIX) : "posix"
1040	ostype : defined(unix) \|\| defined(__unix__) : "unix"
1041	enddef :
1042
1043
1044	newdef : SYSVREL == 1
1045	ostype : : "svr1"
1046	enddef :
1047
1048
1049	newdef : SYSVREL == 2
1050	ostype : : "svr2"
1051	enddef :
1052
1053
1054	newdef : SYSVREL == 3
1055	ostype : : "svr3"
1056	enddef :
1057
1058
1059	newdef : SYSVREL == 4
1060	ostype : : "svr4"
1061	enddef :
1062
1063
1064	newcode :
1065	#ifndef _hosttype_
1066	hosttype = "unknown";
1067	#endif
1068	#ifndef _ostype_
1069	ostype = "unknown";
1070	#endif
1071	#ifndef _vendor_
1072	vendor = "unknown";
1073	#endif
1074	#ifndef _machtype_
1075	machtype = "unknown";
1076	#endif
1077	tsetenv(STRHOSTTYPE, str2short(hosttype));
1078	tsetenv(STRVENDOR, str2short(vendor));
1079	tsetenv(STROSTYPE, str2short(ostype));
1080	tsetenv(STRMACHTYPE, str2short(machtype));
1081	} /* end setmachine */
1082	endcode :

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format