1 /* oidm.c - object identifier macro routines */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
5 * Copyright 1998-2005 The OpenLDAP Foundation.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted only as authorized by the OpenLDAP
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>.
22 #include <ac/string.h>
23 #include <ac/socket.h>
28 static LDAP_SLIST_HEAD(OidMacroList, slap_oid_macro) om_list
29 = LDAP_SLIST_HEAD_INITIALIZER(om_list);
31 /* Replace an OID Macro invocation with its full numeric OID.
32 * If the macro is used with "macroname:suffix" append ".suffix"
40 /* OID macros must start alpha */
41 if ( OID_LEADCHAR( *oid ) ) {
45 LDAP_SLIST_FOREACH( om, &om_list, som_next ) {
46 BerVarray names = om->som_names;
52 for( ; !BER_BVISNULL( names ) ; names++ ) {
53 int pos = dscompare(names->bv_val, oid, ':');
56 int suflen = strlen(oid + pos);
57 char *tmp = SLAP_MALLOC( om->som_oid.bv_len
60 Debug( LDAP_DEBUG_ANY,
61 "oidm_find: SLAP_MALLOC failed", 0, 0, 0 );
64 strcpy(tmp, om->som_oid.bv_val);
66 suflen = om->som_oid.bv_len;
68 strcpy(tmp+suflen, oid+pos+1);
81 while( !LDAP_SLIST_EMPTY( &om_list )) {
82 om = LDAP_SLIST_FIRST( &om_list );
83 LDAP_SLIST_REMOVE_HEAD( &om_list, som_next );
85 ber_bvarray_free(om->som_names);
86 ber_bvarray_free(om->som_subs);
87 free(om->som_oid.bv_val);
105 fprintf( stderr, "%s: line %d: too many arguments\n",
107 usage: fprintf( stderr, "\tObjectIdentifier <name> <oid>\n");
111 oid = oidm_find( argv[1] );
115 "ObjectIdentifier \"%s\" previously defined \"%s\"",
116 fname, lineno, argv[1], oid );
120 om = (OidMacro *) SLAP_MALLOC( sizeof(OidMacro) );
122 Debug( LDAP_DEBUG_ANY, "parse_oidm: SLAP_MALLOC failed", 0, 0, 0 );
126 LDAP_SLIST_NEXT( om, som_next ) = NULL;
127 om->som_names = NULL;
129 ber_str2bv( argv[1], 0, 1, &bv );
130 ber_bvarray_add( &om->som_names, &bv );
131 ber_str2bv( argv[2], 0, 1, &bv );
132 ber_bvarray_add( &om->som_subs, &bv );
133 om->som_oid.bv_val = oidm_find( argv[2] );
135 if (!om->som_oid.bv_val) {
136 fprintf( stderr, "%s: line %d: OID %s not recognized\n",
137 fname, lineno, argv[2] );
141 if (om->som_oid.bv_val == argv[2]) {
142 om->som_oid.bv_val = ch_strdup( argv[2] );
145 om->som_oid.bv_len = strlen( om->som_oid.bv_val );
147 LDAP_SLIST_INSERT_HEAD( &om_list, om, som_next );
151 void oidm_unparse( BerVarray *res )
155 struct berval bv, *bva = NULL, idx;
158 /* count the result size */
160 LDAP_SLIST_FOREACH( om, &om_list, som_next ) {
161 for ( j=0; !BER_BVISNULL(&om->som_names[j]); j++ );
165 bva = ch_malloc( (num+1) * sizeof(struct berval) );
166 BER_BVZERO( bva+num );
168 LDAP_SLIST_FOREACH( om, &om_list, som_next ) {
169 for ( j=0; !BER_BVISNULL(&om->som_names[j]); j++ );
170 for ( i=num-j, j=0; i<num; i++,j++ ) {
171 idx.bv_len = sprintf(idx.bv_val, "{%d}", i );
172 bva[i].bv_len = idx.bv_len + om->som_names[j].bv_len +
173 om->som_subs[j].bv_len + 1;
174 bva[i].bv_val = ch_malloc( bva[i].bv_len + 1 );
175 ptr = lutil_strcopy( bva[i].bv_val, ibuf );
176 ptr = lutil_strcopy( ptr, om->som_names[j].bv_val );
178 ptr = lutil_strcopy( ptr, om->som_subs[j].bv_val );