z-exp.c

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

			&(*p)->sSel, ODR_CONTEXT, 1, 1, "sSel") &&
		odr_implicit_tag (o, z_InternationalString,
			&(*p)->tSel, ODR_CONTEXT, 2, 1, "tSel") &&
		odr_implicit_tag (o, z_InternationalString,
			&(*p)->nSap, ODR_CONTEXT, 3, 0, "nSap") &&
		odr_sequence_end (o);
}

int z_NetworkAddressOther (ODR o, Z_NetworkAddressOther **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, z_InternationalString,
			&(*p)->type, ODR_CONTEXT, 0, 0, "type") &&
		odr_implicit_tag (o, z_InternationalString,
			&(*p)->address, ODR_CONTEXT, 1, 0, "address") &&
		odr_sequence_end (o);
}

int z_NetworkAddress (ODR o, Z_NetworkAddress **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 0, Z_NetworkAddress_iA,
		(Odr_fun) z_NetworkAddressIA, "internetAddress"},
		{ODR_IMPLICIT, ODR_CONTEXT, 1, Z_NetworkAddress_oPA,
		(Odr_fun) z_NetworkAddressOPA, "osiPresentationAddress"},
		{ODR_IMPLICIT, ODR_CONTEXT, 2, Z_NetworkAddress_other,
		(Odr_fun) z_NetworkAddressOther, "other"},
		{-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_AccessInfo (ODR o, Z_AccessInfo **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_settag (o, ODR_CONTEXT, 0) &&
		(odr_sequence_of(o, (Odr_fun) z_QueryTypeDetails, &(*p)->queryTypesSupported,
		  &(*p)->num_queryTypesSupported, "queryTypesSupported") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 1) &&
		(odr_sequence_of(o, (Odr_fun) odr_oid, &(*p)->diagnosticsSets,
		  &(*p)->num_diagnosticsSets, "diagnosticsSets") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 2) &&
		(odr_sequence_of(o, (Odr_fun) z_AttributeSetId, &(*p)->attributeSetIds,
		  &(*p)->num_attributeSetIds, "attributeSetIds") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 3) &&
		(odr_sequence_of(o, (Odr_fun) odr_oid, &(*p)->schemas,
		  &(*p)->num_schemas, "schemas") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 4) &&
		(odr_sequence_of(o, (Odr_fun) odr_oid, &(*p)->recordSyntaxes,
		  &(*p)->num_recordSyntaxes, "recordSyntaxes") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 5) &&
		(odr_sequence_of(o, (Odr_fun) odr_oid, &(*p)->resourceChallenges,
		  &(*p)->num_resourceChallenges, "resourceChallenges") || odr_ok(o)) &&
		odr_implicit_tag (o, z_AccessRestrictions,
			&(*p)->restrictedAccess, ODR_CONTEXT, 6, 1, "restrictedAccess") &&
		odr_implicit_tag (o, z_Costs,
			&(*p)->costInfo, ODR_CONTEXT, 8, 1, "costInfo") &&
		odr_implicit_settag (o, ODR_CONTEXT, 9) &&
		(odr_sequence_of(o, (Odr_fun) odr_oid, &(*p)->variantSets,
		  &(*p)->num_variantSets, "variantSets") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 10) &&
		(odr_sequence_of(o, (Odr_fun) z_ElementSetName, &(*p)->elementSetNames,
		  &(*p)->num_elementSetNames, "elementSetNames") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 11) &&
		odr_sequence_of(o, (Odr_fun) z_InternationalString, &(*p)->unitSystems,
		  &(*p)->num_unitSystems, "unitSystems") &&
		odr_sequence_end (o);
}

int z_QueryTypeDetails (ODR o, Z_QueryTypeDetails **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 0, Z_QueryTypeDetails_private,
		(Odr_fun) z_PrivateCapabilities, "zprivate"},
		{ODR_IMPLICIT, ODR_CONTEXT, 1, Z_QueryTypeDetails_rpn,
		(Odr_fun) z_RpnCapabilities, "rpn"},
		{ODR_IMPLICIT, ODR_CONTEXT, 2, Z_QueryTypeDetails_iso8777,
		(Odr_fun) z_Iso8777Capabilities, "iso8777"},
		{ODR_IMPLICIT, ODR_CONTEXT, 100, Z_QueryTypeDetails_z39_58,
		(Odr_fun) z_HumanString, "z39_58"},
		{ODR_IMPLICIT, ODR_CONTEXT, 101, Z_QueryTypeDetails_erpn,
		(Odr_fun) z_RpnCapabilities, "erpn"},
		{ODR_IMPLICIT, ODR_CONTEXT, 102, Z_QueryTypeDetails_rankedList,
		(Odr_fun) z_HumanString, "rankedList"},
		{-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_PrivateCapOperator (ODR o, Z_PrivateCapOperator **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, z_InternationalString,
			&(*p)->roperator, ODR_CONTEXT, 0, 0, "roperator") &&
		odr_implicit_tag (o, z_HumanString,
			&(*p)->description, ODR_CONTEXT, 1, 1, "description") &&
		odr_sequence_end (o);
}

int z_PrivateCapabilities (ODR o, Z_PrivateCapabilities **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_settag (o, ODR_CONTEXT, 0) &&
		(odr_sequence_of(o, (Odr_fun) z_PrivateCapOperator, &(*p)->operators,
		  &(*p)->num_operators, "operators") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 1) &&
		(odr_sequence_of(o, (Odr_fun) z_SearchKey, &(*p)->searchKeys,
		  &(*p)->num_searchKeys, "searchKeys") || odr_ok(o)) &&
		odr_implicit_settag (o, ODR_CONTEXT, 2) &&
		(odr_sequence_of(o, (Odr_fun) z_HumanString, &(*p)->description,
		  &(*p)->num_description, "description") || odr_ok(o)) &&
		odr_sequence_end (o);
}

int z_RpnCapabilities (ODR o, Z_RpnCapabilities **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_settag (o, ODR_CONTEXT, 0) &&
		(odr_sequence_of(o, (Odr_fun) odr_integer, &(*p)->operators,
		  &(*p)->num_operators, "operators") || odr_ok(o)) &&
		odr_implicit_tag (o, odr_bool,
			&(*p)->resultSetAsOperandSupported, ODR_CONTEXT, 1, 0, "resultSetAsOperandSupported") &&
		odr_implicit_tag (o, odr_bool,
			&(*p)->restrictionOperandSupported, ODR_CONTEXT, 2, 0, "restrictionOperandSupported") &&
		odr_implicit_tag (o, z_ProximitySupport,
			&(*p)->proximity, ODR_CONTEXT, 3, 1, "proximity") &&
		odr_sequence_end (o);
}

int z_Iso8777Capabilities (ODR o, Z_Iso8777Capabilities **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_settag (o, ODR_CONTEXT, 0) &&
		odr_sequence_of(o, (Odr_fun) z_SearchKey, &(*p)->searchKeys,
		  &(*p)->num_searchKeys, "searchKeys") &&
		odr_implicit_tag (o, z_HumanString,
			&(*p)->restrictions, ODR_CONTEXT, 1, 1, "restrictions") &&
		odr_sequence_end (o);
}

int z_ProxSupportPrivate (ODR o, Z_ProxSupportPrivate **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)->unit, ODR_CONTEXT, 0, 0, "unit") &&
		odr_explicit_tag (o, z_HumanString,
			&(*p)->description, ODR_CONTEXT, 1, 1, "description") &&
		odr_sequence_end (o);
}

int z_ProxSupportUnit (ODR o, Z_ProxSupportUnit **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 1, Z_ProxSupportUnit_known,
		(Odr_fun) odr_integer, "known"},
		{ODR_IMPLICIT, ODR_CONTEXT, 2, Z_ProxSupportUnit_private,
		(Odr_fun) z_ProxSupportPrivate, "zprivate"},
		{-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_ProximitySupport (ODR o, Z_ProximitySupport **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)->anySupport, ODR_CONTEXT, 0, 0, "anySupport") &&
		odr_implicit_settag (o, ODR_CONTEXT, 1) &&
		(odr_sequence_of(o, (Odr_fun) z_ProxSupportUnit, &(*p)->unitsSupported,
		  &(*p)->num_unitsSupported, "unitsSupported") || odr_ok(o)) &&
		odr_sequence_end (o);
}

int z_SearchKey (ODR o, Z_SearchKey **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, z_InternationalString,
			&(*p)->searchKey, ODR_CONTEXT, 0, 0, "searchKey") &&
		odr_implicit_tag (o, z_HumanString,
			&(*p)->description, ODR_CONTEXT, 1, 1, "description") &&
		odr_sequence_end (o);
}

int z_AccessRestrictionsUnit (ODR o, Z_AccessRestrictionsUnit **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, odr_integer,
			&(*p)->accessType, ODR_CONTEXT, 0, 0, "accessType") &&
		odr_implicit_tag (o, z_HumanString,
			&(*p)->accessText, ODR_CONTEXT, 1, 1, "accessText") &&
		odr_implicit_settag (o, ODR_CONTEXT, 2) &&
		(odr_sequence_of(o, (Odr_fun) odr_oid, &(*p)->accessChallenges,
		  &(*p)->num_accessChallenges, "accessChallenges") || odr_ok(o)) &&
		odr_sequence_end (o);
}

int z_AccessRestrictions (ODR o, Z_AccessRestrictions **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_AccessRestrictionsUnit, &(*p)->elements,
		&(*p)->num, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_CostsOtherCharge (ODR o, Z_CostsOtherCharge **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, z_HumanString,
			&(*p)->forWhat, ODR_CONTEXT, 1, 0, "forWhat") &&
		odr_implicit_tag (o, z_Charge,
			&(*p)->charge, ODR_CONTEXT, 2, 0, "charge") &&
		odr_sequence_end (o);
}

int z_Costs (ODR o, Z_Costs **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, z_Charge,
			&(*p)->connectCharge, ODR_CONTEXT, 0, 1, "connectCharge") &&
		odr_implicit_tag (o, z_Charge,
			&(*p)->connectTime, ODR_CONTEXT, 1, 1, "connectTime") &&
		odr_implicit_tag (o, z_Charge,
			&(*p)->displayCharge, ODR_CONTEXT, 2, 1, "displayCharge") &&
		odr_implicit_tag (o, z_Charge,
			&(*p)->searchCharge, ODR_CONTEXT, 3, 1, "searchCharge") &&
		odr_implicit_tag (o, z_Charge,
			&(*p)->subscriptCharge, ODR_CONTEXT, 4, 1, "subscriptCharge") &&
		odr_implicit_settag (o, ODR_CONTEXT, 5) &&
		(odr_sequence_of(o, (Odr_fun) z_CostsOtherCharge, &(*p)->otherCharges,
		  &(*p)->num_otherCharges, "otherCharges") || odr_ok(o)) &&
		odr_sequence_end (o);
}

int z_Charge (ODR o, Z_Charge **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, z_IntUnit,
			&(*p)->cost, ODR_CONTEXT, 1, 0, "cost") &&
		odr_implicit_tag (o, z_Unit,
			&(*p)->perWhat, ODR_CONTEXT, 2, 1, "perWhat") &&
		odr_implicit_tag (o, z_HumanString,
			&(*p)->text, ODR_CONTEXT, 3, 1, "text") &&
		odr_sequence_end (o);
}

int z_DatabaseList (ODR o, Z_DatabaseList **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_DatabaseName, &(*p)->databases,
		&(*p)->num_databases, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_AttributeCombinations (ODR o, Z_AttributeCombinations **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, z_AttributeSetId,
			&(*p)->defaultAttributeSet, ODR_CONTEXT, 0, 0, "defaultAttributeSet") &&
		odr_implicit_settag (o, ODR_CONTEXT, 1) &&
		odr_sequence_of(o, (Odr_fun) z_AttributeCombination, &(*p)->legalCombinations,
		  &(*p)->num_legalCombinations, "legalCombinations") &&
		odr_sequence_end (o);
}

int z_AttributeCombination (ODR o, Z_AttributeCombination **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_AttributeOccurrence, &(*p)->occurrences,
		&(*p)->num_occurrences, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_AttributeValueList (ODR o, Z_AttributeValueList **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_StringOrNumeric, &(*p)->attributes,
		&(*p)->num_attributes, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int z_AttributeOccurrence (ODR o, Z_AttributeOccurrence **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 3, Z_AttributeOcc_any_or_none,
		(Odr_fun) odr_null, "any_or_none"},
		{ODR_IMPLICIT, ODR_CONTEXT, 4, Z_AttributeOcc_specific,
		(Odr_fun) z_AttributeValueList, "specific"},
		{-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_AttributeSetId,
			&(*p)->attributeSet, ODR_CONTEXT, 0, 1, "attributeSet") &&
		odr_implicit_tag (o, odr_integer,
			&(*p)->attributeType, ODR_CONTEXT, 1, 0, "attributeType") &&
		odr_implicit_tag (o, odr_null,
			&(*p)->mustBeSupplied, ODR_CONTEXT, 2, 1, "mustBeSupplied") &&
		odr_choice (o, arm, &(*p)->attributeValues, &(*p)->which, 0) &&
		odr_sequence_end (o);
}