[go: up one dir, main page]

File: space.c

package info (click to toggle)
libforms1 1.0-8
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 6,648 kB
  • ctags: 14,351
  • sloc: ansic: 90,441; makefile: 9,902; sh: 8
file content (124 lines) | stat: -rw-r--r-- 2,837 bytes parent folder | download | duplicates (3)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
/*
 *
 *  This file is part of the XForms library package.
 *
 * XForms is free software; you can redistribute it and/or modify it
 * under the terms of the GNU Lesser General Public License as
 * published by the Free Software Foundation; either version 2.1, or
 * (at your option) any later version.
 *
 * XForms is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with XForms; see the file COPYING.  If not, write to
 * the Free Software Foundation, 59 Temple Place - Suite 330, Boston,
 * MA 02111-1307, USA.
 *
 */


/*
 * $Id: space.c,v 0.80 1994/02/24 09:48:11 zhao Exp $
 *
 *.  Copyright(c) 1993,1994 by T.C. Zhao
 *   All rights reserved.
 *.
 *
 *
 *  Remove unescaped leadingi/trailing spaces from a string.
 *
 ***********************************************************************/
#if !defined(lint) && defined(F_OK)
static char *id_space = "$Id: space.c,v 0.80 1994/02/24 09:48:11 zhao Exp $";
#endif

#include <stdio.h>
#include <string.h>
#include <ctype.h>

#include "forms.h"
#include "ulib.h"

static int es = '\\';     /* escape character */

/** Remove leading space */
char *
fl_de_space(char *s)
{
    register char *p;
    /* not all isspace considers '\t' a white space */
    for (p = s ; p && (isspace( ( int ) *p) || *p=='\t'); p++)
       ;
    return (p == s) ? s : strcpy(s, p);
}

/* remove trailing space */
char *
fl_space_de(register char *s)
{
    register char *p, *q;

    if (!s || !*s)
	return s;

    q = p = s + strlen(s) - 1;
    /* maybe replace \ with space ? */
    for ( q--; p >= s && isspace( ( int ) *p) && (q < s || *q != es);p--,q--)
        ;
    *++p = '\0';
    return s;
}

/***** remove space from both ends *******/
char *
fl_de_space_de(char *p)
{
    return (fl_space_de(fl_de_space(p)));
}

/* remove all spaces from string */
char *
fl_nuke_all_spaces(char *s)
{
    char *p = s, *q = s + strlen(s), *b;
    char buf[1024];

    for  (b = buf ; p < q; p++)
        if(!isspace( ( int ) *p))
           *b++ = *p;
    *b = '\0';
    return strcpy(s, buf);
}

/* remove non-alphanumericals from string */
char *
fl_nuke_all_non_alnum(char *s)
{
    char *p = s, *q = s + strlen(s), *b;
    char buf[1024];
    for  (b = buf ; p < q; p++)
        if(isalnum( ( int ) *p))
           *b++ = *p;
    *b = '\0';
    return strcpy(s, buf);
}


#ifdef TEST
main()
{
    char buf[100], *p;

    while (fgets(buf, 100, stdin))
      {
	  buf[99] = '\0';
	  if((p = strchr(buf,'\n')))
	    *p = '\0';
	  fprintf(stderr, "^%s$\n",buf);
	  fprintf(stderr, "^%s$\n",de_space_de(buf));
      }
}
#endif /* TEST */