Ported SORT command form FreeDOS

svn path=/trunk/; revision=3501

rosapps/cmdutils/makefile

@@ -4,7 +4,7 @@
 
 PATH_TO_TOP=..
 
-TARGET=more.exe tee.exe y.exe
+TARGET=more.exe sort.exe tee.exe y.exe
 
 all: $(TARGET)
 
@@ -15,6 +15,10 @@ more.exe: more.o more.coff
 	$(CC) more.o -lkernel32 -lmsvcrt -o more.exe more.coff
 	$(NM) --numeric-sort more.exe > more.sym
 
+sort.exe: sort.o sort.coff
+	$(CC) sort.o -lkernel32 -lmsvcrt -o sort.exe sort.coff
+	$(NM) --numeric-sort sort.exe > sort.sym
+
 tee.exe: tee.o tee.coff
 	$(CC) tee.o -lkernel32 -lmsvcrt -o tee.exe tee.coff
 	$(NM) --numeric-sort tee.exe > tee.sym

rosapps/cmdutils/sort.c

@@ -0,0 +1,141 @@
+/*
+*    SORT - reads line of a file and sorts them in order
+*    Copyright  1995  Jim Lynch
+*
+*    Adapted for ReactOS
+*
+*    This program is free software; you can redistribute it and/or modify
+*    it under the terms of the GNU General Public License as published by
+*    the Free Software Foundation; either version 2 of the License, or
+*    (at your option) any later version.
+*
+*    This program is distributed in the hope that it will be useful,
+*    but WITHOUT ANY WARRANTY; without even the implied warranty of
+*    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+*    GNU General Public License for more details.
+*
+*    You should have received a copy of the GNU General Public License
+*    along with this program; if not, write to the Free Software
+*    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+*/
+
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <malloc.h>
+
+#define MAXRECORDS  65536	/* maximum number of records that can be
+				 * sorted */
+#define MAXLEN	4095		/* maximum record length */
+
+int             rev;		/* reverse flag */
+int             help;		/* help flag */
+int             sortcol;	/* sort column */
+int             err = 0;	/* error counter */
+
+int
+cmpr(void *a, void *b)
+{
+    char           *A, *B;
+
+    A = *(char **) a;
+    B = *(char **) b;
+
+    if (sortcol > 0) {
+	if (strlen(A) > sortcol)
+	    A += sortcol;
+	else
+	    A = "";
+	if (strlen(B) > sortcol)
+	    B += sortcol;
+	else
+	    B = "";
+    }
+    if (!rev)
+	return strcmp(A, B);
+    else
+	return strcmp(B, A);
+}
+
+void
+usage(void)
+{
+    fputs("SORT\n", stderr);
+    fputs("Sorts input and writes output to a file, console or a device.\n", stderr);
+    if (err)
+	fputs("Invalid parameter\n", stderr);
+    fputs("    SORT [options] < [drive:1][path1]file1 > [drive2:][path2]file2\n", stderr);
+    fputs("    Command | SORT [options] > [drive:][path]file\n", stderr);
+    fputs("    Options:\n", stderr);
+    fputs("    /R	Reverse order\n", stderr);
+    fputs("    /+n	Start sorting with column n\n", stderr);
+    fputs("    /?	Help\n", stderr);
+}
+
+int main(int argc, char **argv)
+{
+    char            temp[MAXLEN + 1];
+    char          **list;
+    char           *cp;		/* option character pointer */
+    int             nr;
+    int             i;
+
+
+    sortcol = 0;
+    rev = 0;
+    while (--argc) {
+	if (*(cp = *++argv) == '/') {
+	    switch (cp[1]) {
+	    case 'R':
+	    case 'r':
+		rev = 1;
+		break;
+	    case '?':
+	    case 'h':
+	    case 'H':
+		help = 1;
+		break;
+	    case '+':
+		sortcol = atoi(cp + 1);
+		if (sortcol)
+		    sortcol--;
+		break;
+	    default:
+		err++;
+	    }
+	}
+    }
+    if (err || help) {
+	usage();
+	exit(1);
+    }
+    list = (char **) malloc(MAXRECORDS * sizeof(char *));
+    if (list == NULL) {
+        fputs("SORT: Insufficient memory\n", stderr);
+        exit(3);
+    }
+    for (nr = 0; nr < MAXRECORDS; nr++) {
+	if (fgets(temp, MAXLEN, stdin) == NULL)
+	    break;
+	if(strlen(temp))
+	    temp[strlen(temp)-1]='\0';
+	list[nr] = (char *) malloc(strlen(temp) + 1);
+	if (list[nr] == NULL) {
+	    fputs("SORT: Insufficient memory\n", stderr);
+	    exit(3);
+	}
+	strcpy(list[nr], temp);
+    }
+    if (nr == MAXRECORDS) {
+	fputs("SORT: number of records exceeds maximum\n", stderr);
+	exit(4);
+    }
+    qsort((void *) list, nr, sizeof(char *), cmpr);
+    for (i = 0; i < nr; i++) {
+	fputs(list[i], stdout);
+	fputs("\n",stdout);
+    }
+    return 0;
+}
+
+/* EOF */

rosapps/cmdutils/sort.rc

@@ -0,0 +1,38 @@
+#include <windows.h>
+#include <reactos/resource.h>
+
+LANGUAGE LANG_ENGLISH, SUBLANG_ENGLISH_US
+
+VS_VERSION_INFO VERSIONINFO
+	FILEVERSION	RES_UINT_FV_MAJOR,RES_UINT_FV_MINOR,RES_UINT_FV_REVISION,RES_UINT_FV_BUILD
+	PRODUCTVERSION	RES_UINT_PV_MAJOR,RES_UINT_PV_MINOR,RES_UINT_PV_REVISION,RES_UINT_PV_BUILD	
+	FILEFLAGSMASK	0x3fL
+#ifdef _DEBUG
+	FILEFLAGS	0x1L
+#else
+	FILEFLAGS	0x0L
+#endif
+	FILEOS		0x40004L
+	FILETYPE	0x2L
+	FILESUBTYPE	0x0L
+BEGIN
+    BLOCK "StringFileInfo"
+    BEGIN
+        BLOCK "040904b0"
+        BEGIN
+            VALUE "CompanyName",	RES_STR_COMPANY_NAME
+            VALUE "FileDescription",	"W32 sort command\0"
+            VALUE "FileVersion",	RES_STR_PRODUCT_VERSION
+            VALUE "InternalName",	"sort\0"
+            VALUE "LegalCopyright",	RES_STR_LEGAL_COPYRIGHT
+            VALUE "OriginalFilename",	"sort.exe\0"
+            VALUE "ProductName",	RES_STR_PRODUCT_NAME
+            VALUE "ProductVersion",	RES_STR_PRODUCT_VERSION
+        END
+    END
+    BLOCK "VarFileInfo"
+    BEGIN
+        VALUE "Translation", 0x409, 1200
+    END
+END
+