git.sur5r.net Git - openldap/blob - servers/slapd/back-shell/bind.c

   1 /* bind.c - shell backend bind function */
   2 /* $OpenLDAP$ */
   3 /*
   4  * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
   5  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   6  */
   7
   8 #include "portable.h"
   9
  10 #include <stdio.h>
  11
  12 #include <ac/socket.h>
  13 #include <ac/string.h>
  14
  15 #include "slap.h"
  16 #include "shell.h"
  17
  18 int
  19 shell_back_bind(
  20     Backend             *be,
  21     Connection          *conn,
  22     Operation           *op,
  23     struct berval       *dn,
  24     struct berval       *ndn,
  25     int                 method,
  26     struct berval       *cred,
  27     struct berval       *edn
  28 )
  29 {
  30         struct shellinfo        *si = (struct shellinfo *) be->be_private;
  31         AttributeDescription *entry = slap_schema.si_ad_entry;
  32         Entry e;
  33         FILE                    *rfp, *wfp;
  34         int                     rc;
  35
  36         if ( si->si_bind == NULL ) {
  37                 send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM, NULL,
  38                     "bind not implemented", NULL, NULL );
  39                 return( -1 );
  40         }
  41
  42         e.e_id = NOID;
  43         e.e_name = *dn;
  44         e.e_nname = *ndn;
  45         e.e_attrs = NULL;
  46         e.e_ocflags = 0;
  47         e.e_bv.bv_len = 0;
  48         e.e_bv.bv_val = NULL;
  49         e.e_private = NULL;
  50
  51         if ( ! access_allowed( be, conn, op, &e,
  52                 entry, NULL, ACL_AUTH, NULL ) )
  53         {
  54                 send_ldap_result( conn, op, LDAP_INSUFFICIENT_ACCESS,
  55                         NULL, NULL, NULL, NULL );
  56                 return -1;
  57         }
  58
  59         if ( (op->o_private = (void *) forkandexec( si->si_bind, &rfp, &wfp ))
  60             == (void *) -1 ) {
  61                 send_ldap_result( conn, op, LDAP_OTHER, NULL,
  62                     "could not fork/exec", NULL, NULL );
  63                 return( -1 );
  64         }
  65
  66         /* write out the request to the bind process */
  67         fprintf( wfp, "BIND\n" );
  68         fprintf( wfp, "msgid: %ld\n", (long) op->o_msgid );
  69         print_suffixes( wfp, be );
  70         fprintf( wfp, "dn: %s\n", dn->bv_val );
  71         fprintf( wfp, "method: %d\n", method );
  72         fprintf( wfp, "credlen: %lu\n", cred->bv_len );
  73         fprintf( wfp, "cred: %s\n", cred->bv_val ); /* XXX */
  74         fclose( wfp );
  75
  76         /* read in the results and send them along */
  77         rc = read_and_send_results( be, conn, op, rfp, NULL, 0 );
  78         fclose( rfp );
  79
  80         return( rc );
  81 }