nss-ldap overlay, built with nss-ldapd-0.6.2

[openldap] / contrib / slapd-modules / nssov / protocol.c

diff --git a/contrib/slapd-modules/nssov/protocol.c b/contrib/slapd-modules/nssov/protocol.c
new file mode 100644 (file)
index 0000000..54a176b
--- /dev/null
+++ b/contrib/slapd-modules/nssov/protocol.c
@@ -0,0 +1,153 @@
+/* protocol.c - network protocol lookup routines */
+/* $OpenLDAP$ */
+/*
+ * Copyright 2008 by Howard Chu, Symas Corp.
+ * 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 the file LICENSE in the
+ * top-level directory of the distribution or, alternatively, at
+ * <http://www.OpenLDAP.org/license.html>.
+ */
+/*
+ * This code references portions of the nss-ldapd package
+ * written by Arthur de Jong. The nss-ldapd code was forked
+ * from the nss-ldap library written by Luke Howard.
+ */
+
+#include "nssov.h"
+
+/* ( nisSchema.2.4 NAME 'ipProtocol' SUP top STRUCTURAL
+ *   DESC 'Abstraction of an IP protocol. Maps a protocol number
+ *         to one or more names. The distinguished value of the cn
+ *         attribute denotes the protocol's canonical name'
+ *   MUST ( cn $ ipProtocolNumber )
+ *    MAY description )
+ */
+
+/* the basic search filter for searches */
+static struct berval protocol_filter = BER_BVC("(objectClass=ipProtocol)");
+
+/* the attributes used in searches */
+static struct berval protocol_keys[] = {
+       BER_BVC("cn"),
+       BER_BVC("ipProtocolNumber"),
+       BER_BVNULL
+};
+
+NSSOV_INIT(protocol)
+
+NSSOV_CBPRIV(protocol,
+       char buf[256];
+       struct berval name;
+       struct berval numb;);
+
+static int write_protocol(nssov_protocol_cbp *cbp,Entry *entry)
+{
+       int32_t tmpint32,tmp2int32,tmp3int32;
+       int i,numname,dupname,proto;
+       struct berval name,*names;
+       Attribute *a;
+       char *tmp;
+
+       /* get the most canonical name */
+       nssov_find_rdnval( &entry->e_nname, cbp->mi->mi_attrs[0].an_desc, &name );
+       /* get the other names for the protocol */
+       a = attr_find( entry->e_attrs, cbp->mi->mi_attrs[0].an_desc );
+       if ( !a || !a->a_vals )
+       {
+               Debug(LDAP_DEBUG_ANY,"protocol entry %s does not contain %s value",
+                       entry->e_name.bv_val, cbp->mi->mi_attrs[0].an_desc->ad_cname.bv_val, 0 );
+               return 0;
+       }
+       names = a->a_vals;
+       numname = a->a_numvals;
+       /* if the name is not yet found, get the first entry from names */
+       if (BER_BVISNULL(&name)) {
+               name=names[0];
+               dupname = 0;
+       } else {
+               dupname = -1;
+               for (i=0; i<numname; i++) {
+                       if ( ber_bvmatch(&name, &a->a_nvals[i])) {
+                               dupname = i;
+                               break;
+                       }
+               }
+       }
+       /* get the protocol number */
+       a = attr_find( entry->e_attrs, cbp->mi->mi_attrs[1].an_desc );
+       if ( !a || !a->a_vals )
+       {
+               Debug(LDAP_DEBUG_ANY,"protocol entry %s does not contain %s value",
+                       entry->e_name.bv_val, cbp->mi->mi_attrs[1].an_desc->ad_cname.bv_val, 0 );
+               return 0;
+       } else if ( a->a_numvals > 1 ) {
+               Debug(LDAP_DEBUG_ANY,"protocol entry %s contains multiple %s values",
+                       entry->e_name.bv_val, cbp->mi->mi_attrs[1].an_desc->ad_cname.bv_val, 0 );
+       }
+       proto=(int)strtol(a->a_vals[0].bv_val,&tmp,0);
+       if (*tmp)
+       {
+               Debug(LDAP_DEBUG_ANY,"protocol entry %s contains non-numeric %s value",
+                       entry->e_name.bv_val, cbp->mi->mi_attrs[1].an_desc->ad_cname.bv_val, 0 );
+               return 0;
+       }
+       /* write the entry */
+       WRITE_INT32(cbp->fp,NSLCD_RESULT_SUCCESS);
+       WRITE_BERVAL(cbp->fp,&name);
+       if ( dupname >= 0 ) {
+               WRITE_INT32(cbp->fp,numname-1);
+       } else {
+               WRITE_INT32(cbp->fp,numname);
+       }
+       for (i=0;i<numname;i++) {
+               if (i == dupname) continue;
+               WRITE_BERVAL(cbp->fp,&names[i]);
+       }
+       WRITE_INT32(cbp->fp,proto);
+       return 0;
+}
+
+NSSOV_CB(protocol)
+
+NSSOV_HANDLE(
+       protocol,byname,
+       char fbuf[1024];
+       struct berval filter = {sizeof(fbuf)};
+       filter.bv_val = fbuf;
+       BER_BVZERO(&cbp.numb);
+       READ_STRING_BUF2(fp,cbp.buf,sizeof(cbp.buf));
+       cbp.name.bv_len = tmpint32;
+       cbp.name.bv_val = cbp.buf;,
+       Debug(LDAP_DEBUG_TRACE,"nssov_protocol_byname(%s)",cbp.name.bv_val,0,0);,
+       NSLCD_ACTION_PROTOCOL_BYNAME,
+       nssov_filter_byname(cbp.mi,0,&cbp.name,&filter)
+)
+
+NSSOV_HANDLE(
+       protocol,bynumber,
+       int protocol;
+       char fbuf[1024];
+       struct berval filter = {sizeof(fbuf)};
+       filter.bv_val = fbuf;
+       READ_INT32(fp,protocol);
+       cbp.numb.bv_val = cbp.buf;
+       cbp.numb.bv_len = snprintf(cbp.buf,sizeof(cbp.buf),"%d",protocol);
+       BER_BVZERO(&cbp.name);,
+       Debug(LDAP_DEBUG_TRACE,"nssov_protocol_bynumber(%s)",cbp.numb.bv_val,0,0);,
+       NSLCD_ACTION_PROTOCOL_BYNUMBER,
+       nssov_filter_byid(cbp.mi,1,&cbp.numb,&filter)
+)
+
+NSSOV_HANDLE(
+       protocol,all,
+       struct berval filter;
+       /* no parameters to read */,
+       Debug(LDAP_DEBUG_TRACE,"nssov_protocol_all()",0,0,0);,
+       NSLCD_ACTION_PROTOCOL_ALL,
+       (filter=cbp.mi->mi_filter,0)
+)