File: mapcase.c

package info (click to toggle)
grass 6.4.4-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 104,028 kB
  • ctags: 40,409
  • sloc: ansic: 419,980; python: 63,559; tcl: 46,692; cpp: 29,791; sh: 18,564; makefile: 7,000; xml: 3,505; yacc: 561; perl: 559; lex: 480; sed: 70; objc: 7
file content (60 lines) | stat: -rw-r--r-- 903 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
#include <grass/gis.h>
/*
 * Map uppercase A-Z to lower case a-z
 *
 */


/*!
 * \brief convert string to lower case
 *
 * Upper case
 * letters in the string <b>s</b> are converted to their lower case equivalent.
 * Returns <b>s.</b>
 *
 *  \param s
 *  \return char * 
 */

char *G_tolcase(char *string)
{
    char *p;

    for (p = string; *p; p++) {
	/* convert to lower case */
	if (*p >= 'A' && *p <= 'Z')
	    *p -= 'A' - 'a';
    }

    return (string);
}


/*
 * Map lowercase a-z to uppercase A-Z
 *
 */


/*!
 * \brief convert string to upper case
 *
 * Lower case letters in the string <b>s</b> are converted to their upper case equivalent.
 * Returns <b>s.</b>
 *
 *  \param s
 *  \return char * 
 */

char *G_toucase(char *string)
{
    char *p;

    for (p = string; *p; p++) {
	/* convert to upper case */
	if (*p >= 'A' && *p <= 'z')
	    *p += 'A' - 'a';
    }

    return (string);
}