octave: scripts/plot/util/print.m annotate

annotate scripts/plot/util/print.m @ 21759:b002b4331a12

maint: Use two newlines after endfunction and start of BIST tests.

author	Rik <rik@octave.org>
date	Fri, 20 May 2016 16:16:10 -0700
parents	ffad2baa90f7
children	ec3adcec1337

rev	line source
19697 4197fc428c7d maint: Update copyright notices for 2015. John W. Eaton <jwe@octave.org> parents: 19640 diff changeset	1 ## Copyright (C) 2008-2015 David Bateman
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	2 ##
5362 ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	3 ## This file is part of Octave.
ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	4 ##
ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	5 ## Octave is free software; you can redistribute it and/or modify it
ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	6 ## under the terms of the GNU General Public License as published by
7016 93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 6965 diff changeset	7 ## the Free Software Foundation; either version 3 of the License, or (at
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 6965 diff changeset	8 ## your option) any later version.
5362 ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	9 ##
ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	10 ## Octave is distributed in the hope that it will be useful, but
ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	11 ## WITHOUT ANY WARRANTY; without even the implied warranty of
ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	12 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
ef053d682e42 [project @ 2005-05-23 19:21:54 by jwe] jwe parents: 5361 diff changeset	13 ## General Public License for more details.
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	14 ##
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	15 ## You should have received a copy of the GNU General Public License
7016 93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 6965 diff changeset	16 ## along with Octave; see the file COPYING. If not, see
93c65f2a5668 [project @ 2007-10-12 06:40:56 by jwe] jwe parents: 6965 diff changeset	17 ## <http://www.gnu.org/licenses/>.
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	18
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	19 ## -- texinfo --
20852 516bb87ea72e 2015 Code Sprint: remove class of function from docstring for all m-files. Rik <rik@octave.org> parents: 20778 diff changeset	20 ## @deftypefn {} {} print ()
516bb87ea72e 2015 Code Sprint: remove class of function from docstring for all m-files. Rik <rik@octave.org> parents: 20778 diff changeset	21 ## @deftypefnx {} {} print (@var{options})
516bb87ea72e 2015 Code Sprint: remove class of function from docstring for all m-files. Rik <rik@octave.org> parents: 20778 diff changeset	22 ## @deftypefnx {} {} print (@var{filename}, @var{options})
516bb87ea72e 2015 Code Sprint: remove class of function from docstring for all m-files. Rik <rik@octave.org> parents: 20778 diff changeset	23 ## @deftypefnx {} {} print (@var{h}, @var{filename}, @var{options})
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	24 ## Print a plot, or save it to a file.
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	25 ##
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	26 ## Both output formatted for printing (PDF and PostScript), and many bitmapped
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	27 ## and vector image formats are supported.
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	28 ##
20713 2469d78a1d8b Consistently use 'filename' rather than 'file name' throughout code base. Rik <rik@octave.org> parents: 20231 diff changeset	29 ## @var{filename} defines the name of the output file. If the filename has
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	30 ## no suffix, one is inferred from the specified device and appended to the
20713 2469d78a1d8b Consistently use 'filename' rather than 'file name' throughout code base. Rik <rik@octave.org> parents: 20231 diff changeset	31 ## filename. If no filename is specified, the output is sent to the
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	32 ## printer.
14456 05635e4c605a Improve documentation for print(). Ben Abbott <bpabbott@mac.com> parents: 14382 diff changeset	33 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	34 ## @var{h} specifies the handle of the figure to print. If no handle is
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	35 ## specified the current figure is used.
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	36 ##
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	37 ## For output to a printer, PostScript file, or PDF file, the paper size is
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	38 ## specified by the figure's @code{papersize} property. The location and
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	39 ## size of the image on the page are specified by the figure's
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	40 ## @code{paperposition} property. The orientation of the page is specified
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	41 ## by the figure's @code{paperorientation} property.
14456 05635e4c605a Improve documentation for print(). Ben Abbott <bpabbott@mac.com> parents: 14382 diff changeset	42 ##
05635e4c605a Improve documentation for print(). Ben Abbott <bpabbott@mac.com> parents: 14382 diff changeset	43 ## The width and height of images are specified by the figure's
05635e4c605a Improve documentation for print(). Ben Abbott <bpabbott@mac.com> parents: 14382 diff changeset	44 ## @code{paperpositon(3:4)} property values.
05635e4c605a Improve documentation for print(). Ben Abbott <bpabbott@mac.com> parents: 14382 diff changeset	45 ##
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	46 ## The @code{print} command supports many @var{options}:
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	47 ##
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	48 ## @table @code
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	49 ## @item -f@var{h}
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	50 ## Specify the handle, @var{h}, of the figure to be printed. The default
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	51 ## is the current figure.
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	52 ##
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	53 ## @item -P@var{printer}
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	54 ## Set the @var{printer} name to which the plot is sent if no
3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	55 ## @var{filename} is specified.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	56 ##
9152 4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	57 ## @item -G@var{ghostscript_command}
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	58 ## Specify the command for calling Ghostscript. For Unix and Windows the
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	59 ## defaults are @qcode{"gs"} and @qcode{"gswin32c"}, respectively.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	60 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	61 ## @item -color
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	62 ## @itemx -mono
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	63 ## Color or monochrome output.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	64 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	65 ## @item -solid
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	66 ## @itemx -dashed
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	67 ## Force all lines to be solid or dashed, respectively.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	68 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	69 ## @item -portrait
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	70 ## @itemx -landscape
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	71 ## Specify the orientation of the plot for printed output.
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	72 ## For non-printed output the aspect ratio of the output corresponds to the
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	73 ## plot area defined by the @qcode{"paperposition"} property in the
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	74 ## orientation specified. This option is equivalent to changing the figure's
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	75 ## @qcode{"paperorientation"} property.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	76 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	77 ## @item -TextAlphaBits=@var{n}
14774 0d6dae0f6bc2 Allow setting of ghostscript TextAlphaBits and GraphicsAlphaBits. John Hunt <huntj@gmx.us> parents: 14620 diff changeset	78 ## @itemx -GraphicsAlphaBits=@var{n}
0d6dae0f6bc2 Allow setting of ghostscript TextAlphaBits and GraphicsAlphaBits. John Hunt <huntj@gmx.us> parents: 14620 diff changeset	79 ## Octave is able to produce output for various printers, bitmaps, and
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	80 ## vector formats by using Ghostscript. For bitmap and printer output
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	81 ## anti-aliasing is applied using Ghostscript's TextAlphaBits and
20181 aa36fb998a4d maint: Remove unnecessary whitespace at end of lines. Rik <rik@octave.org> parents: 20173 diff changeset	82 ## GraphicsAlphaBits options. The default number of bits for each is 4.
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	83 ## Allowed values for @var{N} are 1, 2, or 4.
14774 0d6dae0f6bc2 Allow setting of ghostscript TextAlphaBits and GraphicsAlphaBits. John Hunt <huntj@gmx.us> parents: 14620 diff changeset	84 ##
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	85 ## @item -d@var{device}
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	86 ## The available output format is specified by the option @var{device}, and
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	87 ## is one of:
14366 b76f0740940e doc: Periodic grammar check of documentation. Rik <octave@nomad.inbox5.com> parents: 14356 diff changeset	88 ##
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	89 ## @table @code
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	90 ## @item ps
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	91 ## @itemx ps2
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	92 ## @itemx psc
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	93 ## @itemx psc2
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	94 ## PostScript (level 1 and 2, mono and color). The FLTK graphics
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	95 ## toolkit generates PostScript level 3.0.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	96 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	97 ## @item eps
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	98 ## @itemx eps2
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	99 ## @itemx epsc
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	100 ## @itemx epsc2
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	101 ## Encapsulated PostScript (level 1 and 2, mono and color). The FLTK
eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	102 ## graphic toolkit generates PostScript level 3.0.
10841 1577accf2ed8 print.m: Update documentation string. Change to active voice. Rik <octave@nomad.inbox5.com> parents: 10834 diff changeset	103 ##
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	104 ## @item pslatex
6739 db0a05a61d09 [project @ 2007-06-15 21:59:16 by jwe] jwe parents: 6727 diff changeset	105 ## @itemx epslatex
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	106 ## @itemx pdflatex
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	107 ## @itemx pslatexstandalone
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	108 ## @itemx epslatexstandalone
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	109 ## @itemx pdflatexstandalone
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	110 ## Generate a @LaTeX{} file @file{@var{filename}.tex} for the text
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	111 ## portions of a plot and a file @file{@var{filename}.(ps\|eps\|pdf)} for the
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	112 ## remaining graphics. The graphics file suffix .ps\|eps\|pdf is determined
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	113 ## by the specified device type. The @LaTeX{} file produced by the
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	114 ## @samp{standalone} option can be processed directly by @LaTeX{}. The file
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	115 ## generated without the @samp{standalone} option is intended to be included
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	116 ## from another @LaTeX{} document. In either case, the @LaTeX{} file
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	117 ## contains an @code{\includegraphics} command so that the generated graphics
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	118 ## file is automatically included when the @LaTeX{} file is processed. The
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	119 ## text that is written to the @LaTeX{} file contains the strings
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	120 ## @strong{exactly} as they were specified in the plot. If any special
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	121 ## characters of the @TeX{} mode interpreter were used, the file must be
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	122 ## edited before @LaTeX{} processing. Specifically, the special characters
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	123 ## must be enclosed with dollar signs (@code{$ @dots{} $}), and other
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	124 ## characters that are recognized by @LaTeX{} may also need editing (.e.g.,
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	125 ## braces). The @samp{pdflatex} device, and any of the @samp{standalone}
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	126 ## formats, are not available with the Gnuplot toolkit.
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	127 ##
21122 dba88797f69f doc: Periodic grammarcheck of documentation. Rik <rik@octave.org> parents: 20971 diff changeset	128 ## @item epscairo
20964 6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	129 ## @itemx pdfcairo
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	130 ## @itemx epscairolatex
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	131 ## @itemx pdfcairolatex
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	132 ## @itemx epscairolatexstandalone
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	133 ## @itemx pdfcairolatexstandalone
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	134 ## Generate Cairo based output when using the Gnuplot graphics toolkit.
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	135 ## The @samp{epscairo} and @samp{pdfcairo} devices are synonymous with
21122 dba88797f69f doc: Periodic grammarcheck of documentation. Rik <rik@octave.org> parents: 20971 diff changeset	136 ## the @samp{epsc} device. The @LaTeX{} variants generate a @LaTeX{} file,
20964 6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	137 ## @file{@var{filename}.tex}, for the text portions of a plot, and an image
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	138 ## file, @file{@var{filename}.(eps\|pdf)}, for the graph portion of the plot.
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	139 ## The @samp{standalone} variants behave as described for
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	140 ## @samp{epslatexstandalone} above.
6ac3d299c5ad Add support for cairo based gnuplot terminals: "cairolatex", "epscairo", Daniel J Sebald <daniel.sebald@ieee.org> parents: 20936 diff changeset	141 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	142 ## @item ill
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	143 ## @itemx aifm
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	144 ## Adobe Illustrator (Obsolete for Gnuplot versions > 4.2)
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	145 ##
20971 22318eeaca3b Add gnuplot "canvas" terminal to the print.m doc-string. Daniel J Sebald <daniel.sebald@ieee.org> parents: 20970 diff changeset	146 ## @item canvas
22318eeaca3b Add gnuplot "canvas" terminal to the print.m doc-string. Daniel J Sebald <daniel.sebald@ieee.org> parents: 20970 diff changeset	147 ## Javascript-based drawing on HTML5 canvas viewable in a web browser
22318eeaca3b Add gnuplot "canvas" terminal to the print.m doc-string. Daniel J Sebald <daniel.sebald@ieee.org> parents: 20970 diff changeset	148 ## (only available for the Gnuplot graphics toolkit).
22318eeaca3b Add gnuplot "canvas" terminal to the print.m doc-string. Daniel J Sebald <daniel.sebald@ieee.org> parents: 20970 diff changeset	149 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	150 ## @item cdr
10791 3140cb7a05a1 Add spellchecker scripts for Octave and run spellcheck of documentation Rik <octave@nomad.inbox5.com> parents: 10727 diff changeset	151 ## @itemx @nospell{corel}
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	152 ## CorelDraw
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	153 ##
6965 c962cc09067a [project @ 2007-10-06 04:54:36 by jwe] jwe parents: 6895 diff changeset	154 ## @item dxf
c962cc09067a [project @ 2007-10-06 04:54:36 by jwe] jwe parents: 6895 diff changeset	155 ## AutoCAD
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	156 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	157 ## @item emf
9107 d0d507cbd123 Improvements to printing functionality. Ben Abbott <bpabbott@mac.com> parents: 9056 diff changeset	158 ## @itemx meta
6965 c962cc09067a [project @ 2007-10-06 04:54:36 by jwe] jwe parents: 6895 diff changeset	159 ## Microsoft Enhanced Metafile
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	160 ##
6965 c962cc09067a [project @ 2007-10-06 04:54:36 by jwe] jwe parents: 6895 diff changeset	161 ## @item fig
11576 8ac9687dbe9f rename backend to graphics_toolkit John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	162 ## XFig. For the Gnuplot graphics toolkit, the additional options
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	163 ## @option{-textspecial} or @option{-textnormal} can be used to control whether the special flag should be set for the text in the figure. (default is @option{-textnormal})
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	164 ##
20969 984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	165 ## @item gif
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	166 ## GIF image (only available for the Gnuplot graphics toolkit)
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	167 ##
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	168 ## @item hpgl
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	169 ## HP plotter language
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	170 ##
20969 984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	171 ## @item jpg
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	172 ## @itemx jpeg
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	173 ## JPEG image
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	174 ##
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	175 ## @item latex
20970 34d0497730e6 Include missing "{}" for @LaTeX{} macro in print.m doc-string, Ben Abbott <bpabbott@mac.comg> parents: 20969 diff changeset	176 ## @LaTeX{} picture environment (only available for the Gnuplot graphics
20969 984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	177 ## toolkit).
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	178 ##
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	179 ## @item mf
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	180 ## Metafont
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	181 ##
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	182 ## @item png
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	183 ## Portable network graphics
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	184 ##
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	185 ## @item pbm
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	186 ## PBMplus
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	187 ##
20969 984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	188 ## @item pdf
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	189 ## Portable document format
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	190 ## @end table
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	191 ##
6965 c962cc09067a [project @ 2007-10-06 04:54:36 by jwe] jwe parents: 6895 diff changeset	192 ## @item svg
c962cc09067a [project @ 2007-10-06 04:54:36 by jwe] jwe parents: 6895 diff changeset	193 ## Scalable vector graphics
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	194 ##
21122 dba88797f69f doc: Periodic grammarcheck of documentation. Rik <rik@octave.org> parents: 20971 diff changeset	195 ## @item tikz
20969 984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	196 ## @itemx tikzstandalone
984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	197 ## Generate a @LaTeX{} file using PGF/TikZ@. For the FLTK toolkit
21122 dba88797f69f doc: Periodic grammarcheck of documentation. Rik <rik@octave.org> parents: 20971 diff changeset	198 ## the result is PGF@. The @samp{tikzstandalone} device produces a @LaTeX{}
20969 984678f19352 Impproved support gnuplot terminals "eepic", "latex", "pstricks", & "texdraw". Daniel J Sebald <daniel.sebald@ieee.org> parents: 20968 diff changeset	199 ## document which includes the TikZ file (@samp{tikzstandalone} is only
20971 22318eeaca3b Add gnuplot "canvas" terminal to the print.m doc-string. Daniel J Sebald <daniel.sebald@ieee.org> parents: 20970 diff changeset	200 ## available for the Gnuplot graphics toolkit).
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	201 ##
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	202 ## If the device is omitted, it is inferred from the file extension,
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	203 ## or if there is no filename it is sent to the printer as PostScript.
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	204 ##
10423 dfc662a47b7a print.m: Add '-append' option. Ben Abbott <bpabbott@mac.com> parents: 10422 diff changeset	205 ## @item -d@var{ghostscript_device}
10854 d5a7db05d591 Add PS and PDF output for the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10841 diff changeset	206 ## Additional devices are supported by Ghostscript.
d5a7db05d591 Add PS and PDF output for the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10841 diff changeset	207 ## Some examples are;
9152 4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	208 ##
4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	209 ## @table @code
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	210 ## @item pdfwrite
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	211 ## Produces pdf output from eps
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	212 ##
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11576 diff changeset	213 ## @item ljet2p
16826 a4969508008e doc: Periodic spellcheck of the documentation. Rik <rik@octave.org> parents: 16766 diff changeset	214 ## HP LaserJet @nospell{IIP}
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	215 ##
9152 4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	216 ## @item pcx24b
4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	217 ## 24-bit color PCX file format
10821 693e22af08ae Grammarcheck documentation of m-files Rik <octave@nomad.inbox5.com> parents: 10793 diff changeset	218 ##
9152 4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	219 ## @item ppm
4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	220 ## Portable Pixel Map file format
4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	221 ## @end table
4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	222 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	223 ## For a complete list, type @code{system ("gs -h")} to see what formats
10854 d5a7db05d591 Add PS and PDF output for the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10841 diff changeset	224 ## and devices are available.
9152 4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	225 ##
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	226 ## When Ghostscript output is sent to a printer the size is determined by
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	227 ## the figure's @qcode{"papersize"} property. When the output is sent to a
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	228 ## file the size is determined by the plot box defined by the figure's
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	229 ## @qcode{"paperposition"} property.
9152 4c9aff0c9a61 print.m: Use Ghostscript rather than ImageMagick's 'convert'. Ben Abbott <bpabbott@mac.com> parents: 9107 diff changeset	230 ##
16094 8899c785cc99 doc: Fix warnings associated with Texinfo 5.0 (bug #38392) Rik <rik@octave.org> parents: 15301 diff changeset	231 ## @item -append
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	232 ## Append PostScript or PDF output to a pre-existing file of the same type.
10423 dfc662a47b7a print.m: Add '-append' option. Ben Abbott <bpabbott@mac.com> parents: 10422 diff changeset	233 ##
16094 8899c785cc99 doc: Fix warnings associated with Texinfo 5.0 (bug #38392) Rik <rik@octave.org> parents: 15301 diff changeset	234 ## @item -r@var{NUM}
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	235 ## Resolution of bitmaps in pixels per inch. For both metafiles and SVG
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	236 ## the default is the screen resolution; for other formats it is 150 dpi. To
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	237 ## specify screen resolution, use @qcode{"-r0"}.
8889 665b264b6a50 Compatible support of figure paper properties and resolution for the gnuplot backend. Ben Abbott <bpabbott@mac.com> parents: 8746 diff changeset	238 ##
17129 9d9fe4361870 print.m: Document that '-loose' is default option for eps. Rik <rik@octave.org> parents: 17122 diff changeset	239 ## @item -loose
9d9fe4361870 print.m: Document that '-loose' is default option for eps. Rik <rik@octave.org> parents: 17122 diff changeset	240 ## @itemx -tight
9d9fe4361870 print.m: Document that '-loose' is default option for eps. Rik <rik@octave.org> parents: 17122 diff changeset	241 ## Force a tight or loose bounding box for eps files. The default is loose.
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	242 ##
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	243 ## @item -@var{preview}
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	244 ## Add a preview to eps files. Supported formats are:
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	245 ##
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	246 ## @table @code
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	247 ## @item -interchange
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	248 ## Provide an interchange preview.
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	249 ##
19705 ef3cdadc2a08 doc: print.m: Fix typo metalfile -> metafile Andreas Weber <andy.weber.aw@gmail.com> parents: 19697 diff changeset	250 ## @item -metafile
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	251 ## Provide a metafile preview.
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	252 ##
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	253 ## @item -pict
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	254 ## Provide pict preview.
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	255 ##
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	256 ## @item -tiff
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	257 ## Provide a tiff preview.
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	258 ## @end table
9157 fce7315c1eee print.m: Fix typo, improvments to code, and allow for creation of tight bbox. Ben Abbott <bpabbott@mac.com> parents: 9152 diff changeset	259 ##
10841 1577accf2ed8 print.m: Update documentation string. Change to active voice. Rik <octave@nomad.inbox5.com> parents: 10834 diff changeset	260 ## @item -S@var{xsize},@var{ysize}
20173 777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	261 ## Plot size in pixels for EMF, GIF, JPEG, PBM, PNG, and SVG@.
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	262 ## For PS, EPS, PDF, and other vector formats the plot size is in points.
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	263 ## This option is equivalent to changing the size of the plot box associated
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	264 ## with the @qcode{"paperposition"} property. When using the command form of
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	265 ## the print function you must quote the @var{xsize},@var{ysize} option. For
777f26aa8e3e doc: Update more docstrings to have one sentence summary as first line. Rik <rik@octave.org> parents: 19990 diff changeset	266 ## example, by writing @w{"-S640,480"}.
6965 c962cc09067a [project @ 2007-10-06 04:54:36 by jwe] jwe parents: 6895 diff changeset	267 ##
17122 eaab03308c0b doc: Rewrite docstrings for most plot functions. Rik <rik@octave.org> parents: 16933 diff changeset	268 ## @item -F@var{fontname}
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	269 ## @itemx -F@var{fontname}:@var{size}
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	270 ## @itemx -F:@var{size}
15301 3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	271 ## Use @var{fontname} and/or @var{fontsize} for all text.
3d05b55c91c7 doc: Clean up docstring for print.m. Rik <rik@octave.org> parents: 15214 diff changeset	272 ## @var{fontname} is ignored for some devices: dxf, fig, hpgl, etc.
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	273 ## @end table
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	274 ##
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	275 ## The filename and options can be given in any order.
11107 811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	276 ##
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	277 ## Example: Print to a file using the pdf device.
11107 811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	278 ##
811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	279 ## @example
11563 3c6e8aaa9555 Grammarcheck m-files before 3.4 release. Rik <octave@nomad.inbox5.com> parents: 11551 diff changeset	280 ## @group
14327 4d917a6a858b doc: Use Octave coding conventions in @example blocks of docstrings. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	281 ## figure (1);
4d917a6a858b doc: Use Octave coding conventions in @example blocks of docstrings. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	282 ## clf ();
4d917a6a858b doc: Use Octave coding conventions in @example blocks of docstrings. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	283 ## surf (peaks);
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	284 ## print figure1.pdf
11563 3c6e8aaa9555 Grammarcheck m-files before 3.4 release. Rik <octave@nomad.inbox5.com> parents: 11551 diff changeset	285 ## @end group
11107 811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	286 ## @end example
811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	287 ##
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	288 ## Example: Print to a file using jpg device.
11107 811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	289 ##
811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	290 ## @example
11563 3c6e8aaa9555 Grammarcheck m-files before 3.4 release. Rik <octave@nomad.inbox5.com> parents: 11551 diff changeset	291 ## @group
14327 4d917a6a858b doc: Use Octave coding conventions in @example blocks of docstrings. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	292 ## clf ();
4d917a6a858b doc: Use Octave coding conventions in @example blocks of docstrings. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	293 ## surf (peaks);
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	294 ## print -djpg figure2.jpg
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	295 ## @end group
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	296 ## @end example
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	297 ##
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	298 ## Example: Print to printer named PS_printer using ps format.
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	299 ##
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	300 ## @example
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	301 ## @group
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	302 ## clf ();
d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	303 ## surf (peaks);
19593 446c46af4b42 strip trailing whitespace from most source files John W. Eaton <jwe@octave.org> parents: 19026 diff changeset	304 ## print -dpswrite -PPS_printer
11563 3c6e8aaa9555 Grammarcheck m-files before 3.4 release. Rik <octave@nomad.inbox5.com> parents: 11551 diff changeset	305 ## @end group
11107 811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	306 ## @end example
811b51cdddce print.m: Add examples to the docstring. Ben Abbott <bpabbott@mac.com> parents: 11014 diff changeset	307 ##
18580 13c80c3e9660 Add new functions hgsave and hgload (bug #39532). Massimiliano Fasi <mogrob.sanit@gmail.com> and Rik <rik@octave.org> parents: 17751 diff changeset	308 ## @seealso{saveas, hgsave, orient, figure}
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	309 ## @end deftypefn
0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	310
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	311 function print (varargin)
05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	312
05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	313 opts = __print_parse_opts__ (varargin{:});
7550 bffb1e2ab732 print.m: Figure handle as argument. Ben Abbott <bpabbott@mac.com> parents: 7543 diff changeset	314
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	315 opts.pstoedit_cmd = @pstoedit;
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	316 opts.fig2dev_cmd = @fig2dev;
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	317 opts.latex_standalone = @latex_standalone;
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	318 opts.lpr_cmd = @lpr;
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	319 opts.epstool_cmd = @epstool;
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	320
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	321 if (isempty (opts.figure) \|\| ! isfigure (opts.figure))
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	322 error ("print: no figure to print");
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	323 endif
05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	324
19990 9a2d8b1f931e Issue error when trying to print a figure with no axes object (bug #44655). Rik <rik@octave.org> parents: 19833 diff changeset	325 if (isempty (findall (opts.figure, "-depth", "1", "type", "axes")))
9a2d8b1f931e Issue error when trying to print a figure with no axes object (bug #44655). Rik <rik@octave.org> parents: 19833 diff changeset	326 error ("print: no axes object in figure to print");
9a2d8b1f931e Issue error when trying to print a figure with no axes object (bug #44655). Rik <rik@octave.org> parents: 19833 diff changeset	327 endif
9a2d8b1f931e Issue error when trying to print a figure with no axes object (bug #44655). Rik <rik@octave.org> parents: 19833 diff changeset	328
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	329 orig_figure = get (0, "currentfigure");
17146 bbda4d952eb5 Fix pop-up of invisible figures during printing. Rik <rik@octave.org> parents: 17129 diff changeset	330 set (0, "currentfigure", opts.figure);
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	331
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	332 if (opts.append_to_file)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	333 [~, ~, ext] = fileparts (opts.ghostscript.output);
19278 6ca096827123 Use tempname() rather than tmpnam() in core Octave. Rik <rik@octave.org> parents: 19078 diff changeset	334 opts.ghostscript.prepend = [tempname() ext];
11014 92bb25c0da9e When appending, delete temporary files at the end of the ghostscript pipeline. Ben Abbott <bpabbott@mac.com> parents: 11009 diff changeset	335 copyfile (opts.ghostscript.output, opts.ghostscript.prepend);
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	336 endif
05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	337
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	338 unwind_protect
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	339
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	340 ## Modify properties as specified by options
dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	341 props = [];
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	342
14355 a6a5c5008e39 Print() function requires figure units to be "pixels". Ben Abbott <bpabbott@mac.com> parents: 14335 diff changeset	343 drawnow ();
a6a5c5008e39 Print() function requires figure units to be "pixels". Ben Abbott <bpabbott@mac.com> parents: 14335 diff changeset	344
20936 80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	345 ## print() requires children of axes to have units = "normalized", or "data"
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	346 hobj = findall (opts.figure, "-not", "type", "figure", ...
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	347 "-not", "type", "axes", "-property", "units", ...
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	348 "-not", "units", "normalized", "-not", "units", "data");
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	349 for n = 1:numel(hobj)
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	350 props(n).h = hobj(n);
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	351 props(n).name = "units";
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	352 props(n).value = {get(hobj(n), "units")};
21323 030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	353 set (hobj(n), "units", "data");
20936 80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	354 endfor
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	355
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	356 ## print() requires axes units = "normalized"
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	357 hax = findall (opts.figure, "-depth", 1, "type", "axes", ...
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	358 "-not", "units", "normalized");
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	359 m = numel (props);
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	360 for n = 1:numel(hax)
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	361 props(m+n).h = hax(n);
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	362 props(m+n).name = "units";
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	363 props(m+n).value = {get(hax(n), "units")};
21323 030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	364 set (hax(n), "units", "normalized");
20936 80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	365 endfor
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	366
14355 a6a5c5008e39 Print() function requires figure units to be "pixels". Ben Abbott <bpabbott@mac.com> parents: 14335 diff changeset	367 ## print() requires figure units to be "pixels"
20936 80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	368 m = numel (props);
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	369 props(m+1).h = opts.figure;
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	370 props(m+1).name = "units";
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	371 props(m+1).value = {get(opts.figure, "units")};
14355 a6a5c5008e39 Print() function requires figure units to be "pixels". Ben Abbott <bpabbott@mac.com> parents: 14335 diff changeset	372 set (opts.figure, "units", "pixels");
a6a5c5008e39 Print() function requires figure units to be "pixels". Ben Abbott <bpabbott@mac.com> parents: 14335 diff changeset	373
17742 4e225f952885 Fix shrinking axes when printing plots with legends (bug #40333). Rik <rik@octave.org> parents: 17723 diff changeset	374 ## graphics toolkit translates figure position to eps bbox (points)
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	375 fpos = get (opts.figure, "position");
20936 80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	376 props(m+2).h = opts.figure;
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	377 props(m+2).name = "position";
80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	378 props(m+2).value = {fpos};
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	379 fpos(3:4) = opts.canvas_size;
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	380 set (opts.figure, "position", fpos);
7550 bffb1e2ab732 print.m: Figure handle as argument. Ben Abbott <bpabbott@mac.com> parents: 7543 diff changeset	381
21323 030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	382 ## Implement InvertHardCopy option
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	383 do_hardcopy = strcmp (get (opts.figure, "inverthardcopy"), "on");
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	384
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	385 if (do_hardcopy)
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	386 ## Set figure background to white.
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	387 props(m+3).h = opts.figure;
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	388 props(m+3).name = "color";
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	389 props(m+3).value{1} = get (props(m+3).h, props(m+3).name);
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	390 set (props(m+3).h, "color", "white");
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	391 nfig = m + 3;
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	392 else
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	393 nfig = m + 2;
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	394 endif
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	395
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	396 if (do_hardcopy)
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	397 ## Set background to white for all top-level axes objects
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	398 hax = findall (opts.figure, "-depth", 1, "type", "axes",
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	399 "-not", "tag", "legend");
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	400 m = numel (props);
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	401 for n = 1:numel(hax)
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	402 props(m+n).h = hax(n);
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	403 props(m+n).name = "color";
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	404 props(m+n).value{1} = get(hax(n), "color");
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	405 set (hax(n), "color", "white");
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	406 endfor
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	407 nfig += n;
030d4d6c2b58 Implement figure property "InvertHardCopy" for printing (bug #47230). Rik <rik@octave.org> parents: 21122 diff changeset	408 endif
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	409
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	410 if (opts.force_solid != 0)
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	411 h = findall (opts.figure, "-property", "linestyle");
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	412 m = numel (props);
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14852 diff changeset	413 for n = 1:numel (h)
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	414 props(m+n).h = h(n);
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	415 props(m+n).name = "linestyle";
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	416 props(m+n).value = {get(h(n), "linestyle")};
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	417 endfor
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	418 if (opts.force_solid > 0)
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	419 linestyle = "-";
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	420 else
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	421 linestyle = "--";
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	422 endif
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	423 set (h, "linestyle", linestyle);
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	424 endif
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	425
21365 5b9618f4f841 Rely upon print.m for mono/color conversion. This simplifies gnuplot support Ben Abbott <bpabbott@mac.com> parents: 21323 diff changeset	426 if (opts.use_color < 0)
10866 045558999570 print.m: Include 'colormap' when converting RGB to mono. Ben Abbott <bpabbott@mac.com> parents: 10860 diff changeset	427 color_props = {"color", "facecolor", "edgecolor", "colormap"};
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14852 diff changeset	428 for c = 1:numel (color_props)
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	429 h = findall (opts.figure, "-property", color_props{c});
dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	430 hnone = findall (opts.figure, color_props{c}, "none");
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	431 h = setdiff (h, hnone);
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	432 m = numel (props);
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14852 diff changeset	433 for n = 1:numel (h)
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	434 if (ishandle (h(n)))
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	435 ## Need to verify objects exist since callbacks may delete objects
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	436 ## as the colors for others are modified.
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	437 rgb = get (h(n), color_props{c});
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	438 props(end+1).h = h(n);
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	439 props(end).name = color_props{c};
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	440 props(end).value = {get(h(n), color_props{c})};
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	441 if (isnumeric (rgb))
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	442 ## convert RGB color to RGB gray scale
14872 c2dbdeaa25df maint: use rows() and columns() to clarify m-files. Rik <octave@nomad.inbox5.com> parents: 14868 diff changeset	443 xfer = repmat ([0.30, 0.59, 0.11], rows (rgb), 1);
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	444 ggg = repmat (sum (xfer .* rgb, 2), 1, 3);
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	445 set (h(n), color_props{c}, ggg);
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	446 endif
10866 045558999570 print.m: Include 'colormap' when converting RGB to mono. Ben Abbott <bpabbott@mac.com> parents: 10860 diff changeset	447 endif
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	448 endfor
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	449 endfor
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	450 endif
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	451
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	452 if (! isempty (opts.font) \|\| ! isempty (opts.fontsize))
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	453 h = findall (opts.figure, "-property", "fontname");
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	454 m = numel (props);
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14852 diff changeset	455 for n = 1:numel (h)
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	456 if (ishandle (h(n)))
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	457 if (! isempty (opts.font))
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	458 props(end+1).h = h(n);
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	459 props(end).name = "fontname";
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	460 props(end).value = {get(h(n), "fontname")};
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	461 endif
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	462 endif
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	463 if (ishandle (h(n)))
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	464 if (! isempty (opts.fontsize))
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	465 props(end+1).h = h(n);
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	466 props(end).name = "fontsize";
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	467 props(end).value = {get(h(n), "fontsize")};
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	468 endif
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	469 endif
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	470 endfor
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	471 if (! isempty (opts.font))
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14852 diff changeset	472 set (h(ishandle (h)), "fontname", opts.font);
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	473 endif
05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	474 if (! isempty (opts.fontsize))
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	475 if (ischar (opts.fontsize))
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	476 fontsize = str2double (opts.fontsize);
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	477 else
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	478 fontsize = opts.fontsize;
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	479 endif
15214 ae6b7ee0a733 print.m: Correct typo preventing fontsize to be set (bug #37163) Rik <rik@octave.org> parents: 14872 diff changeset	480 if (! isempty (opts.scalefontsize) && ! opts.scalefontsize != 1)
14206 df695e37d404 Make sure "print '-SX,Y' ..." doesn't round down a pixel. Bug # 35307. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	481 ## This is done to work around the bbox being whole numbers.
20231 83792dd9bcc1 Use in-place operators in m-files where possible. Rik <rik@octave.org> parents: 20181 diff changeset	482 fontsize *= opts.scalefontsize;
14206 df695e37d404 Make sure "print '-SX,Y' ..." doesn't round down a pixel. Bug # 35307. Ben Abbott <bpabbott@mac.com> parents: 14138 diff changeset	483 endif
17723 132d9f543cc5 print.m: 2nd fix for printing when using -F option (bug #40334) Rik <rik@octave.org> parents: 17721 diff changeset	484 ## FIXME: legend child objects need to be acted on first.
132d9f543cc5 print.m: 2nd fix for printing when using -F option (bug #40334) Rik <rik@octave.org> parents: 17721 diff changeset	485 ## or legend fontsize callback will destroy them.
132d9f543cc5 print.m: 2nd fix for printing when using -F option (bug #40334) Rik <rik@octave.org> parents: 17721 diff changeset	486 hlist = h(ishandle (h));
132d9f543cc5 print.m: 2nd fix for printing when using -F option (bug #40334) Rik <rik@octave.org> parents: 17721 diff changeset	487 haxes = strcmp (get (hlist, "type"), "axes");
132d9f543cc5 print.m: 2nd fix for printing when using -F option (bug #40334) Rik <rik@octave.org> parents: 17721 diff changeset	488 set (hlist(! haxes), "fontsize", fontsize);
132d9f543cc5 print.m: 2nd fix for printing when using -F option (bug #40334) Rik <rik@octave.org> parents: 17721 diff changeset	489 set (hlist(haxes), "fontsize", fontsize);
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	490 endif
05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	491 endif
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	492
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	493 ## call the graphics toolkit print script
11576 8ac9687dbe9f rename backend to graphics_toolkit John W. Eaton <jwe@octave.org> parents: 11563 diff changeset	494 switch (get (opts.figure, "__graphics_toolkit__"))
17174 c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	495 case "gnuplot"
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	496 opts = __gnuplot_print__ (opts);
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	497 otherwise
19640 3b0b4d55002d rename __fltk_print__.m to __opengl_print__.m John W. Eaton <jwe@octave.org> parents: 19596 diff changeset	498 opts = __opengl_print__ (opts);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	499 endswitch
19706 18fd412c7dc3 Remove erroneously added "keyboard" in cset ef3cdadc2a08 Andreas Weber <andy.weber.aw@gmail.com> parents: 19705 diff changeset	500
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	501 unwind_protect_cleanup
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	502 ## restore modified properties
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	503 if (isstruct (props))
17751 e2f83152e64a print.m: Restore figure position first (in pixels) and then original units. Rik <rik@octave.org> parents: 17744 diff changeset	504 ## Restore figure position and units first
20936 80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	505 for n = nfig:-1:1
17751 e2f83152e64a print.m: Restore figure position first (in pixels) and then original units. Rik <rik@octave.org> parents: 17744 diff changeset	506 if (ishandle (props(n).h))
e2f83152e64a print.m: Restore figure position first (in pixels) and then original units. Rik <rik@octave.org> parents: 17744 diff changeset	507 set (props(n).h, props(n).name, props(n).value{1});
e2f83152e64a print.m: Restore figure position first (in pixels) and then original units. Rik <rik@octave.org> parents: 17744 diff changeset	508 endif
e2f83152e64a print.m: Restore figure position first (in pixels) and then original units. Rik <rik@octave.org> parents: 17744 diff changeset	509 endfor
20936 80dd7b3529ee Convert figure's descendants units to "normalized" during printing (Bug #46292). Ben Abbott <bpabbott@mac.com> parents: 20852 diff changeset	510 for n = numel (props):-1:(nfig + 1)
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	511 if (ishandle (props(n).h))
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	512 set (props(n).h, props(n).name, props(n).value{1});
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	513 endif
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	514 endfor
3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	515 endif
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	516
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	517 ## Unlink temporary files
14868 5d3a684236b0 maint: Use Octave coding conventions for cuddling parentheses in scripts directory Rik <octave@nomad.inbox5.com> parents: 14852 diff changeset	518 for n = 1:numel (opts.unlink)
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	519 [status, output] = unlink (opts.unlink{n});
dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	520 if (status != 0)
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	521 warning ("print.m: %s, '%s'", output, opts.unlink{n});
10913 dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	522 endif
dd6b90f44ae5 Unify gnuplot printing with the fltk backend. Ben Abbott <bpabbott@mac.com> parents: 10866 diff changeset	523 endfor
10860 3a5f5c99cc39 print.m: Modify texinfo. Add unwind_protect block. Ben Abbott <bpabbott@mac.com> parents: 10854 diff changeset	524 end_unwind_protect
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	525
05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	526 if (isfigure (orig_figure))
17146 bbda4d952eb5 Fix pop-up of invisible figures during printing. Rik <rik@octave.org> parents: 17129 diff changeset	527 set (0, "currentfigure", orig_figure);
10834 05ba991794d4 Improvements for fltk printing. Ben Abbott <bpabbott@mac.com> parents: 10821 diff changeset	528 endif
5363 37f62a7778c2 [project @ 2005-05-23 19:52:15 by jwe] jwe parents: 5362 diff changeset	529
5361 0ac38aea9f76 [project @ 2005-05-23 19:08:36 by jwe] jwe parents: diff changeset	530 endfunction
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	531
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	532 function cmd = epstool (opts, filein, fileout)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	533 ## As epstool does not work with pipes, a subshell is used to
21751 b571fc85953f maint: Use two spaces after period to indicate sentence break. Rik <rik@octave.org> parents: 21578 diff changeset	534 ## permit piping. Since this solution does not work with the DOS
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	535 ## command shell, the -tight and -preview options are disabled if
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	536 ## output must be piped.
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	537
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	538 ## DOS Shell:
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	539 ## gs.exe [...] -sOutputFile=<filein> - & epstool -bbox -preview-tiff <filein> <fileout> & del <filein>
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	540 ## Unix Shell;
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	541 ## cat > <filein> ; epstool -bbox -preview-tiff <filein> <fileout> ; rm <filein>
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	542
19724 abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	543 ## HACK: Keep track of whether ghostscript supports epswrite or eps2write.
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	544 persistent epsdevice;
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	545 if (isempty (epsdevice))
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	546 [status, devlist] = system (sprintf ("%s -h", opts.ghostscript.binary));
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	547 if (isempty (strfind (devlist, "eps2write")))
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	548 epsdevice = "epswrite";
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	549 else
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	550 epsdevice = "eps2write";
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	551 endif
abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	552 endif
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19725 diff changeset	553
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	554 dos_shell = (ispc () && ! isunix ());
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	555
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	556 cleanup = "";
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	557 if (nargin < 3)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	558 fileout = opts.name;
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	559 elseif (isempty (fileout))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	560 fileout = "-";
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	561 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	562
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	563 if (nargin < 2 \|\| strcmp (filein, "-") \|\| isempty (filein))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	564 pipein = true;
19278 6ca096827123 Use tempname() rather than tmpnam() in core Octave. Rik <rik@octave.org> parents: 19078 diff changeset	565 filein = [tempname() ".eps"];
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	566 if (dos_shell)
11252 d048ce3f7cef Replace "delete" with "del" in DOS shell commands. Michael Goffioul <michael.goffioul@gmail.com> parents: 11120 diff changeset	567 cleanup = sprintf ("& del %s ", strrep (filein, '/', '\'));
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	568 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	569 cleanup = sprintf ("; rm %s ", filein);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	570 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	571 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	572 pipein = false;
20778 8513c84a13cb Use parser string concatenation rather than strcat() for performance in m-files. Rik <rik@octave.org> parents: 20713 diff changeset	573 filein = ["'" strtrim(filein) "'"];
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	574 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	575 if (strcmp (fileout, "-"))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	576 pipeout = true;
19278 6ca096827123 Use tempname() rather than tmpnam() in core Octave. Rik <rik@octave.org> parents: 19078 diff changeset	577 fileout = [tempname() ".eps"];
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	578 if (dos_shell)
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19725 diff changeset	579 cleanup = [cleanup, sprintf("& del %s ", strrep (fileout, '/', '\'))];
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	580 else
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19725 diff changeset	581 cleanup = [cleanup, sprintf("; rm %s ", fileout)];
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	582 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	583 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	584 pipeout = false;
20778 8513c84a13cb Use parser string concatenation rather than strcat() for performance in m-files. Rik <rik@octave.org> parents: 20713 diff changeset	585 fileout = ["'" strtrim(fileout) "'"];
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	586 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	587
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	588 if (! isempty (opts.preview) && opts.tight_flag)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	589 warning ("print:previewandtight",
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	590 "print.m: eps preview may not be combined with -tight");
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	591 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	592 if (! isempty (opts.preview) \|\| opts.tight_flag)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	593 if (! isempty (opts.epstool_binary))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	594 if (opts.tight_flag)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	595 cmd = "--copy --bbox";
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	596 elseif (! isempty (opts.preview))
16933 e39f00a32dc7 maint: Use parentheses around condition for switch(),while(),if() statements. Rik <rik@octave.org> parents: 16826 diff changeset	597 switch (opts.preview)
17174 c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	598 case "tiff"
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	599 cmd = sprintf ("--add-%s-preview --device tiffg3", opts.preview);
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	600 case {"tiff6u", "tiff6p", "metafile"}
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	601 cmd = sprintf ("--add-%s-preview --device bmpgray", opts.preview);
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	602 case {"tiff4", "interchange"}
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	603 cmd = sprintf ("--add-%s-preview", opts.preview);
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	604 case "pict"
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	605 cmd = sprintf ("--add-%s-preview --mac-single", opts.preview);
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	606 otherwise
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	607 error ("print:invalidpreview",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	608 "print.m: epstool cannot include preview for format '%s'",
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	609 opts.preview);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	610 endswitch
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	611 if (! isempty (opts.ghostscript.resolution))
19725 5f2c0ca0ef51 Ensure that numbers passed to integer printf format codes are integers (bug #44245). Rik <rik@octave.org>* parents: 19724 diff changeset	612 cmd = sprintf ("%s --dpi %d", cmd, fix (opts.ghostscript.resolution));
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	613 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	614 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	615 cmd = "";
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	616 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	617 if (! isempty (cmd))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	618 cmd = sprintf ("%s --quiet %s %s %s ", opts.epstool_binary,
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	619 cmd, filein, fileout);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	620 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	621 if (pipein)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	622 if (dos_shell)
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	623 filein(filein=="'") = "\"";
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	624 gs_cmd = __ghostscript__ ("binary", opts.ghostscript.binary,
19724 abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	625 "device", epsdevice,
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	626 "source", "-",
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	627 "output", filein);
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	628 cmd = sprintf ("%s %s & %s", gs_cmd, filein, cmd);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	629 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	630 cmd = sprintf ("cat > %s ; %s", filein, cmd);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	631 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	632 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	633 if (pipeout)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	634 if (dos_shell)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	635 cmd = sprintf ("%s & type %s", cmd, fileout);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	636 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	637 cmd = sprintf ("%s ; cat %s", cmd, fileout);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	638 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	639 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	640 if (! isempty (cleanup))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	641 if (pipeout && dos_shell)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	642 error ("print:epstoolpipe",
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	643 "print.m: cannot pipe output of 'epstool' for DOS shell");
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	644 elseif (pipeout)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	645 cmd = sprintf ("( %s %s )", cmd, cleanup);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	646 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	647 cmd = sprintf ("%s %s", cmd, cleanup);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	648 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	649 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	650 elseif (isempty (opts.epstool_binary))
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	651 error ("print:noepstool", "print.m: 'epstool' not found in PATH");
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	652 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	653 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	654 if (pipein && pipeout)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	655 if (dos_shell)
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	656 cmd = __ghostscript__ ("binary", opts.ghostscript.binary,
19724 abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	657 "device", epsdevice,
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	658 "source", "-",
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	659 "output", "-");
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	660 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	661 cmd = " cat ";
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	662 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	663 elseif (pipein && ! pipeout)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	664 if (dos_shell)
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	665 ## ghostscript expects double, not single, quotes
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	666 fileout(fileout=="'") = "\"";
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	667 cmd = __ghostscript__ ("binary", opts.ghostscript.binary,
19724 abc158e7122e Use epswrite/eps2write depending on capabilities of ghostscript (bug #44186). Rik <rik@octave.org> parents: 19706 diff changeset	668 "device", epsdevice,
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	669 "source", "-",
84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	670 "output", fileout);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	671 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	672 cmd = sprintf (" cat > %s ", fileout);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	673 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	674 elseif (! pipein && pipeout)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	675 if (dos_shell)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	676 cmd = sprintf (" type %s ", filein);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	677 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	678 cmd = sprintf (" cat %s ", filein);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	679 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	680 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	681 if (dos_shell)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	682 cmd = sprintf (" copy %s %s ", filein, fileout);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	683 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	684 cmd = sprintf (" cp %s %s ", filein, fileout);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	685 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	686 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	687 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	688 if (opts.debug)
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	689 fprintf ("epstool command: '%s'\n", cmd);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	690 endif
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	691
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	692 endfunction
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	693
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	694 function cmd = fig2dev (opts, devopt)
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	695
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	696 if (nargin < 2)
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19725 diff changeset	697 devopt = opts.devopt;
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	698 endif
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	699
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	700 dos_shell = (ispc () && ! isunix ());
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	701 if (! isempty (opts.fig2dev_binary))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	702 if (dos_shell)
18857 7bbe3658c5ef maint: Use "FIXME:" coding convention in m-files. Rik <rik@octave.org> parents: 18598 diff changeset	703 ## FIXME: Is this the right thing to do for DOS?
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	704 cmd = sprintf ("%s -L %s 2> NUL", opts.fig2dev_binary, devopt);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	705 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	706 cmd = sprintf ("%s -L %s 2> /dev/null", opts.fig2dev_binary, devopt);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	707 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	708 elseif (isempty (opts.fig2dev_binary))
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	709 error ("print:nofig2dev", "print.m: 'fig2dev' not found in PATH");
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	710 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	711 if (opts.debug)
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	712 fprintf ("fig2dev command: '%s'\n", cmd);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	713 endif
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	714
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	715 endfunction
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	716
12199 3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	717 function latex_standalone (opts)
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	718
12199 3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	719 n = find (opts.name == ".", 1, "last");
3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	720 if (! isempty (n))
3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	721 opts.name = opts.name(1:n-1);
3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	722 endif
20778 8513c84a13cb Use parser string concatenation rather than strcat() for performance in m-files. Rik <rik@octave.org> parents: 20713 diff changeset	723 latexfile = [opts.name ".tex"];
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	724
16933 e39f00a32dc7 maint: Use parentheses around condition for switch(),while(),if() statements. Rik <rik@octave.org> parents: 16826 diff changeset	725 switch (opts.devopt)
17174 c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	726 case {"pdflatexstandalone"}
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	727 packages = "\\usepackage{graphicx,color}";
20778 8513c84a13cb Use parser string concatenation rather than strcat() for performance in m-files. Rik <rik@octave.org> parents: 20713 diff changeset	728 graphicsfile = [opts.name "-inc.pdf"];
17174 c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	729 case {"pslatexstandalone"}
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	730 packages = "\\usepackage{epsfig,color}";
20778 8513c84a13cb Use parser string concatenation rather than strcat() for performance in m-files. Rik <rik@octave.org> parents: 20713 diff changeset	731 graphicsfile = [opts.name "-inc.ps"];
17174 c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	732 otherwise
c3c1ebfaa7dc maint: Use common indentation for switch statement. Rik <rik@octave.org> parents: 17146 diff changeset	733 packages = "\\usepackage{epsfig,color}";
20778 8513c84a13cb Use parser string concatenation rather than strcat() for performance in m-files. Rik <rik@octave.org> parents: 20713 diff changeset	734 graphicsfile = [opts.name "-inc.eps"];
12199 3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	735 endswitch
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	736
12199 3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	737 papersize = sprintf ("\\usepackage[papersize={%.2fbp,%.2fbp},text={%.2fbp,%.2fbp}]{geometry}",
19725 5f2c0ca0ef51 Ensure that numbers passed to integer printf format codes are integers (bug #44245). Rik <rik@octave.org>* parents: 19724 diff changeset	738 fix (opts.canvas_size), fix (opts.canvas_size));
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	739 prepend = {"\\documentclass{minimal}";
12199 3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	740 packages;
3fc07861449b Fix {eps,ps,pdf}latexstandalone printing for fltk, bug 32262. Ben Abbott <bpabbott@mac.com> parents: 11589 diff changeset	741 papersize;
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	742 "\\begin{document}";
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	743 "\\centering"};
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	744 postpend = {"\\end{document}"};
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	745
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	746 fid = fopen (latexfile, "r");
21759 b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	747 if (fid < 0)
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	748 error ("print:erroropeningfile",
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	749 "print.m: error opening file '%s'", latexfile);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	750 endif
21759 b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	751 latex = fscanf (fid, "%c", Inf);
b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	752 status = fclose (fid);
b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	753 if (status != 0)
b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	754 error ("print:errorclosingfile",
b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	755 "print.m: error closing file '%s'", latexfile);
b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	756 endif
b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	757 ## FIXME: should this be fixed in GL2PS?
b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	758 latex = strrep (latex, "\\includegraphics{}",
b002b4331a12 maint: Use two newlines after endfunction and start of BIST tests. Rik <rik@octave.org> parents: 21758 diff changeset	759 sprintf ("\\includegraphics{%s}", graphicsfile));
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	760
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	761 fid = fopen (latexfile, "w");
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	762 if (fid >= 0)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	763 fprintf (fid, "%s\n", prepend{:});
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	764 fprintf (fid, "%s", latex);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	765 fprintf (fid, "%s\n", postpend{:});
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	766 status = fclose (fid);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	767 if (status != 0)
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	768 error ("print:errorclosingfile",
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	769 "print.m: error closing file '%s'", latexfile);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	770 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	771 else
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	772 error ("print:erroropeningfile",
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	773 "print.m: error opening file '%s'", latexfile);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	774 endif
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	775
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	776 endfunction
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	777
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	778 function cmd = lpr (opts)
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	779
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	780 if (nargin < 2)
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19725 diff changeset	781 devopt = opts.devopt;
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	782 endif
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	783
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	784 if (! isempty (opts.lpr_binary))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	785 cmd = opts.lpr_binary;
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	786 if (! isempty (opts.lpr_options))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	787 cmd = sprintf ("%s %s", cmd, opts.lpr_options);
11113 a8ac114ec9ab Stylefixes, replace end by endif. Thorsten Meyer <thorsten.meyier@gmx.de> parents: 11107 diff changeset	788 endif
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	789 if (! isempty (opts.printer))
19026 d6f1f46e5b8f Fix double '-P' in print command to printer (bug #41957). Michael Godfrey <michaeldgodfrey@gmail.com> parents: 17751 diff changeset	790 cmd = sprintf ("%s %s", cmd, opts.printer);
11113 a8ac114ec9ab Stylefixes, replace end by endif. Thorsten Meyer <thorsten.meyier@gmx.de> parents: 11107 diff changeset	791 endif
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	792 elseif (isempty (opts.lpr_binary))
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	793 error ("print:nolpr", "print.m: 'lpr' not found in PATH");
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	794 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	795 if (opts.debug)
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	796 fprintf ("lpr command: '%s'\n", cmd);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	797 endif
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	798
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	799 endfunction
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	800
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	801 function cmd = pstoedit (opts, devopt)
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	802
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	803 if (nargin < 2)
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19725 diff changeset	804 devopt = opts.devopt;
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	805 endif
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	806
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	807 dos_shell = (ispc () && ! isunix ());
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	808 if (! isempty (opts.pstoedit_binary))
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	809 if (dos_shell)
11551 84fa2ba414ee print.m: Fix printing to eps for DOS. Ben Abbott <bpabbott@mac.com> parents: 11523 diff changeset	810 cmd = sprintf ("%s -f %s 2> NUL", opts.pstoedit_binary, devopt);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	811 else
18857 7bbe3658c5ef maint: Use "FIXME:" coding convention in m-files. Rik <rik@octave.org> parents: 18598 diff changeset	812 ## FIXME: Is this the right thing to do for DOS?
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	813 cmd = sprintf ("%s -f %s 2> /dev/null", opts.pstoedit_binary, devopt);
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	814 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	815 elseif (isempty (opts.pstoedit_binary))
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	816 error ("print:nopstoedit", "print.m: 'pstoedit' not found in PATH");
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	817 endif
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	818 if (opts.debug)
11589 b0084095098e missing semicolons in script files John W. Eaton <jwe@octave.org> parents: 11587 diff changeset	819 fprintf ("pstoedit command: '%s'\n", cmd);
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	820 endif
21758 ffad2baa90f7 maint: Use newlines to make code more readable. Rik <rik@octave.org> parents: 21751 diff changeset	821
11009 064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	822 endfunction
064aaf82222f Print via a pipeline. Ben Abbott <bpabbott@mac.com> parents: 10954 diff changeset	823

Mercurial > octave

annotate scripts/plot/util/print.m @ 21759:b002b4331a12