-
Notifications
You must be signed in to change notification settings - Fork 18
/
gb7714-2015ay.bbx
3176 lines (3001 loc) · 112 KB
/
gb7714-2015ay.bbx
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
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
%%
%% ---------------------------------------------------------------
%% biblatex-gb7714-2015 --- A biblatex implementation of the
%% GBT7714-2015 bibliography style,author year sequence
%% Maintained by huzhenzhen
%% E-mail: [email protected]
%% Released under the LaTeX Project Public License v1.3c or later
%% ---------------------------------------------------------------
%%
%
% 版本和时间信息
%
\def\versionofgbtstyle{2018/12/22 v1.0o}
\def\versionofbiblatex{\abx@version}
\ProvidesFile{gb7714-2015ay.bbx}[\versionofgbtstyle biblatex bibliography style]
\RequireBiber[3]%显式指定用biber后端
%=====================================================================
%加载标准样式
%=====================================================================
\RequireBibliographyStyle{authoryear}
\RequirePackage{xstring}%解决texlive2015的biblatex3.0不加载xstring包的问题
%=====================================================================
% 功能函数
%=====================================================================
%
% biblatex版本判断
% 20180405，v1.0k，为兼容biblatexv3.11增加toggle:iftlnine，HU zhenzhen
% 20181020，v1.0n，为不再使用xstring宏包做的修改，hzz
%
% 原理方法:当版本继续更新时，增加一个新的toggle用以处理新的旧版，最新版和未判断出来的版本永远用iftlatest
\providetoggle{iftlfive}\togglefalse{iftlfive} %处理biblatex3.2之前版本，时间2016-03-01前
\providetoggle{iftlsix}\togglefalse{iftlsix} %处理biblatex3.3开始改变姓名机制后版本，时间2016-03-01及以后
\providetoggle{iftlseven}\togglefalse{iftlseven}%处理biblatex3.7的兼容性，时间2016-12-01后
\providetoggle{iftleight}\togglefalse{iftleight}%处理biblatex3.8到3.9的兼容性，时间2017-11-01后到2017-12-01前
\providetoggle{iftlnine}\togglefalse{iftlnine} %处理biblatex10的兼容性，时间2017-12-01后
\providetoggle{iftlatest}\toggletrue{iftlatest} %假设是最新版biblatex
\@ifpackagelater{biblatex}{2014/04/01}{
\@ifpackagelater{biblatex}{2016/03/01}{
\@ifpackagelater{biblatex}{2016/12/01}{
\@ifpackagelater{biblatex}{2017/11/01}{
\@ifpackagelater{biblatex}{2017/12/01}{
\@ifpackagelater{biblatex}{2018/02/19}{}
{\toggletrue{iftlnine}\togglefalse{iftlatest}}}
{\toggletrue{iftleight}\togglefalse{iftlatest}}}
{\toggletrue{iftlseven}\togglefalse{iftlatest}}}
{\toggletrue{iftlsix}\togglefalse{iftlatest}}}
{\toggletrue{iftlfive}\togglefalse{iftlatest}}}
{\PackageError{biblatex}{Outdated 'biblatex' package}
{Please update biblatex, This is a fatal error.}}
\newcommand\defversion[2]{\csdef{codeversion#1#2}}%定义不同版本的命令
\newcommand\switchversion[2]{\csuse{codeversion#1#2}}%使用不同版本的命令
%
% 判断CJK字符的函数，用于判断作者等信息是否由中文字符构成
% v1.0k,20180509,hzz
%
% 原理方法:用biber中的perl方法代替。因为利用tex函数对字符判断时，当字符在宏
% 中时，基于`的方法无法解决GBK编码的问题，基于CJKsymbol的方法无法解决utf-8
% 编码用xelatex编译的问题。
%
% 原理是：利用perl正则将中文标识记录到域中，
% 然后利用\iffieldundef和\iffieldequalstr进行判断
\providetoggle{ifCJKforgbt}
\def\testCJKfirst#1{%
\iffieldundef{#1}{\togglefalse{ifCJKforgbt}}{%
\iffieldequalstr{#1}{cn}{\toggletrue{ifCJKforgbt}}{\togglefalse{ifCJKforgbt}}}}
%
% 2个卷的解析函数，用于连续出版物
%
% 原理方法: 范围起止间隔符号还是用-，而不是与date相同的/，因为有合期期刊的问题，需要用到/符号
\newcommand{\multivolparser}[1]{%
\IfSubStr{#1}{-}%
{\StrBefore{#1}{-}[\multivolfirst]\StrBehind{#1}{-}[\multivolsecond]}%
{\def\multivolfirst{#1}\def\multivolsecond{}}%
}
%
% 2个期的解析函数，用于连续出版物
%
\newcommand{\multinumberparser}[1]{%
\IfSubStr{#1}{-}%
{\StrBefore{#1}{-}[\multinumberfirst]\StrBehind{#1}{-}[\multinumbersecond]}%
{\def\multinumberfirst{#1}\def\multinumbersecond{}}%
}
% 对没有分隔符环境命令的低版本biblatex做增补，避免报错
%
\iftoggle{iftlfive}{
\def\blx@inf@delimdeclare#1#2{%
\blx@info{Delimiter '#1' in context '#2' already defined, overwriting}}
\def\blx@warn@delimuse#1#2{%
\blx@warning{Delimiter '#1' in context '#2' undefined}}
% Delimiter interface
% [<contextname, ...>]{<name, ...>}{<code>}
\newrobustcmd*{\DeclareDelimFormat}{%
\@ifstar
{\blx@declaredelimclear}
{\blx@declaredelim}}
\newrobustcmd*{\blx@declaredelimclear}[3][]{%
\ifcsvoid{blx@declaredelimcontexts@#2}
{}
{\def\do##1{\csundef{blx@printdelim@##1@#2}}%
\dolistcsloop{blx@declaredelimcontexts@#2}}%
\cslet{blx@declaredelimcontexts@#2}\@empty
\ifblank{#1}
{\blx@declaredelim{#2}{#3}}
{\blx@declaredelim[#1]{#2}{#3}}}
\newrobustcmd*{\blx@declaredelim}[3][]{%
\ifblank{#1}
{\blx@declaredelim@i{}{}{#2}{#3}}
{\def\do##1{%
\listcsadd{blx@declaredelimcontexts@#2}{##1}%
\blx@declaredelim@i{blx@printdelim@##1@}{##1}{#2}{#3}}%
\docsvlist{#1}}}%
\def\blx@declaredelim@i#1#2#3#4{%
\def\do@i##1{%
\ifcsdef{#1##1}
{\blx@inf@delimdeclare{##1}{#2}}
{}%
\csdef{#1##1}{#4}}%
\forcsvlist{\do@i}{#3}}
% *[<contextname, ...>]{<alias>}{<delim>}
\newrobustcmd*{\DeclareDelimAlias}{%
\@ifstar
{\blx@declaredelimalias}
{\blx@declaredelimaliasauto}}
\newrobustcmd*{\blx@declaredelimalias}[3][]{%
\ifblank{#1}
{\blx@declaredelimalias@i{}{#2}{#3}}
{\def\do##1{%
\blx@declaredelimalias@i{blx@printdelim@##1@}{#2}{#3}}%
\docsvlist{#1}}}
\newrobustcmd*{\blx@declaredelimaliasauto}[2]{%
\blx@declaredelimalias@i{}{#1}{#2}%
\ifcsvoid{blx@declaredelimcontexts@#2}
{}
{\def\do##1{%
\blx@declaredelimalias@i{blx@printdelim@##1@}{#1}{#2}}%
\dolistcsloop{blx@declaredelimcontexts@#2}}}
\def\blx@declaredelimalias@i#1#2#3{%
\ifcsdef{#1#2}
{\blx@inf@delimdeclare{#2}{#1}}
{}%
\csdef{#1#2}{\csuse{#1#3}}}
\def\blx@delimcontext{none}
\newcommand*{\printdelim}[2][]{%
\ifblank{#1}
{\ifcsdef{blx@printdelim@\blx@delimcontext @#2}
{\csuse{blx@printdelim@\blx@delimcontext @#2}}
{\ifcsdef{#2}% fall back on legacy macros
{\csuse{#2}}
{\blx@warn@delimuse{#2}{*}}}}
{\ifcsdef{blx@printdelim@#1@#2}
{\csuse{blx@printdelim@#1@#2}}
{\blx@warn@delimuse{#2}{#1}}}}
\newcommand*{\delimcontext}[1]{%
\edef\blx@delimcontext{\blx@delimcontextalias{#1}}}
\def\blx@delimcontextalias#1{%
\ifcsdef{blx@delimcontextalias@#1}
{\csuse{blx@delimcontextalias@#1}}
{#1}}
\newcommand*{\DeclareDelimcontextAlias}[2]{%
\csgdef{blx@delimcontextalias@#1}{#2}}
}{}
%=====================================================================
% 数据模型定义
%=====================================================================
%定义类型和载体标识，从gb内容看载体基本属于介质。
%为与lee zeping的bst的样式统一，使用mark和medium这两域名
%为单个条目的姓名格式控制增加nameformat和namefmtid两个域
%为缩略信息文献表增加了shortbooktitle域
\DeclareDatamodelFields[type=field,datatype=literal]{mark,medium,nameformat}
\DeclareDatamodelFields[type=field,datatype=integer]{namefmtid}
\DeclareDatamodelFields[type=field,datatype=literal]{shortbooktitle}
%=====================================================================
% 设置宏包选项
%=====================================================================
%
% 增加一个控制是否输出文献类型和载体标识的选项
%
% 原理方法:
% 对于biblatex3.4以上版本DeclareBibliographyOption命令中的[datatype]如果是boolean，那么是可以省略的
% 所以用老版本的不用[datatype]的命令可以兼容所有biblatex版本
\newtoggle{bbx:gbtype}
%\DeclareBibliographyOption[boolean]{gbtype}[true]{%biblatex高版本
\DeclareBibliographyOption{gbtype}[true]{%biblatex低版本
\settoggle{bbx:gbtype}{#1}}
\ExecuteBibliographyOptions{gbtype}
%
% 增加一个源文件编码选择选项，当true时可以使用GBK编码。
% v1.0k, 2018.05.08, by hzz
%
% 原理方法：将需要输出的中文字符串用命令形式表示存储，采用utf8编码时采用bbx文档
% 内的定义即是utf8编码的中文字符串，但tex源文件是gbk编码时，利用gb7714-2015-gbk.def
% 文档内的gbk编码的字符串覆盖。这种覆盖只能在宏包末尾加载时成功实现，所以使用
% AtEndOfPackage。该解决思路源自biblatex-caspervector宏包。
% 另外注意：
% gbk编码的tex文档，利用pdflatex/latex能正确编译，利用xelatex能编译，但中文显示乱码
% 在源文档前面增加 XeTeX 原语：\XeTeXinputencoding "GBK" 后，显示正常
% utf-8编码的tex文档，利用xelatex能正确编译，而pdflatex/latex不能编译。
\newtoggle{bbx:codegbk}
\DeclareBibliographyOption{gbcodegbk}[false]{%
\settoggle{bbx:codegbk}{#1}}
\ExecuteBibliographyOptions{gbcodegbk}
\def\str@bibliography{参考文献}
\def\str@references{参考文献}
\def\str@bytranslator{译}
\def\str@andotherscn{等}
\def\str@backrefpage{引用页}
\def\str@backrefpages{引用页}
\def\str@noaddress{出版地不详}
\def\str@nopublisher{出版者不详}
\def\str@edition{版}
\def\str@volumecn{卷}
\def\str@numbercn{册}
\def\str@serialcn{第}
\AtEndOfPackage{%
\iftoggle{bbx:codegbk}{%
\ExecuteBibliographyOptions{texencoding = GBK}
\input{gb7714-2015-gbk.def}
}{}}
%
% 增加一个严格按GB/T 7714-2015给出著录格式控制域的输出的选项
% v1.0k, 2018.05.08, by hzz
%
% 原理方法:
% 默认设置该选项为真，进而不输出GB/T 7714-2015中没有的域的信息
% 这样可以避免因为bib文件带有多余的域的信息的输出，比如因为bibtex样式
% 可能需要用于中英文判断的language域的信息。
\newtoggle{bbx:gbstrict}
\DeclareBibliographyOption{gbstrict}[true]{%
\settoggle{bbx:gbstrict}{#1}}
\ExecuteBibliographyOptions{gbstrict}
%
% 增加一个控制标题域超链接设置的选项
% v1.0k, 2018.05.24, by hzz
%
% 原理方法:
% 利用标题域格式来实现，默认设置该选项为false，不做超链接。
% 设置为true，则标题设置超链接
\newtoggle{bbx:titlelink}
\DeclareBibliographyOption{gbtitlelink}[false]{%
\settoggle{bbx:titlelink}{#1}}
\ExecuteBibliographyOptions{gbtitlelink}
%
% 增加一个控制参考文献标题是否能够被ctex宏包设置的选项
% v1.0l, 2018.07.02, by hzz
%
% 原理方法:
% 重定义biblatex的宏，去除使用本地化字符串的方式，是的可以利用ctexset进行设置
\newtoggle{bbx:ctexset}
\DeclareBibliographyOption{gbctexset}[true]{%
\settoggle{bbx:ctexset}{#1}}
\ExecuteBibliographyOptions{gbctexset}
\AtEndOfPackage{%
\iftoggle{bbx:ctexset}{%
\def\blx@defbibstrings#1#2{%
\def\do##1{\csundef{abx@lstr@##1}\csundef{abx@sstr@##1}}%
\abx@dostrings
\csuse{abx@strings@#1}%
\setkeys{blx@lbx}{#2}%
\let\do\blx@defbibstrings@i
\csxdef{abx@strings@#1}{\abx@dostrings}%
}
}{}}
%
% 增加一个恢复域格式为标准样式的控制选项
% v1.0k, 2018.05.15, by hzz
%
% 原理方法:
% 默认设置该选项为false，采用国标要求的域格式输出相关域
% 当设置该选项为true时，则重新利用标准样式的域格式输出相关的域
\newtoggle{bbx:gbfieldstd}
\DeclareBibliographyOption{gbfieldstd}[false]{%
\settoggle{bbx:gbfieldstd}{#1}%
\ifstrequal{#1}{false}{}{\execgbfdfmtstd}%
}
\ExecuteBibliographyOptions{gbfieldstd}
%
% 增加一个出版项自动处理控制选项，当true时使用出版者不详等信息补充缺失的出版信息。
%
\newtoggle{bbx:gbpub}
\DeclareBibliographyOption{gbpub}[true]{%
%\settoggle{bbx:gbpub}{#1} %或采用下面这一句
\ifstrequal{#1}{false}{\togglefalse{bbx:gbpub}}{\toggletrue{bbx:gbpub}}}
\ExecuteBibliographyOptions{gbpub}
%
% 增加控制析出文献来源前的标点符号//输出的选项
% v1.0k, 2018.04.20,added in by hzz
\newtoggle{bbx:gbpunctin}
\DeclareBibliographyOption{gbpunctin}[true]{%
\settoggle{bbx:gbpunctin}{#1}}
\ExecuteBibliographyOptions{gbpunctin}
%
% 选项设置
%
\ExecuteBibliographyOptions{
useprefix = true, %名字的信息包括前缀
date = year, %日期仅写到年
maxbibnames=3, %将文献列表和引用中最大名字数量区分开
minbibnames=3,
isbn=false,
sorting=gb7714-2015,
sortlocale=zh__pinyin,%zh__big5han,%zh__stroke,%zh__gb2312han,%zh__pinyin,
}
%
%为日期相关选项增加选项值gb7714-2015
%
\csdef{mkdaterangegb7714-2015}#1{%
\begingroup
\blx@metadateinfo{#1}%
\iffieldundef{#1year}
{}
{\printtext[#1date]{%
\blx@gbdate{#1}{}}}%
\endgroup}
\newrobustcmd*{\blx@gbdate}[3][]{%
\dateeraprintpre{#2#3year}%
\blx@imc@forcezerosy{\thefield{#2#3year}}\ifblank{#1}{}{\printfield{#1}}%
\iffieldundef{#2#3month}{}{\hyphen\blx@imc@forcezerosmdt{\thefield{#2#3month}}}%
\iffieldundef{#2#3day}{}{\hyphen\blx@imc@forcezerosmdt{\thefield{#2#3day}}}}
%为姓名格式选择增加的计数器
\newcounter{gbnamefmtcase}
\def\thegbnamefmtcase{\the\c@gbnamefmtcase}
%为引用标签标注/文献表中本地化字符串中英文选择增加的计数器/命令
\newcounter{gbcitelocalcase}
\newcounter{gbbiblocalcase}
\def\thegbcitelocalcase{\the\c@gbcitelocalcase}
\def\thegbbiblocalcase{\the\c@gbbiblocalcase}
\@ifpackagelater{biblatex}{2016/03/27}
{ % 针对biblatex>=3.3版本的选项设置
% 增加本地化字符串的中英文切换选项
% gbcitelocal指标注中的本地化字符串
% gbbiblocal 指文献表中的本地化字符串
% gblocal 指设置文献表和标注中的本地化字符串
% v1.0o，20190103，hzz
%
\DeclareBibliographyOption[string]{gbcitelocal}[gb7714-2015]{%
\ifstrequal{#1}{gb7714-2015}{\setcounter{gbcitelocalcase}{0}}{}%
\ifstrequal{#1}{chinese}{\setcounter{gbcitelocalcase}{1}}{}%
\ifstrequal{#1}{english}{\setcounter{gbcitelocalcase}{2}}{}%
}
\ExecuteBibliographyOptions{gbcitelocal}
\DeclareBibliographyOption[string]{gbbiblocal}[gb7714-2015]{%
\ifstrequal{#1}{gb7714-2015}{\setcounter{gbbiblocalcase}{0}}{}%
\ifstrequal{#1}{chinese}{\setcounter{gbbiblocalcase}{1}}{}%
\ifstrequal{#1}{english}{\setcounter{gbbiblocalcase}{2}}{}%
}
\ExecuteBibliographyOptions{gbbiblocal}
\DeclareBibliographyOption[string]{gblocal}[gb7714-2015]{%
\ExecuteBibliographyOptions{gbbiblocal=#1}%
\ExecuteBibliographyOptions{gbcitelocal=#1}%
}
%\ExecuteBibliographyOptions{gblocal} %默认值已经通过两个相关选项设置
%
% 增加序号标签格式处理选项，作者年制不做处理，给出只为兼容选项考虑
% v1.0l,20180623,hzz
%
\DeclareBibliographyOption[string]{gbbiblabel}[bracket]{}
%
% 增加姓名大小写格式处理选项
%
\DeclareBibliographyOption[string]{gbnamefmt}[uppercase]{%
\ifstrequal{#1}{uppercase}{\setcounter{gbnamefmtcase}{0}}{}%
\ifstrequal{#1}{lowercase}{\setcounter{gbnamefmtcase}{1}}{}%
\ifstrequal{#1}{givenahead}{\setcounter{gbnamefmtcase}{2}}{}%given-family
\ifstrequal{#1}{familyahead}{\setcounter{gbnamefmtcase}{3}}{}
\ifstrequal{#1}{pinyin}{\setcounter{gbnamefmtcase}{4}}{}%family-given
}
\ExecuteBibliographyOptions{gbnamefmt}
%
% 增加标签对齐选项
%
%因为在作者年制中，不需要使用，这里也增加，为了与顺序编码制的兼容性考虑。
\DeclareBibliographyOption[string]{gbalign}[right]{}%
%增加一个处理佚名或noauthor的控制选项
\DeclareBibliographyOption{gbnoauthor}[true]{%
\ifstrequal{#1}{false}{}{\dealnoathor}}
%\ExecuteBibliographyOptions{gbnoauthor=true}%对于需要展开较早(展开层级优先)的选项，这一执行无效，只能用宏包加载时给出的选项。
}
{
%
% 增加序号标签格式处理选项，作者年制不做处理，给出只为兼容选项考虑
% v1.0l，20180623，hzz
%
\DeclareBibliographyOption{gbbiblabel}[bracket]{}
%
% 增加姓名大小写格式处理选项
%
\DeclareBibliographyOption{gbnamefmt}[uppercase]{%
\ifstrequal{#1}{uppercase}{\setcounter{gbnamefmtcase}{0}}{}%
\ifstrequal{#1}{lowercase}{\setcounter{gbnamefmtcase}{1}}{}%
\ifstrequal{#1}{givenahead}{\setcounter{gbnamefmtcase}{2}}{}%given-family
\ifstrequal{#1}{familyahead}{\setcounter{gbnamefmtcase}{3}}{}
\ifstrequal{#1}{pinyin}{\setcounter{gbnamefmtcase}{4}}{}%family-given
}
\ExecuteBibliographyOptions{gbnamefmt}
%
% 增加标签对齐选项
%
%因为在作者年制中，不需要使用，这里也增加，为了与顺序年制的兼容性考虑。
\DeclareBibliographyOption{gbalign}[right]{}%
%增加一个处理佚名或noauthor的控制选项
\DeclareBibliographyOption{gbnoauthor}[true]{%
\ifstrequal{#1}{false}{}{\dealnoathor}}
%\ExecuteBibliographyOptions{gbnoauthor=true}%对于需要展开较早(展开层级优先)的选项，这一执行无效，只能用宏包加载时给出的选项。
}
%
% 针对biblatex<3.3版本的选项设置，比如texlive2015中的3.0版
%
\defversion{3.0}{opt}{
\ExecuteBibliographyOptions{
firstinits = true, %名字有缩写，参考3.1.2.3 Internal
}
}
%
% 针对3.3<=biblatex<3.5版本的选项设置，比如texlive2016中的3.4版
%
\defversion{3.4}{opt}{
\ExecuteBibliographyOptions{
giveninits = true,
}
}
%
% 针对3.7<=biblatex<=3.9版本的选项设置，比如texlive2017中的3.7版
%
\defversion{3.7}{opt}{
\ExecuteBibliographyOptions{
giveninits = true,
urldate =edtf,
eventdate =edtf,
}
}
%
% 针对3.10<=biblatex版本的选项设置，比如texlive2018中的3.11版
%
\defversion{3.10}{opt}{
\ExecuteBibliographyOptions{
giveninits = true,
urldate =gb7714-2015,%iso
eventdate =gb7714-2015,%iso
}
}
%
% 根据biblatex版本信息，选择选项设置
%
% 原理方法:如下这种选择机制能自动兼容更新的版本，但对于老版本
% 必须要把情况列全。
\iftoggle{iftlfive}{\switchversion{3.0}{opt}}{}%biblatex<=3.2
\iftoggle{iftlsix}{\switchversion{3.4}{opt}}{}%3.3<=biblatex<=3.6
\iftoggle{iftlseven}{\switchversion{3.7}{opt}}{}%biblatex=3.7
\iftoggle{iftleight}{\switchversion{3.7}{opt}}{}%3.8<=biblatex<=3.9
\iftoggle{iftlnine}{\switchversion{3.10}{opt}}{}%biblatex=3.10
\iftoggle{iftlatest}{\switchversion{3.10}{opt}}{}%biblatex最新3.11
%=====================================================================
%设置本地化字符串
%=====================================================================
%
% 新建当地化字符串，用来记录“等”字符、“和”字符
%
\NewBibliographyString{andotherscn}
\NewBibliographyString{andothersincitecn}
\NewBibliographyString{andothersincite}
\NewBibliographyString{andcn}
\NewBibliographyString{andincitecn}
\NewBibliographyString{andincite}
\NewBibliographyString{volumecn}
\NewBibliographyString{numbercn}
\NewBibliographyString{serialcn}
%
% 修改一些当地化字符串
%
% 原理方法:直接利用当地化格式english修改出一些中文的格式，具体修改内容参考english.lbx文件
% 当然也可以增加比如上面定义的andotherscn
% 注意:在lbx文件和bbx文件中定义本地字符串的不同语法，两个参数和一个参数的区别
\DefineBibliographyStrings{english}{
bibliography = {\str@bibliography},
references = {\str@references},
bytranslator= {\addcomma\ \str@bytranslator\adddot}, %将trans. by 改成 译
and = {\addcomma},%将第2和3人名见的and符号改成 逗号，用\finalnamedelim命令也可以定义，参见3.9.1节
andcn = {\addcomma},%\str@andcn\ and本地化字符串的中文对应词
andincitecn = {\addcomma},%将标注中的分开，便于与文献表中的区分
andincite = {\addcomma},
%andothers = {et al.}, %将超过3个人名的省略，et al.改成为 等
andotherscn = {\str@andotherscn},%将超过3个人名的省略，et al.改成为 等
andothersincitecn={\str@andotherscn},%将标注中的分开，便于与文献表中的区分
andothersincite={et al.},
backrefpage = {\str@backrefpage:},
backrefpages = {\str@backrefpages:},
in={in\intitlepunct},
volumecn={\str@volumecn},
numbercn={\str@numbercn},
serialcn={\str@serialcn}
}
%=====================================================================
%动态数据修改，修改输入的源文件数据，用于中文判断等操作
%=====================================================================
%
% 修改输入的参考文献数据，源文件层的操作
%
% 原理方法:增加文献标识符如[M],[J]等
% 把作者和译者信息准确的记录到userf，usere中，用于后面判断是否是cjk字符。
% 注意:这里用userf，usere而不是namee，namef，是因为只有把name列表转成域，才能有效读取姓名中的字符，
% 如果用namee，namef，name信息会自动解析，所以就不能为cjk判断提供需要的信息
% 注意\DeclareSourcemap命令对于biblatex3.11以下版本只能出现一次，3.11版开始支持多个
\DeclareSourcemap{
\maps[datatype=bibtex]{
\map[overwrite]{%用于处理zotero从cnki导出中文文献姓名中存在逗号的情况
\step[fieldsource={author}, match=\regexp{([\x{2FF0}-\x{9FA5}])\,\s*}, replace=\regexp{$1}]
}
\map{%
\step[fieldsource=mark,final]
\step[fieldset=usera, origfieldval]
}
\map{%
\step[fieldsource=nameformat,match=lowercase,final]
\step[fieldset=namefmtid,fieldvalue={1}]
}
\map{%
\step[fieldsource=nameformat,match=givenahead,final]
\step[fieldset=namefmtid,fieldvalue={2}]
}
\map{%
\step[fieldsource=nameformat,match=familyahead,final]
\step[fieldset=namefmtid,fieldvalue={3}]
}
\map{%
\step[fieldsource=nameformat,match=pinyin,final]
\step[fieldset=namefmtid,fieldvalue={4}]
}
\map{%
%\perdatasource{examples.bib}
\pertype{article}
\step[fieldset=usera, fieldvalue={J}]
}
\map{
\pertype{periodical}
\step[fieldset=usera, fieldvalue={J}]
\step[fieldsource=author] %有时会把author和editor混淆，处理后避免该问题
\step[fieldset=editor, origfieldval]
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{newspaper}%增加一个新闻报纸的类型newspaper
\step[fieldset=usera, fieldvalue={N}]%因为没有专门的驱动，这句的目的是定义一个usera域，方便映射为article后判断
\step[fieldset=note, fieldvalue=news]
}
\map{
\pertype{database}%对应增加的一个数据库类型database
\step[fieldset=usera, fieldvalue={DB}]%没有专门的驱动，定义一个usera域，方便映射后使用
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{dataset}%对应增加的一个数据集类型dataset
\step[fieldset=usera, fieldvalue={DS}]%没有专门的驱动，定义一个usera域，方便映射后使用
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{software}%对应增加的一个软件类型software
\step[fieldset=usera, fieldvalue={CP}]%没有专门的驱动，定义一个usera域，方便映射后使用
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{map}%对应增加的一个舆图类型map
\step[fieldset=usera, fieldvalue={CM}]%没有专门的驱动，定义一个usera域，方便映射后使用
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{archive}%对应增加的一个档案类型archive
\step[fieldset=usera, fieldvalue={A}]%没有专门的驱动，定义一个usera域，方便映射后使用
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{misc}%当misc类型带有网址时，将其转换为online类型
\step[fieldsource=url,final]
\step[typesource=misc,typetarget=online]
}
\map{
\pertype{misc}%对应增加的一个备选类型misc
\step[fieldset=usera, fieldvalue={Z}]%没有专门的驱动，定义一个usera域，方便映射后使用
}
\map{
\pertype{book}
\pertype{inbook}
\step[fieldset=usera, fieldvalue={M}]
\step[fieldsource=version] %有时会把version和edition混淆，处理后避免该问题，可以直接用version
\step[fieldset=edition, origfieldval]
}
\map{
\pertype{standard}%兼容老的standard类型
\step[fieldset=usera, fieldvalue={S}]%因为没有专门的驱动，这句的目的是定义一个usera域，方便映射为book和inbook后判断
\step[fieldset=note, fieldvalue=standard]
}
\map{
\pertype{patent}
\step[fieldset=usera, fieldvalue={P}]
}
\map{
\pertype{inproceedings}
\pertype{conference}%兼容老的conference类型
\step[fieldset=usera, fieldvalue={C}]
\step[fieldsource=institution] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=publisher, origfieldval]
\step[fieldsource=editor] %
\step[fieldset=bookauthor, origfieldval]
}
\map{
\pertype{proceedings}
\step[fieldset=usera, fieldvalue={C}]
\step[fieldsource=institution] %有时会把publisher和institution混淆，这里处理后就没有这个问题
\step[fieldset=publisher, origfieldval]
\step[fieldsource=editor] %%有的时候可能只填写了编者，没有author，把它复制一下
\step[fieldset=author, origfieldval]
}
\map{
\pertype{report}
\pertype{techreport}%兼容老的techreport类型
\step[fieldset=usera, fieldvalue={R}]
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{thesis}
\pertype{mastersthesis}%兼容老的mastersthesis和phdthesis类型
\pertype{phdthesis}
\step[fieldset=usera, fieldvalue={D}]
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{online}
\pertype{electronic}%兼容老的electronic类型
\pertype{www}%兼容老的www类型
\step[fieldset=usera, fieldvalue={EB}]
}
\map{
\pertype{manual}
\step[fieldset=usera, fieldvalue={A}]
\step[fieldsource=edition] %有时会把version和edition混淆，处理后避免该问题，可以直接用version
\step[fieldset=version, origfieldval]
\step[fieldsource=organization]%因为用的report的驱动，所以需要institution域，把organization转成它以增强兼容性
\step[fieldset=institution, origfieldval]
\step[fieldsource=publisher] %有时会把publisher和institution混淆，处理后避免该问题
\step[fieldset=institution, origfieldval]
}
\map{
\pertype{incollection}
\step[fieldset=usera, fieldvalue={G}]
\step[fieldsource=editor] %%有的时候可能只填写了编者，没有author，把它复制一下
\step[fieldset=bookauthor, origfieldval]
}
\map{
\pertype{collection}
\step[fieldset=usera, fieldvalue={G}]
\step[fieldsource=editor] %%有的时候可能只填写了编者，没有author，把它复制一下
\step[fieldset=author, origfieldval]
}
\map{
\pertype{unpublished}
\step[fieldset=usera, fieldvalue={Z}]
}
\map{
\step[fieldsource=author, match=\regexp{[\x{2FF0}-\x{9FA5}]},final]
\step[fieldset=userf, fieldvalue={cn}]
}
\map{
\step[fieldsource=translator, match=\regexp{[\x{2FF0}-\x{9FA5}]},final]
\step[fieldset=usere, fieldvalue={cn}]
}
\map{%处理一些用year表示date的情况
%这样处理将会设置date域，并使得labeldatesource变为空，因为date的前缀为空(如果是urldate，那么labeldatesource就是url)。
%同时date域会被biblatex自动解析为year，month，day，并且覆盖原来的year信息
\step[fieldsource=year]
\step[fieldset=date, origfieldval]
}
\map{%将title信息保存到userd中避免因为标签生成原因导致title域被清除
\step[fieldsource=title, match=\regexp{[\x{2FF0}-\x{9FA5}]},final]%}
\step[fieldset=userd, fieldvalue={cn}]
}
\map{%将entrykey放入keywords中用于后期的使用
\step[fieldsource=entrykey]
\step[fieldset=keywords, origfieldval]
}
\map[overwrite]{%这里还必须有overwrite，注意不同版本存在差异，比如texlive2015变16后biber有变化(20161207修改正确)
\step[fieldsource=note, final]%将note域信息复制给keywords，用于输出时容易区分标准和报纸
\step[fieldset=keywords, fieldvalue={,}, append]
\step[fieldset=keywords, origfieldval, append]
}
\map{%因为要对author进行判断，所以这里先对有些只有编者而没有作者的情况进行处理
\step[fieldsource=editor]
\step[fieldset=author,origfieldval]
}
\map{%
\step[fieldsource=language,match=english,final]
\step[fieldset=langid,fieldvalue={english}]
}
\map{
\step[fieldsource=language,match=russian,final]
\step[fieldset=langid,fieldvalue={russian}]
}
\map{%
\step[fieldsource=language,match=french,final]
\step[fieldset=langid,fieldvalue={french}]
}
\map{%
\step[fieldsource=language,match=chinese,final]
\step[fieldset=langid,fieldvalue={english}]
}
\map{%
\step[fieldsource=language,match=japnese,final]
\step[fieldset=langid,fieldvalue={english}]
}
\map{%
\step[fieldsource=language,match=korean,final]
\step[fieldset=langid,fieldvalue={english}]
}
\map{%把语言信息设置language域内，而不再用userb域(20180525)
%接着根据信息域字符的unicode码判断
\step[fieldsource=title,match=\regexp{[\x{0100}-\x{017F}]},final]%\x80-\xFF
\step[fieldset=language,fieldvalue={french}]%法语,0080开始到00ff的字符没法匹配有点奇怪
\step[fieldset=langid,fieldvalue={french}]
}
\map{%
\step[fieldsource=title,match=\regexp{[\x{0400}-\x{052F}]},final]
\step[fieldset=language,fieldvalue={russian}]%俄语
\step[fieldset=langid,fieldvalue={russian}]
}
\map{%
\step[fieldsource=title,match=\regexp{[\x{3040}-\x{30FF}\x{31F0}-\x{31FF}]},final]
\step[fieldset=language,fieldvalue={japanese}]%日语
\step[fieldset=langid,fieldvalue={english}]%中日韩语目前都用english，
} %确定形式后可增加类似andotherscn这样的本地化字符串处理
\map{%
\step[fieldsource=title,match=\regexp{[\x{1100}-\x{11FF}\x{3130}-\x{318F}\x{AC00}-\x{D7AF}]},final]
\step[fieldset=language,fieldvalue={korean}]%韩语
\step[fieldset=langid,fieldvalue={english}]
}
\map{%因为无法进行cjk字符判断，所以用反的思路，判断没有英文字符，没有空格，没有逗号等字符情况下
%认为是中文的，将文献language设置成chinese，用于排序
%参考4.5.8 姓名首字母生成控制
%\step[fieldsource=author,match=\regexp{[^a-zA-Z\s\.\,\'\{\}\\\/\-\x22\x26\:0-9\p{IsP}\p{PosixPunct}\x{2bf}\x{2018}\xE9\p{IsASCII}]},final]
%对于带重音符号的字符似乎无法匹配。比如\'e
%最后选择直接匹配cjk字符，unicode编码位置从2FF0到9FA5
\step[fieldsource=author,match=\regexp{[\x{2FF0}-\x{9FA5}]},final]
\step[fieldset=language,fieldvalue={chinese}]
}
\map{\step[fieldsource=title,match=\regexp{[\x{2FF0}-\x{9FA5}]},final]
\step[fieldset=language,fieldvalue={chinese}]
}%如果没有作者和标题，那么剩下的最可能有意义的只有网址了，而网址通常是英文的，因此不用再进一步对其它域进行判断了。
\map{%将没有设置的language设置成en，即认为不是中文的就是英文的。
\step[fieldset=language,fieldvalue={english}]
\step[fieldset=langid,fieldvalue={english}]
}
%本来后面这些是放到DeclareStyleSourcemap中处理的，但是因为texlive2016的biblatex3.4不支持多个DeclareStyleSourcemap，
%但又有处理特殊字符和处理gbnoauthor选项两个需求，但gbnoauthor需要用DeclareStyleSourcemap所以把这些提到这来，
%以后将这两个功能结合到一个DeclareStyleSourcemap时，不用复制如下段代码了。
\map{%尝试未定义数据模型的newspaper类型映射为article，newspaper完全是针对gb7714的新类型，在biblatex中完全没有定义
%但从实践看，并没有什么影响，映射过来就可以了。
\step[typesource=newspaper, typetarget=article, final]
}
\map{%尝试未定义数据模型的standard类型映射为book，standard类型在blx-dm中有出现，但仅定义了类型，域和约束等都没有定义
\step[fieldsource=booktitle,final]%当存在booktitle域是映射为inbook
\step[typesource=standard, typetarget=inbook, final]
}
\map{%尝试未定义数据模型的standard类型映射为book，standard类型在blx-dm中有出现，但仅定义了类型，域和约束等都没有定义
\step[typesource=standard, typetarget=book, final]%当不存在booktitle域是映射为book
}
\map{%先于标准样式的driver层映射，将其先映射过来，并取消type设置
\step[typesource=mastersthesis, typetarget=thesis, final]
%\step[fieldset=type, fieldvalue=mathesis]
}
\map{%先于标准样式的driver层映射，将其先映射过来，并取消type设置
\step[typesource=phdthesis, typetarget=thesis, final]
%\step[fieldset=type, fieldvalue=phdthesis]
}
\map{%先于标准样式的driver层映射，将其先映射过来，并取消type设置
\step[typesource=techreport, typetarget=report, final]
%\step[fieldset=type, fieldvalue=techreport]
}
\map[overwrite]{%title,booktitle,journaltitle,journal,publisher,address,location,institution,organization
\step[fieldsource={title}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
}
\map[overwrite]{
\step[fieldsource={booktitle}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
}
\map[overwrite]{
\step[fieldsource={journaltitle}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
}
\map[overwrite]{
\step[fieldsource={journal}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
}
\map[overwrite]{
\step[fieldsource={publisher}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
}
\map[overwrite]{
\step[fieldsource={address}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
}
\map[overwrite]{
\step[fieldsource={location}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
}
\map[overwrite]{
\step[fieldsource={institution}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
}
\map[overwrite]{
\step[fieldsource={booktitle}, match=\regexp{([^\\])\#}, replace=\regexp{$1\\\#}]
}
\map[overwrite]{
\step[fieldsource={booktitle}, match=\regexp{([^\\])\%}, replace=\regexp{$1\\\%}]
}
%对于高版本(3.4以上)可以用下面这一段取代前面那一段，为了兼容gbnoauthor选项，这些代码只能在sourcemap中使用，所以只能选择前面那一段
%\map[overwrite, foreach={title,booktitle,journaltitle,journal,publisher,address,location,institution,organization}]{
% \step[fieldsource=\regexp{$MAPLOOP}, match=\regexp{([^\\])\#}, replace=\regexp{$1\\\#}]
% }
% \map[overwrite, foreach={title,booktitle,journaltitle,journal,publisher,address,location,institution,organization}]{
% \step[fieldsource=\regexp{$MAPLOOP}, match=\regexp{([^\\])\%}, replace=\regexp{$1\\\%}]
% }
% \map[overwrite, foreach={title,booktitle,journaltitle,journal,publisher,%
% address,location,institution,organization}]{
% \step[fieldsource=\regexp{$MAPLOOP}, match=\regexp{([^\\])\x26}, replace=\regexp{$1\\\x26}]
% }
}
}
%
% 佚名/noauthor的处理
%
% 原理方法:利用样式层的动态数据修改实现
\def\dealnoathor{
\DeclareStyleSourcemap{
\maps[datatype=bibtex]{
\map{%默认情况下将空缺作者设置为佚名
\step[fieldsource=language,match={chinese},final]
\step[fieldset=author, fieldvalue={佚名}]
}
\map{%默认情况下将空缺作者设置为佚名
\step[fieldsource=language,match={english},final]
\step[fieldset=author, fieldvalue={A{non}}]%noauthor换成Anon，同时为避免大写还加了{}
}
}
}
}
%=====================================================================
% 设置排序格式
%=====================================================================
%
% 排序格式，用降序，及userb域，针对biblatex3.7及以下版本
%
\defversion{3.7}{sort}{%这是3.4版的，3.7版略有差异，但不大，后面有注释
\DeclareSortingScheme{gb7714-2015}{
\sort{
\field{presort}
}
\sort[final]{
\field{sortkey}
}
\sort{
\field{language}
}
\sort{%[direction=descending]
\field{sortname}
\field{author}
\field{editor}
\field{translator}
\field{sorttitle}
\field{title}
}
\sort{
\field{sortyear}
\field{year}
}
\sort{
\field{sorttitle}
\field{title}
}
\sort{
\field[padside=left,padwidth=4,padchar=0]{volume}%3.7版是\field{volume}
\literal{0000}%3.7版是\literal{0}
}
}
%降序的nyt
\DeclareSortingScheme{gbnytd}{
\sort{
\field{presort}
}
\sort[final]{
\field{sortkey}
}
\sort{
\field{language}
}
\sort[direction=descending]{
\field{sortname}
\field{author}
\field{editor}
\field{translator}
\field{sorttitle}
\field{title}
}
\sort{
\field{sortyear}
\field{year}
}
\sort{
\field{sorttitle}
\field{title}
}
\sort{
\field[padside=left,padwidth=4,padchar=0]{volume}%3.7版是\field{volume}
\literal{0000}%3.7版是\literal{0}
}
}
%降序的ynt
\DeclareSortingScheme{gbyntd}{
\sort{
\field{presort}
}
\sort[final]{
\field{sortkey}
}
\sort{
\field{language}
}
\sort[direction=descending]{
\field{sortyear}
\field{year}
}
\sort{
\field{sortname}
\field{author}
\field{editor}