diff options
author | Karl Berry <karl@freefriends.org> | 2006-07-12 22:28:45 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2006-07-12 22:28:45 +0000 |
commit | a4f3458a22ca0198a289e764fb0447104be8ddb7 (patch) | |
tree | 0c1685a26b01889b097e7b559b1325b61f94de93 /Master/texmf-dist/tex/latex/gnuplottex/gnuplottex.sty | |
parent | 6da5bb042c15587fad03d6f4cf308d711348306c (diff) |
new package gnuplottex
git-svn-id: svn://tug.org/texlive/trunk@1824 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/gnuplottex/gnuplottex.sty')
-rw-r--r-- | Master/texmf-dist/tex/latex/gnuplottex/gnuplottex.sty | 171 |
1 files changed, 171 insertions, 0 deletions
diff --git a/Master/texmf-dist/tex/latex/gnuplottex/gnuplottex.sty b/Master/texmf-dist/tex/latex/gnuplottex/gnuplottex.sty new file mode 100644 index 00000000000..e4427eee8dc --- /dev/null +++ b/Master/texmf-dist/tex/latex/gnuplottex/gnuplottex.sty @@ -0,0 +1,171 @@ +%% +%% This is file `gnuplottex.sty', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% gnuplottex.dtx (with options: `package') +%% +%% Copyright (c) 2006, Lars Kotthoff <metalhead@metalhead.ws> +%% +%% Large portions copied from pdftex, +%% Copyright (c) 2001-3, Radhakrishnan CV <cvr@river-valley.com> +%% Rajagopal CV <cvr3@river-valley.com> +%% http://www.river-valley.com +%% +%% River Valley Technologies, Floor III, SJP Buildings, Cotton Hills +%% Trivandrum, India 695014 +%% +%% Tel: +91 471 233 7501 +%% +%% Antoine Chambert-Loir +%% <chambert@math.polytechnique.fr> +%% http://www.math.polytechnique.fr/\protect \unhbox \voidb@x \penalty \@M \ {}chambert +%% +%% Ecole polytechnique, Palaiseau Cedex, France +%% +%% This program is free software; you can redistribute it and/or +%% modify it under the terms of the GNU General Public License +%% as published by the Free Software Foundation; either version 2 +%% of the License, or (at your option) any later version. +%% +%% This program is distributed in the hope that it will be useful, +%% but WITHOUT ANY WARRANTY; without even the implied warranty of +%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +%% GNU General Public License for more details. +%% +%% You should have received a copy of the GNU General Public License +%% along with this program (gpl.txt); if not, write to the Free +%% Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, +%% MA 02111-1307, USA. +%% + \NeedsTeXFormat{LaTeX2e}[1999/12/01] + \ProvidesPackage{gnuplottex} + [2006/04/02 v0.1 gnuplot graphs in LaTeX] +\RequirePackage{graphicx,moreverb,keyval} +\newif\ifShellEscape +\newif\ifmiktex \miktexfalse +\newif\ifpdf \pdffalse + +\DeclareOption{shell}{\ShellEscapetrue} +\DeclareOption{noshell}{\ShellEscapefalse} +\DeclareOption{miktex}{\global\miktextrue} +\DeclareOption{pdf}{\pdftrue} + +\ExecuteOptions{shell} +\ProcessOptions\relax +%% test if shell escape really works +\ifShellEscape + \def\tmpfile{/tmp/w18-test-\the\year\the\month\the\day\the\time} + \ifmiktex + \immediate\write18{rem >"\tmpfile"} + \else + \immediate\write18{touch \tmpfile} + \fi + \ifmiktex + \IfFileExists{\tmpfile.}{\ShellEscapetrue}{\ShellEscapefalse} + \else + \IfFileExists{\tmpfile}{\ShellEscapetrue}{\ShellEscapefalse} + \fi +\fi + +\ifShellEscape + \PackageInfo{gnuplottex} + {Automatically converting gnuplot files.} +\else + \PackageWarningNoLine{gnuplottex} + {Shell escape not enabled.\MessageBreak + You'll need to convert the graphs yourself.} +\fi +\newcounter{fignum} +\def\figname{\jobname-gnuplottex-fig\thefignum} + +\def\gnuplotverbatimwrite#1{% + \def\BeforeStream + {\message{Opening gnuplot stream=\figname.gnuplot}% + \immediate\write\verbatim@out{\string set terminal postscript eps enhanced} +\immediate\write\verbatim@out{\string set output '\figname.eps'} + } + \@bsphack + \immediate\openout \verbatim@out #1 + \BeforeStream% + \let\do\@makeother\dospecials + \catcode`\^^M\active + \def\verbatim@processline{% + \immediate\write\verbatim@out + {\the\verbatim@line}}% + \verbatim@start} +\def\endgnuplotverbatimwrite{% + \immediate\closeout\verbatim@out + \@esphack} +\define@key{pic}{width}{\def\gnuplotwidth{#1}} +\define@key{pic}{height}{\def\gnuplotheight{#1}} +\newenvironment{gnuplot}[1][]{\stepcounter{fignum}% +\let\gnuplotwidth\undefined +\let\gnuplotheight\undefined +\setkeys{pic}{#1} + \xdef\gnuplotCutFile{\figname.gnuplot} + \gnuplotverbatimwrite{\gnuplotCutFile}} + {\endgnuplotverbatimwrite% + \gnuplotgraphicsinclude} +\long\gdef\gnuplotgraphicsprocess{% + \ifShellEscape +\IfFileExists{\figname.gnuplot}{% +\immediate\write18{gnuplot \figname.gnuplot} +\IfFileExists{\figname.eps}{% +\ifpdf +\immediate\write18{epstopdf \figname.eps} +\IfFileExists{\figname.pdf}{% +\PackageInfo{gnuplottex} +{\figname.gnuplot converted}} +{\PackageWarningNoLine{gnuplottex} +{Conversion of \figname.gnuplot failed.}} +\else +\PackageInfo{gnuplottex} +{\figname.gnuplot converted} +\fi} +{\PackageWarningNoLine{gnuplottex} +{Conversion of \figname.gnuplot failed.}}}{} +\fi} +\long\gdef\gnuplotgraphicsinclude{\gnuplotgraphicsprocess% +\ifpdf +\IfFileExists{\figname.pdf}{% +\ifx\gnuplotwidth\undefined +\ifx\gnuplotheight\undefined +\includegraphics{\figname} +\else +\includegraphics[height=\gnuplotheight]{\figname} +\fi +\else +\ifx\gnuplotheight\undefined +\includegraphics[width=\gnuplotwidth]{\figname} +\else +\includegraphics[width=\gnuplotwidth,height=\gnuplotheight]{\figname} +\fi +\fi +} +{\PackageWarningNoLine{gnuplottex} +{Please convert \figname.gnuplot manually}} +\else +\IfFileExists{\figname.eps}{% +\ifx\gnuplotwidth\undefined +\ifx\gnuplotheight\undefined +\includegraphics{\figname} +\else +\includegraphics[height=\gnuplotheight]{\figname} +\fi +\else +\ifx\gnuplotheight\undefined +\includegraphics[width=\gnuplotwidth]{\figname} +\else +\includegraphics[width=\gnuplotwidth,height=\gnuplotheight]{\figname} +\fi +\fi +} +{\PackageWarningNoLine{gnuplottex} +{Please convert \figname.gnuplot manually}} +\fi +} +\endinput +%% +%% End of file `gnuplottex.sty'. |