1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
|
/*
* LS Shell Command Implmentation
*
* Author: Fernando RUIZ CASAS
* Work: fernando.ruiz@ctv.es
* Home: correo@fernando-ruiz.com
*
* The license and distribution terms for this file may be
* found in the file LICENSE in this distribution or at
* http://www.rtems.com/license/LICENSE.
*
* $Id$
*/
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <ctype.h>
#include <dirent.h>
#include <time.h>
#include <fcntl.h>
#include <unistd.h>
#include <pwd.h>
#include <grp.h>
#include <errno.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <stddef.h>
#include <rtems.h>
#include <rtems/shell.h>
#include "internal.h"
int rtems_shell_main_ls(int argc, char *argv[])
{
char *fname;
DIR *dirp;
struct dirent *dp;
struct stat stat_buf;
struct passwd *pwd;
struct group *grp;
char *user;
char *group;
char sbuf[256];
char nbuf[1024];
int n;
int size;
fname = ".";
if (argc>1)
fname = argv[1];
if ((dirp = opendir(fname)) == NULL) {
fprintf(stdout,"%s: No such file or directory.\n", fname);
return errno;
}
n = 0;
size = 0;
while ((dp = readdir(dirp)) != NULL) {
strcpy(nbuf,fname);
if (nbuf[strlen(nbuf)-1]!='/')
strcat(nbuf,"/");
strcat(nbuf,dp->d_name); /* always the fullpathname. Avoid ftpd problem.*/
if (stat(nbuf, &stat_buf) == 0) { /* AWFUL buts works...*/
strftime(sbuf,sizeof(sbuf)-1,"%b %d %H:%M",gmtime(&stat_buf.st_mtime));
pwd = getpwuid(stat_buf.st_uid);
user = pwd?pwd->pw_name:"nouser";
grp = getgrgid(stat_buf.st_gid);
group = grp?grp->gr_name:"nogrp";
fprintf(stdout,"%c%c%c%c%c%c%c%c%c%c %3d %6.6s %6.6s %11d %s %s%c\n",
(S_ISLNK(stat_buf.st_mode)?('l'):
(S_ISDIR(stat_buf.st_mode)?('d'):('-'))),
(stat_buf.st_mode & S_IRUSR)?('r'):('-'),
(stat_buf.st_mode & S_IWUSR)?('w'):('-'),
(stat_buf.st_mode & S_IXUSR)?('x'):('-'),
(stat_buf.st_mode & S_IRGRP)?('r'):('-'),
(stat_buf.st_mode & S_IWGRP)?('w'):('-'),
(stat_buf.st_mode & S_IXGRP)?('x'):('-'),
(stat_buf.st_mode & S_IROTH)?('r'):('-'),
(stat_buf.st_mode & S_IWOTH)?('w'):('-'),
(stat_buf.st_mode & S_IXOTH)?('x'):('-'),
(int)stat_buf.st_nlink,
user,group,
(int)stat_buf.st_size,
sbuf,
dp->d_name,
S_ISDIR(stat_buf.st_mode)?'/':' ');
n++;
size += stat_buf.st_size;
}
}
fprintf(stdout,"%d files %d bytes occupied\n",n,size);
closedir(dirp);
return 0;
}
rtems_shell_cmd_t rtems_shell_LS_Command = {
"ls", /* name */
"ls [dir] # list files in the directory", /* usage */
"files", /* topic */
rtems_shell_main_ls, /* command */
NULL, /* alias */
NULL /* next */
};
|
