]> git.sur5r.net Git - openldap/blob - servers/slapd/schema.c
0d4b99af688e52efeee4409757992c6cca143469
[openldap] / servers / slapd / schema.c
1 /* schema.c - routines to manage schema definitions */
2 /* $OpenLDAP$ */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4  *
5  * Copyright 1998-2004 The OpenLDAP Foundation.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted only as authorized by the OpenLDAP
10  * Public License.
11  *
12  * A copy of this license is available in the file LICENSE in the
13  * top-level directory of the distribution or, alternatively, at
14  * <http://www.OpenLDAP.org/license.html>.
15  */
16
17 #include "portable.h"
18
19 #include <stdio.h>
20
21 #include <ac/ctype.h>
22 #include <ac/string.h>
23 #include <ac/socket.h>
24
25 #include "slap.h"
26 #include "ldap_pvt.h"
27 #include "lutil.h"
28
29
30 int
31 schema_info( Entry **entry, const char **text )
32 {
33         AttributeDescription *ad_structuralObjectClass
34                 = slap_schema.si_ad_structuralObjectClass;
35         AttributeDescription *ad_objectClass
36                 = slap_schema.si_ad_objectClass;
37         AttributeDescription *ad_createTimestamp
38                 = slap_schema.si_ad_createTimestamp;
39         AttributeDescription *ad_modifyTimestamp
40                 = slap_schema.si_ad_modifyTimestamp;
41
42         Entry           *e;
43         struct berval   vals[5];
44         struct berval   nvals[5];
45
46         e = (Entry *) SLAP_CALLOC( 1, sizeof(Entry) );
47         if( e == NULL ) {
48                 /* Out of memory, do something about it */
49 #ifdef NEW_LOGGING
50                 LDAP_LOG( OPERATION, ERR, 
51                         "schema_info: SLAP_CALLOC failed - out of memory.\n", 0, 0,0 );
52 #else
53                 Debug( LDAP_DEBUG_ANY, 
54                         "schema_info: SLAP_CALLOC failed - out of memory.\n", 0, 0, 0 );
55 #endif
56                 *text = "out of memory";
57                 return LDAP_OTHER;
58         }
59
60         e->e_attrs = NULL;
61         /* backend-specific schema info should be created by the
62          * backend itself
63          */
64         ber_dupbv( &e->e_name, &frontendDB->be_schemadn );
65         ber_dupbv( &e->e_nname, &frontendDB->be_schemandn );
66         e->e_private = NULL;
67
68         BER_BVSTR( &vals[0], "subentry" );
69         if( attr_merge_one( e, ad_structuralObjectClass, vals, NULL ) ) {
70                 /* Out of memory, do something about it */
71                 entry_free( e );
72                 *text = "out of memory";
73                 return LDAP_OTHER;
74         }
75
76         BER_BVSTR( &vals[0], "top" );
77         BER_BVSTR( &vals[1], "subentry" );
78         BER_BVSTR( &vals[2], "subschema" );
79         BER_BVSTR( &vals[3], "extensibleObject" );
80         BER_BVZERO( &vals[4] );
81         if ( attr_merge( e, ad_objectClass, vals, NULL ) ) {
82                 /* Out of memory, do something about it */
83                 entry_free( e );
84                 *text = "out of memory";
85                 return LDAP_OTHER;
86         }
87
88         {
89                 int rc;
90                 AttributeDescription *desc = NULL;
91                 struct berval rdn = frontendDB->be_schemadn;
92                 vals[0].bv_val = strchr( rdn.bv_val, '=' );
93
94                 if( vals[0].bv_val == NULL ) {
95                         *text = "improperly configured subschema subentry";
96                         return LDAP_OTHER;
97                 }
98
99                 vals[0].bv_val++;
100                 vals[0].bv_len = rdn.bv_len - (vals[0].bv_val - rdn.bv_val);
101                 rdn.bv_len -= vals[0].bv_len + 1;
102
103                 rc = slap_bv2ad( &rdn, &desc, text );
104
105                 if( rc != LDAP_SUCCESS ) {
106                         entry_free( e );
107                         *text = "improperly configured subschema subentry";
108                         return LDAP_OTHER;
109                 }
110
111                 nvals[0].bv_val = strchr( frontendDB->be_schemandn.bv_val, '=' );
112                 assert( nvals[0].bv_val );
113                 nvals[0].bv_val++;
114                 nvals[0].bv_len = frontendDB->be_schemandn.bv_len -
115                         (nvals[0].bv_val - frontendDB->be_schemandn.bv_val);
116
117                 if ( attr_merge_one( e, desc, vals, nvals ) ) {
118                         /* Out of memory, do something about it */
119                         entry_free( e );
120                         *text = "out of memory";
121                         return LDAP_OTHER;
122                 }
123         }
124
125         {
126                 struct          tm *ltm;
127 #ifdef HAVE_GMTIME_R
128                 struct          tm ltm_buf;
129 #endif
130                 char            timebuf[ LDAP_LUTIL_GENTIME_BUFSIZE ];
131
132                 /*
133                  * According to RFC 2251:
134
135    Servers SHOULD provide the attributes createTimestamp and
136    modifyTimestamp in subschema entries, in order to allow clients to
137    maintain their caches of schema information.
138
139                  * to be conservative, we declare schema created 
140                  * AND modified at server startup time ...
141                  */
142
143 #ifdef HAVE_GMTIME_R
144                 ltm = gmtime_r( &starttime, &ltm_buf );
145 #else
146                 ldap_pvt_thread_mutex_lock( &gmtime_mutex );
147                 ltm = gmtime( &starttime );
148 #endif /* HAVE_GMTIME_R */
149                 lutil_gentime( timebuf, sizeof(timebuf), ltm );
150 #ifndef HAVE_GMTIME_R
151                 ldap_pvt_thread_mutex_unlock( &gmtime_mutex );
152 #endif
153
154                 vals[0].bv_val = timebuf;
155                 vals[0].bv_len = strlen( timebuf );
156
157                 if( attr_merge_one( e, ad_createTimestamp, vals, NULL ) ) {
158                         /* Out of memory, do something about it */
159                         entry_free( e );
160                         *text = "out of memory";
161                         return LDAP_OTHER;
162                 }
163                 if( attr_merge_one( e, ad_modifyTimestamp, vals, NULL ) ) {
164                         /* Out of memory, do something about it */
165                         entry_free( e );
166                         *text = "out of memory";
167                         return LDAP_OTHER;
168                 }
169         }
170
171         if ( syn_schema_info( e ) 
172                 || mr_schema_info( e )
173                 || mru_schema_info( e )
174                 || at_schema_info( e )
175                 || oc_schema_info( e )
176                 || cr_schema_info( e ) )
177         {
178                 /* Out of memory, do something about it */
179                 entry_free( e );
180                 *text = "out of memory";
181                 return LDAP_OTHER;
182         }
183         
184         *entry = e;
185         return LDAP_SUCCESS;
186 }