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
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
|
/*****************************************************************************
* "Gif-Lib" - Yet another gif library. *
* *
* Written by: Gershon Elber Ver 0.1, Jul. 1989 *
******************************************************************************
* Program to read stdin, and save it into the specified file iff the result *
* and inspired by the rle utah tool kit I decided to implement and add it. *
* -q : quiet printing mode. *
* -s minsize : the minimum file size to keep it. *
* -h : on-line help. *
******************************************************************************
* History: *
* 7 Jul 89 - Version 1.0 by Gershon Elber. *
* 22 Dec 89 - Fix problem with tmpnam (Version 1.1). *
*****************************************************************************/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#ifdef __MSDOS__
#include <io.h>
#include <alloc.h>
#endif /* __MSDOS__ */
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#endif
#ifdef HAVE_FCNTL_H
#include <fcntl.h>
#endif
#include <stdio.h>
#include <stdlib.h>
#include <ctype.h>
#include <string.h>
#include "gif_lib.h"
#include "getarg.h"
#define PROGRAM_NAME "GifInto"
#define DEFAULT_MIN_FILE_SIZE 14 /* More than GIF stamp + screen desc. */
#define DEFAULT_OUT_NAME "GifInto.Gif"
#define DEFAULT_TMP_NAME "TempInto.$$$"
#ifdef __MSDOS__
extern unsigned int
_stklen = 16384; /* Increase default stack size. */
#endif /* __MSDOS__ */
#ifdef SYSV
static char *VersionStr =
"Gif toolkit module,\t\tGershon Elber\n\
(C) Copyright 1989 Gershon Elber.\n";
static char
*CtrlStr = "GifInto q%- s%-MinFileSize!d h%- GifFile!*s";
#else
static char
*VersionStr =
PROGRAM_NAME
GIF_LIB_VERSION
" Gershon Elber, "
__DATE__ ", " __TIME__ "\n"
"(C) Copyright 1989 Gershon Elber.\n";
static char
*CtrlStr =
PROGRAM_NAME
" q%- s%-MinFileSize!d h%- GifFile!*s";
#endif /* SYSV */
static int
MinFileSize = DEFAULT_MIN_FILE_SIZE;
/******************************************************************************
* The is simply: read until EOF, then close the output, test its length, and *
* if non zero then rename it. *
******************************************************************************/
int main(int argc, char **argv)
{
int Error, NumFiles,
MinSizeFlag = FALSE, HelpFlag = FALSE;
char **FileName = NULL,
TmpName[80], FoutTmpName[80], FullPath[80], DefaultName[80], s[80], *p;
FILE *Fin, *Fout;
if ((Error = GAGetArgs(argc, argv, CtrlStr, &GifQuietPrint,
&MinSizeFlag, &MinFileSize, &HelpFlag,
&NumFiles, &FileName)) != FALSE ||
(NumFiles > 1 && !HelpFlag)) {
if (Error)
GAPrintErrMsg(Error);
else if (NumFiles != 1)
GIF_MESSAGE("Error in command line parsing - one GIF file please.");
GAPrintHowTo(CtrlStr);
exit(EXIT_FAILURE);
}
if (HelpFlag) {
fprintf(stderr, VersionStr);
GAPrintHowTo(CtrlStr);
exit(EXIT_SUCCESS);
}
/* Open the stdin in binary mode and increase its buffer size: */
#ifdef __MSDOS__
setmode(0, O_BINARY); /* Make sure it is in binary mode. */
#endif
Fin = fdopen(0, "rb"); /* Make it into a stream: */
if (Fin == NULL)
{
GIF_EXIT("Failed to open input.");
}
#ifdef __MSDOS__
if (setvbuf(Fin, NULL, _IOFBF, GIF_FILE_BUFFER_SIZE)) /* Incr. stream buf.*/
{
GIF_EXIT("Failed to open input.");
}
#endif
/* Isolate the directory where our destination is, and set tmp file name */
/* in the very same directory. */
strcpy(FullPath, *FileName);
if ((p = strrchr(FullPath, '/')) != NULL ||
(p = strrchr(FullPath, '\\')) != NULL)
p[1] = 0;
else if ((p = strrchr(FullPath, ':')) != NULL)
p[1] = 0;
else
FullPath[0] = 0; /* No directory or disk specified. */
strcpy(FoutTmpName, FullPath); /* Generate destination temporary name. */
/* Make sure the temporary is made in the current directory: */
p = tmpnam(TmpName);
if (strrchr(p, '/')) p = strrchr(p, '/') + 1;
if (strrchr(p, '\\')) p = strrchr(p, '\\') + 1;
if (strlen(p) == 0) p = DEFAULT_TMP_NAME;
strcat(FoutTmpName, p);
Fout = fopen(FoutTmpName, "wb");
if (Fout == NULL)
{
GIF_EXIT("Failed to open output.");
}
#ifdef __MSDOS__
if (setvbuf(Fout, NULL, _IOFBF, GIF_FILE_BUFFER_SIZE)) /*Incr. stream buf.*/
{
GIF_EXIT("Failed to open output.");
}
#endif /* __MSDOS__ */
while (!feof(Fin)) {
if (putc(getc(Fin), Fout) == EOF)
GIF_EXIT("Failed to write output.");
}
fclose(Fin);
if (ftell(Fout) >= (long) MinFileSize) {
fclose(Fout);
unlink(*FileName);
if (rename(FoutTmpName, *FileName) != 0) {
strcpy(DefaultName, FullPath);
strcat(DefaultName, DEFAULT_OUT_NAME);
if (rename(FoutTmpName, DefaultName) == 0) {
sprintf(s, "Failed to rename out file - left as %s.",
DefaultName);
GIF_MESSAGE(s);
}
else {
unlink(FoutTmpName);
GIF_MESSAGE("Failed to rename out file - deleted.");
}
}
}
else {
fclose(Fout);
unlink(FoutTmpName);
GIF_MESSAGE("File too small - not renamed.");
}
return 0;
}
|
