Subversion Repositories HelenOS

Rev

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

Rev Author Line No. Line
3265 post 1
/* Copyright (c) 2008, Tim Post <tinkertim@gmail.com>
2
 * Copyright (C) 1998 by Wes Peters <wes@softweyr.com>
3
 * Copyright (c) 1988, 1993 The Regents of the University of California.
4
 * All rights reserved by all copyright holders.
5
 *
6
 * Redistribution and use in source and binary forms, with or without
7
 * modification, are permitted provided that the following conditions are met:
8
 *
9
 * Redistributions of source code must retain the above copyright notice, this
10
 * list of conditions and the following disclaimer.
11
 *
12
 * Redistributions in binary form must reproduce the above copyright notice,
13
 * this list of conditions and the following disclaimer in the documentation
14
 * and/or other materials provided with the distribution.
15
 *
16
 * Neither the name of the original program's authors nor the names of its
17
 * contributors may be used to endorse or promote products derived from this
18
 * software without specific prior written permission.
19
 *
20
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
21
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
24
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
28
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
29
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30
 * POSSIBILITY OF SUCH DAMAGE.
31
 */
32
 
33
/* NOTES:
34
 * 1 - Various functions were adapted from FreeBSD (copyright holders noted above)
35
 *     these functions are identified with comments.
36
 *
37
 * 2 - Some of these have since appeared in libc. They remain here for various
38
 *     reasons, such as the eventual integration of garbage collection for things
39
 *     that allocate memory and don't automatically free it.
40
 *
41
 * 3 - Things that expect a pointer to an allocated string do _no_ sanity checking
42
 *     if developing on a simulator with no debugger, take care :)
43
 */
44
 
45
#include <stdio.h>
46
#include <string.h>
47
#include <stdarg.h>
48
#include <stdlib.h>
3345 post 49
#include <stdarg.h>
3265 post 50
 
51
#include "config.h"
52
#include "errors.h"
53
#include "util.h"
54
 
3366 post 55
extern volatile int cli_errno;
56
 
3345 post 57
/* some platforms do not have strdup, implement it here.
58
 * Returns a pointer to an allocated string or NULL on failure */
3265 post 59
char * cli_strdup(const char *s1)
60
{
61
    size_t len = strlen(s1) + 1;
62
    void *ret = malloc(len);
63
 
3366 post 64
    if (ret == NULL) {
65
        cli_errno = CL_ENOMEM;
3265 post 66
        return (char *) NULL;
3366 post 67
    }
3265 post 68
 
3366 post 69
    cli_errno = CL_EOK;
3265 post 70
    return (char *) memcpy(ret, s1, len);
71
}
72
 
73
/* Ported from FBSD strtok.c 8.1 (Berkeley) 6/4/93 */
74
char * cli_strtok_r(char *s, const char *delim, char **last)
75
{
76
    char *spanp, *tok;
77
    int c, sc;
78
 
3366 post 79
    if (s == NULL && (s = *last) == NULL) {
80
        cli_errno = CL_EFAIL;
3265 post 81
        return (NULL);
3366 post 82
    }
3265 post 83
 
84
cont:
85
    c = *s++;
86
    for (spanp = (char *)delim; (sc = *spanp++) != 0;) {
87
        if (c == sc)
88
            goto cont;
89
    }
90
 
91
    if (c == 0) {       /* no non-delimiter characters */
92
        *last = NULL;
93
        return (NULL);
94
    }
3269 post 95
 
3265 post 96
    tok = s - 1;
97
 
98
    for (;;) {
99
        c = *s++;
100
        spanp = (char *)delim;
101
        do {
102
            if ((sc = *spanp++) == c) {
103
                if (c == 0)
104
                    s = NULL;
105
                else
106
                    s[-1] = '\0';
107
                *last = s;
108
                return (tok);
109
            }
110
        } while (sc != 0);
111
    }
112
}
113
 
114
/* Ported from FBSD strtok.c 8.1 (Berkeley) 6/4/93 */
115
char * cli_strtok(char *s, const char *delim)
116
{
117
    static char *last;
118
 
119
    return (cli_strtok_r(s, delim, &last));
120
}
3376 post 121
 
122
/* Count and return the # of elements in an array */
123
unsigned int cli_count_args(char **args)
124
{
125
    unsigned int i;
126
 
127
    for (i=0; args[i] != NULL; i++);
128
    return i;
129
}
130
 
3377 post 131
/* (re)allocates memory to store the current working directory, gets
132
 * and updates the current working directory, formats the prompt
133
 * string */
134
unsigned int cli_set_prompt(cliuser_t *usr)
135
{
136
    usr->prompt = (char *) realloc(usr->prompt, PATH_MAX);
137
    if (NULL == usr->prompt) {
138
        cli_error(CL_ENOMEM, "Can not allocate prompt");
139
        cli_errno = CL_ENOMEM;
140
        return 1;
141
    }
142
    memset(usr->prompt, 0, sizeof(usr->prompt));
143
 
144
    usr->cwd = (char *) realloc(usr->cwd, PATH_MAX);
145
    if (NULL == usr->cwd) {
146
        cli_error(CL_ENOMEM, "Can not allocate cwd");
147
        cli_errno = CL_ENOMEM;
148
        return 1;
149
    }
150
    memset(usr->cwd, 0, sizeof(usr->cwd));
151
 
152
    usr->cwd = getcwd(usr->cwd, PATH_MAX - 1);
153
 
154
    if (NULL == usr->cwd)
155
        snprintf(usr->cwd, PATH_MAX, "(unknown)");
156
 
3536 svoboda 157
    asprintf(&usr->prompt, "%s # ", usr->cwd);
3377 post 158
 
159
    return 0;
160
}
161
 
162