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
88
89
90
91
92
93
94
95
96
97
98
99
100
|
/*
* title.c
*
* process titles into title/subtitle pairs for MODS
*
* Copyright (c) Chris Putnam 2004-2021
*
* Source code released under the GPL version 2
*
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "bibdefs.h"
#include "str.h"
#include "fields.h"
#include "title.h"
#include "is_ws.h"
int
add_title( fields *info, const char *tag, const char *value, int level, unsigned char nosplittitle )
{
str title, subtitle;
const char *p, *q;
int status;
str_init( &title );
str_init( &subtitle );
if ( nosplittitle ) q = NULL;
else {
q = strstr( value, ": " );
if ( !q ) q = strstr( value, "? " );
}
if ( !q ) str_strcpyc( &title, value );
else {
p = value;
while ( p!=q ) str_addchar( &title, *p++ );
if ( *q=='?' ) str_addchar( &title, '?' );
q++;
q = skip_ws( q );
while ( *q ) str_addchar( &subtitle, *q++ );
}
if ( strncasecmp( "SHORT", tag, 5 ) ) {
if ( str_has_value( &title ) ) {
status = fields_add( info, "TITLE", str_cstr( &title ), level );
if ( status!=FIELDS_OK ) return BIBL_ERR_MEMERR;
}
if ( str_has_value( &subtitle ) ) {
status = fields_add( info, "SUBTITLE", str_cstr( &subtitle ), level );
if ( status!=FIELDS_OK ) return BIBL_ERR_MEMERR;
}
} else {
if ( str_has_value( &title ) ) {
status = fields_add( info, "SHORTTITLE", str_cstr( &title ), level );
if ( status!=FIELDS_OK ) return BIBL_ERR_MEMERR;
}
/* no SHORT-SUBTITLE! */
}
str_free( &subtitle );
str_free( &title );
return BIBL_OK;
}
/* title_combine()
*
* Combine a main title and a subtitle into a full title.
*
* Example:
* Main title = "A Clearing in the Distance"
* Subtitle = "The Biography of Frederick Law Olmstead"
* Full title = "A Clearing in the Distance: The Biography of Frederick Law Olmstead"
* Example:
* Main title = "What Makes a Good Team Player?"
* Subtitle = "Personality and Team Effectiveness"
* Full title = "What Makes a Good Team Player? Personality and Team Effectiveness"
*/
void
title_combine( str *fullttl, str *mainttl, str *subttl )
{
str_empty( fullttl );
if ( !mainttl ) return;
str_strcpy( fullttl, mainttl );
if ( subttl ) {
if ( str_has_value( mainttl ) ) {
if ( mainttl->data[ mainttl->len - 1 ] != '?' && mainttl->data[ mainttl->len - 1] != ':' )
str_strcatc( fullttl, ": " );
else
str_strcatc( fullttl, " " );
}
str_strcat( fullttl, subttl );
}
}
|
