WebSVN – HelenOS-historic – Diff – /kernel/trunk/generic/src/lib/func.c


/*
 * Copyright (C) 2001-2004 Jakub Jermar
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
/** @addtogroup generic
 * @{
 */
 
/**
 * @file
 * @brief   Miscellaneous functions.
 */
 
#include <func.h>
#include <print.h>
#include <cpu.h>
#include <arch/asm.h>
#include <arch.h>
#include <typedefs.h>
#include <console/kconsole.h>
 
atomic_t haltstate = {0}; /**< Halt flag */
 
 
/** Halt wrapper
 *
 * Set halt flag and halt the cpu.
 *
 */
void halt()
{
#ifdef CONFIG_DEBUG
    bool rundebugger = false;
 
//      TODO test_and_set not defined on all arches
//  if (!test_and_set(&haltstate))
    if (!atomic_get(&haltstate)) {
        atomic_set(&haltstate, 1);
        rundebugger = true;
    }
#else
    atomic_set(&haltstate, 1);
#endif
 
    interrupts_disable();
#ifdef CONFIG_DEBUG
    if (rundebugger) {
        printf("\n");
        kconsole("panic"); /* Run kconsole as a last resort to user */
    }
#endif      
    if (CPU)
        printf("cpu%d: halted\n", CPU->id);
    else
        printf("cpu: halted\n");
    cpu_halt();
}
 
/** Return number of characters in a string.
 *
 * @param str NULL terminated string.
 *
 * @return Number of characters in str.
 */
size_t strlen(const char *str)
{
    int i;
   
    for (i = 0; str[i]; i++)
        ;
   
    return i;
}
 
/** Compare two NULL terminated strings
 *
 * Do a char-by-char comparison of two NULL terminated strings.
 * The strings are considered equal iff they consist of the same
 * characters on the minimum of their lengths and specified maximal
 * length.
 *
 * @param src First string to compare.
 * @param dst Second string to compare.
 * @param len Maximal length for comparison.
 *
 * @return 0 if the strings are equal, -1 if first is smaller, 1 if second smaller.
 *
 */
int strncmp(const char *src, const char *dst, size_t len)
{
    int i;
   
    i = 0;
    for (;*src && *dst && i < len;src++,dst++,i++) {
        if (*src < *dst)
            return -1;
        if (*src > *dst)
            return 1;
    }
    if (i == len || *src == *dst)
        return 0;
    if (!*src)
        return -1;
    return 1;
}
 
/** Copy NULL terminated string.
 *
 * Copy at most 'len' characters from string 'src' to 'dest'.
 * If 'src' is shorter than 'len', '\0' is inserted behind the
 * last copied character.
 *
 * @param src Source string.
 * @param dest Destination buffer.
 * @param len Size of destination buffer.
 */
void strncpy(char *dest, const char *src, size_t len)
{
    int i;
    for (i = 0; i < len; i++) {
        if (!(dest[i] = src[i]))
            return;
    }
    dest[i-1] = '\0';
}
 
/** Convert ascii representation to unative_t
 *
 * Supports 0x for hexa & 0 for octal notation.
 * Does not check for overflows, does not support negative numbers
 *
 * @param text Textual representation of number
 * @return Converted number or 0 if no valid number ofund
 */
unative_t atoi(const char *text)
{
    int base = 10;
    unative_t result = 0;
 
    if (text[0] == '0' && text[1] == 'x') {
        base = 16;
        text += 2;
    } else if (text[0] == '0')
        base = 8;
 
    while (*text) {
        if (base != 16 && \
            ((*text >= 'A' && *text <= 'F' )
             || (*text >='a' && *text <='f')))
            break;
        if (base == 8 && *text >='8')
            break;
 
        if (*text >= '0' && *text <= '9') {
            result *= base;
            result += *text - '0';
        } else if (*text >= 'A' && *text <= 'F') {
            result *= base;
            result += *text - 'A' + 10;
        } else if (*text >= 'a' && *text <= 'f') {
            result *= base;
            result += *text - 'a' + 10;
        } else
            break;
        text++;
    }
 
    return result;
}
 
/** @}
 */
 

Rev 1757	Rev 1780
1	/*	1	/*
2	* Copyright (C) 2001-2004 Jakub Jermar	2	* Copyright (C) 2001-2004 Jakub Jermar
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	/** @addtogroup generic	29	/** @addtogroup generic
30	* @{	30	* @{
31	*/	31	*/
32		32
33	/**	33	/**
34	* @file	34	* @file
35	* @brief Miscellaneous functions.	35	* @brief Miscellaneous functions.
36	*/	36	*/
37		37
38	#include <func.h>	38	#include <func.h>
39	#include <print.h>	39	#include <print.h>
40	#include <cpu.h>	40	#include <cpu.h>
41	#include <arch/asm.h>	41	#include <arch/asm.h>
42	#include <arch.h>	42	#include <arch.h>
43	#include <typedefs.h>	43	#include <typedefs.h>
44	#include <console/kconsole.h>	44	#include <console/kconsole.h>
45		45
46	atomic_t haltstate = {0}; /*< Halt flag /	46	atomic_t haltstate = {0}; /*< Halt flag /
47		47
48		48
49	/** Halt wrapper	49	/** Halt wrapper
50	*	50	*
51	* Set halt flag and halt the cpu.	51	* Set halt flag and halt the cpu.
52	*	52	*
53	*/	53	*/
54	void halt()	54	void halt()
55	{	55	{
56	#ifdef CONFIG_DEBUG	56	#ifdef CONFIG_DEBUG
57	bool rundebugger = false;	57	bool rundebugger = false;
58		58
59	// TODO test_and_set not defined on all arches	59	// TODO test_and_set not defined on all arches
60	// if (!test_and_set(&haltstate))	60	// if (!test_and_set(&haltstate))
61	if (!atomic_get(&haltstate)) {	61	if (!atomic_get(&haltstate)) {
62	atomic_set(&haltstate, 1);	62	atomic_set(&haltstate, 1);
63	rundebugger = true;	63	rundebugger = true;
64	}	64	}
65	#else	65	#else
66	atomic_set(&haltstate, 1);	66	atomic_set(&haltstate, 1);
67	#endif	67	#endif
68		68
69	interrupts_disable();	69	interrupts_disable();
70	#ifdef CONFIG_DEBUG	70	#ifdef CONFIG_DEBUG
71	if (rundebugger) {	71	if (rundebugger) {
72	printf("\n");	72	printf("\n");
73	kconsole("panic"); /* Run kconsole as a last resort to user */	73	kconsole("panic"); /* Run kconsole as a last resort to user */
74	}	74	}
75	#endif	75	#endif
76	if (CPU)	76	if (CPU)
77	printf("cpu%d: halted\n", CPU->id);	77	printf("cpu%d: halted\n", CPU->id);
78	else	78	else
79	printf("cpu: halted\n");	79	printf("cpu: halted\n");
80	cpu_halt();	80	cpu_halt();
81	}	81	}
82		82
83	/** Return number of characters in a string.	83	/** Return number of characters in a string.
84	*	84	*
85	* @param str NULL terminated string.	85	* @param str NULL terminated string.
86	*	86	*
87	* @return Number of characters in str.	87	* @return Number of characters in str.
88	*/	88	*/
89	size_t strlen(const char *str)	89	size_t strlen(const char *str)
90	{	90	{
91	int i;	91	int i;
92		92
93	for (i = 0; str[i]; i++)	93	for (i = 0; str[i]; i++)
94	;	94	;
95		95
96	return i;	96	return i;
97	}	97	}
98		98
99	/** Compare two NULL terminated strings	99	/** Compare two NULL terminated strings
100	*	100	*
101	* Do a char-by-char comparison of two NULL terminated strings.	101	* Do a char-by-char comparison of two NULL terminated strings.
102	* The strings are considered equal iff they consist of the same	102	* The strings are considered equal iff they consist of the same
103	* characters on the minimum of their lengths and specified maximal	103	* characters on the minimum of their lengths and specified maximal
104	* length.	104	* length.
105	*	105	*
106	* @param src First string to compare.	106	* @param src First string to compare.
107	* @param dst Second string to compare.	107	* @param dst Second string to compare.
108	* @param len Maximal length for comparison.	108	* @param len Maximal length for comparison.
109	*	109	*
110	* @return 0 if the strings are equal, -1 if first is smaller, 1 if second smaller.	110	* @return 0 if the strings are equal, -1 if first is smaller, 1 if second smaller.
111	*	111	*
112	*/	112	*/
113	int strncmp(const char src, const char dst, size_t len)	113	int strncmp(const char src, const char dst, size_t len)
114	{	114	{
115	int i;	115	int i;
116		116
117	i = 0;	117	i = 0;
118	for (;src && dst && i < len;src++,dst++,i++) {	118	for (;src && dst && i < len;src++,dst++,i++) {
119	if (src < dst)	119	if (src < dst)
120	return -1;	120	return -1;
121	if (src > dst)	121	if (src > dst)
122	return 1;	122	return 1;
123	}	123	}
124	if (i == len \|\| src == dst)	124	if (i == len \|\| src == dst)
125	return 0;	125	return 0;
126	if (!*src)	126	if (!*src)
127	return -1;	127	return -1;
128	return 1;	128	return 1;
129	}	129	}
130		130
131	/** Copy NULL terminated string.	131	/** Copy NULL terminated string.
132	*	132	*
133	* Copy at most 'len' characters from string 'src' to 'dest'.	133	* Copy at most 'len' characters from string 'src' to 'dest'.
134	* If 'src' is shorter than 'len', '\0' is inserted behind the	134	* If 'src' is shorter than 'len', '\0' is inserted behind the
135	* last copied character.	135	* last copied character.
136	*	136	*
137	* @param src Source string.	137	* @param src Source string.
138	* @param dest Destination buffer.	138	* @param dest Destination buffer.
139	* @param len Size of destination buffer.	139	* @param len Size of destination buffer.
140	*/	140	*/
141	void strncpy(char dest, const char src, size_t len)	141	void strncpy(char dest, const char src, size_t len)
142	{	142	{
143	int i;	143	int i;
144	for (i = 0; i < len; i++) {	144	for (i = 0; i < len; i++) {
145	if (!(dest[i] = src[i]))	145	if (!(dest[i] = src[i]))
146	return;	146	return;
147	}	147	}
148	dest[i-1] = '\0';	148	dest[i-1] = '\0';
149	}	149	}
150		150
151	/** Convert ascii representation to __native	151	/** Convert ascii representation to unative_t
152	*	152	*
153	* Supports 0x for hexa & 0 for octal notation.	153	* Supports 0x for hexa & 0 for octal notation.
154	* Does not check for overflows, does not support negative numbers	154	* Does not check for overflows, does not support negative numbers
155	*	155	*
156	* @param text Textual representation of number	156	* @param text Textual representation of number
157	* @return Converted number or 0 if no valid number ofund	157	* @return Converted number or 0 if no valid number ofund
158	*/	158	*/
159	__native atoi(const char *text)	159	unative_t atoi(const char *text)
160	{	160	{
161	int base = 10;	161	int base = 10;
162	__native result = 0;	162	unative_t result = 0;
163		163
164	if (text[0] == '0' && text[1] == 'x') {	164	if (text[0] == '0' && text[1] == 'x') {
165	base = 16;	165	base = 16;
166	text += 2;	166	text += 2;
167	} else if (text[0] == '0')	167	} else if (text[0] == '0')
168	base = 8;	168	base = 8;
169		169
170	while (*text) {	170	while (*text) {
171	if (base != 16 && \	171	if (base != 16 && \
172	((text >= 'A' && text <= 'F' )	172	((text >= 'A' && text <= 'F' )
173	\|\| (text >='a' && text <='f')))	173	\|\| (text >='a' && text <='f')))
174	break;	174	break;
175	if (base == 8 && *text >='8')	175	if (base == 8 && *text >='8')
176	break;	176	break;
177		177
178	if (text >= '0' && text <= '9') {	178	if (text >= '0' && text <= '9') {
179	result *= base;	179	result *= base;
180	result += *text - '0';	180	result += *text - '0';
181	} else if (text >= 'A' && text <= 'F') {	181	} else if (text >= 'A' && text <= 'F') {
182	result *= base;	182	result *= base;
183	result += *text - 'A' + 10;	183	result += *text - 'A' + 10;
184	} else if (text >= 'a' && text <= 'f') {	184	} else if (text >= 'a' && text <= 'f') {
185	result *= base;	185	result *= base;
186	result += *text - 'a' + 10;	186	result += *text - 'a' + 10;
187	} else	187	} else
188	break;	188	break;
189	text++;	189	text++;
190	}	190	}
191		191
192	return result;	192	return result;
193	}	193	}
194		194
195	/** @}	195	/** @}
196	*/	196	*/
197		197

Subversion Repositories HelenOS-historic

(root)/kernel/trunk/generic/src/lib/func.c – Rev 1757 → 1780