mirror of
https://github.com/Unidata/netcdf-c.git
synced 2024-12-21 08:39:46 +08:00
100 lines
2.1 KiB
C
100 lines
2.1 KiB
C
/*
|
|
* Copyright 2018, University Corporation for Atmospheric Research
|
|
* See netcdf/COPYRIGHT file for copying and redistribution conditions.
|
|
*/
|
|
|
|
#ifdef HAVE_CONFIG_H
|
|
#include <config.h>
|
|
#endif
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <assert.h>
|
|
|
|
#ifdef _WIN32
|
|
#include <windows.h>
|
|
#include <io.h>
|
|
#include <fcntl.h>
|
|
#endif
|
|
|
|
#ifdef HAVE_GETOPT_H
|
|
#include <getopt.h>
|
|
#endif
|
|
|
|
#if defined(_WIN32) && ! defined(__MINGW32__)
|
|
#include "XGetopt.h"
|
|
#endif
|
|
|
|
extern int NCstdbinary(void);
|
|
|
|
int
|
|
main(int argc, char** argv)
|
|
{
|
|
int i;
|
|
int len;
|
|
char* result = NULL;
|
|
int noeol = 1; /* Default to -n vs -N */
|
|
int escape = 1; /* Ditto */
|
|
char* p = NULL;
|
|
char* q = NULL;
|
|
char c;
|
|
|
|
NCstdbinary(); /* avoid \r\n for windows */
|
|
|
|
opterr = 1;
|
|
while ((c = getopt(argc, argv,"enEN")) != EOF) {
|
|
switch(c) {
|
|
case 'e': escape = 1; break;
|
|
case 'n': noeol = 1; break;
|
|
case 'E': escape = 0; break;
|
|
case 'N': noeol = 0; break;
|
|
case '?': default: break; /* ignore */
|
|
}
|
|
}
|
|
|
|
/* leave non-flag args */
|
|
argc -= optind;
|
|
argv += optind;
|
|
|
|
/* Compute the max possible length of output */
|
|
for(len=0,i=0;i<argc;i++) len += (int)strlen(argv[i]);
|
|
len += (argc - 1); /* inter-arg spacing */
|
|
result = (char*)malloc((size_t)len+1+1); /* +1 for nul term +1 for '\n' */
|
|
assert(result != NULL);
|
|
result[0] = '\0';
|
|
/* Concat all the arguments with ' ' between them */
|
|
for(i=0;i<argc;i++) {
|
|
if(i > 0) strcat(result," ");
|
|
strcat(result,argv[i]);
|
|
}
|
|
/* Optionally de-escape the result */
|
|
if(escape) {
|
|
for(p=result,q=result;*p;) {
|
|
switch (*p) {
|
|
default: *q++ = *p; break;
|
|
case '\\':
|
|
p++;
|
|
switch(*p) {
|
|
case 'a': *q++ = '\a'; break;
|
|
case 'b': *q++ = '\b'; break;
|
|
case 'f': *q++ = '\f'; break;
|
|
case 'r': *q++ = '\r'; break;
|
|
case 'n': *q++ = '\n'; break;
|
|
case 't': *q++ = '\t'; break;
|
|
case 'v': *q++ = '\v'; break;
|
|
default: *q++ = *p; break;
|
|
}
|
|
break;
|
|
}
|
|
p++;
|
|
}
|
|
} else
|
|
*q++ = *p++;
|
|
if(!noeol) *p++ = '\n';
|
|
*p = '\0';
|
|
fputs(result,stdout);
|
|
fflush(stdout);
|
|
free(result);
|
|
return 0;
|
|
}
|