1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
|
/*
* pages.c
*
* Copyright (c) Chris Putnam 2016-2019
*
* Program and source code released under GPL verison 2
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "is_ws.h"
#include "utf8.h"
#include "pages.h"
/* extract_range()
*
* Handle input strings like:
*
* "1-15"
* " 1 - 15 "
* " 1000--- 1500"
* " 1 <<em-dash>> 10"
* " 107 111"
*/
static void
extract_range( str *input, str *begin, str *end )
{
/* -30 is the first character of a UTF8 em-dash and en-dash */
const char terminators[] = { ' ', '-', '\t', '\r', '\n', -30, '\0' };
const char *p;
str_empty( begin );
str_empty( end );
if ( input->len==0 ) return;
p = skip_ws( str_cstr( input ) );
while ( *p && !strchr( terminators, *p ) )
str_addchar( begin, *p++ );
p = skip_ws( p );
while ( *p=='-' ) p++;
while ( utf8_is_emdash( p ) ) p+=3;
while ( utf8_is_endash( p ) ) p+=3;
p = skip_ws( p );
while ( *p && !strchr( terminators, *p ) )
str_addchar( end, *p++ );
}
int
pages_add( fields *bibout, char *outtag, str *invalue, int level )
{
int fstatus, status = 1;
str start, stop;
str_init( &start );
str_init( &stop );
extract_range( invalue, &start, &stop );
if ( str_memerr( &start ) || str_memerr( &stop ) ) {
status = 0;
goto out;
}
if ( start.len>0 ) {
fstatus = fields_add( bibout, "PAGES:START", str_cstr( &start ), level );
if ( fstatus!=FIELDS_OK ) {
status = 0;
goto out;
}
}
if ( stop.len>0 ) {
fstatus = fields_add( bibout, "PAGES:STOP", str_cstr( &stop ), level );
if ( fstatus!=FIELDS_OK ) status = 0;
}
out:
str_free( &start );
str_free( &stop );
return status;
}
|