对文本行进行排序，新增-d（目录排序），只对字母数字空格排序（TCPL 练习5-16）

#include <stdio.h>
#include <string.h>
/* 编写sort函数，扩充其功能，使得函数只对空格数字和字母排序，-d为指令，还需能和-r，-f等组合使用 */
#define MAXLINES 5000 /* 待排序的最大行数 */
char *lineptr[MAXLINES]; /* 指向问本行的指针 */int readlines(char *lineptr[], int nlines);
void writelines(char *lineptr[], int nlines);
int inpuntcmp(char *, char *); /* 函数inpuntcmp：将忽略除空格字母数字以外的字符比较，如果某行以上三种字符都没有，则判断为最小 */char *alloc(int n);
void sort(void *lineptr[], int left, int right, int (*comp)(void *, void *));
int numcmp(char *, char *);
int transfercmp(char *s1, char *s2); /* 函数transfercmp：忽略大小写的按字典比较的函数，例如，认为a=A，和numcmp以及strcmp并列的选项 */
static char allocbuf[];
static char *allocp=allocbuf;
int post=,uptolow=; /* post 为1则逆序排序；uptolow为1，忽略大小写 */main(int argc, char *argv[])
{
int nlines,nlines2; /* 读入的输入行数 */
int numeric=,nw=; /* numeric为1则以数值排序 uptolow为1则转换大小写 */ while(argc-->){
if(strcmp(*++argv,"-n")==)
numeric=;
else if(strcmp(*argv,"-r")==)
post=;
else if(strcmp(*argv,"-f")==)
uptolow=;
else if(strcmp(*argv,"-d")==)
nw=; /* nw为1只对字母数字空格排序 */
else
printf("error: unkonwn command\n");
}
if((nlines=readlines(lineptr,MAXLINES))>=) {
if(nw==){
sort((void **)lineptr, post?(nlines-):, post?:(nlines-), (int (*)(void*,void*))(inpuntcmp));
writelines(lineptr,nlines);
return ;
} else {
if(uptolow==)
sort((void **)lineptr, post?(nlines-):, post?:(nlines-), (int (*)(void*,void*))(numeric?numcmp:strcmp));
else
sort((void **)lineptr, post?(nlines-):, post?:(nlines-), (int (*)(void*,void*))(numeric?numcmp:transfercmp)); writelines(lineptr,nlines);
return ;
}
}
else {
printf("input too big to sort\n");
return ;
}}void sort(void *v[], int left, int right, int (*comp)(void *, void *))
{
if(post==) {
int i, last;
void swap(void *v[], int, int); if(left>=right)
return;
swap(v,left,(left+right)/);
last =left;
for(i=left+;i<=right;i++)
if((*comp)(v[i],v[left])<)
swap(v,++last,i);
swap(v,left,last);
sort(v,left,last-,comp);
sort(v,last+,right,comp);
} else
{
int i, last;
void swap(void *v[], int, int); if(left<=right)
return;
swap(v,left,(left+right)/);
last =left;
for(i=left-;i>=right;i--)
if((*comp)(v[i],v[left])<)
swap(v,--last,i);
swap(v,left,last);
sort(v,left,last+,comp);
sort(v,last-,right,comp);
}
}
#include<stdlib.h>
int numcmp(char *s1,char *s2)
{
double v1,v2;
v1=atof(s1);
v2=atof(s2);
if(v1<v2)
return -;
else if (v1>v2)
return ;
else
return ;}void swap(void *v[], int i, int j) {
void *temp; temp =v[i];
v[i]=v[j];
v[j]=temp;}
#define MAXLEN 1000
int getline(char *, int);
int readlines(char *lineptr[], int maxlines) {
int len,nlines;
char *p,line[MAXLEN];
nlines =;
while((len=getline(line,MAXLEN))>)
if (nlines>= maxlines || (p=alloc(len))==)
return -;
else {
line[len-]=;
strcpy(p,line);
lineptr[nlines++]=p;
}
return nlines;
}void writelines(char *lineptr[], int nlines)
{
int i; for(i=; i< nlines; i++)
printf("%s\n",lineptr[i]);
}
int getline(char *s, int lim) {
int i=,c;
for(; i<lim && (c=getchar()) != EOF && c!='\n';++i)
*(s+i)=c;
if(c=='\n') {
*(s+i)=c;
++i;}
*(s+i)=;
return i;}
char *alloc(int n) {
if(allocbuf +-allocp>=n) {
allocp +=n;
return allocp - n;
} else
return ;
}
#include<ctype.h>
int inpuntcmp(char *s1, char *s2)
{
char c,d;
while(*s1 != && *s2!=) {
while(ispunct(*s1)) {
if(*s1==)
return -;
++s1;
}
while(ispunct(*s2)) {
if(*s2==)
return ;
++s2;
}
if(uptolow==) {
c=tolower(*s1);
d=tolower(*s2);
}
else {
c=*s1;
d=*s2;
}
if(c<d)
return -;
else if (c>d)
return ;
++s1;
++s2; }
if(*s1<*s2)
return -;
else if (*s1>*s2)
return ;
else
return ;
}
int transfercmp(char *s1, char *s2)
{
char c,d;
while(*s1 != && *s2!=) {
c=tolower(*s1);
d=tolower(*s2);
if(c<d)
return -;
else if (c>d)
return ;
++s1;
++s2; }
if(*s1<*s2)
return -;
else if (*s1>*s2)
return ;
else
return ;
}