/*
* $Log: admin.c,v $
- * Revision 1.1 2000-03-14 09:27:07 ian
+ * Revision 1.2 2000-03-14 14:06:04 ian
+ * Minor change to order of debugging output for send_apdu,
+ * fixed encoding of admin request.
+ *
+ * Revision 1.1 2000/03/14 09:27:07 ian
* Added code to enable sending of admin extended service requests
*
*
printf ("Admin request\n");
fflush(stdout);
+ /* Set up the OID for the external */
update_oid.proto = PROTO_Z3950;
update_oid.oclass = CLASS_EXTSERV;
update_oid.value = VAL_ADMINSERVICE;
req->packageType = odr_oiddup(out,oid);
req->packageName = "1.Extendedserveq";
- r = req->taskSpecificParameters = (Z_External *)
- odr_malloc (out, sizeof(*r));
+ /* Allocate the external */
+ r = req->taskSpecificParameters = (Z_External *) odr_malloc (out, sizeof(*r));
r->direct_reference = odr_oiddup(out,oid);
r->indirect_reference = 0;
r->descriptor = 0;
{
case 1:
toKeep->which=Z_ESAdminOriginPartToKeep_reIndex;
- toKeep->u.reIndex=NULL;
+ toKeep->u.reIndex=odr_nullval();
break;
case 2:
toKeep->which=Z_ESAdminOriginPartToKeep_truncate;
- toKeep->u.truncate=NULL;
+ toKeep->u.truncate=odr_nullval();
break;
case 3:
toKeep->which=Z_ESAdminOriginPartToKeep_delete;
- toKeep->u.delete=NULL;
+ toKeep->u.delete=odr_nullval();
break;
case 4:
toKeep->which=Z_ESAdminOriginPartToKeep_create;
- toKeep->u.create=NULL;
+ toKeep->u.create=odr_nullval();
break;
case 5:
toKeep->which=Z_ESAdminOriginPartToKeep_import;
- toKeep->u.import=NULL;
+ toKeep->u.import=odr_nullval();
break;
case 6:
toKeep->which=Z_ESAdminOriginPartToKeep_refresh;
- toKeep->u.refresh=NULL;
+ toKeep->u.refresh=odr_nullval();
break;
case 7:
toKeep->which=Z_ESAdminOriginPartToKeep_commit;
- toKeep->u.commit=NULL;
+ toKeep->u.commit=odr_nullval();
break;
}
+ toKeep->databaseName = dbname;
+
notToKeep = r->u.adminService->u.esRequest->notToKeep = (Z_ESAdminOriginPartNotToKeep *)
odr_malloc(out, sizeof(*r->u.adminService->u.esRequest->notToKeep));
notToKeep->which=Z_ESAdminOriginPartNotToKeep_recordsWillFollow;
- notToKeep->u.recordsWillFollow=NULL;
+ notToKeep->u.recordsWillFollow=odr_nullval();
send_apdu(apdu);
* Sebastian Hammer, Adam Dickmeiss
*
* $Log: client.c,v $
- * Revision 1.96 2000-03-14 09:27:07 ian
+ * Revision 1.97 2000-03-14 14:06:04 ian
+ * Minor change to order of debugging output for send_apdu,
+ * fixed encoding of admin request.
+ *
+ * Revision 1.96 2000/03/14 09:27:07 ian
* Added code to enable sending of admin extended service requests
*
* Revision 1.95 2000/02/28 11:20:05 adam
char *buf;
int len;
- if (!z_APDU(out, &a, 0, 0))
- {
- odr_perror(out, "Encoding APDU");
- exit(1);
- }
if (apdu_file)
{
z_APDU(print, &a, 0, 0);
odr_reset(print);
}
+ if (!z_APDU(out, &a, 0, 0))
+ {
+ odr_perror(out, "Encoding APDU");
+ exit(1);
+ }
buf = odr_getbuf(out, &len, 0);
/* printf ("sending APDU of size %d\n", len); */
if (cs_put(conn, buf, len) < 0)