Subversion Repositories HelenOS

Rev

Rev 3397 | 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 
 
3492 rimsky 157 
    asprintf(&usr->prompt, "%s # ", usr->cwd);
3377 post 158 
 
159 
    return 0;
160 
}
161 
 
162