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
|
/*
Copyright (c) 1990-1999 Info-ZIP. All rights reserved.
See the accompanying file LICENSE, version 1999-Oct-05 or later
(the contents of which are also included in zip.h) for terms of use.
If, for some reason, both of these files are missing, the Info-ZIP license
also may be found at: ftp://ftp.cdrom.com/pub/infozip/license.html
*/
/*
* VM/CMS specific things.
*/
#include "zip.h"
int procname(n, caseflag)
char *n; /* name to process */
int caseflag; /* true to force case-sensitive match */
/* Process a name or sh expression to operate on (or exclude). Return
an error code in the ZE_ class. */
{
FILE *stream;
if (strcmp(n, "-") == 0) /* if compressing stdin */
return newname(n, 0, caseflag);
else {
if ((stream = fopen(n, "r")) != (FILE *)NULL)
{
fclose(stream);
return newname(n, 0, caseflag);
}
else return ZE_MISS;
}
return ZE_OK;
}
|
