ca.c (68651) | ca.c (79998) |
---|---|
1/* apps/ca.c */ 2/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) 3 * All rights reserved. 4 * 5 * This package is an SSL implementation written 6 * by Eric Young (eay@cryptsoft.com). 7 * The implementation was written so as to conform with Netscapes SSL. 8 * --- 1206 unchanged lines hidden (view full) --- 1215 BIO_printf(bio_err,"unable to load '%s' certificate\n",infile); 1216 goto err; 1217 } 1218 j=do_revoke(revcert,db); 1219 if (j <= 0) goto err; 1220 X509_free(revcert); 1221 1222 strncpy(buf[0],dbfile,BSIZE-4); | 1/* apps/ca.c */ 2/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) 3 * All rights reserved. 4 * 5 * This package is an SSL implementation written 6 * by Eric Young (eay@cryptsoft.com). 7 * The implementation was written so as to conform with Netscapes SSL. 8 * --- 1206 unchanged lines hidden (view full) --- 1215 BIO_printf(bio_err,"unable to load '%s' certificate\n",infile); 1216 goto err; 1217 } 1218 j=do_revoke(revcert,db); 1219 if (j <= 0) goto err; 1220 X509_free(revcert); 1221 1222 strncpy(buf[0],dbfile,BSIZE-4); |
1223#ifndef VMS |
|
1223 strcat(buf[0],".new"); | 1224 strcat(buf[0],".new"); |
1225#else 1226 strcat(buf[0],"-new"); 1227#endif |
|
1224 if (BIO_write_filename(out,buf[0]) <= 0) 1225 { 1226 perror(dbfile); 1227 BIO_printf(bio_err,"unable to open '%s'\n",dbfile); 1228 goto err; 1229 } 1230 j=TXT_DB_write(out,db); 1231 if (j <= 0) goto err; 1232 strncpy(buf[1],dbfile,BSIZE-4); | 1228 if (BIO_write_filename(out,buf[0]) <= 0) 1229 { 1230 perror(dbfile); 1231 BIO_printf(bio_err,"unable to open '%s'\n",dbfile); 1232 goto err; 1233 } 1234 j=TXT_DB_write(out,db); 1235 if (j <= 0) goto err; 1236 strncpy(buf[1],dbfile,BSIZE-4); |
1237#ifndef VMS |
|
1233 strcat(buf[1],".old"); | 1238 strcat(buf[1],".old"); |
1239#else 1240 strcat(buf[1],"-old"); 1241#endif |
|
1234 if (rename(dbfile,buf[1]) < 0) 1235 { 1236 BIO_printf(bio_err,"unable to rename %s to %s\n", dbfile, buf[1]); 1237 perror("reason"); 1238 goto err; 1239 } 1240 if (rename(buf[0],dbfile) < 0) 1241 { --- 995 unchanged lines hidden --- | 1242 if (rename(dbfile,buf[1]) < 0) 1243 { 1244 BIO_printf(bio_err,"unable to rename %s to %s\n", dbfile, buf[1]); 1245 perror("reason"); 1246 goto err; 1247 } 1248 if (rename(buf[0],dbfile) < 0) 1249 { --- 995 unchanged lines hidden --- |