ill-core.c

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

		&(*p)->num, name))
		return 1;
	*p = 0;
	return odr_missing(o, opt, name);
}

int ill_Delivery_Service (ODR o, ILL_Delivery_Service **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_EXPLICIT, ODR_CONTEXT, 7, ILL_Delivery_Service_physical_delivery,
		(Odr_fun) ill_Transportation_Mode, "physical_delivery"},
		{ODR_IMPLICIT, ODR_CONTEXT, 50, ILL_Delivery_Service_electronic_delivery,
		(Odr_fun) ill_Delivery_ServiceElectronic_delivery, "electronic_delivery"},
		{-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 ill_Electronic_Delivery_Service_0 (ODR o, ILL_Electronic_Delivery_Service_0 **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_oid,
			&(*p)->e_delivery_mode, ODR_CONTEXT, 0, 0, "e_delivery_mode") &&
		odr_explicit_tag (o, odr_any,
			&(*p)->e_delivery_parameters, ODR_CONTEXT, 1, 0, "e_delivery_parameters") &&
		odr_sequence_end (o);
}

int ill_Electronic_Delivery_Service_1 (ODR o, ILL_Electronic_Delivery_Service_1 **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_oid,
			&(*p)->document_type_id, ODR_CONTEXT, 2, 0, "document_type_id") &&
		odr_explicit_tag (o, odr_any,
			&(*p)->document_type_parameters, ODR_CONTEXT, 3, 0, "document_type_parameters") &&
		odr_sequence_end (o);
}

int ill_Electronic_Delivery_Service (ODR o, ILL_Electronic_Delivery_Service **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_IMPLICIT, ODR_CONTEXT, 0, ILL_Electronic_Delivery_Service_e_delivery_address,
		(Odr_fun) ill_System_Address, "e_delivery_address"},
		{ODR_IMPLICIT, ODR_CONTEXT, 1, ILL_Electronic_Delivery_Service_e_delivery_id,
		(Odr_fun) ill_System_Id, "e_delivery_id"},
		{-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, ill_Electronic_Delivery_Service_0,
			&(*p)->e_delivery_service, ODR_CONTEXT, 0, 1, "e_delivery_service") &&
		odr_implicit_tag (o, ill_Electronic_Delivery_Service_1,
			&(*p)->document_type, ODR_CONTEXT, 1, 1, "document_type") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->e_delivery_description, ODR_CONTEXT, 4, 1, "e_delivery_description") &&
		odr_constructed_begin (o, &(*p)->u, ODR_CONTEXT, 5, "e_delivery_details") &&
		odr_choice (o, arm, &(*p)->u, &(*p)->which, 0) &&
		odr_constructed_end (o) &&
		odr_explicit_tag (o, ill_String,
			&(*p)->name_or_code, ODR_CONTEXT, 6, 1, "name_or_code") &&
		odr_implicit_tag (o, ill_ISO_Time,
			&(*p)->delivery_time, ODR_CONTEXT, 7, 1, "delivery_time") &&
		odr_sequence_end (o);
}

int ill_Error_Report (ODR o, ILL_Error_Report **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, ill_String,
			&(*p)->correlation_information, ODR_CONTEXT, 0, 0, "correlation_information") &&
		odr_implicit_tag (o, ill_Report_Source,
			&(*p)->report_source, ODR_CONTEXT, 1, 0, "report_source") &&
		odr_explicit_tag (o, ill_User_Error_Report,
			&(*p)->user_error_report, ODR_CONTEXT, 2, 1, "user_error_report") &&
		odr_explicit_tag (o, ill_Provider_Error_Report,
			&(*p)->provider_error_report, ODR_CONTEXT, 3, 1, "provider_error_report") &&
		odr_sequence_end (o);
}

int ill_Estimate_Results (ODR o, ILL_Estimate_Results **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, ill_String,
			&(*p)->cost_estimate, ODR_CONTEXT, 0, 0, "cost_estimate") &&
		odr_implicit_settag (o, ODR_CONTEXT, 1) &&
		(odr_sequence_of(o, (Odr_fun) ill_Location_Info, &(*p)->locations,
		  &(*p)->num_locations, "locations") || odr_ok(o)) &&
		odr_sequence_end (o);
}

int ill_Extension (ODR o, ILL_Extension **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)->identifier, ODR_CONTEXT, 0, 0, "identifier") &&
		odr_implicit_tag (o, odr_bool,
			&(*p)->critical, ODR_CONTEXT, 1, 0, "critical") &&
		odr_explicit_tag (o, odr_any,
			&(*p)->item, ODR_CONTEXT, 2, 0, "item") &&
		odr_sequence_end (o);
}

int ill_General_Problem (ODR o, ILL_General_Problem **p, int opt, const char *name)
{
	return odr_enum (o, p, opt, name);
}

int ill_History_Report (ODR o, ILL_History_Report **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, ill_ISO_Date,
			&(*p)->date_requested, ODR_CONTEXT, 0, 1, "date_requested") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->author, ODR_CONTEXT, 1, 1, "author") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->title, ODR_CONTEXT, 2, 1, "title") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->author_of_article, ODR_CONTEXT, 3, 1, "author_of_article") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->title_of_article, ODR_CONTEXT, 4, 1, "title_of_article") &&
		odr_implicit_tag (o, ill_ISO_Date,
			&(*p)->date_of_last_transition, ODR_CONTEXT, 5, 0, "date_of_last_transition") &&
		odr_implicit_tag (o, odr_enum,
			&(*p)->most_recent_service, ODR_CONTEXT, 6, 0, "most_recent_service") &&
		odr_implicit_tag (o, ill_ISO_Date,
			&(*p)->date_of_most_recent_service, ODR_CONTEXT, 7, 0, "date_of_most_recent_service") &&
		odr_implicit_tag (o, ill_System_Id,
			&(*p)->initiator_of_most_recent_service, ODR_CONTEXT, 8, 0, "initiator_of_most_recent_service") &&
		odr_implicit_tag (o, ill_Shipped_Service_Type,
			&(*p)->shipped_service_type, ODR_CONTEXT, 9, 1, "shipped_service_type") &&
		odr_implicit_tag (o, ill_Transaction_Results,
			&(*p)->transaction_results, ODR_CONTEXT, 10, 1, "transaction_results") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->most_recent_service_note, ODR_CONTEXT, 11, 1, "most_recent_service_note") &&
		odr_sequence_end (o);
}

int ill_Hold_Placed_Results (ODR o, ILL_Hold_Placed_Results **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, ill_ISO_Date,
			&(*p)->estimated_date_available, ODR_CONTEXT, 0, 0, "estimated_date_available") &&
		odr_implicit_tag (o, ill_Medium_Type,
			&(*p)->hold_placed_medium_type, ODR_CONTEXT, 1, 1, "hold_placed_medium_type") &&
		odr_implicit_settag (o, ODR_CONTEXT, 2) &&
		(odr_sequence_of(o, (Odr_fun) ill_Location_Info, &(*p)->locations,
		  &(*p)->num_locations, "locations") || odr_ok(o)) &&
		odr_sequence_end (o);
}

int ill_APDU_Type (ODR o, ILL_APDU_Type **p, int opt, const char *name)
{
	return odr_enum (o, p, opt, name);
}

int ill_Service_Type (ODR o, ILL_Service_Type **p, int opt, const char *name)
{
	return odr_enum (o, p, opt, name);
}

int ill_String (ODR o, ILL_String **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{-1, -1, -1, ILL_String_GeneralString,
		 (Odr_fun) odr_generalstring, "GeneralString"},
		{-1, -1, -1, ILL_String_EDIFACTString,
		 (Odr_fun) ill_EDIFACTString, "EDIFACTString"},
		{-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 ill_Intermediary_Problem (ODR o, ILL_Intermediary_Problem **p, int opt, const char *name)
{
	return odr_enum (o, p, opt, name);
}

int ill_ISO_Date (ODR o, ILL_ISO_Date **p, int opt, const char *name)
{
	return odr_visiblestring (o, p, opt, name);
}

int ill_ISO_Time (ODR o, ILL_ISO_Time **p, int opt, const char *name)
{
	return odr_visiblestring (o, p, opt, name);
}

int ill_Item_Id (ODR o, ILL_Item_Id **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_enum,
			&(*p)->item_type, ODR_CONTEXT, 0, 1, "item_type") &&
		odr_implicit_tag (o, ill_Medium_Type,
			&(*p)->held_medium_type, ODR_CONTEXT, 1, 1, "held_medium_type") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->call_number, ODR_CONTEXT, 2, 1, "call_number") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->author, ODR_CONTEXT, 3, 1, "author") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->title, ODR_CONTEXT, 4, 1, "title") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->sub_title, ODR_CONTEXT, 5, 1, "sub_title") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->sponsoring_body, ODR_CONTEXT, 6, 1, "sponsoring_body") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->place_of_publication, ODR_CONTEXT, 7, 1, "place_of_publication") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->publisher, ODR_CONTEXT, 8, 1, "publisher") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->series_title_number, ODR_CONTEXT, 9, 1, "series_title_number") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->volume_issue, ODR_CONTEXT, 10, 1, "volume_issue") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->edition, ODR_CONTEXT, 11, 1, "edition") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->publication_date, ODR_CONTEXT, 12, 1, "publication_date") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->publication_date_of_component, ODR_CONTEXT, 13, 1, "publication_date_of_component") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->author_of_article, ODR_CONTEXT, 14, 1, "author_of_article") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->title_of_article, ODR_CONTEXT, 15, 1, "title_of_article") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->pagination, ODR_CONTEXT, 16, 1, "pagination") &&
		odr_explicit_tag (o, odr_external,
			&(*p)->national_bibliography_no, ODR_CONTEXT, 17, 1, "national_bibliography_no") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->iSBN, ODR_CONTEXT, 18, 1, "iSBN") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->iSSN, ODR_CONTEXT, 19, 1, "iSSN") &&
		odr_explicit_tag (o, odr_external,
			&(*p)->system_no, ODR_CONTEXT, 20, 1, "system_no") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->additional_no_letters, ODR_CONTEXT, 21, 1, "additional_no_letters") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->verification_reference_source, ODR_CONTEXT, 22, 1, "verification_reference_source") &&
		odr_sequence_end (o);
}

int ill_Location_Info (ODR o, ILL_Location_Info **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, ill_System_Id,
			&(*p)->location_id, ODR_CONTEXT, 0, 0, "location_id") &&
		odr_implicit_tag (o, ill_System_Address,
			&(*p)->location_address, ODR_CONTEXT, 1, 1, "location_address") &&
		odr_explicit_tag (o, ill_String,
			&(*p)->location_note, ODR_CONTEXT, 2, 1, "location_note") &&
		odr_sequence_end (o);
}

int ill_Locations_Results (ODR o, ILL_Locations_Results **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, ill_Reason_Locs_Provided,
			&(*p)->reason_locs_provided, ODR_CONTEXT, 0, 1, "reason_locs_provided") &&
		odr_implicit_settag (o, ODR_CONTEXT, 1) &&
		odr_sequence_of(o, (Odr_fun) ill_Location_Info, &(*p)->locations,
		  &(*p)->num_locations, "locations") &&
		odr_sequence_end (o);
}

int ill_Medium_Type (ODR o, ILL_Medium_Type **p, int opt, const char *name)
{
	return odr_enum (o, p, opt, name);
}

int ill_Name_Of_Person_Or_Institution (ODR o, ILL_Name_Of_Person_Or_Institution **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_EXPLICIT, ODR_CONTEXT, 0, ILL_Name_Of_Person_Or_Institution_name_of_person,
		(Odr_fun) ill_String, "name_of_person"},
		{ODR_EXPLICIT, ODR_CONTEXT, 1, ILL_Name_Of_Person_Or_Institution_name_of_institution,
		(Odr_fun) ill_String, "name_of_institution"},
		{-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 ill_Person_Or_Institution_Symbol (ODR o, ILL_Person_Or_Institution_Symbol **p, int opt, const char *name)
{
	static Odr_arm arm[] = {
		{ODR_EXPLICIT, ODR_CONTEXT, 0, ILL_Person_Or_Institution_Symbol_person_symbol,
		(Odr_fun) ill_String, "person_symbol"},
		{ODR_EXPLICIT, ODR_CONTEXT, 1, ILL_Person_Or_Institution_Symbol_institution_symbol,
		(Odr_fun) ill_String, "institution_symbol"},
		{-1, -1, -1, -1, (Odr_fun) 0, 0}
	};
	if (!odr_initmember(o, p, sizeof(**p)))