* Copyright (c) 1995-2002, Index Data.
* See the file LICENSE for details.
*
- * $Id: ztest.c,v 1.48 2002-01-17 23:22:40 adam Exp $
+ * $Id: ztest.c,v 1.50 2002-01-23 22:40:36 adam Exp $
*/
/*
"Couldn't decode ItemRequest %s near %d",
odr_errmsg(odr_geterror(rr->decode)),
odr_offset(rr->decode));
-#if 0
- yaz_log(LOG_LOG, "PDU dump:");
- odr_dumpBER(yaz_log_file(),
- r->u.single_ASN1_type->buf,
- r->u.single_ASN1_type->len);
-#endif
}
else
yaz_log(LOG_LOG, "Decode ItemRequest OK");
targetPart->updateStatus = odr_intdup (rr->stream, 1);
targetPart->num_globalDiagnostics = 0;
targetPart->globalDiagnostics = (Z_DiagRec **) odr_nullval();
- targetPart->num_taskPackageRecords = 0;
- targetPart->taskPackageRecords =
- (Z_IUTaskPackageRecordStructure **) odr_nullval();
- }
+ targetPart->num_taskPackageRecords = 1;
+ targetPart->taskPackageRecords =
+ (Z_IUTaskPackageRecordStructure **)
+ odr_malloc (rr->stream,
+ sizeof(Z_IUTaskPackageRecordStructure *));
+ targetPart->taskPackageRecords[0] =
+ (Z_IUTaskPackageRecordStructure *)
+ odr_malloc (rr->stream,
+ sizeof(Z_IUTaskPackageRecordStructure));
+
+ targetPart->taskPackageRecords[0]->which =
+ Z_IUTaskPackageRecordStructure_record;
+ targetPart->taskPackageRecords[0]->u.record =
+ z_ext_record (rr->stream, VAL_SUTRS, "test", 4);
+ targetPart->taskPackageRecords[0]->correlationInfo = 0;
+ targetPart->taskPackageRecords[0]->recordStatus =
+ odr_intdup (rr->stream,
+ Z_IUTaskPackageRecordStructure_success);
+ targetPart->taskPackageRecords[0]->num_supplementalDiagnostics
+ = 0;
+
+ targetPart->taskPackageRecords[0]->supplementalDiagnostics = 0;
+ }
if (notToKeep)
{
int i;
char *cp;
r->errstring = 0;
r->last_in_set = 0;
- r->basename = "DUMMY";
+ r->basename = "Default";
r->output_format = r->request_format;
if (r->request_format == VAL_SUTRS)
{
return 0;
}
}
+ else if (r->request_format == VAL_POSTSCRIPT)
+ {
+ char fname[20];
+ FILE *f;
+ long size;
+
+ sprintf (fname, "part.%d.ps", r->number);
+ f = fopen(fname, "rb");
+ if (!f)
+ {
+ r->errcode = 13;
+ return 0;
+ }
+ fseek (f, 0L, SEEK_END);
+ size = ftell (f);
+ if (size <= 0 || size >= 5000000)
+ {
+ r->errcode = 14;
+ return 0;
+ }
+ fseek (f, 0L, SEEK_SET);
+ r->record = odr_malloc (r->stream, size);
+ r->len = size;
+ r->output_format = VAL_POSTSCRIPT;
+ fread (r->record, size, 1, f);
+ fclose (f);
+ }
else if ((cp = dummy_database_record(r->number, r->stream)))
{
r->len = strlen(cp);