git.sur5r.net Git - openldap/blob - servers/slapd/tools/slapadd.c

   1 /* $OpenLDAP$ */
   2 /*
   3  * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
   4  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   5  */
   6 #include "portable.h"
   7
   8 #include <stdio.h>
   9
  10 #include <ac/stdlib.h>
  11
  12 #include <ac/ctype.h>
  13 #include <ac/string.h>
  14 #include <ac/socket.h>
  15 #include <ac/unistd.h>
  16
  17 #include <lber.h>
  18 #include <ldif.h>
  19 #include <lutil.h>
  20
  21 #include "slapcommon.h"
  22
  23 int
  24 main( int argc, char **argv )
  25 {
  26         char            *buf = NULL;
  27         int         lineno;
  28         int         lmax;
  29         int                     rc = EXIT_SUCCESS;
  30
  31         const char *text;
  32         char textbuf[SLAP_TEXT_BUFLEN] = { '\0' };
  33         size_t textlen = sizeof textbuf;
  34
  35 #ifdef NEW_LOGGING
  36         lutil_log_initialize(argc, argv );
  37 #endif
  38         slap_tool_init( "slapadd", SLAPADD, argc, argv );
  39
  40         if( !be->be_entry_open ||
  41                 !be->be_entry_close ||
  42                 !be->be_entry_put )
  43         {
  44                 fprintf( stderr, "%s: database doesn't support necessary operations.\n",
  45                         progname );
  46                 exit( EXIT_FAILURE );
  47         }
  48
  49         lmax = 0;
  50         lineno = 0;
  51
  52         if( be->be_entry_open( be, 1 ) != 0 ) {
  53                 fprintf( stderr, "%s: could not open database.\n",
  54                         progname );
  55                 exit( EXIT_FAILURE );
  56         }
  57
  58         while( ldif_read_record( ldiffp, &lineno, &buf, &lmax ) ) {
  59                 Entry *e = str2entry( buf );
  60                 struct berval bvtext;
  61
  62                 /*
  63                  * Initialize text buffer
  64                  */
  65                 bvtext.bv_len = textlen;
  66                 bvtext.bv_val = textbuf;
  67                 bvtext.bv_val[0] = '\0';
  68
  69                 if( e == NULL ) {
  70                         fprintf( stderr, "%s: could not parse entry (line=%d)\n",
  71                                 progname, lineno );
  72                         rc = EXIT_FAILURE;
  73                         if( continuemode ) continue;
  74                         break;
  75                 }
  76
  77                 /* make sure the DN is not empty */
  78                 if( !e->e_nname.bv_len ) {
  79                         fprintf( stderr, "%s: empty dn=\"%s\" (line=%d)\n",
  80                                 progname, e->e_dn, lineno );
  81                         rc = EXIT_FAILURE;
  82                         entry_free( e );
  83                         if( continuemode ) continue;
  84                         break;
  85                 }
  86
  87                 /* check backend */
  88                 if( select_backend( &e->e_nname, is_entry_referral(e), nosubordinates )
  89                         != be )
  90                 {
  91                         fprintf( stderr, "%s: line %d: "
  92                                 "database (%s) not configured to hold \"%s\"\n",
  93                                 progname, lineno,
  94                                 be ? be->be_suffix[0].bv_val : "<none>",
  95                                 e->e_dn );
  96                         fprintf( stderr, "%s: line %d: "
  97                                 "database (%s) not configured to hold \"%s\"\n",
  98                                 progname, lineno,
  99                                 be ? be->be_nsuffix[0].bv_val : "<none>",
 100                                 e->e_ndn );
 101                         rc = EXIT_FAILURE;
 102                         entry_free( e );
 103                         if( continuemode ) continue;
 104                         break;
 105                 }
 106
 107                 if( global_schemacheck ) {
 108                         Attribute *sc = attr_find( e->e_attrs,
 109                                 slap_schema.si_ad_structuralObjectClass );
 110                         Attribute *oc = attr_find( e->e_attrs,
 111                                 slap_schema.si_ad_objectClass );
 112
 113                         if( oc == NULL ) {
 114                                 fprintf( stderr, "%s: dn=\"%s\" (line=%d): %s\n",
 115                                         progname, e->e_dn, lineno,
 116                                         "no objectClass attribute");
 117                                 rc = EXIT_FAILURE;
 118                                 entry_free( e );
 119                                 if( continuemode ) continue;
 120                                 break;
 121                         }
 122
 123                         if( sc == NULL ) {
 124                                 struct berval vals[2];
 125
 126                                 rc = structural_class( oc->a_vals, vals,
 127                                         NULL, &text, textbuf, textlen );
 128
 129                                 if( rc != LDAP_SUCCESS ) {
 130                                         fprintf( stderr, "%s: dn=\"%s\" (line=%d): (%d) %s\n",
 131                                                 progname, e->e_dn, lineno, rc, text );
 132                                         rc = EXIT_FAILURE;
 133                                         entry_free( e );
 134                                         if( continuemode ) continue;
 135                                         break;
 136                                 }
 137
 138                                 vals[1].bv_len = 0;
 139                                 vals[1].bv_val = NULL;
 140
 141 #ifdef SLAP_NVALUES
 142                                 attr_merge( e, slap_schema.si_ad_structuralObjectClass,
 143                                         vals, NULL /* FIXME */ );
 144 #else
 145                                 attr_merge( e, slap_schema.si_ad_structuralObjectClass, vals );
 146 #endif
 147                         }
 148
 149                         /* check schema */
 150                         rc = entry_schema_check( be, e, NULL, &text, textbuf, textlen );
 151
 152                         if( rc != LDAP_SUCCESS ) {
 153                                 fprintf( stderr, "%s: dn=\"%s\" (line=%d): (%d) %s\n",
 154                                         progname, e->e_dn, lineno, rc, text );
 155                                 rc = EXIT_FAILURE;
 156                                 entry_free( e );
 157                                 if( continuemode ) continue;
 158                                 break;
 159                         }
 160                 }
 161
 162                 if ( SLAP_LASTMOD(be) ) {
 163                         struct tm *ltm;
 164                         time_t now = slap_get_time();
 165                         char uuidbuf[ LDAP_LUTIL_UUIDSTR_BUFSIZE ];
 166                         struct berval vals[ 2 ];
 167
 168                         struct berval name, timestamp, csn;
 169
 170 #ifdef SLAP_NVALUES
 171                         struct berval nvals[ 2 ];
 172                         struct berval nname;
 173 #endif
 174                         char timebuf[ LDAP_LUTIL_GENTIME_BUFSIZE ];
 175                         char csnbuf[ LDAP_LUTIL_CSNSTR_BUFSIZE ];
 176
 177                         vals[1].bv_len = 0;
 178                         vals[1].bv_val = NULL;
 179
 180 #ifdef SLAP_NVALUES
 181                         nvals[1].bv_len = 0;
 182                         nvals[1].bv_val = NULL;
 183 #endif
 184
 185                         ltm = gmtime(&now);
 186                         lutil_gentime( timebuf, sizeof(timebuf), ltm );
 187
 188                         csn.bv_len = lutil_csnstr( csnbuf, sizeof( csnbuf ), 0, 0 );
 189                         csn.bv_val = csnbuf;
 190
 191                         timestamp.bv_val = timebuf;
 192                         timestamp.bv_len = strlen(timebuf);
 193
 194                         if ( be->be_rootndn.bv_len == 0 ) {
 195                                 name.bv_val = SLAPD_ANONYMOUS;
 196                                 name.bv_len = sizeof(SLAPD_ANONYMOUS) - 1;
 197 #ifdef SLAP_NVALUES
 198                                 nname.bv_val = SLAPD_ANONYMOUS;
 199                                 nname.bv_len = sizeof(SLAPD_ANONYMOUS) - 1;
 200 #endif
 201                         } else {
 202                                 name = be->be_rootdn;
 203 #ifdef SLAP_NVALUES
 204                                 nname = be->be_rootndn;
 205 #endif
 206                         }
 207
 208                         if( attr_find( e->e_attrs, slap_schema.si_ad_entryUUID )
 209                                 == NULL )
 210                         {
 211                                 vals[0].bv_len = lutil_uuidstr( uuidbuf, sizeof( uuidbuf ) );
 212                                 vals[0].bv_val = uuidbuf;
 213 #ifdef SLAP_NVALUES
 214                                 attr_merge( e, slap_schema.si_ad_entryUUID, vals, NULL );
 215 #else
 216                                 attr_merge( e, slap_schema.si_ad_entryUUID, vals );
 217 #endif
 218                         }
 219
 220                         if( attr_find( e->e_attrs, slap_schema.si_ad_creatorsName )
 221                                 == NULL )
 222                         {
 223                                 vals[0] = name;
 224 #ifdef SLAP_NVALUES
 225                                 nvals[0] = nname;
 226                                 attr_merge( e, slap_schema.si_ad_creatorsName, vals, nvals );
 227 #else
 228                                 attr_merge( e, slap_schema.si_ad_creatorsName, vals );
 229 #endif
 230                         }
 231
 232                         if( attr_find( e->e_attrs, slap_schema.si_ad_modifiersName )
 233                                 == NULL )
 234                         {
 235                                 vals[0] = name;
 236 #ifdef SLAP_NVALUES
 237                                 nvals[0] = nname;
 238                                 attr_merge( e, slap_schema.si_ad_modifiersName, vals, nvals );
 239 #else
 240                                 attr_merge( e, slap_schema.si_ad_modifiersName, vals );
 241 #endif
 242                         }
 243
 244                         if( attr_find( e->e_attrs, slap_schema.si_ad_createTimestamp )
 245                                 == NULL )
 246                         {
 247                                 vals[0] = timestamp;
 248 #ifdef SLAP_NVALUES
 249                                 attr_merge( e, slap_schema.si_ad_createTimestamp, vals, NULL );
 250 #else
 251                                 attr_merge( e, slap_schema.si_ad_createTimestamp, vals );
 252 #endif
 253                         }
 254
 255                         if( attr_find( e->e_attrs, slap_schema.si_ad_modifyTimestamp )
 256                                 == NULL )
 257                         {
 258                                 vals[0] = timestamp;
 259 #ifdef SLAP_NVALUES
 260                                 attr_merge( e, slap_schema.si_ad_modifyTimestamp, vals, NULL );
 261 #else
 262                                 attr_merge( e, slap_schema.si_ad_modifyTimestamp, vals );
 263 #endif
 264                         }
 265
 266                         if( attr_find( e->e_attrs, slap_schema.si_ad_entryCSN )
 267                                 == NULL )
 268                         {
 269                                 vals[0] = csn;
 270 #ifdef SLAP_NVALUES
 271                                 attr_merge( e, slap_schema.si_ad_entryCSN, vals, NULL );
 272 #else
 273                                 attr_merge( e, slap_schema.si_ad_entryCSN, vals );
 274 #endif
 275                         }
 276                 }
 277
 278                 if (!dryrun) {
 279                         ID id = be->be_entry_put( be, e, &bvtext );
 280                         if( id == NOID ) {
 281                                 fprintf( stderr, "%s: could not add entry dn=\"%s\" (line=%d): %s\n",
 282                                         progname, e->e_dn, lineno, bvtext.bv_val );
 283                                 rc = EXIT_FAILURE;
 284                                 entry_free( e );
 285                                 if( continuemode ) continue;
 286                                 break;
 287                         }
 288
 289                         if ( verbose ) {
 290                                 fprintf( stderr, "added: \"%s\" (%08lx)\n",
 291                                         e->e_dn, (long) id );
 292                         }
 293                 } else {
 294                         if ( verbose ) {
 295                                 fprintf( stderr, "(dry) added: \"%s\"\n", e->e_dn );
 296                         }
 297                 }
 298
 299                 entry_free( e );
 300         }
 301
 302         ch_free( buf );
 303
 304         if( be->be_entry_close( be )) rc = EXIT_FAILURE;
 305
 306         if( be->be_sync ) {
 307                 be->be_sync( be );
 308         }
 309
 310         slap_tool_destroy();
 311         return rc;
 312 }