z-core.c

harvest是一个下载html网页得机器人

		odr_implicit_tag (o, odr_integer,
			&(*p)->attributeType, ODR_CONTEXT, 120, 0, "attributeType") &&
		odr_choice (o, arm, &(*p)->value, &(*p)->which, 0) &&
		odr_sequence_end (o);
}

int z_ProximityOperator (ODR o, Z_ProximityOperator **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 1, Z_ProximityOperator_known,
		(Odr_fun) z_ProxUnit, "known"},
		{ODR_IMPLICIT, ODR_CONTEXT, 2, Z_ProximityOperator_private,
		(Odr_fun) odr_integer, "zprivate"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		odr_implicit_tag (o, odr_bool,
			&(*p)->exclusion, ODR_CONTEXT, 1, 1, "exclusion") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->distance, ODR_CONTEXT, 2, 0, "distance") &&
		odr_implicit_tag (o, odr_bool,
			&(*p)->ordered, ODR_CONTEXT, 3, 0, "ordered") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->relationType, ODR_CONTEXT, 4, 0, "relationType") &&
		odr_constructed_begin (o, &(*p)->u, ODR_CONTEXT, 5, "proximityUnitCode") &&
		odr_choice (o, arm, &(*p)->u, &(*p)->which, 0) &&
		odr_constructed_end (o) &&
		odr_sequence_end (o);
}

int z_ProxUnit (ODR o, Z_ProxUnit **p, int opt, const char *name)
{
	return odr_integer (o, p, opt, name);
}

int z_SearchResponse (ODR o, Z_SearchResponse **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		z_ReferenceId(o, &(*p)->referenceId, 1, "referenceId") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->resultCount, ODR_CONTEXT, 23, 0, "resultCount") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->numberOfRecordsReturned, ODR_CONTEXT, 24, 0, "numberOfRecordsReturned") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->nextResultSetPosition, ODR_CONTEXT, 25, 0, "nextResultSetPosition") &&
		odr_implicit_tag (o, odr_bool,
			&(*p)->searchStatus, ODR_CONTEXT, 22, 0, "searchStatus") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->resultSetStatus, ODR_CONTEXT, 26, 1, "resultSetStatus") &&
		z_PresentStatus(o, &(*p)->presentStatus, 1, "presentStatus") &&
		z_Records(o, &(*p)->records, 1, "records") &&
		odr_implicit_tag (o, z_OtherInformation,
			&(*p)->additionalSearchInfo, ODR_CONTEXT, 203, 1, "additionalSearchInfo") &&
		z_OtherInformation(o, &(*p)->otherInfo, 1, "otherInfo") &&
		odr_sequence_end (o);
}

int z_RecordComposition (ODR o, Z_RecordComposition **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_EXPLICIT, ODR_CONTEXT, 19, Z_RecordComp_simple,
		(Odr_fun) z_ElementSetNames, "simple"},
		{ODR_IMPLICIT, ODR_CONTEXT, 209, Z_RecordComp_complex,
		(Odr_fun) z_CompSpec, "complex"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_initmember(o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_choice(o, arm, &(*p)->u, &(*p)->which, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_PresentRequest (ODR o, Z_PresentRequest **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		z_ReferenceId(o, &(*p)->referenceId, 1, "referenceId") &&
		z_ResultSetId(o, &(*p)->resultSetId, 0, "resultSetId") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->resultSetStartPoint, ODR_CONTEXT, 30, 0, "resultSetStartPoint") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->numberOfRecordsRequested, ODR_CONTEXT, 29, 0, "numberOfRecordsRequested") &&
		odr_implicit_settag (o, ODR_CONTEXT, 212) &&
		(odr_sequence_of(o, (Odr_fun) z_Range, &(*p)->additionalRanges,
		  &(*p)->num_ranges, "additionalRanges") || odr_ok(o)) &&
		z_RecordComposition (o, &(*p)->recordComposition, 1, "recordComposition") &&
		odr_implicit_tag (o, odr_oid,
			&(*p)->preferredRecordSyntax, ODR_CONTEXT, 104, 1, "preferredRecordSyntax") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->maxSegmentCount, ODR_CONTEXT, 204, 1, "maxSegmentCount") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->maxRecordSize, ODR_CONTEXT, 206, 1, "maxRecordSize") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->maxSegmentSize, ODR_CONTEXT, 207, 1, "maxSegmentSize") &&
		z_OtherInformation(o, &(*p)->otherInfo, 1, "otherInfo") &&
		odr_sequence_end (o);
}

int z_Segment (ODR o, Z_Segment **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		z_ReferenceId(o, &(*p)->referenceId, 1, "referenceId") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->numberOfRecordsReturned, ODR_CONTEXT, 24, 0, "numberOfRecordsReturned") &&
		odr_implicit_settag (o, ODR_CONTEXT, 0) &&
		odr_sequence_of(o, (Odr_fun) z_NamePlusRecord, &(*p)->segmentRecords,
		  &(*p)->num_segmentRecords, "segmentRecords") &&
		z_OtherInformation(o, &(*p)->otherInfo, 1, "otherInfo") &&
		odr_sequence_end (o);
}

int z_PresentResponse (ODR o, Z_PresentResponse **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		z_ReferenceId(o, &(*p)->referenceId, 1, "referenceId") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->numberOfRecordsReturned, ODR_CONTEXT, 24, 0, "numberOfRecordsReturned") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->nextResultSetPosition, ODR_CONTEXT, 25, 0, "nextResultSetPosition") &&
		z_PresentStatus(o, &(*p)->presentStatus, 0, "presentStatus") &&
		z_Records(o, &(*p)->records, 1, "records") &&
		z_OtherInformation(o, &(*p)->otherInfo, 1, "otherInfo") &&
		odr_sequence_end (o);
}

int z_NamePlusRecordList (ODR o, Z_NamePlusRecordList **p, int opt, const char *name)
{
	if (!odr_initmember (o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_sequence_of (o, (Odr_fun) z_NamePlusRecord, &(*p)->records,
		&(*p)->num_records, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_DiagRecs (ODR o, Z_DiagRecs **p, int opt, const char *name)
{
	if (!odr_initmember (o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_sequence_of (o, (Odr_fun) z_DiagRec, &(*p)->diagRecs,
		&(*p)->num_diagRecs, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_Records (ODR o, Z_Records **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 28, Z_Records_DBOSD,
		(Odr_fun) z_NamePlusRecordList, "databaseOrSurDiagnostics"},
		{ODR_IMPLICIT, ODR_CONTEXT, 130, Z_Records_NSD,
		(Odr_fun) z_DefaultDiagFormat, "nonSurrogateDiagnostic"},
		{ODR_IMPLICIT, ODR_CONTEXT, 205, Z_Records_multipleNSD,
		(Odr_fun) z_DiagRecs, "multipleNonSurDiagnostics"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_initmember(o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_choice(o, arm, &(*p)->u, &(*p)->which, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_NamePlusRecord (ODR o, Z_NamePlusRecord **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_EXPLICIT, ODR_CONTEXT, 1, Z_NamePlusRecord_databaseRecord,
		(Odr_fun) z_External, "databaseRecord"},
		{ODR_EXPLICIT, ODR_CONTEXT, 2, Z_NamePlusRecord_surrogateDiagnostic,
		(Odr_fun) z_DiagRec, "surrogateDiagnostic"},
		{ODR_EXPLICIT, ODR_CONTEXT, 3, Z_NamePlusRecord_startingFragment,
		(Odr_fun) z_FragmentSyntax, "startingFragment"},
		{ODR_EXPLICIT, ODR_CONTEXT, 4, Z_NamePlusRecord_intermediateFragment,
		(Odr_fun) z_FragmentSyntax, "intermediateFragment"},
		{ODR_EXPLICIT, ODR_CONTEXT, 5, Z_NamePlusRecord_finalFragment,
		(Odr_fun) z_FragmentSyntax, "finalFragment"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		odr_implicit_tag (o, z_DatabaseName,
			&(*p)->databaseName, ODR_CONTEXT, 0, 1, "databaseName") &&
		odr_constructed_begin (o, &(*p)->u, ODR_CONTEXT, 1, "record") &&
		odr_choice (o, arm, &(*p)->u, &(*p)->which, 0) &&
		odr_constructed_end (o) &&
		odr_sequence_end (o);
}

int z_FragmentSyntax (ODR o, Z_FragmentSyntax **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{-1, -1, -1, Z_FragmentSyntax_externallyTagged,
		 (Odr_fun) z_External, "externallyTagged"},
		{-1, -1, -1, Z_FragmentSyntax_notExternallyTagged,
		 (Odr_fun) odr_octetstring, "notExternallyTagged"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_initmember(o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_choice(o, arm, &(*p)->u, &(*p)->which, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_DiagRec (ODR o, Z_DiagRec **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{-1, -1, -1, Z_DiagRec_defaultFormat,
		 (Odr_fun) z_DefaultDiagFormat, "defaultFormat"},
		{-1, -1, -1, Z_DiagRec_externallyDefined,
		 (Odr_fun) z_External, "externallyDefined"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_initmember(o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_choice(o, arm, &(*p)->u, &(*p)->which, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_DefaultDiagFormat (ODR o, Z_DefaultDiagFormat **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{-1, -1, -1, Z_DefaultDiagFormat_v2Addinfo,
		 (Odr_fun) odr_visiblestring, "v2Addinfo"},
		{-1, -1, -1, Z_DefaultDiagFormat_v3Addinfo,
		 (Odr_fun) z_InternationalString, "v3Addinfo"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		odr_oid(o, &(*p)->diagnosticSetId, 0, "diagnosticSetId") &&
		odr_integer(o, &(*p)->condition, 0, "condition") &&
		odr_choice (o, arm, &(*p)->u, &(*p)->which, 0) &&
		odr_sequence_end (o);
}

int z_Range (ODR o, Z_Range **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		odr_implicit_tag (o, odr_integer,
			&(*p)->startingPosition, ODR_CONTEXT, 1, 0, "startingPosition") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->numberOfRecords, ODR_CONTEXT, 2, 0, "numberOfRecords") &&
		odr_sequence_end (o);
}

int z_DatabaseSpecificUnit (ODR o, Z_DatabaseSpecificUnit **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		z_DatabaseName(o, &(*p)->dbName, 0, "dbName") &&
		z_ElementSetName(o, &(*p)->esn, 0, "esn") &&
		odr_sequence_end (o);
}

int z_DatabaseSpecific (ODR o, Z_DatabaseSpecific **p, int opt, const char *name)
{
	if (!odr_initmember (o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_sequence_of (o, (Odr_fun) z_DatabaseSpecificUnit, &(*p)->elements,
		&(*p)->num, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_ElementSetNames (ODR o, Z_ElementSetNames **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 0, Z_ElementSetNames_generic,
		(Odr_fun) z_InternationalString, "generic"},
		{ODR_IMPLICIT, ODR_CONTEXT, 1, Z_ElementSetNames_databaseSpecific,
		(Odr_fun) z_DatabaseSpecific, "databaseSpecific"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_initmember(o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_choice(o, arm, &(*p)->u, &(*p)->which, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_PresentStatus (ODR o, Z_PresentStatus **p, int opt, const char *name)
{
	return odr_implicit_tag (o, odr_integer, p, ODR_CONTEXT, 27, opt, name);
}

int z_DbSpecific (ODR o, Z_DbSpecific **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		odr_explicit_tag (o, z_DatabaseName,
			&(*p)->db, ODR_CONTEXT, 1, 0, "db") &&
		odr_implicit_tag (o, z_Specification,
			&(*p)->spec, ODR_CONTEXT, 2, 0, "spec") &&
		odr_sequence_end (o);
}

int z_CompSpec (ODR o, Z_CompSpec **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		odr_implicit_tag (o, odr_bool,
			&(*p)->selectAlternativeSyntax, ODR_CONTEXT, 1, 0, "selectAlternativeSyntax") &&
		odr_implicit_tag (o, z_Specification,
			&(*p)->generic, ODR_CONTEXT, 2, 1, "generic") &&
		odr_implicit_settag (o, ODR_CONTEXT, 3) &&
		(odr_sequence_of(o, (Odr_fun) z_DbSpecific, &(*p)->dbSpecific,
		  &(*p)->num_dbSpecific, "dbSpecific") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 4) &&
		(odr_sequence_of(o, (Odr_fun) odr_oid, &(*p)->recordSyntax,
		  &(*p)->num_recordSyntax, "recordSyntax") || odr_ok(o)) &&
		odr_sequence_end (o);
}

int z_ElementSpec (ODR o, Z_ElementSpec **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 1, Z_ElementSpec_elementSetName,
		(Odr_fun) z_InternationalString, "elementSetName"},
		{ODR_IMPLICIT, ODR_CONTEXT, 2, Z_ElementSpec_externalSpec,
		(Odr_fun) z_External, "externalSpec"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_initmember(o, p, sizeof(**p)))
		return odr_missing(o, opt, name);
	if (odr_choice(o, arm, &(*p)->u, &(*p)->which, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_Specification (ODR o, Z_Specification **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 1, Z_Schema_oid,
		(Odr_fun) odr_oid, "oid"},
		{ODR_IMPLICIT, ODR_CONTEXT, 300, Z_Schema_uri,
		(Odr_fun) z_InternationalString, "uri"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		(odr_choice (o, arm, &(*p)->schema, &(*p)->which, 0) || odr_ok(o)) &&
		odr_explicit_tag (o, z_ElementSpec,
			&(*p)->elementSpec, ODR_CONTEXT, 2, 1, "elementSpec") &&
		odr_sequence_end (o);
}

int z_DeleteResultSetRequest (ODR o, Z_DeleteResultSetRequest **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		z_ReferenceId(o, &(*p)->referenceId, 1, "referenceId") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->deleteFunction, ODR_CONTEXT, 32, 0, "deleteFunction") &&
		(odr_sequence_of(o, (Odr_fun) z_ResultSetId, &(*p)->resultSetList,
		  &(*p)->num_resultSetList, "resultSetList") || odr_ok(o)) &&
		z_OtherInformation(o, &(*p)->otherInfo, 1, "otherInfo") &&
		odr_sequence_end (o);
}

int z_DeleteResultSetResponse (ODR o, Z_DeleteResultSetResponse **p, int opt, const char *name)
{
	if (!odr_sequence_begin (o, p, sizeof(**p), name))
		return odr_missing(o, opt, name) && odr_ok (o);
	return
		z_ReferenceId(o, &(*p)->referenceId, 1, "referenceId") &&
		odr_implicit_tag (o, z_DeleteStatus,
			&(*p)->deleteOperationStatus, ODR_CONTEXT, 0, 0, "deleteOperationStatus") &&
		odr_implicit_tag (o, z_ListStatuses,
			&(*p)->deleteListStatuses, ODR_CONTEXT, 1, 1, "deleteListStatuses") &&