1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
|
/*
* This file is part of XForms.
*
* XForms is free software; you can redistribute it and/or modify it
* under the terms of the GNU Lesser General Public License as
* published by the Free Software Foundation; either version 2.1, or
* (at your option) any later version.
*
* XForms is distributed in the hope that it will be useful, but
* WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public License
* along with XForms. If not, see <http://www.gnu.org/licenses/>.
*/
/**
* \file version.c
*
* This file is part of XForms package
* Copyright (c) 1997-2000 by T.C. Zhao
* All rights reserved.
*
* version information
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "fd2ps.h"
static char *version[ ] =
{
"fd2ps",
"$State: Exp $ $Revision: 1.8 $ of $Date: 2009/12/15 23:09:10 $",
"Copyright (c) 1997-2000 by T.C. Zhao",
0
};
/***************************************
***************************************/
static const char *
rm_rcs_kw( const char * s,
int strip_time )
{
static char buf[ 6 ][ 255 ];
static int nbuf;
char *q = buf[ ( nbuf = ( nbuf + 1 ) % 5 ) ];
int left = 0, lastc = -1;
while ( *s && q - buf[ nbuf] < ( int ) sizeof( buf[ nbuf ] ) - 2 )
{
switch ( *s )
{
case '$':
if ( ( left = ! left ) )
while ( *s && *s != ':' )
s++;
break;
default:
/* Copy the char and remove extra space */
if ( ! ( lastc == ' ' && *s == ' ' ) )
*q++ = lastc = *s;
break;
}
s++;
}
*q = '\0';
/* All xforms' RCS time has the format xx:xx:xx */
if ( strip_time )
{
if ( ( q = strchr( buf[ nbuf ], ':' ) ) )
*( q - 2 ) = '\0';
}
return buf[ nbuf ];
}
/***************************************
***************************************/
void
print_version( int die )
{
char **q = version;
for ( ; *q; q++ )
fprintf( stderr, q == version ? "%s" : "%s\n", rm_rcs_kw( *q, 0 ) );
if ( die )
exit( 0 );
}
/***************************************
***************************************/
const char *
get_version( void )
{
static char buf[ 1024 ];
char **q = version;
for ( buf[ 0 ] = '\0'; *q; q++ )
strcat( buf, rm_rcs_kw( *q, 1 ));
return buf;
}
/*
* Local variables:
* tab-width: 4
* indent-tabs-mode: nil
* End:
*/
|
