int
risin_processf( fields *risin, char *p, char *filename, long nref )
{
newstr tag, data;
newstr_init( &tag );
newstr_init( &data );
while ( *p ) {
if ( risin_istag( p ) ) {
p = process_line( &tag, &data, p );
/* no anonymous fields allowed */
/* if ( tag.len && data.len )*/
if ( tag.len )
fields_add( risin, tag.data, data.data, 0 );
} else {
p = process_line2( &tag, &data, p );
if ( data.len && risin->nfields>0 ) {
newstr *od;
od = &(risin->data[risin->nfields-1] );
newstr_addchar( od, ' ' );
newstr_strcat( od, data.data );
}
}
newstr_empty( &tag );
newstr_empty( &data );
}
newstr_free( &tag );
newstr_free( &data );
return 1;
}
static int
risin_processf( fields *risin, char *p, char *filename, long nref, param *pm )
{
newstr tag, data;
int status, n;
newstrs_init( &tag, &data, NULL );
while ( *p ) {
if ( risin_istag( p ) )
p = process_line( &tag, &data, p );
/* no anonymous fields allowed */
if ( tag.len ) {
status = fields_add( risin, tag.data, data.data, 0 );
if ( status!=FIELDS_OK ) return 0;
} else {
p = process_line2( &tag, &data, p );
n = fields_num( risin );
if ( data.len && n>0 ) {
newstr *od;
od = fields_value( risin, n-1, FIELDS_STRP );
newstr_addchar( od, ' ' );
newstr_strcat( od, data.data );
}
}
newstrs_empty( &tag, &data, NULL );
}
newstrs_free( &tag, &data, NULL );
return 1;
}
static int
risin_readf( FILE *fp, char *buf, int bufsize, int *bufpos, newstr *line,
newstr *reference, int *fcharset )
{
int haveref = 0, inref = 0, readtoofar = 0;
unsigned char *up;
char *p;
*fcharset = CHARSET_UNKNOWN;
while ( !haveref && readmore( fp, buf, bufsize, bufpos, line ) ) {
if ( !line->data || line->len==0 ) continue;
p = &( line->data[0] );
/* Recognize UTF8 BOM */
up = (unsigned char * ) p;
if ( line->len > 2 &&
up[0]==0xEF && up[1]==0xBB && up[2]==0xBF ) {
*fcharset = CHARSET_UNICODE;
p += 3;
}
/* Each reference starts with 'TY - ' &&
* ends with 'ER - ' */
if ( strncmp(p,"TY - ",6)==0 ) {
if ( !inref ) {
inref = 1;
} else {
/* we've read too far.... */
readtoofar = 1;
inref = 0;
}
}
if ( risin_istag( p ) ) {
if ( !inref ) {
fprintf(stderr,"Warning. Tagged line not "
"in properly started reference.\n");
fprintf(stderr,"Ignored: '%s'\n", p );
} else if ( !strncmp(p,"ER -",5) ) {
inref = 0;
} else {
newstr_addchar( reference, '\n' );
newstr_strcat( reference, p );
}
}
/* not a tag, but we'll append to last values ...*/
else if ( inref && strncmp(p,"ER -",5)) {
newstr_addchar( reference, '\n' );
newstr_strcat( reference, p );
}
if ( !inref && reference->len ) haveref = 1;
if ( !readtoofar ) newstr_empty( line );
}
if ( inref ) haveref = 1;
return haveref;
}
