tc.vers.c revision 316957
1/* $Header: /p/tcsh/cvsroot/tcsh/tc.vers.c,v 3.54 2006/03/02 18:46:45 christos Exp $ */
2/*
3 * tc.vers.c: Version dependent stuff
4 */
5/*-
6 * Copyright (c) 1980, 1991 The Regents of the University of California.
7 * All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 *    notice, this list of conditions and the following disclaimer in the
16 *    documentation and/or other materials provided with the distribution.
17 * 3. Neither the name of the University nor the names of its contributors
18 *    may be used to endorse or promote products derived from this software
19 *    without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 */
33#include "sh.h"
34#include "tw.h"
35
36RCSID("$tcsh: tc.vers.c,v 3.54 2006/03/02 18:46:45 christos Exp $")
37
38#include "patchlevel.h"
39
40
41/* fix_version():
42 *	Print a reasonable version string, printing all compile time
43 *	options that might affect the user.
44 */
45void
46fix_version(void)
47{
48#ifdef WIDE_STRINGS
49# define SSSTR "wide"
50#elif defined (SHORT_STRINGS)
51# define SSSTR "8b"
52#else
53# define SSSTR "7b"
54#endif
55#ifdef NLS
56# define NLSSTR ",nls"
57#else
58# define NLSSTR ""
59#endif
60#ifdef LOGINFIRST
61# define LFSTR ",lf"
62#else
63# define LFSTR ""
64#endif
65#ifdef DOTLAST
66# define DLSTR ",dl"
67#else
68# define DLSTR ""
69#endif
70#ifdef VIDEFAULT
71# define VISTR ",vi"
72#else
73# define VISTR ""
74#endif
75#ifdef TESLA
76# define DTRSTR ",dtr"
77#else
78# define DTRSTR ""
79#endif
80#ifdef KAI
81# define BYESTR ",bye"
82#else
83# define BYESTR ""
84#endif
85#ifdef AUTOLOGOUT
86# define ALSTR ",al"
87#else
88# define ALSTR ""
89#endif
90#ifdef KANJI
91# define KANSTR ",kan"
92#else
93# define KANSTR ""
94#endif
95#ifdef SYSMALLOC
96# define SMSTR	",sm"
97#else
98# define SMSTR  ""
99#endif
100#ifdef HASHBANG
101# define HBSTR	",hb"
102#else
103# define HBSTR  ""
104#endif
105#ifdef NEWGRP
106# define NGSTR	",ng"
107#else
108# define NGSTR	""
109#endif
110#ifdef REMOTEHOST
111# define RHSTR	",rh"
112#else
113# define RHSTR	""
114#endif
115#ifdef AFS
116# define AFSSTR	",afs"
117#else
118# define AFSSTR	""
119#endif
120#ifdef NODOT
121# define NDSTR	",nd"
122#else
123# define NDSTR	""
124#endif
125#ifdef COLOR_LS_F
126# define COLORSTR ",color"
127#else /* ifndef COLOR_LS_F */
128# define COLORSTR ""
129#endif /* COLOR_LS_F */
130#ifdef DSPMBYTE
131# define DSPMSTR ",dspm"
132#else
133# define DSPMSTR ""
134#endif
135#ifdef COLORCAT
136# define CCATSTR ",ccat"
137#else
138# define CCATSTR ""
139#endif
140#if defined(FILEC) && defined(TIOCSTI)
141# define FILECSTR ",filec"
142#else
143# define FILECSTR ""
144#endif
145/* if you want your local version to say something */
146#ifndef LOCALSTR
147# define LOCALSTR ""
148#endif /* LOCALSTR */
149    char    *version;
150    const Char *machtype = tgetenv(STRMACHTYPE);
151    const Char *vendor   = tgetenv(STRVENDOR);
152    const Char *ostype   = tgetenv(STROSTYPE);
153
154    if (vendor == NULL)
155	vendor = STRunknown;
156    if (machtype == NULL)
157	machtype = STRunknown;
158    if (ostype == NULL)
159	ostype = STRunknown;
160
161
162    version = xasprintf(
163"tcsh %d.%.2d.%.2d (%s) %s (%S-%S-%S) options %s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s%s",
164	     REV, VERS, PATCHLEVEL, ORIGIN, DATE, machtype, vendor, ostype,
165	     SSSTR, NLSSTR, LFSTR, DLSTR, VISTR, DTRSTR, BYESTR,
166	     ALSTR, KANSTR, SMSTR, HBSTR, NGSTR, RHSTR, AFSSTR, NDSTR,
167	     COLORSTR, DSPMSTR, CCATSTR, FILECSTR, LOCALSTR);
168    cleanup_push(version, xfree);
169    setcopy(STRversion, str2short(version), VAR_READWRITE);
170    cleanup_until(version);
171    version = xasprintf("%d.%.2d.%.2d", REV, VERS, PATCHLEVEL);
172    cleanup_push(version, xfree);
173    setcopy(STRtcsh, str2short(version), VAR_READWRITE);
174    cleanup_until(version);
175}
176