hush/coreutils/dos2unix.c

99 lines
2.1 KiB
C
Raw Normal View History

/* vi: set sw=4 ts=4: */
/*
* dos2unix for BusyBox
*
* dos2unix '\n' convertor 0.5.0
2006-03-14 21:49:18 +00:00
* based on Unix2Dos 0.9.0 by Peter Hanecak (made 19.2.1997)
* Copyright 1997,.. by Peter Hanecak <hanecak@megaloman.sk>.
* All rights reserved.
*
* dos2unix filters reading input from stdin and writing output to stdout.
*
* Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
2006-03-14 21:49:18 +00:00
*/
#include "libbb.h"
enum {
CT_UNIX2DOS = 1,
CT_DOS2UNIX
};
/* if fn is NULL then input is stdin and output is stdout */
static void convert(char *fn, int conv_type)
{
FILE *in, *out;
int i;
char *temp_fn = temp_fn; /* for compiler */
char *resolved_fn = resolved_fn;
in = stdin;
out = stdout;
if (fn != NULL) {
struct stat st;
resolved_fn = xmalloc_follow_symlinks(fn);
if (resolved_fn == NULL)
bb_simple_perror_msg_and_die(fn);
in = xfopen(resolved_fn, "r");
fstat(fileno(in), &st);
temp_fn = xasprintf("%sXXXXXX", resolved_fn);
i = mkstemp(temp_fn);
if (i == -1
|| fchmod(i, st.st_mode) == -1
|| !(out = fdopen(i, "w+"))
) {
bb_simple_perror_msg_and_die(temp_fn);
2006-03-14 21:49:18 +00:00
}
}
while ((i = fgetc(in)) != EOF) {
if (i == '\r')
continue;
if (i == '\n')
if (conv_type == CT_UNIX2DOS)
fputc('\r', out);
fputc(i, out);
}
if (fn != NULL) {
2006-03-14 21:49:18 +00:00
if (fclose(in) < 0 || fclose(out) < 0) {
unlink(temp_fn);
bb_perror_nomsg_and_die();
}
xrename(temp_fn, resolved_fn);
free(temp_fn);
free(resolved_fn);
}
}
int dos2unix_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
int dos2unix_main(int argc, char **argv)
{
int o, conv_type;
/* See if we are supposed to be doing dos2unix or unix2dos */
conv_type = CT_UNIX2DOS;
2006-10-03 21:00:43 +00:00
if (applet_name[0] == 'd') {
conv_type = CT_DOS2UNIX;
}
2007-08-16 10:35:17 +00:00
/* -u convert to unix, -d convert to dos */
2007-08-16 10:37:49 +00:00
opt_complementary = "u--d:d--u"; /* mutually exclusive */
o = getopt32(argv, "du");
/* Do the conversion requested by an argument else do the default
* conversion depending on our name. */
if (o)
conv_type = o;
do {
/* might be convert(NULL) if there is no filename given */
convert(argv[optind], conv_type);
optind++;
} while (optind < argc);
return 0;
}