mirror of
https://github.com/jart/cosmopolitan.git
synced 2025-05-24 06:12:27 +00:00
34 lines
951 B
C
34 lines
951 B
C
/*
|
|
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;
|
|
}
|