java实现ls命令_Linux下ls命令的简单实现C源码

本程序在suse10下测试通过，只有一个警告

//---------------------------------------------------------------------------------------

/*   ls.c    */

#include "stdio.h"

#include "string.h"

#include "time.h"

#include "unistd.h"

#include "stdlib.h"

#include "sys/types.h"

#include "sys/stat.h"

#include "fcntl.h"

#include "pwd.h"

#include "grp.h"

#include "dirent.h"

#define NAME_SIZE 100

typedef struct item

{

char name[NAME_SIZE];

int length;

struct stat st;

struct item *next;

}nNode;

#define MARK_FILE(value,flags) ((flags) = (((value)&ALL_FILE)|(flags)))

#define DEL_FILE(value,flags) ((flags) = ((~(value))&(flags)))

#define MARK_INFO(value,flags) ((flags) = (((value)&STAT_ALL_INFO)|(flags)))

#define DEL_INFO(value,flags) ((flags) = ((~(value))&(flags)))

#define MARK(value,flags)      ((flags) = ((value)|(flags)))

#define DEL(value,flags)       ((flags) = ((~(value))&(flags)))

#define FILE_TYPE 0xf8000000

#define OTH_FILE   0x80000000

#define DIR_FILE   0x40000000

#define REG_FILE   0x20000000

#define BAK_FILE   0x10000000

#define DOT_FILE   0x08000000

#define ALL_FILE   0xf8000000

#define STAT_ALL_INFO   0x07f00000

#define STAT_GROUP      0x04000000

#define STAT_OWNER      0x02000000

#define STAT_NUMID      0x01000000

#define STAT_SIZE       0x00800000   //0 present bytes 1 present k or m

#define STAT_INODE      0x00400000

#define STAT_TIME       0x00200000

#define STAT_PERMISSION 0x00100000

#define STAT_COLOR      0x00080000

#define STAT_RECUR      0x00040000

#define STAT_HR         0x00020000

void AddnNode(nNode **head,char *name,struct stat *st);

void freeNode(nNode *head );

void do_ls(char *filename,int flags,nNode **head);

void showitem(char *name ,struct stat *st,int flags);

void showfile(nNode *head,int flags);

void quitsort(char **array,int high,int low);

void format_permission(struct stat *st)

{

int mode = st->st_mode;

char buf[11];

memset(buf,'-',10);

buf[10]=0;

if(S_ISDIR(mode)) buf[0] = 'd';

else if(S_ISCHR(mode)) buf[0] = 'c';

else if(S_ISBLK(mode)) buf[0] = 'b';

else if(S_ISFIFO(mode)) buf[0] = 'p';

else if(S_ISLNK(mode)) buf[0] = 'l';

else if(S_ISSOCK(mode)) buf[0] = 's';

if(S_IRUSR&mode) buf[1] = 'r';

if(S_IWUSR&mode) buf[2] = 'w';

if(S_IXUSR&mode) buf[3] = 'x';

if(S_IRGRP&mode) buf[4] = 'r';

if(S_IWGRP&mode) buf[5] = 'w';

if(S_IXGRP&mode) buf[6] = 'x';

if(S_IROTH&mode) buf[7] = 'r';

if(S_IWOTH&mode) buf[8] = 'w';

if(S_IXOTH&mode) buf[9] = 'x';

if(S_ISUID&mode) buf[3] = 's';

if(S_ISGID&mode) buf[6] = 's';

if(S_ISVTX&mode) buf[9] = 't';

if( (!(S_IXUSR&mode)) && (S_ISUID&mode) ) buf[3] = 'S';

if( (!(S_IXGRP&mode)) && (S_ISGID&mode) ) buf[6] = 'S';

if( (!(S_IXOTH&mode)) && (S_ISVTX&mode) ) buf[9] = 'T';

printf("%s ",buf);

}

void format_group(struct stat *st)

{

int id = st->st_gid;

struct group *buf = getgrgid(id);

if(buf)

{

printf("%s ",buf->gr_name);

}else

{

printf("%d ",id);

}

}

void format_owner(struct stat *st)

{

int id = st->st_uid;

struct passwd *buf_pw = getpwuid(id);

if(buf_pw)

{

printf("%s ",buf_pw->pw_name);

}else

{

printf("%d ",id);

}

}

void format_time(struct stat *st)

{

char *buf= ctime(&(st->st_ctime)); //最近一次被更改的时间

buf +=4;

buf[strlen(buf)-1]=0;

printf("%s ",buf);

}

void format_numid(struct stat *st)

{

printf("%d %d ",st->st_uid,st->st_gid);

}

int main(int argc,char **argv)

{

int flags =REG_FILE|DIR_FILE|BAK_FILE|OTH_FILE;

int *file_index = (int *)malloc(sizeof(int)*argc);

int files= 0;

int i=0;

for(i=1;i{

if(!strcmp(argv[i],"-a"))

{

MARK_FILE(ALL_FILE,flags);

MARK_INFO(STAT_ALL_INFO,flags);

DEL_INFO(STAT_NUMID,flags);

}else if(!strcmp("-A",argv[i]))

{

DEL_FILE(DOT_FILE,flags);

}else if(!strcmp("-d",argv[i]))

{

MARK_FILE(DIR_FILE,flags);

}else if(!strcmp("-D",argv[i]))

{

DEL_FILE(DIR_FILE,flags);

}else if(!strcmp("-r",argv[i]))

{

MARK_FILE(REG_FILE,flags);

}else if(!strcmp("-R",argv[i]))

{

DEL_FILE(REG_FILE,flags);

}else if(!strcmp("-o",argv[i]))

{

MARK_FILE(OTH_FILE,flags);

}else if(!strcmp("-O",argv[i]))

{

DEL_FILE(OTH_FILE,flags);

}else if(!strcmp("-B",argv[i]))

{

DEL_FILE(BAK_FILE,flags);

}else if(!strcmp("-l",argv[i]))

{

MARK_FILE(ALL_FILE,flags);

MARK_INFO(STAT_ALL_INFO,flags);

DEL(STAT_HR,flags);

DEL(STAT_NUMID,flags);

}else if(!strcmp("-L",argv[i]))

{

MARK_FILE(ALL_FILE,flags);

MARK_INFO(STAT_ALL_INFO,flags);

//DEL(STAT_HR,flags);

//DEL(STAT_NUMID,flags);

}else if(!strcmp("-g",argv[i]))

{

MARK_INFO(STAT_GROUP,flags);

DEL_INFO(STAT_GROUP,flags);

}else if(!strcmp("-G",argv[i]))

{

DEL_INFO(STAT_GROUP,flags);

}else if(!strcmp("-u",argv[i]))

{

MARK_INFO(STAT_OWNER,flags);

DEL_INFO(STAT_NUMID,flags);

}else if(!strcmp("-U",argv[i]))

{

DEL_INFO(STAT_OWNER,flags);

}else if(!strcmp("-n",argv[i]))

{

MARK_INFO(STAT_NUMID,flags);

DEL_INFO(STAT_OWNER,flags);

DEL_INFO(STAT_GROUP,flags);

}else if(!strcmp("-i",argv[i]))

{

MARK_INFO(STAT_INODE,flags);

}else if(!strcmp("-I",argv[i]))

{

DEL_INFO(STAT_INODE,flags);

}else if(!strcmp("-t",argv[i]))

{

MARK_INFO(STAT_TIME,flags);

}else if(!strcmp("-T",argv[i]))

{

DEL_INFO(STAT_TIME,flags);

}else if(!strcmp("-c",argv[i]))

{

MARK(STAT_COLOR,flags);

}else if(!strcmp("-rec",argv[i]))

{

MARK(STAT_RECUR,flags);

}else if(!strcmp("-h",argv[i]))

{

MARK(STAT_HR,flags);

DEL_INFO(STAT_SIZE,flags);

}

else

{

file_index[files++] = i;

}

}

if(files==0)

{

char path[1024];

nNode *head=NULL;

if(getcwd(path,1024)==NULL)

return -1;

printf("%s : \n",path);

do_ls(path,flags,&head);

showfile(head,flags);

}

else

{

for(i=0;i{

nNode *head=NULL;

char path[1024];

do_ls(argv[file_index[i]],flags,&head);

if(getcwd(path,1024)==NULL)

return -1;

printf("%s : \n",path);

showfile(head,flags);

freeNode(head);

printf("\n");

}

}

return 0;

}

int ListLength(nNode *head)

{

int length=0;

while(head)

{

length++;

head = head->next;

}

return length;

}

void display(nNode *array[],int length,int flags)

{

int i=0;

if(flags & STAT_ALL_INFO)

{

for(i=0; i < length;i++)

{

showitem(array[i]->name,&(array[i]->st),flags);

}

printf("\n\n");

}

else

{

int columns = 97;

int maxcolumns = 10;

int columnpos[10]={0},col=10,j;

for(i = maxcolumns ;i >=1;i -=1 )

{

col = i;

for(j = 0;(j < i) && (j < length);j++)

{

int max=0,k=j;

while(k < length)

{

if(array[k]->length > array[max]->length)

max = k;

k = k + i;

}

columnpos[j] = array[max]->length +3;

}

int z;

for(z=1;z < j; ++z )

{

columnpos[z] +=columnpos[z-1];

}

if(columnpos[z-1] <= columns)

break;

}

char line[97];

for(i=0;i < length;i++)

{

if( (i % col) == 0 )

{

if(i!=0)

{

printf("%s",line);

printf("\n");

}

memset(line,' ',96);

line[96]=0;

strncpy(line,array[i]->name,strlen(array[i]->name));

}

else

{

int pos = columnpos[ (i%col)-1 ];

strncpy(line+pos,array[i]->name,strlen(array[i]->name));

}

}

printf("%s\n",line);

}

}

void showfile(nNode *head,int flags)

{

int length = ListLength(head);

int i=0;

nNode **array = (nNode *)malloc(sizeof(nNode *)*length);

if(!array)

{

perror("array memory error");

return ;

}

for(i=0;i{

array[i] = head;

head = head->next;

}

quitsort((char **)array,length -1 , 0 );

display(array,length,flags);

}

void showitem(char *name ,struct stat *st,int flags)

{

if( (name[strlen(name)-1]=='~') && (!(BAK_FILE&flags)))

return ;

if( (name[0]=='.') && (!(DOT_FILE&flags)))

return;

if( S_ISDIR(st->st_mode) && (!(DIR_FILE&flags)))

return;

if( S_ISREG(st->st_mode) && (!(REG_FILE&flags)))

return;

if(flags & STAT_ALL_INFO)

{

format_permission(st);       //文件的类型和存取的权限

printf("%d ",st->st_nlink); //连到该文件的硬连接数目

}

if(flags & STAT_OWNER)

format_owner(st);            //根据文件所有者的用户识别码，得出用户名

if(flags & STAT_GROUP)

format_group(st);            //根据文件所有者的组识别码，得出组名

if(flags & STAT_NUMID)

format_numid(st);            //文件所有者的用户识别码，组识别码

if(flags & STAT_SIZE)

printf("%d ",st->st_size); //文件大小，以字节计算

else if(flags & STAT_HR)

printf("%-dk ",st->st_size/1024 +1);

if(flags &STAT_INODE)

printf("%d ",st->st_ino);   //文件的索引节点

if(flags &STAT_TIME)

format_time(st);             //最近一次被更改的时间

printf("%s   ",name);          //文件名

if(flags & (STAT_ALL_INFO))

printf("\n");

}

void AddnNode(nNode **head,char *name,struct stat *st)

{

nNode *p = (nNode *)malloc(sizeof(nNode));

if(!p)

perror("malloc memory error");

p->next = *head;

*head = p;

(*head) -> length = strlen(name);

strcpy((*head)->name,name);

memcpy(&((*head)->st),st,sizeof(struct stat));

}

void freeNode(nNode *head )

{

nNode *p=head;

while(p)

{

p = head->next;

free(head);

head = p;

}

}

void swap(char **array,int i,int j)

{

char *tmp = array[i];

array[i] = array[j];

array[j] = tmp;

}

void quitsort(char **array,int high,int low)

{

int l=low,h=high;

char *tmp = array[low];

while(l < h)

{

while(l < h)

{

if( strcmp(array[l], tmp ) > 0 )

{

swap(array,l,h);

--h;

break;

}

++l;

}

while(l < h)

{

if(strcmp(array[h], tmp) < 0 )

{

swap(array,l,h);

++l;

break;

}

--h;

}

}

if(strcmp(array[l], tmp) > 0 )

{

--l;

}

if(low < high)

swap(array,l,low);

if(low < l)

quitsort(array,l-1,low);

if(l < high)

quitsort(array,high,l+1);

}

void do_ls(char *filename,int flags,nNode **head)

{

DIR *dir;

char parent_dir[100];

struct dirent *direntp;

struct stat st;

if((dir = opendir(filename))==NULL)

{

perror("open dir error");

goto OPENDIR_ERROR;

}

if(getcwd(parent_dir,100)==NULL) //保存当前目录绝对路径到parent_dir

{

perror("get parent dir error");

goto GETCURDIR_ERROR;

}

if(-1 == chdir(filename)) //进入到 filename 所指定的目录下

{

perror("change dir error");

goto CHDIR_ERROR;

}

while( (direntp = readdir(dir)) != NULL)

{

if(-1 == lstat(direntp->d_name,&st)) //lstat函数中的第一个参数为文件的绝对路径

continue;

if((!(flags & STAT_ALL_INFO)) && (direntp->d_name[0] == '.') )

continue;

AddnNode(head,direntp->d_name,&st);

if(S_ISDIR(st.st_mode) && (flags&STAT_RECUR) && strcmp(".",direntp->d_name)&&strcmp( direntp->d_name,".."))

{

nNode *newhead=NULL;

do_ls(direntp->d_name,flags,&newhead);

printf("%s :\n",direntp->d_name);

showfile(newhead,flags);

freeNode(newhead);

}

}

if(-1 == chdir(parent_dir)) //回到原来的目录下

{

perror("go back to parent error");

goto CHDIR_ERROR;

}

CHDIR_ERROR:

GETCURDIR_ERROR:

closedir(dir);

OPENDIR_ERROR:

;

}