1 /* $NetBSD: compare.c,v 1.1.1.6 2018/02/06 01:53:17 christos Exp $ */ 2 3 /* compare.c - sock backend compare function */ 4 /* $OpenLDAP$ */ 5 /* This work is part of OpenLDAP Software <http://www.openldap.org/>. 6 * 7 * Copyright 1998-2017 The OpenLDAP Foundation. 8 * All rights reserved. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted only as authorized by the OpenLDAP 12 * Public License. 13 * 14 * A copy of this license is available in the file LICENSE in the 15 * top-level directory of the distribution or, alternatively, at 16 * <http://www.OpenLDAP.org/license.html>. 17 */ 18 /* ACKNOWLEDGEMENTS: 19 * This work was initially developed by Brian Candler for inclusion 20 * in OpenLDAP Software. 21 */ 22 23 #include <sys/cdefs.h> 24 __RCSID("$NetBSD: compare.c,v 1.1.1.6 2018/02/06 01:53:17 christos Exp $"); 25 26 #include "portable.h" 27 28 #include <stdio.h> 29 30 #include <ac/string.h> 31 #include <ac/socket.h> 32 33 #include "slap.h" 34 #include "back-sock.h" 35 #include "ldif.h" 36 37 int 38 sock_back_compare( 39 Operation *op, 40 SlapReply *rs ) 41 { 42 struct sockinfo *si = (struct sockinfo *) op->o_bd->be_private; 43 AttributeDescription *entry = slap_schema.si_ad_entry; 44 Entry e; 45 FILE *fp; 46 char *text; 47 48 e.e_id = NOID; 49 e.e_name = op->o_req_dn; 50 e.e_nname = op->o_req_ndn; 51 e.e_attrs = NULL; 52 e.e_ocflags = 0; 53 e.e_bv.bv_len = 0; 54 e.e_bv.bv_val = NULL; 55 e.e_private = NULL; 56 57 if ( ! access_allowed( op, &e, 58 entry, NULL, ACL_COMPARE, NULL ) ) 59 { 60 send_ldap_error( op, rs, LDAP_INSUFFICIENT_ACCESS, NULL ); 61 return -1; 62 } 63 64 if ( (fp = opensock( si->si_sockpath )) == NULL ) { 65 send_ldap_error( op, rs, LDAP_OTHER, 66 "could not open socket" ); 67 return( -1 ); 68 } 69 70 /* write out the request to the compare process */ 71 fprintf( fp, "COMPARE\n" ); 72 fprintf( fp, "msgid: %ld\n", (long) op->o_msgid ); 73 sock_print_conn( fp, op->o_conn, si ); 74 sock_print_suffixes( fp, op->o_bd ); 75 fprintf( fp, "dn: %s\n", op->o_req_dn.bv_val ); 76 /* could be binary */ 77 text = ldif_put_wrap( LDIF_PUT_VALUE, 78 op->orc_ava->aa_desc->ad_cname.bv_val, 79 op->orc_ava->aa_value.bv_val, 80 op->orc_ava->aa_value.bv_len, LDIF_LINE_WIDTH_MAX ); 81 if ( text ) { 82 fprintf( fp, "%s\n", text ); 83 ber_memfree( text ); 84 } else { 85 fprintf( fp, "\n\n" ); 86 } 87 88 /* read in the result and send it along */ 89 sock_read_and_send_results( op, rs, fp ); 90 91 fclose( fp ); 92 return( 0 ); 93 } 94