Subversion Repositories HelenOS

Rev

Rev 4153 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
3294 post 1
/* Copyright (c) 2008, Tim Post <tinkertim@gmail.com>
2
 * All rights reserved.
3277 post 3
 *
3294 post 4
 * Redistribution and use in source and binary forms, with or without
5
 * modification, are permitted provided that the following conditions are met:
6
 *
7
 * Redistributions of source code must retain the above copyright notice, this
8
 * list of conditions and the following disclaimer.
9
 *
10
 * Redistributions in binary form must reproduce the above copyright notice,
11
 * this list of conditions and the following disclaimer in the documentation
12
 * and/or other materials provided with the distribution.
13
 *
14
 * Neither the name of the original program's authors nor the names of its
15
 * contributors may be used to endorse or promote products derived from this
16
 * software without specific prior written permission.
17
 *
18
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
19
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
22
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28
 * POSSIBILITY OF SUCH DAMAGE.
29
 */
3277 post 30
 
3294 post 31
/* NOTE:
32
 * This is a bit of an ugly hack, working around the absence of fstat / etc.
33
 * As more stuff is completed and exposed in libc, this will improve */
3293 post 34
 
3277 post 35
#include <stdio.h>
36
#include <stdlib.h>
3293 post 37
#include <unistd.h>
38
#include <dirent.h>
39
#include <fcntl.h>
40
#include <sys/types.h>
41
#include <sys/stat.h>
42
#include <string.h>
43
 
44
#include "errors.h"
45
#include "config.h"
46
#include "util.h"
3277 post 47
#include "entry.h"
48
#include "ls.h"
49
#include "cmds.h"
50
 
51
static char *cmdname = "ls";
52
 
4153 mejdrech 53
static inline off_t flen(const char *f)
54
{
55
    int fd;
56
    off_t size;
57
 
58
    fd = open(f, O_RDONLY);
59
    if (fd == -1)
60
        return 0;
61
 
62
    size = lseek(fd, 0, SEEK_END);
63
    close(fd);
64
 
65
    if (size < 0)
66
        size = 0;
67
 
68
    return size;
69
}
70
 
3364 post 71
static unsigned int ls_scope(const char *path)
3293 post 72
{
73
    int fd;
74
    DIR *dirp;
75
 
76
    dirp = opendir(path);
77
    if (dirp) {
78
        closedir(dirp);
79
        return LS_DIR;
80
    }
81
 
82
    fd = open(path, O_RDONLY);
83
    if (fd > 0) {
84
        close(fd);
85
        return LS_FILE;
86
    }
87
 
88
    return LS_BOGUS;
89
}
90
 
3364 post 91
static void ls_scan_dir(const char *d, DIR *dirp)
3293 post 92
{
3326 post 93
    struct dirent *dp;
3309 post 94
    unsigned int scope;
3326 post 95
    char *buff;
3309 post 96
 
3326 post 97
    if (! dirp)
98
        return;
3309 post 99
 
3326 post 100
    buff = (char *)malloc(PATH_MAX);
101
    if (NULL == buff) {
102
        cli_error(CL_ENOMEM, "ls: failed to scan %s", d);
103
        return;
104
    }
3309 post 105
 
3326 post 106
    while ((dp = readdir(dirp))) {
107
        memset(buff, 0, sizeof(buff));
108
        /* Don't worry if inserting a double slash, this will be fixed by
109
         * absolutize() later with subsequent calls to open() or readdir() */
110
        snprintf(buff, PATH_MAX - 1, "%s/%s", d, dp->d_name);
111
        scope = ls_scope(buff);
112
        switch (scope) {
113
        case LS_DIR:
114
            ls_print_dir(dp->d_name);
115
            break;
116
        case LS_FILE:
4153 mejdrech 117
            ls_print_file(dp->d_name, buff);
3326 post 118
            break;
119
        case LS_BOGUS:
120
            /* Odd chance it was deleted from the time readdir() found
121
             * it and the time that it was scoped */
122
            printf("ls: skipping bogus node %s\n", dp->d_name);
123
            break;
124
        }
3309 post 125
    }
3326 post 126
 
127
    free(buff);
128
 
3293 post 129
    return;
130
}
131
 
3326 post 132
/* ls_print_* currently does nothing more than print the entry.
133
 * in the future, we will likely pass the absolute path, and
134
 * some sort of ls_options structure that controls how each
135
 * entry is printed and what is printed about it.
136
 *
137
 * Now we just print basic DOS style lists */
138
 
3364 post 139
static void ls_print_dir(const char *d)
3326 post 140
{
4153 mejdrech 141
    printf("%-40s\t<dir>\n", d);
3326 post 142
 
143
    return;
144
}
145
 
4153 mejdrech 146
static void ls_print_file(const char *name, const char *pathname)
3326 post 147
{
4153 mejdrech 148
    printf("%-40s\t%llu\n", name, (long long) flen(pathname));
3326 post 149
 
150
    return;
151
}
152
 
4153 mejdrech 153
void help_cmd_ls(unsigned int level)
3277 post 154
{
3294 post 155
    if (level == HELP_SHORT) {
156
        printf("`%s' lists files and directories.\n", cmdname);
157
    } else {
158
        help_cmd_ls(HELP_SHORT);
159
        printf("  `%s' [path], if no path is given the current "
160
                "working directory is used.\n", cmdname);
161
    }
162
 
4153 mejdrech 163
    return;
3277 post 164
}
165
 
4153 mejdrech 166
int cmd_ls(char **argv)
3277 post 167
{
168
    unsigned int argc;
3293 post 169
    unsigned int scope;
170
    char *buff;
171
    DIR *dirp;
172
 
3376 post 173
    argc = cli_count_args(argv);
3277 post 174
 
3293 post 175
    buff = (char *) malloc(PATH_MAX);
176
    if (NULL == buff) {
177
        cli_error(CL_ENOMEM, "%s: ", cmdname);
178
        return CMD_FAILURE;
3277 post 179
    }
3293 post 180
    memset(buff, 0, sizeof(buff));
3277 post 181
 
3293 post 182
    if (argc == 1)
183
        getcwd(buff, PATH_MAX);
184
    else
4327 mejdrech 185
        str_cpy(buff, PATH_MAX, argv[1]);
3277 post 186
 
3293 post 187
    scope = ls_scope(buff);
188
 
189
    switch (scope) {
190
    case LS_BOGUS:
191
        cli_error(CL_ENOENT, buff);
192
        free(buff);
193
        return CMD_FAILURE;
194
    case LS_FILE:
4153 mejdrech 195
        ls_print_file(buff, buff);
3293 post 196
        break;
197
    case LS_DIR:
198
        dirp = opendir(buff);
3326 post 199
        if (! dirp) {
200
            /* May have been deleted between scoping it and opening it */
201
            cli_error(CL_EFAIL, "Could not stat %s", buff);
202
            free(buff);
203
            return CMD_FAILURE;
204
        }
205
        ls_scan_dir(buff, dirp);
3293 post 206
        closedir(dirp);
207
        break;
208
    }
209
 
210
    free(buff);
211
 
212
    return CMD_SUCCESS;
3277 post 213
}
214