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

   1 /* modify.c - shell backend modify function */
   2 /* $OpenLDAP$ */
   3
   4 #include "portable.h"
   5
   6 #include <stdio.h>
   7
   8 #include <ac/string.h>
   9 #include <ac/socket.h>
  10
  11 #include "slap.h"
  12 #include "shell.h"
  13
  14 int
  15 shell_back_modify(
  16     Backend     *be,
  17     Connection  *conn,
  18     Operation   *op,
  19     char        *dn,
  20     char        *ndn,
  21     LDAPModList *ml
  22 )
  23 {
  24         struct shellinfo        *si = (struct shellinfo *) be->be_private;
  25         FILE                    *rfp, *wfp;
  26         int                     i;
  27
  28         if ( si->si_modify == NULL ) {
  29                 send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM, NULL,
  30                     "modify not implemented", NULL, NULL );
  31                 return( -1 );
  32         }
  33
  34         if ( (op->o_private = (void *) forkandexec( si->si_modify, &rfp, &wfp ))
  35             == (void *) -1 ) {
  36                 send_ldap_result( conn, op, LDAP_OPERATIONS_ERROR, NULL,
  37                     "could not fork/exec", NULL, NULL );
  38                 return( -1 );
  39         }
  40
  41         /* write out the request to the modify process */
  42         fprintf( wfp, "MODIFY\n" );
  43         fprintf( wfp, "msgid: %ld\n", (long) op->o_msgid );
  44         print_suffixes( wfp, be );
  45         fprintf( wfp, "dn: %s\n", dn );
  46         for ( ; ml != NULL; ml = ml->ml_next ) {
  47                 switch ( ml->ml_op & ~LDAP_MOD_BVALUES ) {
  48                 case LDAP_MOD_ADD:
  49                         fprintf( wfp, "add: %s\n", ml->ml_type );
  50                         break;
  51
  52                 case LDAP_MOD_DELETE:
  53                         fprintf( wfp, "delete: %s\n", ml->ml_type );
  54                         break;
  55
  56                 case LDAP_MOD_REPLACE:
  57                         fprintf( wfp, "replace: %s\n", ml->ml_type );
  58                         break;
  59                 }
  60
  61                 for ( i = 0; ml->ml_bvalues != NULL && ml->ml_bvalues[i]
  62                     != NULL; i++ ) {
  63                         fprintf( wfp, "%s: %s\n", ml->ml_type,
  64                             ml->ml_bvalues[i]->bv_val );
  65                 }
  66         }
  67         fclose( wfp );
  68
  69         /* read in the results and send them along */
  70         read_and_send_results( be, conn, op, rfp, NULL, 0 );
  71         fclose( rfp );
  72         return( 0 );
  73
  74 }