r13324: From now on check attribute names obey rfc2251
[samba.git] / source / lib / ldb / common / ldb_utf8.c
1 /* 
2    ldb database library
3
4    Copyright (C) Andrew Tridgell  2004
5
6      ** NOTE! The following LGPL license applies to the ldb
7      ** library. This does NOT imply that all of Samba is released
8      ** under the LGPL
9    
10    This library is free software; you can redistribute it and/or
11    modify it under the terms of the GNU Lesser General Public
12    License as published by the Free Software Foundation; either
13    version 2 of the License, or (at your option) any later version.
14
15    This library is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18    Lesser General Public License for more details.
19
20    You should have received a copy of the GNU Lesser General Public
21    License along with this library; if not, write to the Free Software
22    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
23 */
24
25 /*
26  *  Name: ldb
27  *
28  *  Component: ldb utf8 handling
29  *
30  *  Description: case folding and case comparison for UTF8 strings
31  *
32  *  Author: Andrew Tridgell
33  */
34
35 #include "includes.h"
36 #include "ldb/include/includes.h"
37
38
39 /*
40   this allow the user to pass in a caseless comparison
41   function to handle utf8 caseless comparisons
42  */
43 void ldb_set_utf8_fns(struct ldb_context *ldb,
44                         void *context,
45                         int (*cmp)(void *, const char *, const char *),
46                         char *(*casefold)(void *, void *, const char *))
47 {
48         if (context)
49                 ldb->utf8_fns.context = context;
50         if (cmp)
51                 ldb->utf8_fns.caseless_cmp = cmp;
52         if (casefold)
53                 ldb->utf8_fns.casefold = casefold;
54 }
55
56 /*
57   a simple case folding function
58   NOTE: does not handle UTF8
59 */
60 char *ldb_casefold_default(void *context, void *mem_ctx, const char *s)
61 {
62         int i;
63         char *ret = talloc_strdup(mem_ctx, s);
64         if (!s) {
65                 errno = ENOMEM;
66                 return NULL;
67         }
68         for (i=0;ret[i];i++) {
69                 ret[i] = toupper((unsigned char)ret[i]);
70         }
71         return ret;
72 }
73
74 /*
75   a caseless compare, optimised for 7 bit
76   NOTE: doesn't handle UTF8
77 */
78
79 int ldb_caseless_cmp_default(void *context, const char *s1, const char *s2)
80 {
81         return strcasecmp(s1,s2);
82 }
83
84 void ldb_set_utf8_default(struct ldb_context *ldb)
85 {
86         ldb_set_utf8_fns(ldb, NULL, ldb_caseless_cmp_default, ldb_casefold_default);
87 }
88
89 char *ldb_casefold(struct ldb_context *ldb, void *mem_ctx, const char *s)
90 {
91         return ldb->utf8_fns.casefold(ldb->utf8_fns.context, mem_ctx, s);
92 }
93
94 int ldb_caseless_cmp(struct ldb_context *ldb, const char *s1, const char *s2)
95 {
96         return ldb->utf8_fns.caseless_cmp(ldb->utf8_fns.context, s1, s2);
97 }
98
99 /*
100   check the attribute name is valid according to rfc2251
101   returns 1 if the name is ok
102  */
103
104 int ldb_valid_attr_name(const char *s)
105 {
106         int i;
107
108         if (!s || !s[0])
109                 return 0;
110
111         /* handle special ldb_tdb wildcard */
112         if (strcmp(s, "*") == 0) return 1;
113
114         for (i = 0; s[i]; i++) {
115                 if (! isascii(s[i])) {
116                         return 0;
117                 }
118                 if (i == 0) { /* first char must be an alpha (or our special '@' identifier) */
119                         if (! (isalpha(s[i]) || (s[i] == '@'))) {
120                                 return 0;
121                         }
122                 } else {
123                         if (! (isalnum(s[i]) || (s[i] == '-'))) {
124                                 return 0;
125                         }
126                 }
127         }
128         return 1;
129 }
130
131 /*
132   compare two attribute names
133   attribute names are restricted by rfc2251 so using strcasecmp here is ok.
134   return 0 for match
135 */
136 int ldb_attr_cmp(const char *attr1, const char *attr2)
137 {
138         return strcasecmp(attr1, attr2);
139 }
140
141 /*
142   we accept either 'dn' or 'distinguishedName' for a distinguishedName
143 */
144 int ldb_attr_dn(const char *attr)
145 {
146         if (ldb_attr_cmp(attr, "dn") == 0 ||
147             ldb_attr_cmp(attr, "distinguishedName") == 0) {
148                 return 0;
149         }
150         return -1;
151 }