summaryrefslogtreecommitdiffstats
path: root/libraries/liblunicode/ure/urestubs.c
blob: c0ca30dd3a82c3fa301a25530e7f8e8b95936d41 (plain)
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
125
126
127
/* $OpenLDAP$ */
/* This work is part of OpenLDAP Software <http://www.openldap.org/>.
 *
 * Copyright 1998-2022 The OpenLDAP Foundation.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted only as authorized by the OpenLDAP
 * Public License.
 *
 * A copy of this license is available in file LICENSE in the
 * top-level directory of the distribution or, alternatively, at
 * <http://www.OpenLDAP.org/license.html>.
 */
/*
 * Copyright 1997, 1998, 1999 Computing Research Labs,
 * New Mexico State University
 *
 * Permission is hereby granted, free of charge, to any person obtaining a
 * copy of this software and associated documentation files (the "Software"),
 * to deal in the Software without restriction, including without limitation
 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
 * and/or sell copies of the Software, and to permit persons to whom the
 * Software is furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
 * THE COMPUTING RESEARCH LAB OR NEW MEXICO STATE UNIVERSITY BE LIABLE FOR ANY
 * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT
 * OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR
 * THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 */
/* $Id: urestubs.c,v 1.2 1999/09/21 15:47:44 mleisher Exp $" */

#include "portable.h"
#include <ac/bytes.h>

#include "ure.h"

#ifdef _MSC_VER
#  include "../ucdata/ucdata.h"
#else
#  include "ucdata.h"
#endif

/*
 * This file contains stub routines needed by the URE package to test
 * character properties and other Unicode implementation specific details.
 */

/*
 * This routine should return the lower case equivalent for the character or,
 * if there is no lower case quivalent, the character itself.
 */
ucs4_t _ure_tolower(ucs4_t c)
{
    return uctoupper(c);
}

static struct ucmaskmap {
	unsigned long mask1;
	unsigned long mask2;
} masks[32] = {
	{ UC_MN, 0 },	/* _URE_NONSPACING */
	{ UC_MC, 0 },	/* _URE_COMBINING */
	{ UC_ND, 0 },	/* _URE_NUMDIGIT */
	{ UC_NL|UC_NO, 0 },	/* _URE_NUMOTHER */
	{ UC_ZS, 0 },	/* _URE_SPACESEP */
	{ UC_ZL, 0 },	/* _URE_LINESEP */
	{ UC_ZP, 0 },	/* _URE_PARASEP */
	{ UC_CC, 0 },	/* _URE_CNTRL */
	{ UC_CO, 0 },	/* _URE_PUA */

	{ UC_LU, 0 },	/* _URE_UPPER */
	{ UC_LL, 0 },	/* _URE_LOWER */
	{ UC_LT, 0 },	/* _URE_TITLE */
	{ UC_LM, 0 },	/* _URE_MODIFIER */
	{ UC_LO, 0 },	/* _URE_OTHERLETTER */
	{ UC_PD, 0 },	/* _URE_DASHPUNCT */
	{ UC_PS, 0 },	/* _URE_OPENPUNCT */
	{ UC_PC, 0 },	/* _URE_CLOSEPUNCT */
	{ UC_PO, 0 },	/* _URE_OTHERPUNCT */
	{ UC_SM, 0 },	/* _URE_MATHSYM */
	{ UC_SC, 0 },	/* _URE_CURRENCYSYM */
	{ UC_SO, 0 },	/* _URE_OTHERSYM */

	{ UC_L, 0 },	/* _URE_LTR */
	{ UC_R, 0 },	/* _URE_RTL */

	{ 0, UC_EN },	/* _URE_EURONUM */
	{ 0, UC_ES },	/* _URE_EURONUMSEP */
	{ 0, UC_ET },	/* _URE_EURONUMTERM */
	{ 0, UC_AN },	/* _URE_ARABNUM */
	{ 0, UC_CS },	/* _URE_COMMONSEP */

	{ 0, UC_B },	/* _URE_BLOCKSEP */
	{ 0, UC_S },	/* _URE_SEGMENTSEP */

	{ 0, UC_WS },	/* _URE_WHITESPACE */
	{ 0, UC_ON }	/* _URE_OTHERNEUT */
};


/*
 * This routine takes a set of URE character property flags (see ure.h) along
 * with a character and tests to see if the character has one or more of those
 * properties.
 */
int
_ure_matches_properties(unsigned long props, ucs4_t c)
{
	int i;
	unsigned long mask1=0, mask2=0;

	for( i=0; i<32; i++ ) {
		if( props & (1 << i) ) {
			mask1 |= masks[i].mask1;
			mask2 |= masks[i].mask2;
		}
	}

	return ucisprop( c, mask1, mask2 );
}