1 |
%% |
2 |
%% This is file `bibunits.sty', |
3 |
%% generated with the docstrip utility. |
4 |
%% |
5 |
%% The original source files were: |
6 |
%% |
7 |
%% bibunits.dtx (with options: `package') |
8 |
%% |
9 |
%% IMPORTANT NOTICE: |
10 |
%% |
11 |
%% For the copyright see the source file. |
12 |
%% |
13 |
%% Any modified versions of this file must be renamed |
14 |
%% with new filenames distinct from bibunits.sty. |
15 |
%% |
16 |
%% For distribution of the original source see the terms |
17 |
%% for copying and modification in the file bibunits.dtx. |
18 |
%% |
19 |
%% This generated file may be distributed as long as the |
20 |
%% original source files, as listed above, are part of the |
21 |
%% same distribution. (The sources need not necessarily be |
22 |
%% in the same archive or directory.) |
23 |
%% Package `bibunits' to use with LaTeX2e. |
24 |
%% Copyright (C) 1999, 2000 by Thorsten Hansen. All rights reserved. |
25 |
%% |
26 |
\NeedsTeXFormat{LaTeX2e} |
27 |
\ProvidesPackage{bibunits} |
28 |
[2000/10/10 v2.2 Multiple bibliographies in one document.] |
29 |
\newif\iflabelstoglobalaux \labelstoglobalauxfalse |
30 |
\DeclareOption{labelstoglobalaux}{\labelstoglobalauxtrue} |
31 |
\newif\ifglobalcitecopy |
32 |
\globalcitecopyfalse |
33 |
\DeclareOption{globalcitecopy}{\globalcitecopytrue} |
34 |
\ProcessOptions |
35 |
\newwrite\@bibunitaux |
36 |
\newcount\@bibunitauxcnt \@bibunitauxcnt=0 |
37 |
\def\@bibunitname{bu\the\@bibunitauxcnt} |
38 |
\newif\if@starredversion |
39 |
\let\std@cite\cite |
40 |
\DeclareRobustCommand\bu@cite{% |
41 |
\@ifstar |
42 |
{\@starredversiontrue\std@cite}% |
43 |
{\@starredversionfalse\std@cite}% |
44 |
} |
45 |
\AtBeginDocument{% |
46 |
\@ifpackageloaded{natbib}% |
47 |
{% |
48 |
\NAT@set@cites \let\std@@citex\@citex |
49 |
\def\bu@@citex[#1][#2]#3{% |
50 |
\@startbibunitorrelax |
51 |
\leavevmode |
52 |
\begingroup\let\@auxout\@bibunitaux\std@@citex[#1][#2]{#3}\endgroup |
53 |
\ifglobalcitecopy |
54 |
\std@nocite{#3}% |
55 |
\fi |
56 |
}% |
57 |
}% |
58 |
{% |
59 |
\@ifpackageloaded{overcite}% |
60 |
{% |
61 |
\let\std@@citew\@citew |
62 |
\def\bu@@citew#1{% |
63 |
\@startbibunitorrelax |
64 |
\leavevmode |
65 |
{\let\@auxout\@bibunitaux \std@@citew{#1}}% |
66 |
\ifglobalcitecopy |
67 |
\@nocite{#1}% |
68 |
\else |
69 |
\if@starredversion |
70 |
\@nocite{#1}% |
71 |
\fi |
72 |
\fi |
73 |
} |
74 |
\let\std@@citex\@citex |
75 |
\def\bu@@citex[#1]#2{% |
76 |
\@startbibunitorrelax |
77 |
\leavevmode |
78 |
{\let\@auxout\@bibunitaux \std@@citex[#1]{#2}}% |
79 |
\ifglobalcitecopy |
80 |
\@nocite{#2}% |
81 |
\else |
82 |
\if@starredversion |
83 |
\@nocite{#2}% |
84 |
\fi |
85 |
\fi |
86 |
} |
87 |
}% |
88 |
{% |
89 |
\@ifpackageloaded{jurabib}% |
90 |
{% |
91 |
\let\std@@citex\@citex |
92 |
\def\bu@@citex[#1][#2]#3{% |
93 |
\@startbibunitorrelax |
94 |
\leavevmode |
95 |
{\let\@auxout\@bibunitaux \std@@citex[#1][#2]{#3}}% |
96 |
\ifglobalcitecopy |
97 |
\std@nocite{#3}% |
98 |
\else |
99 |
\if@starredversion |
100 |
\std@nocite{#3}% |
101 |
\fi |
102 |
\fi |
103 |
}% |
104 |
}% |
105 |
{% |
106 |
\let\std@@citex\@citex |
107 |
\def\bu@@citex[#1]#2{% |
108 |
\@startbibunitorrelax |
109 |
\leavevmode |
110 |
{\let\@auxout\@bibunitaux \std@@citex[#1]{#2}}% |
111 |
\ifglobalcitecopy |
112 |
\std@nocite{#2}% |
113 |
\else |
114 |
\if@starredversion |
115 |
\std@nocite{#2}% |
116 |
\fi |
117 |
\fi |
118 |
}% |
119 |
}% |
120 |
}% |
121 |
}% |
122 |
}% |
123 |
\let\std@nocite\nocite |
124 |
\def\bu@nocite{% |
125 |
\@ifstar |
126 |
{\@starredversiontrue\@bu@nocite}% |
127 |
{\@starredversionfalse\@bu@nocite}% |
128 |
} |
129 |
\def\@bu@nocite#1{% |
130 |
\@startbibunitorrelax |
131 |
{\let\@auxout\@bibunitaux \std@nocite{#1}}% |
132 |
\ifglobalcitecopy |
133 |
\std@nocite{#1}% |
134 |
\else |
135 |
\if@starredversion |
136 |
\std@nocite{#1}% |
137 |
\fi |
138 |
\fi |
139 |
} |
140 |
\def\bu@bibdata{} |
141 |
\AtBeginDocument{% |
142 |
\iflabelstoglobalaux |
143 |
\else |
144 |
\let\orig@bibliography\bibliography |
145 |
\def\bibliography#1{% |
146 |
\if@filesw |
147 |
\immediate\openout\@bibunitaux bu.aux |
148 |
\immediate\write\@mainaux{\string\@input{bu.aux}}% |
149 |
\fi |
150 |
\orig@bibliography{#1}% |
151 |
\if@filesw |
152 |
\immediate\closeout\@bibunitaux |
153 |
\fi |
154 |
}% |
155 |
\fi |
156 |
\let\std@bibliography\bibliography |
157 |
} |
158 |
\def\bu@bibliography{% |
159 |
\@ifstar |
160 |
{\@starredversiontrue\@bu@bibliography}% |
161 |
{\@starredversionfalse\@bu@bibliography}% |
162 |
} |
163 |
\def\@bu@bibliography#1{% |
164 |
\if@filesw |
165 |
\immediate\write\@auxout{\string\gdef\string\bu@bibdata{#1}}% |
166 |
\fi |
167 |
\gdef\bu@bibdata{#1}% |
168 |
\if@starredversion |
169 |
\else |
170 |
\std@bibliography{#1}% |
171 |
\fi |
172 |
} |
173 |
\def\bu@bibstyle{} |
174 |
\let\std@bibliographystyle\bibliographystyle |
175 |
\def\bu@bibliographystyle{% |
176 |
\@ifstar |
177 |
{\@starredversiontrue\@bu@bibliographystyle}% |
178 |
{\@starredversionfalse\@bu@bibliographystyle}% |
179 |
} |
180 |
\def\@bu@bibliographystyle#1{% |
181 |
\if@filesw |
182 |
\immediate\write\@auxout{\string\gdef\string\bu@bibstyle{#1}}% |
183 |
\fi |
184 |
\gdef\bu@bibstyle{#1}% |
185 |
\if@starredversion |
186 |
\else |
187 |
\std@bibliographystyle{#1}% |
188 |
\fi |
189 |
} |
190 |
\def\bibunit{% |
191 |
\global\let\cite\bu@cite |
192 |
\global\let\@citex\bu@@citex |
193 |
\global\let\@citew\bu@@citew |
194 |
\global\let\nocite\bu@nocite |
195 |
\global\let\@startbibunitorrelax\@startbibunit |
196 |
\global\let\@finishbibunit\relax |
197 |
\@ifnextchar[{\@bibunitx}{\@bibunitx[\bu@bibstyle]}% |
198 |
} |
199 |
\def\@bibunitx[#1]{\gdef\@localbibstyle{#1}} |
200 |
\def\endbibunit{% |
201 |
\global\let\cite\std@cite |
202 |
\global\let\@citex\std@@citex |
203 |
\global\let\@citew\std@@citew |
204 |
\global\let\nocite\std@nocite |
205 |
\@finishbibunit |
206 |
\@input{bu.aux}% |
207 |
} |
208 |
\def\@startbibunit{% |
209 |
\global\let\@startbibunitorrelax\relax |
210 |
\global\let\@finishbibunit\@finishstartedbibunit |
211 |
\global\advance\@bibunitauxcnt 1 |
212 |
\if@filesw |
213 |
{\endlinechar-1 |
214 |
\@input{\@bibunitname.aux}}% |
215 |
\immediate\openout\@bibunitaux\@bibunitname.aux |
216 |
\immediate\write\@bibunitaux{\string\bibstyle{\@localbibstyle}}% |
217 |
\fi |
218 |
} |
219 |
\let\@finishbibunit\relax |
220 |
\def\@finishstartedbibunit{% |
221 |
\if@filesw |
222 |
\immediate\closeout\@bibunitaux |
223 |
\fi |
224 |
} |
225 |
\let\old@bibunit\@gobble |
226 |
\def\@bibunit{\endbibunit\bibunit\old@bibunit} |
227 |
\def\@endbibunit{} |
228 |
\def\bibliographyunit{% |
229 |
\@endbibunit |
230 |
\@ifnextchar[{\@bibliographyunit}{% |
231 |
\global\let\old@bibunit\@gobble |
232 |
\global\let\bibliography\std@bibliography |
233 |
\global\let\bibliographystyle\std@bibliographystyle |
234 |
\endbibunit |
235 |
\gdef\@endbibunit{}}% |
236 |
} |
237 |
\def\@bibliographyunit[#1]{% |
238 |
\global\let\bibliography\bu@bibliography |
239 |
\global\let\bibliographystyle\bu@bibliographystyle |
240 |
\global\let\old@bibunit#1 |
241 |
\global\let#1\@bibunit |
242 |
\gdef\@endbibunit{\global\let#1\old@bibunit}% |
243 |
} |
244 |
\def\putbib{\@ifnextchar[{\@putbib}{\@putbib[\bu@bibdata]}} |
245 |
\def\@putbib[#1]{% |
246 |
\@startbibunitorrelax |
247 |
\if@filesw |
248 |
\immediate\write\@bibunitaux{\string\bibdata{#1}}% |
249 |
\fi |
250 |
\@input@{\@bibunitname.bbl}% |
251 |
} |
252 |
\AtBeginDocument{% |
253 |
\iflabelstoglobalaux |
254 |
\else |
255 |
\let\std@bibitem\@bibitem |
256 |
\let\std@lbibitem\@lbibitem |
257 |
\def\@bibitem#1{% |
258 |
\let\temp@auxout\@auxout |
259 |
\let\@auxout\@bibunitaux |
260 |
\std@bibitem{#1}% |
261 |
\let\@auxout\temp@auxout |
262 |
} |
263 |
\def\@lbibitem[#1]#2{% |
264 |
\let\temp@auxout\@auxout |
265 |
\let\@auxout\@bibunitaux |
266 |
\std@lbibitem[#1]{#2}% |
267 |
\let\@auxout\temp@auxout |
268 |
} |
269 |
\fi |
270 |
} |
271 |
\def\remequivalent#1\from#2{% |
272 |
\let\given=#1% |
273 |
\ifx#2\empty |
274 |
\else |
275 |
\edef#2{\expandafter\plugh#2\plugh}% |
276 |
\fi |
277 |
} |
278 |
\def\plugh\do#1#2{% |
279 |
\ifx#1\given |
280 |
\else |
281 |
\noexpand\do\noexpand#1% |
282 |
\fi |
283 |
\ifx#2\plugh |
284 |
\hgulp\fi\plugh#2% |
285 |
} |
286 |
\def\hgulp\fi\plugh\plugh{\fi} |
287 |
\remequivalent\bibcite\from\@preamblecmds |
288 |
\AtBeginDocument{% |
289 |
\@ifpackageloaded{natbib}% |
290 |
{\renewcommand\bibcite[2]{\global\@namedef{b@#1\@extra@binfo}{#2}}}% |
291 |
{\renewcommand\bibcite[2]{\global\@namedef{b@#1}{#2}}}% |
292 |
} |
293 |
\AtBeginDocument{% |
294 |
\@ifundefined{bbl@redefine}% |
295 |
{}% |
296 |
{% |
297 |
\bbl@redefine\@input#1{% |
298 |
\@safe@activestrue\org@@input{#1}\@safe@activesfalse}% |
299 |
\@ifpackageloaded{natbib}% |
300 |
{% |
301 |
\bbl@redefine\std@@citex[#1][#2]#3{% |
302 |
\@safe@activestrue\org@std@@citex[#1][#2]{#3}\@safe@activesfalse}% |
303 |
\bbl@redefine\bu@@citex[#1][#2]#3{% |
304 |
\@safe@activestrue\org@bu@@citex[#1][#2]{#3}\@safe@activesfalse}% |
305 |
}% |
306 |
{% natbib not loaded |
307 |
\bbl@redefine\std@@citex[#1]#2{% |
308 |
\@safe@activestrue\org@std@@citex[#1]{#2}\@safe@activesfalse}% |
309 |
}% |
310 |
}% |
311 |
} |
312 |
\endinput |
313 |
%% |
314 |
%% End of file `bibunits.sty'. |