1*d90bee97SLionel Sambuc /* $NetBSD: mystring.c,v 1.17 2013/04/28 17:01:28 dholland Exp $ */
2*d90bee97SLionel Sambuc
3*d90bee97SLionel Sambuc /*-
4*d90bee97SLionel Sambuc * Copyright (c) 1991, 1993
5*d90bee97SLionel Sambuc * The Regents of the University of California. All rights reserved.
6*d90bee97SLionel Sambuc *
7*d90bee97SLionel Sambuc * This code is derived from software contributed to Berkeley by
8*d90bee97SLionel Sambuc * Kenneth Almquist.
9*d90bee97SLionel Sambuc *
10*d90bee97SLionel Sambuc * Redistribution and use in source and binary forms, with or without
11*d90bee97SLionel Sambuc * modification, are permitted provided that the following conditions
12*d90bee97SLionel Sambuc * are met:
13*d90bee97SLionel Sambuc * 1. Redistributions of source code must retain the above copyright
14*d90bee97SLionel Sambuc * notice, this list of conditions and the following disclaimer.
15*d90bee97SLionel Sambuc * 2. Redistributions in binary form must reproduce the above copyright
16*d90bee97SLionel Sambuc * notice, this list of conditions and the following disclaimer in the
17*d90bee97SLionel Sambuc * documentation and/or other materials provided with the distribution.
18*d90bee97SLionel Sambuc * 3. Neither the name of the University nor the names of its contributors
19*d90bee97SLionel Sambuc * may be used to endorse or promote products derived from this software
20*d90bee97SLionel Sambuc * without specific prior written permission.
21*d90bee97SLionel Sambuc *
22*d90bee97SLionel Sambuc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23*d90bee97SLionel Sambuc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24*d90bee97SLionel Sambuc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25*d90bee97SLionel Sambuc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26*d90bee97SLionel Sambuc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27*d90bee97SLionel Sambuc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28*d90bee97SLionel Sambuc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29*d90bee97SLionel Sambuc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30*d90bee97SLionel Sambuc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31*d90bee97SLionel Sambuc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32*d90bee97SLionel Sambuc * SUCH DAMAGE.
33*d90bee97SLionel Sambuc */
34*d90bee97SLionel Sambuc
35*d90bee97SLionel Sambuc #include <sys/cdefs.h>
36*d90bee97SLionel Sambuc #ifndef lint
37*d90bee97SLionel Sambuc #if 0
38*d90bee97SLionel Sambuc static char sccsid[] = "@(#)mystring.c 8.2 (Berkeley) 5/4/95";
39*d90bee97SLionel Sambuc #else
40*d90bee97SLionel Sambuc __RCSID("$NetBSD: mystring.c,v 1.17 2013/04/28 17:01:28 dholland Exp $");
41*d90bee97SLionel Sambuc #endif
42*d90bee97SLionel Sambuc #endif /* not lint */
43*d90bee97SLionel Sambuc
44*d90bee97SLionel Sambuc /*
45*d90bee97SLionel Sambuc * String functions.
46*d90bee97SLionel Sambuc *
47*d90bee97SLionel Sambuc * equal(s1, s2) Return true if strings are equal.
48*d90bee97SLionel Sambuc * scopy(from, to) Copy a string.
49*d90bee97SLionel Sambuc * scopyn(from, to, n) Like scopy, but checks for overflow.
50*d90bee97SLionel Sambuc * number(s) Convert a string of digits to an integer.
51*d90bee97SLionel Sambuc * is_number(s) Return true if s is a string of digits.
52*d90bee97SLionel Sambuc */
53*d90bee97SLionel Sambuc
54*d90bee97SLionel Sambuc #include <stdlib.h>
55*d90bee97SLionel Sambuc #include "shell.h"
56*d90bee97SLionel Sambuc #include "syntax.h"
57*d90bee97SLionel Sambuc #include "error.h"
58*d90bee97SLionel Sambuc #include "mystring.h"
59*d90bee97SLionel Sambuc
60*d90bee97SLionel Sambuc
61*d90bee97SLionel Sambuc const char nullstr[1]; /* zero length string */
62*d90bee97SLionel Sambuc
63*d90bee97SLionel Sambuc /*
64*d90bee97SLionel Sambuc * equal - #defined in mystring.h
65*d90bee97SLionel Sambuc */
66*d90bee97SLionel Sambuc
67*d90bee97SLionel Sambuc /*
68*d90bee97SLionel Sambuc * scopy - #defined in mystring.h
69*d90bee97SLionel Sambuc */
70*d90bee97SLionel Sambuc
71*d90bee97SLionel Sambuc
72*d90bee97SLionel Sambuc /*
73*d90bee97SLionel Sambuc * scopyn - copy a string from "from" to "to", truncating the string
74*d90bee97SLionel Sambuc * if necessary. "To" is always nul terminated, even if
75*d90bee97SLionel Sambuc * truncation is performed. "Size" is the size of "to".
76*d90bee97SLionel Sambuc */
77*d90bee97SLionel Sambuc
78*d90bee97SLionel Sambuc void
scopyn(const char * from,char * to,int size)79*d90bee97SLionel Sambuc scopyn(const char *from, char *to, int size)
80*d90bee97SLionel Sambuc {
81*d90bee97SLionel Sambuc
82*d90bee97SLionel Sambuc while (--size > 0) {
83*d90bee97SLionel Sambuc if ((*to++ = *from++) == '\0')
84*d90bee97SLionel Sambuc return;
85*d90bee97SLionel Sambuc }
86*d90bee97SLionel Sambuc *to = '\0';
87*d90bee97SLionel Sambuc }
88*d90bee97SLionel Sambuc
89*d90bee97SLionel Sambuc
90*d90bee97SLionel Sambuc /*
91*d90bee97SLionel Sambuc * prefix -- see if pfx is a prefix of string.
92*d90bee97SLionel Sambuc */
93*d90bee97SLionel Sambuc
94*d90bee97SLionel Sambuc int
prefix(const char * pfx,const char * string)95*d90bee97SLionel Sambuc prefix(const char *pfx, const char *string)
96*d90bee97SLionel Sambuc {
97*d90bee97SLionel Sambuc while (*pfx) {
98*d90bee97SLionel Sambuc if (*pfx++ != *string++)
99*d90bee97SLionel Sambuc return 0;
100*d90bee97SLionel Sambuc }
101*d90bee97SLionel Sambuc return 1;
102*d90bee97SLionel Sambuc }
103*d90bee97SLionel Sambuc
104*d90bee97SLionel Sambuc
105*d90bee97SLionel Sambuc /*
106*d90bee97SLionel Sambuc * Convert a string of digits to an integer, printing an error message on
107*d90bee97SLionel Sambuc * failure.
108*d90bee97SLionel Sambuc */
109*d90bee97SLionel Sambuc
110*d90bee97SLionel Sambuc int
number(const char * s)111*d90bee97SLionel Sambuc number(const char *s)
112*d90bee97SLionel Sambuc {
113*d90bee97SLionel Sambuc
114*d90bee97SLionel Sambuc if (! is_number(s))
115*d90bee97SLionel Sambuc error("Illegal number: %s", s);
116*d90bee97SLionel Sambuc return atoi(s);
117*d90bee97SLionel Sambuc }
118*d90bee97SLionel Sambuc
119*d90bee97SLionel Sambuc
120*d90bee97SLionel Sambuc
121*d90bee97SLionel Sambuc /*
122*d90bee97SLionel Sambuc * Check for a valid number. This should be elsewhere.
123*d90bee97SLionel Sambuc */
124*d90bee97SLionel Sambuc
125*d90bee97SLionel Sambuc int
is_number(const char * p)126*d90bee97SLionel Sambuc is_number(const char *p)
127*d90bee97SLionel Sambuc {
128*d90bee97SLionel Sambuc do {
129*d90bee97SLionel Sambuc if (! is_digit(*p))
130*d90bee97SLionel Sambuc return 0;
131*d90bee97SLionel Sambuc } while (*++p != '\0');
132*d90bee97SLionel Sambuc return 1;
133*d90bee97SLionel Sambuc }
134