static int
medin_authorlist( xml *node, fields *info )
{
int fstatus, status;
newstr name;
char *tag;
newstr_init( &name );
node = node->down;
while ( node ) {
if ( xml_tagexact( node, "Author" ) && node->down ) {
status = medin_author( node->down, &name );
tag = "AUTHOR";
if ( !name.len ) {
status = medin_corpauthor( node->down, &name );
tag = "AUTHOR:CORP";
}
if ( newstr_memerr( &name ) || status!=BIBL_OK ) return BIBL_ERR_MEMERR;
if ( name.len ) {
fstatus = fields_add(info,tag,name.data,0);
if ( fstatus!=FIELDS_OK ) return BIBL_ERR_MEMERR;
}
newstr_empty( &name );
}
node = node->next;
}
newstr_free( &name );
return BIBL_OK;
}
static int
medin_corpauthor( xml *node, newstr *name )
{
if ( xml_tagexact( node, "CollectiveName" ) ) {
newstr_strcpy( name, xml_data( node ) );
} else if ( node->next ) medin_corpauthor( node->next, name );
return BIBL_OK;
}
static int
medin_corpauthor( xml *node, str *name )
{
if ( xml_tag_matches( node, "CollectiveName" ) ) {
str_strcpy( name, xml_value( node ) );
} else if ( node->next ) medin_corpauthor( node->next, name );
return BIBL_OK;
}
