2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
4 * Copyright (C) 2009 Gabor Kovesdan <gabor@FreeBSD.org>
5 * Copyright (C) 2012 Oleg Moskalenko <mom040267@gmail.com>
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #include <sys/cdefs.h>
31 __FBSDID("$FreeBSD$");
34 #include <sys/sysctl.h>
35 #include <sys/types.h>
63 #define OPTIONS "bcCdfghik:Mmno:RrsS:t:T:uVz"
65 static bool need_random;
70 * Default messages to use when NLS is disabled or no catalogue
73 const char *nlsstr[] = { "",
74 /* 1*/"mutually exclusive flags",
75 /* 2*/"extra argument not allowed with -c",
76 /* 3*/"Unknown feature",
77 /* 4*/"Wrong memory buffer specification",
78 /* 5*/"0 field in key specs",
79 /* 6*/"0 column in key specs",
80 /* 7*/"Wrong file mode",
81 /* 8*/"Cannot open file for reading",
82 /* 9*/"Radix sort cannot be used with these sort options",
83 /*10*/"The chosen sort method cannot be used with stable and/or unique sort",
84 /*11*/"Invalid key position",
85 /*12*/"Usage: %s [-bcCdfigMmnrsuz] [-kPOS1[,POS2] ... ] "
86 "[+POS1 [-POS2]] [-S memsize] [-T tmpdir] [-t separator] "
87 "[-o outfile] [--batch-size size] [--files0-from file] "
88 "[--heapsort] [--mergesort] [--radixsort] [--qsort] "
90 #if defined(SORT_THREADS)
91 "[--parallel thread_no] "
93 "[--human-numeric-sort] "
94 "[--version-sort] [--random-sort [--random-source file]] "
95 "[--compress-program program] [file ...]\n" };
97 struct sort_opts sort_opts_vals;
102 #if defined(SORT_THREADS)
103 unsigned int ncpu = 1;
107 static bool gnusort_numeric_compatibility;
109 static struct sort_mods default_sort_mods_object;
110 struct sort_mods * const default_sort_mods = &default_sort_mods_object;
112 static bool print_symbols_on_debug;
115 * Arguments from file (when file0-from option is used:
117 static size_t argc_from_file0 = (size_t)-1;
118 static char **argv_from_file0;
121 * Placeholder symbols for options which have no single-character equivalent
125 SORT_OPT = CHAR_MAX + 1,
131 #if defined(SORT_THREADS)
143 #define NUMBER_OF_MUTUALLY_EXCLUSIVE_FLAGS 6
144 static const char mutually_exclusive_flags[NUMBER_OF_MUTUALLY_EXCLUSIVE_FLAGS] = { 'M', 'n', 'g', 'R', 'h', 'V' };
146 static struct option long_options[] = {
147 { "batch-size", required_argument, NULL, BS_OPT },
148 { "buffer-size", required_argument, NULL, 'S' },
149 { "check", optional_argument, NULL, 'c' },
150 { "check=silent|quiet", optional_argument, NULL, 'C' },
151 { "compress-program", required_argument, NULL, COMPRESSPROGRAM_OPT },
152 { "debug", no_argument, NULL, DEBUG_OPT },
153 { "dictionary-order", no_argument, NULL, 'd' },
154 { "field-separator", required_argument, NULL, 't' },
155 { "files0-from", required_argument, NULL, FF_OPT },
156 { "general-numeric-sort", no_argument, NULL, 'g' },
157 { "heapsort", no_argument, NULL, HEAPSORT_OPT },
158 { "help",no_argument, NULL, HELP_OPT },
159 { "human-numeric-sort", no_argument, NULL, 'h' },
160 { "ignore-leading-blanks", no_argument, NULL, 'b' },
161 { "ignore-case", no_argument, NULL, 'f' },
162 { "ignore-nonprinting", no_argument, NULL, 'i' },
163 { "key", required_argument, NULL, 'k' },
164 { "merge", no_argument, NULL, 'm' },
165 { "mergesort", no_argument, NULL, MERGESORT_OPT },
166 { "mmap", no_argument, NULL, MMAP_OPT },
167 { "month-sort", no_argument, NULL, 'M' },
168 { "numeric-sort", no_argument, NULL, 'n' },
169 { "output", required_argument, NULL, 'o' },
170 #if defined(SORT_THREADS)
171 { "parallel", required_argument, NULL, PARALLEL_OPT },
173 { "qsort", no_argument, NULL, QSORT_OPT },
174 { "radixsort", no_argument, NULL, RADIXSORT_OPT },
175 { "random-sort", no_argument, NULL, 'R' },
176 { "random-source", required_argument, NULL, RANDOMSOURCE_OPT },
177 { "reverse", no_argument, NULL, 'r' },
178 { "sort", required_argument, NULL, SORT_OPT },
179 { "stable", no_argument, NULL, 's' },
180 { "temporary-directory",required_argument, NULL, 'T' },
181 { "unique", no_argument, NULL, 'u' },
182 { "version", no_argument, NULL, VERSION_OPT },
183 { "version-sort",no_argument, NULL, 'V' },
184 { "zero-terminated", no_argument, NULL, 'z' },
185 { NULL, no_argument, NULL, 0 }
188 void fix_obsolete_keys(int *argc, char **argv);
191 * Check where sort modifier is present
194 sort_modifier_empty(struct sort_mods *sm)
199 return (!(sm->Mflag || sm->Vflag || sm->nflag || sm->gflag ||
200 sm->rflag || sm->Rflag || sm->hflag || sm->dflag || sm->fflag));
204 * Print out usage text.
211 out = opt_err ? stderr : stdout;
213 fprintf(out, getstr(12), getprogname());
220 * Read input file names from a file (file0-from option).
223 read_fns_from_file0(const char *fn)
237 while ((linelen = getdelim(&line, &linesize, '\0', f)) != -1) {
239 if (argc_from_file0 == (size_t) - 1)
242 argv_from_file0 = sort_realloc(argv_from_file0,
243 argc_from_file0 * sizeof(char *));
244 if (argv_from_file0 == NULL)
246 argv_from_file0[argc_from_file0 - 1] = line;
254 err(2, "%s: getdelim", fn);
260 * Check how much RAM is available for the sort.
267 #if defined(SORT_THREADS)
271 pages = sysconf(_SC_PHYS_PAGES);
273 perror("sysconf pages");
276 psize = sysconf(_SC_PAGESIZE);
278 perror("sysconf psize");
281 #if defined(SORT_THREADS)
282 ncpu = (unsigned int)sysconf(_SC_NPROCESSORS_ONLN);
291 free_memory = (unsigned long long) pages * (unsigned long long) psize;
292 available_free_memory = free_memory / 2;
294 if (available_free_memory < 1024)
295 available_free_memory = 1024;
299 * Convert "plain" symbol to wide symbol, with default value.
302 conv_mbtowc(wchar_t *wc, const char *c, const wchar_t def)
308 res = mbtowc(wc, c, MB_CUR_MAX);
315 * Set current locale symbols.
323 setlocale(LC_ALL, "");
328 /* obtain LC_NUMERIC info */
329 /* Convert to wide char form */
330 conv_mbtowc(&symbol_decimal_point, lc->decimal_point,
331 symbol_decimal_point);
332 conv_mbtowc(&symbol_thousands_sep, lc->thousands_sep,
333 symbol_thousands_sep);
334 conv_mbtowc(&symbol_positive_sign, lc->positive_sign,
335 symbol_positive_sign);
336 conv_mbtowc(&symbol_negative_sign, lc->negative_sign,
337 symbol_negative_sign);
340 if (getenv("GNUSORT_NUMERIC_COMPATIBILITY"))
341 gnusort_numeric_compatibility = true;
343 locale = setlocale(LC_COLLATE, NULL);
347 const char *cclocale;
349 tmpl = sort_strdup(locale);
350 cclocale = setlocale(LC_COLLATE, "C");
351 if (cclocale && !strcmp(cclocale, tmpl))
354 const char *pclocale;
356 pclocale = setlocale(LC_COLLATE, "POSIX");
357 if (pclocale && !strcmp(pclocale, tmpl))
360 setlocale(LC_COLLATE, tmpl);
366 * Set directory temporary files.
373 td = getenv("TMPDIR");
375 tmpdir = sort_strdup(td);
381 static unsigned long long
382 parse_memory_buffer_value(const char *value)
386 return (available_free_memory);
389 unsigned long long membuf;
393 membuf = strtoll(value, &endptr, 10);
396 warn("%s",getstr(4));
397 membuf = available_free_memory;
428 membuf = (available_free_memory * membuf) /
432 warnc(EINVAL, "%s", optarg);
433 membuf = available_free_memory;
441 * Signal handler that clears the temporary files.
444 sig_handler(int sig __unused, siginfo_t *siginfo __unused,
445 void *context __unused)
453 * Set signal handler on panic signals.
456 set_signal_handler(void)
460 memset(&sa, 0, sizeof(sa));
461 sa.sa_sigaction = &sig_handler;
462 sa.sa_flags = SA_SIGINFO;
464 if (sigaction(SIGTERM, &sa, NULL) < 0) {
468 if (sigaction(SIGHUP, &sa, NULL) < 0) {
472 if (sigaction(SIGINT, &sa, NULL) < 0) {
476 if (sigaction(SIGQUIT, &sa, NULL) < 0) {
480 if (sigaction(SIGABRT, &sa, NULL) < 0) {
484 if (sigaction(SIGBUS, &sa, NULL) < 0) {
488 if (sigaction(SIGSEGV, &sa, NULL) < 0) {
492 if (sigaction(SIGUSR1, &sa, NULL) < 0) {
496 if (sigaction(SIGUSR2, &sa, NULL) < 0) {
503 * Print "unknown" message and exit with status 2.
506 unknown(const char *what)
509 errx(2, "%s: %s", getstr(3), what);
513 * Check whether contradictory input options are used.
516 check_mutually_exclusive_flags(char c, bool *mef_flags)
519 bool found_others, found_this;
521 found_others = found_this = false;
524 for (int i = 0; i < NUMBER_OF_MUTUALLY_EXCLUSIVE_FLAGS; i++) {
525 mec = mutually_exclusive_flags[i];
530 errx(1, "%c:%c: %s", c, mec, getstr(1));
536 errx(1, "%c:%c: %s", c, mutually_exclusive_flags[fo_index], getstr(1));
544 * Initialise sort opts data.
550 memset(&default_sort_mods_object, 0,
551 sizeof(default_sort_mods_object));
552 memset(&sort_opts_vals, 0, sizeof(sort_opts_vals));
553 default_sort_mods_object.func =
554 get_sort_func(&default_sort_mods_object);
558 * Set a sort modifier on a sort modifiers object.
561 set_sort_modifier(struct sort_mods *sm, int c)
597 print_symbols_on_debug = true;
608 print_symbols_on_debug = true;
614 sort_opts_vals.complex_sort = true;
615 sm->func = get_sort_func(sm);
620 * Parse POS in -k option.
623 parse_pos(const char *s, struct key_specs *ks, bool *mef_flags, bool second)
625 regmatch_t pmatch[4];
628 const char *sregexp = "^([0-9]+)(\\.[0-9]+)?([bdfirMngRhV]+)?$";
636 if (regcomp(&re, sregexp, REG_EXTENDED) != 0)
639 if (regexec(&re, s, nmatch, pmatch, 0) != 0)
642 if (pmatch[0].rm_eo <= pmatch[0].rm_so)
645 if (pmatch[1].rm_eo <= pmatch[1].rm_so)
648 len = pmatch[1].rm_eo - pmatch[1].rm_so;
649 f = sort_malloc((len + 1) * sizeof(char));
651 strncpy(f, s + pmatch[1].rm_so, len);
656 ks->f2 = (size_t) strtoul(f, NULL, 10);
660 warn("%s",getstr(5));
665 ks->f1 = (size_t) strtoul(f, NULL, 10);
669 warn("%s",getstr(5));
674 if (pmatch[2].rm_eo > pmatch[2].rm_so) {
675 len = pmatch[2].rm_eo - pmatch[2].rm_so - 1;
676 c = sort_malloc((len + 1) * sizeof(char));
678 strncpy(c, s + pmatch[2].rm_so + 1, len);
683 ks->c2 = (size_t) strtoul(c, NULL, 10);
688 ks->c1 = (size_t) strtoul(c, NULL, 10);
692 warn("%s",getstr(6));
703 if (pmatch[3].rm_eo > pmatch[3].rm_so) {
706 for (i = pmatch[3].rm_so; i < pmatch[3].rm_eo; i++) {
707 check_mutually_exclusive_flags(s[i], mef_flags);
713 } else if (!set_sort_modifier(&(ks->sm), s[i]))
732 * Parse -k option value.
735 parse_k(const char *s, struct key_specs *ks)
738 bool mef_flags[NUMBER_OF_MUTUALLY_EXCLUSIVE_FLAGS] =
739 { false, false, false, false, false, false };
744 sptr = strchr(s, ',');
753 pos1 = sort_malloc((size1 + 1) * sizeof(char));
755 strncpy(pos1, s, size1);
758 ret = parse_pos(pos1, ks, mef_flags, false);
764 pos2 = sort_strdup(sptr + 1);
765 ret = parse_pos(pos2, ks, mef_flags, true);
768 ret = parse_pos(s, ks, mef_flags, false);
775 * Parse POS in +POS -POS option.
778 parse_pos_obs(const char *s, int *nf, int *nc, char* sopts)
781 regmatch_t pmatch[4];
783 const char *sregexp = "^([0-9]+)(\\.[0-9]+)?([A-Za-z]+)?$";
792 if (regcomp(&re, sregexp, REG_EXTENDED) != 0)
795 if (regexec(&re, s, nmatch, pmatch, 0) != 0)
798 if (pmatch[0].rm_eo <= pmatch[0].rm_so)
801 if (pmatch[1].rm_eo <= pmatch[1].rm_so)
804 len = pmatch[1].rm_eo - pmatch[1].rm_so;
805 f = sort_malloc((len + 1) * sizeof(char));
807 strncpy(f, s + pmatch[1].rm_so, len);
811 *nf = (size_t) strtoul(f, NULL, 10);
813 errx(2, "%s", getstr(11));
815 if (pmatch[2].rm_eo > pmatch[2].rm_so) {
816 len = pmatch[2].rm_eo - pmatch[2].rm_so - 1;
817 c = sort_malloc((len + 1) * sizeof(char));
819 strncpy(c, s + pmatch[2].rm_so + 1, len);
823 *nc = (size_t) strtoul(c, NULL, 10);
825 errx(2, "%s", getstr(11));
828 if (pmatch[3].rm_eo > pmatch[3].rm_so) {
830 len = pmatch[3].rm_eo - pmatch[3].rm_so;
832 strncpy(sopts, s + pmatch[3].rm_so, len);
849 * "Translate" obsolete +POS1 -POS2 syntax into new -kPOS1,POS2 syntax
852 fix_obsolete_keys(int *argc, char **argv)
856 for (int i = 1; i < *argc; i++) {
861 if (strlen(arg1) > 1 && arg1[0] == '+') {
868 if (parse_pos_obs(arg1 + 1, &f1, &c1, sopts1) < 0)
874 char *arg2 = argv[i + 1];
876 if (strlen(arg2) > 1 &&
884 if (parse_pos_obs(arg2 + 1,
885 &f2, &c2, sopts2) >= 0) {
888 sprintf(sopt, "-k%d.%d%s,%d.%d%s",
889 f1, c1, sopts1, f2, c2, sopts2);
890 argv[i] = sort_strdup(sopt);
891 for (int j = i + 1; j + 1 < *argc; j++)
892 argv[j] = argv[j + 1];
898 sprintf(sopt, "-k%d.%d%s", f1, c1, sopts1);
899 argv[i] = sort_strdup(sopt);
909 get_random_seed(const char *random_source)
912 struct stat fsb, rsb;
917 rd = sizeof(randseed);
919 if (random_source == NULL) {
920 if (getentropy(randseed, sizeof(randseed)) < 0)
921 err(EX_SOFTWARE, "getentropy");
925 rsfd = open(random_source, O_RDONLY | O_CLOEXEC);
927 err(EX_NOINPUT, "open: %s", random_source);
929 if (fstat(rsfd, &fsb) != 0)
930 err(EX_SOFTWARE, "fstat");
932 if (!S_ISREG(fsb.st_mode) && !S_ISCHR(fsb.st_mode))
934 "random seed isn't a regular file or /dev/random");
937 * Regular files: read up to maximum seed size and explicitly
938 * reject longer files.
940 if (S_ISREG(fsb.st_mode)) {
941 if (fsb.st_size > (off_t)sizeof(randseed))
942 errx(EX_USAGE, "random seed is too large (%jd >"
943 " %zu)!", (intmax_t)fsb.st_size,
945 else if (fsb.st_size < 1)
946 errx(EX_USAGE, "random seed is too small ("
949 memset(randseed, 0, sizeof(randseed));
951 rd = read(rsfd, randseed, fsb.st_size);
953 err(EX_SOFTWARE, "reading random seed file %s",
955 if (rd < (ssize_t)fsb.st_size)
956 errx(EX_SOFTWARE, "short read from %s", random_source);
957 } else if (S_ISCHR(fsb.st_mode)) {
958 if (stat("/dev/random", &rsb) < 0)
959 err(EX_SOFTWARE, "stat");
961 if (fsb.st_dev != rsb.st_dev ||
962 fsb.st_ino != rsb.st_ino)
963 errx(EX_USAGE, "random seed is a character "
964 "device other than /dev/random");
966 if (getentropy(randseed, sizeof(randseed)) < 0)
967 err(EX_SOFTWARE, "getentropy");
975 MD5Update(&md5_ctx, randseed, rd);
982 main(int argc, char **argv)
984 char *outfile, *real_outfile;
985 char *random_source = NULL;
987 bool mef_flags[NUMBER_OF_MUTUALLY_EXCLUSIVE_FLAGS] =
988 { false, false, false, false, false, false };
991 outfile = sort_strdup("-");
994 struct sort_mods *sm = &default_sort_mods_object;
998 set_signal_handler();
1005 fix_obsolete_keys(&argc, argv);
1007 while (((c = getopt_long(argc, argv, OPTIONS, long_options, NULL))
1010 check_mutually_exclusive_flags(c, mef_flags);
1012 if (!set_sort_modifier(sm, c)) {
1016 sort_opts_vals.cflag = true;
1018 if (!strcmp(optarg, "diagnose-first"))
1020 else if (!strcmp(optarg, "silent") ||
1021 !strcmp(optarg, "quiet"))
1022 sort_opts_vals.csilentflag = true;
1028 sort_opts_vals.cflag = true;
1029 sort_opts_vals.csilentflag = true;
1033 sort_opts_vals.complex_sort = true;
1034 sort_opts_vals.kflag = true;
1037 keys = sort_realloc(keys, keys_num *
1038 sizeof(struct key_specs));
1039 memset(&(keys[keys_num - 1]), 0,
1040 sizeof(struct key_specs));
1042 if (parse_k(optarg, &(keys[keys_num - 1]))
1044 errc(2, EINVAL, "-k %s", optarg);
1050 sort_opts_vals.mflag = true;
1053 outfile = sort_realloc(outfile, (strlen(optarg) + 1));
1054 strcpy(outfile, optarg);
1057 sort_opts_vals.sflag = true;
1060 available_free_memory =
1061 parse_memory_buffer_value(optarg);
1064 tmpdir = sort_strdup(optarg);
1067 while (strlen(optarg) > 1) {
1068 if (optarg[0] != '\\') {
1069 errc(2, EINVAL, "%s", optarg);
1072 if (*optarg == '0') {
1077 sort_opts_vals.tflag = true;
1078 sort_opts_vals.field_sep = btowc(optarg[0]);
1079 if (sort_opts_vals.field_sep == WEOF) {
1083 if (!gnusort_numeric_compatibility) {
1084 if (symbol_decimal_point == sort_opts_vals.field_sep)
1085 symbol_decimal_point = WEOF;
1086 if (symbol_thousands_sep == sort_opts_vals.field_sep)
1087 symbol_thousands_sep = WEOF;
1088 if (symbol_negative_sign == sort_opts_vals.field_sep)
1089 symbol_negative_sign = WEOF;
1090 if (symbol_positive_sign == sort_opts_vals.field_sep)
1091 symbol_positive_sign = WEOF;
1095 sort_opts_vals.uflag = true;
1096 /* stable sort for the correct unique val */
1097 sort_opts_vals.sflag = true;
1100 sort_opts_vals.zflag = true;
1104 if (!strcmp(optarg, "general-numeric"))
1105 set_sort_modifier(sm, 'g');
1106 else if (!strcmp(optarg, "human-numeric"))
1107 set_sort_modifier(sm, 'h');
1108 else if (!strcmp(optarg, "numeric"))
1109 set_sort_modifier(sm, 'n');
1110 else if (!strcmp(optarg, "month"))
1111 set_sort_modifier(sm, 'M');
1112 else if (!strcmp(optarg, "random"))
1113 set_sort_modifier(sm, 'R');
1118 #if defined(SORT_THREADS)
1120 nthreads = (size_t)(atoi(optarg));
1123 if (nthreads > 1024)
1128 sort_opts_vals.sort_method = SORT_QSORT;
1131 sort_opts_vals.sort_method = SORT_MERGESORT;
1137 sort_opts_vals.sort_method = SORT_HEAPSORT;
1140 sort_opts_vals.sort_method = SORT_RADIXSORT;
1142 case RANDOMSOURCE_OPT:
1143 random_source = strdup(optarg);
1145 case COMPRESSPROGRAM_OPT:
1146 compress_program = strdup(optarg);
1149 read_fns_from_file0(optarg);
1154 long mof = strtol(optarg, NULL, 10);
1156 err(2, "--batch-size");
1158 max_open_files = (size_t) mof + 1;
1162 printf("%s\n", VERSION);
1183 if (argv_from_file0) {
1184 argc = argc_from_file0;
1185 argv = argv_from_file0;
1189 catalog = catopen("sort", NL_CAT_LOCALE);
1192 if (sort_opts_vals.cflag && sort_opts_vals.mflag)
1193 errx(1, "%c:%c: %s", 'm', 'c', getstr(1));
1199 if (keys_num == 0) {
1201 keys = sort_realloc(keys, sizeof(struct key_specs));
1202 memset(&(keys[0]), 0, sizeof(struct key_specs));
1204 keys[0].pos1b = default_sort_mods->bflag;
1205 keys[0].pos2b = default_sort_mods->bflag;
1206 memcpy(&(keys[0].sm), default_sort_mods,
1207 sizeof(struct sort_mods));
1210 for (size_t i = 0; i < keys_num; i++) {
1211 struct key_specs *ks;
1215 if (sort_modifier_empty(&(ks->sm)) && !(ks->pos1b) &&
1217 ks->pos1b = sm->bflag;
1218 ks->pos2b = sm->bflag;
1219 memcpy(&(ks->sm), sm, sizeof(struct sort_mods));
1222 ks->sm.func = get_sort_func(&(ks->sm));
1226 printf("Memory to be used for sorting: %llu\n",available_free_memory);
1227 #if defined(SORT_THREADS)
1228 printf("Number of CPUs: %d\n",(int)ncpu);
1231 printf("Using collate rules of %s locale\n",
1232 setlocale(LC_COLLATE, NULL));
1234 printf("Byte sort is used\n");
1235 if (print_symbols_on_debug) {
1236 printf("Decimal Point: <%lc>\n", symbol_decimal_point);
1237 if (symbol_thousands_sep)
1238 printf("Thousands separator: <%lc>\n",
1239 symbol_thousands_sep);
1240 printf("Positive sign: <%lc>\n", symbol_positive_sign);
1241 printf("Negative sign: <%lc>\n", symbol_negative_sign);
1246 get_random_seed(random_source);
1248 /* Case when the outfile equals one of the input files: */
1249 if (strcmp(outfile, "-")) {
1251 for(int i = 0; i < argc; ++i) {
1252 if (strcmp(argv[i], outfile) == 0) {
1253 real_outfile = sort_strdup(outfile);
1255 char* tmp = sort_malloc(strlen(outfile) +
1256 strlen(".tmp") + 1);
1258 strcpy(tmp, outfile);
1259 strcpy(tmp + strlen(tmp), ".tmp");
1262 if (access(outfile, F_OK) < 0)
1265 tmp_file_atexit(outfile);
1270 #if defined(SORT_THREADS)
1271 if ((argc < 1) || (strcmp(outfile, "-") == 0) || (*outfile == 0))
1275 if (!sort_opts_vals.cflag && !sort_opts_vals.mflag) {
1276 struct file_list fl;
1277 struct sort_list list;
1279 sort_list_init(&list);
1280 file_list_init(&fl, true);
1283 procfile("-", &list, &fl);
1286 procfile(*argv, &list, &fl);
1293 sort_list_to_file(&list, outfile);
1295 if (list.count > 0) {
1296 char *flast = new_tmp_file_name();
1298 sort_list_to_file(&list, flast);
1299 file_list_add(&fl, flast, false);
1301 merge_files(&fl, outfile);
1304 file_list_clean(&fl);
1307 * We are about to exit the program, so we can ignore
1308 * the clean-up for speed
1310 * sort_list_clean(&list);
1313 } else if (sort_opts_vals.cflag) {
1314 result = (argc == 0) ? (check("-")) : (check(*argv));
1315 } else if (sort_opts_vals.mflag) {
1316 struct file_list fl;
1318 file_list_init(&fl, false);
1319 /* No file arguments remaining means "read from stdin." */
1321 file_list_add(&fl, "-", true);
1323 file_list_populate(&fl, argc, argv, true);
1324 merge_files(&fl, outfile);
1325 file_list_clean(&fl);
1329 unlink(real_outfile);
1330 if (rename(outfile, real_outfile) < 0)
1332 sort_free(real_outfile);