Mercurial > hg > Papers > 2015 > kaito-lola

comparison mediabb.sty @ 0:c0d36568602d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
1st commit
author Kaito Tokumori <e105711@ie.u-ryukyu.ac.jp>
date Sun, 10 May 2015 22:54:12 +0900
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:c0d36568602d
1 \NeedsTeXFormat{LaTeX2e}
2 \ProvidesPackage{mediabb}[2006/10/26 v1.9 iNOUE Koich! <inoue@ma.ns.musashi-tech.ac.jp>]
3 \@ifpackageloaded{graphics}{}{\RequirePackage[dvipdfm]{graphicx}}
4 \define@key{Gin}{usebb}[true]{\expandafter\let\expandafter\if@usebb\csname if#1\endcsname}
5 \let\if@usebb\iffalse
6 \define@key{Gin}{mediaboxonly}[/MediaBox]{\@ifundefined{Gread@find@#1}%
7 {\def\Gread@rect@box{/MediaBox}\expandafter\let\expandafter\if@Gread@find@only\csname if#1\endcsname}%
8 {\def\Gread@rect@box{#1}\let\if@Gread@find@only\iftrue}}
9 \let\if@Gread@find@only\iffalse
10 \def\Gread@rect@box{/MediaBox}
11 \define@key{Gin}{autoebb}[always]{\csname Gread@ebb@#1\endcsname}
12 \def\Gread@ebb@always{\let\if@Gread@ebb@always\iftrue}
13 \let\if@Gread@ebb@always\iffalse
14 \let\Gread@ebb@true\Gread@ebb@always
15 \def\Gread@ebb@never{\let\if@Gread@ebb@never\iftrue}
16 \let\Gread@ebb@false\Gread@ebb@never
17 \let\if@Gread@ebb@never\iffalse
18 \let\Ginclude@pdf\Ginclude@eps
19 \def\Gread@pdf#1{%
20 \begingroup
21 \if@usebb\else
22 \@tempcnta\z@
23 \loop
24 \ifnum\@tempcnta<\@xxxii
25 \catcode\@tempcnta14
26 \advance\@tempcnta\@ne
27 \repeat
28 \@tempcnta127
29 \loop
30 \ifnum\@tempcnta<\@cclvi
31 \catcode\@tempcnta14
32 \advance\@tempcnta\@ne
33 \repeat
34 \let\do\@makeother\dospecials\catcode`\ 10
35 \catcode\endlinechar10
36 \immediate\openin\@inputcheck#1
37 \ifeof\@inputcheck
38 \@latex@error{File `#1' not found}\@ehc
39 \else
40 \Gread@true
41 \let\@tempa\@empty
42 \let\@tempb\@empty
43 \loop
44 \read\@inputcheck to\@tempc
45 \ifeof\@inputcheck
46 \Gread@false
47 \else
48 \edef\@tempa{\@tempb\@tempc}\let\@tempb\@tempc
49 \edef\@tempc{\@tempa\Gread@rect@box}%
50 \csname Gread@find@\Gread@rect@box\expandafter\endcsname\@tempc[\@nnil]\\%
51 \fi
52 \ifGread@
53 \repeat
54 \immediate\closein\@inputcheck
55 \fi
56 \fi
57 \ifGin@bbox
58 \else
59 \Gread@bmp{\Gin@base.bb}%
60 \fi
61 \endgroup
62 \expandafter\Gread@parse@bb\@gtempa\\}
63 \def\def@Gread@find#1#2{\ifx\@nnil#2\expandafter\@gobble\else
64 \@namedef{Gread@find@#1}##1#1##2[##3##4]##5\\{%
65 \ifx\@nnil##3\else
66 \gdef\@gtempa{##3##4 }%
67 \if@Gread@find@only
68 \Gread@false
69 \else
70 \def\Gread@rect@box{#1}%
71 \fi
72 \Gin@bboxtrue
73 \fi
74 \if@Gread@find@only\else
75 \csname Gread@find@#2\expandafter\endcsname\@tempa#2[\@nnil]\\%
76 \fi}%
77 \expandafter\def@Gread@find\fi{#2}}
78 \def@Gread@find{/MediaBox}{/CropBox}{/BleedBox}{/TrimBox}{/ArtBox}\@nnil
79 \@namedef{Gread@find@/ArtBox}#1/ArtBox#2[#3#4]#5\\{%
80 \ifx\@nnil#3\else
81 \gdef\@gtempa{#3#4 }%
82 \Gread@false
83 \Gin@bboxtrue
84 \fi}
85 \def\Gread@bmp#1{%
86 \if@Gread@ebb@never\else
87 \if@Gread@ebb@always\else
88 \immediate\openin\@inputcheck#1 %
89 \ifeof\@inputcheck
90 \Gread@ebb@always
91 \else
92 \immediate\closein\@inputcheck
93 \fi
94 \fi
95 \immediate\write18{\if@Gread@ebb@always\else[ '\Gin@base\Gin@ext' -nt '\Gin@base.bb' ] && \fi
96 \ifx\@nnil\filename@area\@nnil\else cd '\filename@area' && \fi ebb '\filename@base\Gin@ext'}%
97 \fi
98 \Gread@eps{#1}}
99 \DeclareGraphicsRule{.pdf}{pdf}{*}{}