mirror of
https://github.com/dkogan/feedgnuplot.git
synced 2025-09-19 03:38:08 +08:00
Compare commits
120 Commits
debian/1.2
...
debian/1.4
Author | SHA1 | Date | |
---|---|---|---|
![]() |
965570cf70 | ||
![]() |
ebc818791c | ||
![]() |
9cc67cdaeb | ||
![]() |
07a109b09a | ||
![]() |
7b3040ecc9 | ||
![]() |
b59137c255 | ||
![]() |
fec440c8b3 | ||
![]() |
5758865246 | ||
![]() |
6f091d1cf2 | ||
![]() |
1c853a2193 | ||
![]() |
f6c1e943ab | ||
![]() |
b8b448e256 | ||
![]() |
defcf5ef59 | ||
![]() |
ba112a3bd9 | ||
![]() |
a32370c514 | ||
![]() |
5298072894 | ||
![]() |
7d7511e62e | ||
![]() |
1744aeb6d2 | ||
![]() |
53f6cdae5b | ||
![]() |
f21797a89e | ||
![]() |
7c704dc251 | ||
![]() |
ed9512924d | ||
![]() |
2ee401fcb4 | ||
![]() |
7c1f02ec7f | ||
![]() |
5740e55a6f | ||
![]() |
6f4816efd5 | ||
![]() |
008dc01d17 | ||
![]() |
a0c9e6e8bc | ||
![]() |
64b12e4738 | ||
![]() |
402fa32bda | ||
![]() |
7da37a0015 | ||
![]() |
a48b834512 | ||
![]() |
fc1a8af4bf | ||
![]() |
4da7705077 | ||
![]() |
b76c18a92d | ||
![]() |
888583abe9 | ||
![]() |
e17f110269 | ||
![]() |
89a185f8a6 | ||
![]() |
35ed74eaf1 | ||
![]() |
07f574a929 | ||
![]() |
5dce1d8cda | ||
![]() |
048b0db65c | ||
![]() |
b0877a8926 | ||
![]() |
8ad58134e1 | ||
![]() |
e6cb0830e8 | ||
![]() |
4958bda912 | ||
![]() |
3860d8281b | ||
![]() |
4f9adb6e11 | ||
![]() |
167e85d2a7 | ||
![]() |
5123ca73d3 | ||
![]() |
d4ca90e1bd | ||
![]() |
9e669044c7 | ||
![]() |
cacbedb336 | ||
![]() |
18994e68e1 | ||
![]() |
f8ed461571 | ||
![]() |
f01431dd1e | ||
![]() |
1e51157c0b | ||
![]() |
9a476c6429 | ||
![]() |
80b6030996 | ||
![]() |
232b68b819 | ||
![]() |
12eb829f16 | ||
![]() |
80b5d0ab61 | ||
![]() |
960c43e758 | ||
![]() |
2ecdfb9aef | ||
![]() |
e064c29daa | ||
![]() |
3d85dba82a | ||
![]() |
fa7082b242 | ||
![]() |
c61e58da0a | ||
![]() |
f6a20cf8d8 | ||
![]() |
9497e9d751 | ||
![]() |
c19dc4aa2a | ||
![]() |
f9174031cc | ||
![]() |
ab26e54e20 | ||
![]() |
238a0c1943 | ||
![]() |
42a8218fbe | ||
![]() |
4cfcf0fc35 | ||
![]() |
0e7f51f3f7 | ||
![]() |
01971c2434 | ||
![]() |
104accdd0d | ||
![]() |
605158b391 | ||
![]() |
9d98b84546 | ||
![]() |
5609773b5b | ||
![]() |
ac06d5410a | ||
![]() |
199796d874 | ||
![]() |
0c32afacfd | ||
![]() |
a9d1b533fb | ||
![]() |
0f0e51a159 | ||
![]() |
73ed9b545a | ||
![]() |
1688496f34 | ||
![]() |
498047e785 | ||
![]() |
72adba82f7 | ||
![]() |
539b2035d8 | ||
![]() |
10987c5187 | ||
![]() |
9ae728805d | ||
![]() |
9b3cbc13be | ||
![]() |
a65abc6095 | ||
![]() |
5db86810b5 | ||
![]() |
f790ac4683 | ||
![]() |
af94ddf457 | ||
![]() |
d75b572875 | ||
![]() |
6cb1574e2b | ||
![]() |
4fd1c390ff | ||
![]() |
4163e24956 | ||
![]() |
13268a1fa8 | ||
![]() |
08fa97fdb5 | ||
![]() |
e19bdf51c4 | ||
![]() |
a9af1925e2 | ||
![]() |
abc37bfa1e | ||
![]() |
19c56ae041 | ||
![]() |
9387a85fe6 | ||
![]() |
f38a00bfd1 | ||
![]() |
c21c4d7e70 | ||
![]() |
35901fe6d1 | ||
![]() |
1e3d01edd2 | ||
![]() |
20e9adbae4 | ||
![]() |
2b2bba9ff3 | ||
![]() |
caea1285a9 | ||
![]() |
64bce2a425 | ||
![]() |
417ceb2bcc | ||
![]() |
adbc8393f5 |
129
Changes
129
Changes
@@ -1,3 +1,132 @@
|
|||||||
|
feedgnuplot (1.45)
|
||||||
|
|
||||||
|
* zsh completion: --hardcopy, --image suggest filenames
|
||||||
|
* --image now produces a nicer legend: just the filename
|
||||||
|
* --curvestyle now overrides --curvestyleall
|
||||||
|
- This is a bug fix
|
||||||
|
* The version is now treated as a string not as a number
|
||||||
|
- So "1.40" is distinct from "1.4"
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Sun, 29 Oct 2017 13:56:28 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.44)
|
||||||
|
|
||||||
|
* --image draws its output beneath everything else
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Tue, 20 Jun 2017 16:44:30 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.43)
|
||||||
|
|
||||||
|
* Added --image
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Mon, 19 Jun 2017 13:12:38 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.42)
|
||||||
|
|
||||||
|
* Data can now come from STDIN or files on the cmdline.
|
||||||
|
This fixes a regression. Self-plotting data files work again
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 31 Mar 2017 15:38:47 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.41)
|
||||||
|
|
||||||
|
* Histograms: --xlen can coexist with --xmin/--xmax
|
||||||
|
* Histograms: work as expected with --xlen and --monotonic
|
||||||
|
* Histograms: better sanity checking of options
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 24 Feb 2017 23:42:28 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.40)
|
||||||
|
|
||||||
|
* If the options couldn't be parsed I don't dump the whole manpage
|
||||||
|
* --style and --rangesize can now take a comma-separated list of IDs
|
||||||
|
* 'any' is from List::MoreUtils, not List::Util
|
||||||
|
* the sleep-forever delay at end is now > 1000 days
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 25 Nov 2016 14:45:06 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.39)
|
||||||
|
|
||||||
|
* by default, histograms are plotted in expected ways
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Sat, 15 Oct 2016 20:45:15 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.38)
|
||||||
|
|
||||||
|
* hardcopy defaults:
|
||||||
|
- no enhanced text mode
|
||||||
|
- larger font size
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Wed, 27 Jul 2016 22:15:11 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.37)
|
||||||
|
|
||||||
|
* At the end of a streaming plot, include the last chunk of data
|
||||||
|
* Added --equation to the completions
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 01 Jan 2016 08:09:43 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.36)
|
||||||
|
|
||||||
|
* Added --equation to plot symbolic equations
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 13 Nov 2015 11:08:26 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.35)
|
||||||
|
|
||||||
|
* replaced a 'say' with 'print'. Should work better with ancient perls
|
||||||
|
* an "exit" command now has effect even with triggered-only replotting
|
||||||
|
|
||||||
|
* More sophisticated handling of termination conditions:
|
||||||
|
- Without --exit, we always end up with an interactive plot when the
|
||||||
|
input data is exhausted or when the user sends a ^C to the pipeline
|
||||||
|
- When streaming, the first ^C does not kill feedgnuplot
|
||||||
|
|
||||||
|
* Removed threading
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Sun, 01 Nov 2015 12:50:33 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.34)
|
||||||
|
|
||||||
|
* Fix for "Use of implicit split to @_ is deprecated". Thanks to Corey
|
||||||
|
Putkunz
|
||||||
|
|
||||||
|
* Declaring feedgnuplot as a package to let MetaCPAN index this
|
||||||
|
distribution
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Wed, 14 May 2014 00:45:24 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.33)
|
||||||
|
|
||||||
|
* fixed incorrect plotting of --timefmt --rangesize plots
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Thu, 06 Feb 2014 23:17:21 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.32)
|
||||||
|
|
||||||
|
* Added --rangesize and --rangesizeall. Different curves can now plot
|
||||||
|
different-size tuples
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Wed, 05 Feb 2014 13:57:58 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.31)
|
||||||
|
|
||||||
|
* Test suite requires gawk to get strftime()
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Sat, 25 Jan 2014 20:49:38 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.30)
|
||||||
|
|
||||||
|
* Added --with, --set, --unset, --style, --styleall
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 24 Jan 2014 15:38:07 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.29)
|
||||||
|
|
||||||
|
* added CPAN meta-data to require IPC::Run at build time
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Wed, 04 Dec 2013 21:12:40 -0800
|
||||||
|
|
||||||
feedgnuplot (1.28)
|
feedgnuplot (1.28)
|
||||||
|
|
||||||
* Minor POD update
|
* Minor POD update
|
||||||
|
@@ -20,9 +20,9 @@ sub parseversion
|
|||||||
|
|
||||||
while(<PL>)
|
while(<PL>)
|
||||||
{
|
{
|
||||||
if( /VERSION = ([0-9\.]+)/ )
|
if( /VERSION = '([0-9\.]+)'/ )
|
||||||
{
|
{
|
||||||
if ( $1 != $version )
|
if ( $1 ne $version )
|
||||||
{
|
{
|
||||||
die "Version mismatch. Changes says version is '$version', but 'bin/feedgnuplot' says it is '$1'";
|
die "Version mismatch. Changes says version is '$version', but 'bin/feedgnuplot' says it is '$1'";
|
||||||
}
|
}
|
||||||
@@ -63,7 +63,9 @@ WriteMakefile
|
|||||||
: ()),
|
: ()),
|
||||||
PL_FILES => {},
|
PL_FILES => {},
|
||||||
EXE_FILES => [ 'bin/feedgnuplot' ],
|
EXE_FILES => [ 'bin/feedgnuplot' ],
|
||||||
BUILD_REQUIRES => { 'String::ShellQuote' => 0},
|
BUILD_REQUIRES => { 'String::ShellQuote' => 0,
|
||||||
|
'List::MoreUtils' => 0,
|
||||||
|
'IPC::Run' => 0},
|
||||||
dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
|
dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
|
||||||
clean => { FILES => 'feedgnuplot-*' },
|
clean => { FILES => 'feedgnuplot-*' },
|
||||||
);
|
);
|
||||||
|
1127
bin/feedgnuplot
1127
bin/feedgnuplot
File diff suppressed because it is too large
Load Diff
@@ -7,12 +7,21 @@ complete -W \
|
|||||||
--colormap \
|
--colormap \
|
||||||
--curvestyle \
|
--curvestyle \
|
||||||
--curvestyleall \
|
--curvestyleall \
|
||||||
|
--style \
|
||||||
|
--styleall \
|
||||||
|
--with \
|
||||||
--dataid \
|
--dataid \
|
||||||
--domain \
|
--domain \
|
||||||
--dump \
|
--dump \
|
||||||
--exit \
|
--exit \
|
||||||
--extraValuesPerPoint \
|
--extraValuesPerPoint \
|
||||||
|
--rangesizeall \
|
||||||
|
--rangesize \
|
||||||
--extracmds \
|
--extracmds \
|
||||||
|
--set \
|
||||||
|
--unset \
|
||||||
|
--equation \
|
||||||
|
--image \
|
||||||
--geometry \
|
--geometry \
|
||||||
--hardcopy \
|
--hardcopy \
|
||||||
--help \
|
--help \
|
||||||
|
@@ -26,17 +26,26 @@ _arguments -S
|
|||||||
'--zmin:min Z:' \
|
'--zmin:min Z:' \
|
||||||
'--zmax:max Z:' \
|
'--zmax:max Z:' \
|
||||||
'*--y2:plot to place on the Y2 axis:' \
|
'*--y2:plot to place on the Y2 axis:' \
|
||||||
'--curvestyleall[Additional styles for ALL curves]:style' \
|
'(--with)--curvestyleall[Additional styles for ALL curves]:style' \
|
||||||
|
'(--with)--styleall[Additional styles for ALL curves]:style' \
|
||||||
|
'(--curvestyleall)--with[Additional styles for ALL curves]:style' \
|
||||||
'*--extracmds[Additional gnuplot commands]:command' \
|
'*--extracmds[Additional gnuplot commands]:command' \
|
||||||
|
'*--set[Additional 'set' gnuplot commands]:set-option' \
|
||||||
|
'*--unset[Additional 'unset' gnuplot commands]:unset-option' \
|
||||||
|
'*--equation[Raw symbolic equation]:equation' \
|
||||||
|
'--image[Image file to render beneath the data]:image:_files -g "(#i)*.(jpg|jpeg|png|gif)"' \
|
||||||
'--square[Plot data with square aspect ratio]' \
|
'--square[Plot data with square aspect ratio]' \
|
||||||
'--square_xy[For 3D plots, set square aspect ratio for ONLY the x,y axes]' \
|
'--square_xy[For 3D plots, set square aspect ratio for ONLY the x,y axes]' \
|
||||||
'--hardcopy[Plot to a file]:filename' \
|
'--hardcopy[Plot to a file]:new image filename:_files -g "(#i)*.(jpg|jpeg|png|gif)"' \
|
||||||
'--maxcurves[The maximum allowed number of curves]:number of curves' \
|
'--maxcurves[The maximum allowed number of curves]:number of curves' \
|
||||||
'(--3d)--monotonic[Resets plot if an X in the past is seen]' \
|
'(--3d)--monotonic[Resets plot if an X in the past is seen]' \
|
||||||
'--extraValuesPerPoint[How many extra values are given for each data point]:N'\
|
'(--rangesizeall)--extraValuesPerPoint[How many extra values are given for each data range]:N'\
|
||||||
|
'(--extraValuesPerPoint)--rangesizeall[How many values are given for each data range]:N'\
|
||||||
|
'*--rangesize[How many values comprise a data range in this curve]:curve id: :N:' \
|
||||||
'--dump[Instead of printing to gnuplot, print to STDOUT]' \
|
'--dump[Instead of printing to gnuplot, print to STDOUT]' \
|
||||||
'--geometry[The X11 geometry string]:geometry string:' \
|
'--geometry[The X11 geometry string]:geometry string:' \
|
||||||
'*--curvestyle[Additional styles for a curve]:curve id: :style:' \
|
'*--curvestyle[Additional styles for a curve]:curve id: :style:' \
|
||||||
|
'*--style[Additional styles for a curve]:curve id: :style:' \
|
||||||
'(--3d)*--histogram:plot to treat as a histogram:' \
|
'(--3d)*--histogram:plot to treat as a histogram:' \
|
||||||
'--binwidth:Histogram bin width:' \
|
'--binwidth:Histogram bin width:' \
|
||||||
'--histstyle:Style of histogram:(frequency unique cumulative cnormal)' \
|
'--histstyle:Style of histogram:(frequency unique cumulative cnormal)' \
|
||||||
|
113
debian/changelog
vendored
113
debian/changelog
vendored
@@ -1,3 +1,116 @@
|
|||||||
|
feedgnuplot (1.45-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* zsh completion: --hardcopy, --image suggest filenames
|
||||||
|
* --image now produces a nicer legend: just the filename
|
||||||
|
* --curvestyle now overrides --curvestyleall
|
||||||
|
- This is a bug fix
|
||||||
|
* The version is now treated as a string not as a number
|
||||||
|
- So "1.40" is distinct from "1.4"
|
||||||
|
|
||||||
|
-- Dima Kogan <dkogan@debian.org> Sun, 29 Oct 2017 14:06:26 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.44-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* --image always goes on the FRONT of the equation list
|
||||||
|
|
||||||
|
-- Dima Kogan <dkogan@debian.org> Tue, 20 Jun 2017 16:45:42 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.43-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* added --image as a convenience wrapper for --equation
|
||||||
|
|
||||||
|
-- Dima Kogan <dkogan@debian.org> Mon, 19 Jun 2017 13:16:18 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.42-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Upstream update:
|
||||||
|
- Fixed regression: data can now come from STDIN or files on the
|
||||||
|
cmdline
|
||||||
|
- reworded manpage of --exit
|
||||||
|
|
||||||
|
-- Dima Kogan <dkogan@debian.org> Tue, 25 Apr 2017 11:02:18 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.41-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Upstream update:
|
||||||
|
- Histograms: --xlen can coexist with --xmin/--xmax
|
||||||
|
- Histograms: work as expected with --xlen and --monotonic
|
||||||
|
- Histograms: better sanity checking of options
|
||||||
|
|
||||||
|
-- Dima Kogan <dkogan@debian.org> Fri, 24 Feb 2017 23:53:27 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.40-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Upstream update:
|
||||||
|
- If the options couldn't be parsed I don't dump the whole manpage
|
||||||
|
- --style and --rangesize can now take a comma-separated list of IDs
|
||||||
|
- 'any' is from List::MoreUtils, not List::Util
|
||||||
|
- the sleep-forever delay at end is now > 1000 days
|
||||||
|
|
||||||
|
-- Dima Kogan <dkogan@debian.org> Fri, 25 Nov 2016 14:49:36 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.39-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Upstream update:
|
||||||
|
- by default, histograms are plotted in expected ways
|
||||||
|
- No enhanced text mode in hardcopies, slightly larger font size
|
||||||
|
|
||||||
|
-- Dima Kogan <dkogan@debian.org> Sat, 15 Oct 2016 20:45:15 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.37-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Upstream update: At the end of a streaming plot, include the last
|
||||||
|
chunk of data
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 01 Jan 2016 08:14:23 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.36-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Upstream update: added --equation to plot symbolic equations
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 13 Nov 2015 11:14:30 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.35-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Upstream update: fancier handling of termination conditions, no more
|
||||||
|
threading code
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Mon, 02 Nov 2015 13:55:32 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.34-2) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Depends now works with the 'gnuplot5' packages
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 10 Oct 2014 14:05:17 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.34-1) unstable; urgency=medium
|
||||||
|
|
||||||
|
* Very minor upstream update
|
||||||
|
* gnuplot-nox can no satisfy the gnuplot dependency for feedgnuplot
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Wed, 06 Aug 2014 15:19:56 -0700
|
||||||
|
|
||||||
|
feedgnuplot (1.33-1) unstable; urgency=low
|
||||||
|
|
||||||
|
* Upstream update: fixed incorrect plotting of --timefmt --rangesize
|
||||||
|
plots
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Thu, 06 Feb 2014 23:19:02 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.32-1) unstable; urgency=low
|
||||||
|
|
||||||
|
* Added --rangesize and --rangesizeall. Different curves can now plot
|
||||||
|
different-size tuples
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Wed, 05 Feb 2014 14:00:44 -0800
|
||||||
|
|
||||||
|
feedgnuplot (1.30-1) unstable; urgency=low
|
||||||
|
|
||||||
|
* made the VCS links canonical
|
||||||
|
* added --set, --unset, --with, --style, --styleall
|
||||||
|
|
||||||
|
-- Dima Kogan <dima@secretsauce.net> Fri, 24 Jan 2014 15:50:03 -0800
|
||||||
|
|
||||||
feedgnuplot (1.28-1) unstable; urgency=low
|
feedgnuplot (1.28-1) unstable; urgency=low
|
||||||
|
|
||||||
* Upstream update:
|
* Upstream update:
|
||||||
|
8
debian/control
vendored
8
debian/control
vendored
@@ -6,12 +6,14 @@ Maintainer: Debian Science Maintainers <debian-science-maintainers@lists.alioth.
|
|||||||
Uploaders: Dima Kogan <dima@secretsauce.net>
|
Uploaders: Dima Kogan <dima@secretsauce.net>
|
||||||
Standards-Version: 3.9.4
|
Standards-Version: 3.9.4
|
||||||
Homepage: https://github.com/dkogan/feedgnuplot
|
Homepage: https://github.com/dkogan/feedgnuplot
|
||||||
Vcs-Git: git://git.debian.org/git/debian-science/packages/feedgnuplot.git
|
Vcs-Git: git://anonscm.debian.org/debian-science/packages/feedgnuplot.git
|
||||||
Vcs-Browser: http://git.debian.org/?p=debian-science/packages/feedgnuplot.git
|
Vcs-Browser: http://anonscm.debian.org/gitweb/?p=debian-science/packages/feedgnuplot.git
|
||||||
|
|
||||||
Package: feedgnuplot
|
Package: feedgnuplot
|
||||||
Architecture: all
|
Architecture: all
|
||||||
Depends: ${misc:Depends}, ${perl:Depends}, gnuplot-qt | gnuplot-x11 | gnuplot
|
Depends: ${misc:Depends}, ${perl:Depends},
|
||||||
|
liblist-moreutils-perl,
|
||||||
|
gnuplot-qt | gnuplot-x11 | gnuplot-nox | gnuplot5-qt | gnuplot5-x11 | gnuplot5-nox | gnuplot
|
||||||
Description: Pipe-oriented frontend to Gnuplot
|
Description: Pipe-oriented frontend to Gnuplot
|
||||||
Flexible, command-line-oriented frontend to Gnuplot. Creates plots from data
|
Flexible, command-line-oriented frontend to Gnuplot. Creates plots from data
|
||||||
coming in on STDIN or given in a filename passed on the commandline. Various
|
coming in on STDIN or given in a filename passed on the commandline. Various
|
||||||
|
58
feedgnuplot.spec
Normal file
58
feedgnuplot.spec
Normal file
@@ -0,0 +1,58 @@
|
|||||||
|
# Sample spec file for rpm-based systems. Debian-based systems already have this
|
||||||
|
# packaged, so we do not ship those here
|
||||||
|
|
||||||
|
Name: feedgnuplot
|
||||||
|
Version: 1.38
|
||||||
|
Release: 1%{?dist}
|
||||||
|
Summary: Pipe-oriented frontend to Gnuplot
|
||||||
|
BuildArch: noarch
|
||||||
|
|
||||||
|
License: Artistic or GPL-1+
|
||||||
|
URL: https://www.github.com/dkogan/feedgnuplot/
|
||||||
|
Source0: https://www.github.com/dkogan/feedgnuplot/archive/v%{version}.tar.gz#/%{name}-%{version}.tar.gz
|
||||||
|
|
||||||
|
BuildRequires: /usr/bin/pod2html
|
||||||
|
BuildRequires: perl-String-ShellQuote
|
||||||
|
BuildRequires: perl-ExtUtils-MakeMaker
|
||||||
|
BuildRequires: perl
|
||||||
|
BuildRequires: gawk
|
||||||
|
BuildRequires: gnuplot
|
||||||
|
BuildRequires: perl-IPC-Run
|
||||||
|
|
||||||
|
Requires: gnuplot
|
||||||
|
|
||||||
|
%description
|
||||||
|
Flexible, command-line-oriented frontend to Gnuplot. Creates plots from data
|
||||||
|
coming in on STDIN or given in a filename passed on the commandline. Various
|
||||||
|
data representations are supported, as is hardcopy output and streaming display
|
||||||
|
of live data.
|
||||||
|
|
||||||
|
%prep
|
||||||
|
%setup -q
|
||||||
|
|
||||||
|
%build
|
||||||
|
perl Makefile.PL INSTALLDIRS=vendor
|
||||||
|
make
|
||||||
|
pod2html --title=feedgnuplot bin/feedgnuplot > feedgnuplot.html
|
||||||
|
|
||||||
|
%install
|
||||||
|
make install DESTDIR=%{buildroot} PREFIX=/usr
|
||||||
|
|
||||||
|
mkdir -p %{buildroot}%{_defaultdocdir}/%{name}
|
||||||
|
cp Changes LICENSE feedgnuplot.html %{buildroot}%{_defaultdocdir}/%{name}
|
||||||
|
|
||||||
|
mkdir -p %{buildroot}%{_datadir}/zsh/site-functions
|
||||||
|
cp completions/zsh/* %{buildroot}%{_datadir}/zsh/site-functions
|
||||||
|
|
||||||
|
mkdir -p %{buildroot}%{_datadir}/bash-completion/completions
|
||||||
|
cp completions/bash/* %{buildroot}%{_datadir}/bash-completion/completions
|
||||||
|
|
||||||
|
rm -rf %{buildroot}/usr/lib64
|
||||||
|
|
||||||
|
|
||||||
|
%files
|
||||||
|
%{_bindir}/*
|
||||||
|
%{_datadir}/zsh/*
|
||||||
|
%{_datadir}/bash-completion/*
|
||||||
|
%doc %{_defaultdocdir}/%{name}/*
|
||||||
|
%doc %{_mandir}
|
202
t/plots.t
202
t/plots.t
@@ -17,14 +17,20 @@ BEGIN {
|
|||||||
exit(0);
|
exit(0);
|
||||||
}
|
}
|
||||||
|
|
||||||
open(my $pipe, 'gnuplot --version |');
|
my $gawkversion = `gawk -V`;
|
||||||
if( !$pipe )
|
if( !$gawkversion || $@ )
|
||||||
|
{
|
||||||
|
print("1..0 # Skip: gawk is required for strftime() in the test suite. Skipping tests.\n");
|
||||||
|
exit(0);
|
||||||
|
}
|
||||||
|
|
||||||
|
my $gnuplotVersion = `gnuplot --version`;
|
||||||
|
if( !$gnuplotVersion || $@)
|
||||||
{
|
{
|
||||||
print("1..0 # Skip: gnuplot not installed. Tests require ver. 4.6.4; feedgnuplot works with any.\n");
|
print("1..0 # Skip: gnuplot not installed. Tests require ver. 4.6.4; feedgnuplot works with any.\n");
|
||||||
exit(0);
|
exit(0);
|
||||||
}
|
}
|
||||||
|
|
||||||
my $gnuplotVersion = <$pipe>;
|
|
||||||
chomp $gnuplotVersion;
|
chomp $gnuplotVersion;
|
||||||
if ($gnuplotVersion ne "gnuplot 4.6 patchlevel 4")
|
if ($gnuplotVersion ne "gnuplot 4.6 patchlevel 4")
|
||||||
{
|
{
|
||||||
@@ -33,7 +39,7 @@ BEGIN {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
use Test::More tests => 52;
|
use Test::More tests => 58;
|
||||||
use File::Temp 'tempfile';
|
use File::Temp 'tempfile';
|
||||||
use IPC::Run 'run';
|
use IPC::Run 'run';
|
||||||
use String::ShellQuote;
|
use String::ShellQuote;
|
||||||
@@ -320,7 +326,7 @@ tryplot( testname => 'basic line plot with bounds, square aspect ratio',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'lines on both axes with labels, legends, titles',
|
tryplot( testname => 'lines on both axes with labels, legends, titles',
|
||||||
cmd => q{seq 5 | awk '{print 2*$1, $1*$1}'},
|
cmd => q{seq 5 | gawk '{print 2*$1, $1*$1}'},
|
||||||
options => [qw(--lines --points),
|
options => [qw(--lines --points),
|
||||||
'--legend', '0', 'data 0',
|
'--legend', '0', 'data 0',
|
||||||
'--title', "Test plot",
|
'--title', "Test plot",
|
||||||
@@ -369,7 +375,7 @@ tryplot( testname => 'lines on both axes with labels, legends, titles',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'lines on both axes with labels, legends, titles; different styles',
|
tryplot( testname => 'lines on both axes with labels, legends, titles; different styles',
|
||||||
cmd => q{seq 5 | awk '{print 2*$1, $1*$1}'},
|
cmd => q{seq 5 | gawk '{print 2*$1, $1*$1}'},
|
||||||
options => ['--legend', '0', 'data 0',
|
options => ['--legend', '0', 'data 0',
|
||||||
'--title', "Test plot",
|
'--title', "Test plot",
|
||||||
qw(--y2 1 --y2label y2 --xlabel x --ylabel y --y2max 30),
|
qw(--y2 1 --y2label y2 --xlabel x --ylabel y --y2max 30),
|
||||||
@@ -419,7 +425,7 @@ tryplot( testname => 'lines on both axes with labels, legends, titles; different
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'domain plot',
|
tryplot( testname => 'domain plot',
|
||||||
cmd => q{seq 5 | awk '{print 2*$1, $1*$1}'},
|
cmd => q{seq 5 | gawk '{print 2*$1, $1*$1}'},
|
||||||
options => [qw(--lines --points), '--domain'],
|
options => [qw(--lines --points), '--domain'],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
@@ -465,7 +471,7 @@ tryplot( testname => 'domain plot',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'dataid plot',
|
tryplot( testname => 'dataid plot',
|
||||||
cmd => q{seq 5 | awk '{print 2*$1, $1*$1}'},
|
cmd => q{seq 5 | gawk '{print 2*$1, $1*$1}'},
|
||||||
options => [qw(--lines --points),
|
options => [qw(--lines --points),
|
||||||
qw(--dataid --autolegend)],
|
qw(--dataid --autolegend)],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
@@ -512,7 +518,7 @@ tryplot( testname => 'dataid plot',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => '3d spiral with bounds, labels',
|
tryplot( testname => '3d spiral with bounds, labels',
|
||||||
cmd => q{seq 50 | awk '{print 2*cos($1/5), sin($1/5), $1}'},
|
cmd => q{seq 50 | gawk '{print 2*cos($1/5), sin($1/5), $1}'},
|
||||||
options => [qw(--lines --points),
|
options => [qw(--lines --points),
|
||||||
qw(--3d --domain --zmin -5 --zmax 45 --zlabel z),
|
qw(--3d --domain --zmin -5 --zmax 45 --zlabel z),
|
||||||
'--extracmds', 'set view 60,30'],
|
'--extracmds', 'set view 60,30'],
|
||||||
@@ -560,7 +566,7 @@ tryplot( testname => '3d spiral with bounds, labels',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => '3d spiral with bounds, labels, square xy aspect ratio',
|
tryplot( testname => '3d spiral with bounds, labels, square xy aspect ratio',
|
||||||
cmd => q{seq 50 | awk '{print 2*cos($1/5), sin($1/5), $1}'},
|
cmd => q{seq 50 | gawk '{print 2*cos($1/5), sin($1/5), $1}'},
|
||||||
options => [qw(--lines --points),
|
options => [qw(--lines --points),
|
||||||
qw(--3d --domain --zmin -5 --zmax 45 --zlabel z),
|
qw(--3d --domain --zmin -5 --zmax 45 --zlabel z),
|
||||||
'--extracmds', 'set view 60,30', '--square_xy'],
|
'--extracmds', 'set view 60,30', '--square_xy'],
|
||||||
@@ -608,7 +614,7 @@ tryplot( testname => '3d spiral with bounds, labels, square xy aspect ratio',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'Monotonicity check',
|
tryplot( testname => 'Monotonicity check',
|
||||||
cmd => q{seq 10 | awk '{print (NR-1)%5,NR}'},
|
cmd => q{seq 10 | gawk '{print (NR-1)%5,NR}'},
|
||||||
options => [qw(--lines --points --domain --monotonic)],
|
options => [qw(--lines --points --domain --monotonic)],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
@@ -655,7 +661,7 @@ EOF
|
|||||||
|
|
||||||
|
|
||||||
tryplot( testname => 'basic --timefmt plot',
|
tryplot( testname => 'basic --timefmt plot',
|
||||||
cmd => q{seq 5 | awk '{print strftime("%d %b %Y %T",1382249107+$1,1),$1}'},
|
cmd => q{seq 5 | gawk '{print strftime("%d %b %Y %T",1382249107+$1,1),$1}'},
|
||||||
options => ['--domain', '--timefmt', '%d %b %Y %H:%M:%S'],
|
options => ['--domain', '--timefmt', '%d %b %Y %H:%M:%S'],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
@@ -701,7 +707,7 @@ tryplot( testname => 'basic --timefmt plot',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => '--timefmt plot with bounds',
|
tryplot( testname => '--timefmt plot with bounds',
|
||||||
cmd => q{seq 5 | awk '{print strftime("%d %b %Y %T",1382249107+$1,1),$1}'},
|
cmd => q{seq 5 | gawk '{print strftime("%d %b %Y %T",1382249107+$1,1),$1}'},
|
||||||
options => ['--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
options => ['--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
||||||
'--xmin', '20 Oct 2013 06:05:00',
|
'--xmin', '20 Oct 2013 06:05:00',
|
||||||
'--xmax', '20 Oct 2013 06:05:20'],
|
'--xmax', '20 Oct 2013 06:05:20'],
|
||||||
@@ -749,7 +755,7 @@ tryplot( testname => '--timefmt plot with bounds',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => '--timefmt plot with --monotonic',
|
tryplot( testname => '--timefmt plot with --monotonic',
|
||||||
cmd => q{seq 10 | awk '{x=(NR-1)%5; print strftime("%d %b %Y %T",1382249107+x,1),$1}'},
|
cmd => q{seq 10 | gawk '{x=(NR-1)%5; print strftime("%d %b %Y %T",1382249107+x,1),$1}'},
|
||||||
options => ['--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
options => ['--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
||||||
'--monotonic'],
|
'--monotonic'],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
@@ -795,10 +801,57 @@ tryplot( testname => '--timefmt plot with --monotonic',
|
|||||||
|
|
||||||
EOF
|
EOF
|
||||||
|
|
||||||
|
tryplot( testname => '--timefmt with custom rangesize',
|
||||||
|
cmd => q{seq 5 | gawk '{print strftime("%d %b %Y %T",1382249107+$1,1),$1,$1/10}'},
|
||||||
|
options => ['--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
||||||
|
qw(--with errorbars --rangesizeall 2)],
|
||||||
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
|
|
||||||
|
5.5 ++---------+-----------+----------+----------+----------+-----------+----------+---------**
|
||||||
|
+ + + + + + + + *
|
||||||
|
| *
|
||||||
|
5 ++ +A
|
||||||
|
| *
|
||||||
|
| *
|
||||||
|
| *
|
||||||
|
4.5 ++ **
|
||||||
|
| *** |
|
||||||
|
| * |
|
||||||
|
4 ++ A ++
|
||||||
|
| * |
|
||||||
|
| * |
|
||||||
|
| *** |
|
||||||
|
3.5 ++ ++
|
||||||
|
| *** |
|
||||||
|
| * |
|
||||||
|
3 ++ A ++
|
||||||
|
| * |
|
||||||
|
| * |
|
||||||
|
| *** |
|
||||||
|
2.5 ++ ++
|
||||||
|
| |
|
||||||
|
| *** |
|
||||||
|
2 ++ A ++
|
||||||
|
| * |
|
||||||
|
| *** |
|
||||||
|
| |
|
||||||
|
1.5 ++ ++
|
||||||
|
| |
|
||||||
|
| |
|
||||||
|
1 A* ++
|
||||||
|
** |
|
||||||
|
| |
|
||||||
|
+ + + + + + + + +
|
||||||
|
0.5 ++---------+-----------+----------+----------+----------+-----------+----------+---------++
|
||||||
|
05:08 05:08 05:09 05:09 05:10 05:10 05:11 05:11 05:12
|
||||||
|
|
||||||
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'Error bars (using extraValuesPerPoint)',
|
tryplot( testname => 'Error bars (using extraValuesPerPoint)',
|
||||||
cmd => q{seq 5 | awk '{print $1,$1,$1/10}'},
|
cmd => q{seq 5 | gawk '{print $1,$1,$1/10}'},
|
||||||
options => [qw(--domain),
|
options => [qw(--domain),
|
||||||
qw(--extraValuesPerPoint 1 --curvestyle 0), 'with errorbars'],
|
qw(--extraValuesPerPoint 1 --with errorbars)],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
|
|
||||||
@@ -843,6 +896,103 @@ tryplot( testname => 'Error bars (using extraValuesPerPoint)',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
|
|
||||||
|
tryplot( testname => 'Error bars (using rangesizeall)',
|
||||||
|
cmd => q{seq 5 | gawk '{print $1,$1,$1/10}'},
|
||||||
|
options => [qw(--domain),
|
||||||
|
qw(--rangesizeall 2 --with errorbars)],
|
||||||
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
|
|
||||||
|
5.5 ++---------+-----------+----------+----------+----------+-----------+----------+---------**
|
||||||
|
+ + + + + + + + *
|
||||||
|
| *
|
||||||
|
5 ++ +A
|
||||||
|
| *
|
||||||
|
| *
|
||||||
|
| *
|
||||||
|
4.5 ++ **
|
||||||
|
| *** |
|
||||||
|
| * |
|
||||||
|
4 ++ A ++
|
||||||
|
| * |
|
||||||
|
| * |
|
||||||
|
| *** |
|
||||||
|
3.5 ++ ++
|
||||||
|
| *** |
|
||||||
|
| * |
|
||||||
|
3 ++ A ++
|
||||||
|
| * |
|
||||||
|
| * |
|
||||||
|
| *** |
|
||||||
|
2.5 ++ ++
|
||||||
|
| |
|
||||||
|
| *** |
|
||||||
|
2 ++ A ++
|
||||||
|
| * |
|
||||||
|
| *** |
|
||||||
|
| |
|
||||||
|
1.5 ++ ++
|
||||||
|
| |
|
||||||
|
| |
|
||||||
|
1 A* ++
|
||||||
|
** |
|
||||||
|
| |
|
||||||
|
+ + + + + + + + +
|
||||||
|
0.5 ++---------+-----------+----------+----------+----------+-----------+----------+---------++
|
||||||
|
1 1.5 2 2.5 3 3.5 4 4.5 5
|
||||||
|
|
||||||
|
EOF
|
||||||
|
|
||||||
|
|
||||||
|
tryplot( testname => 'Error bars (using rangesize, rangesizeall)',
|
||||||
|
cmd => q{seq 5 | gawk '{print $1,"vert",$1,$1/10,"horiz",5-$1,$1-$1/5,$1+$1/20}'},
|
||||||
|
options => [qw(--domain --dataid),
|
||||||
|
qw(--rangesize vert 2 --rangesizeall 3 --with xerrorbars --style vert), 'with errorbars',
|
||||||
|
qw(--xmin 1 --xmax 5 --ymin 0.5 --ymax 5.5)],
|
||||||
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
|
|
||||||
|
+-----------+----------+-----------+----------+-----------+----------+-----------+---------**
|
||||||
|
+ + + + + + + + *
|
||||||
|
| *
|
||||||
|
5 ++ +A
|
||||||
|
| *
|
||||||
|
| *
|
||||||
|
| *
|
||||||
|
| **
|
||||||
|
| *** |
|
||||||
|
## * |
|
||||||
|
4 B# A ++
|
||||||
|
## * |
|
||||||
|
| * |
|
||||||
|
| *** |
|
||||||
|
| |
|
||||||
|
| *** |
|
||||||
|
| # # * |
|
||||||
|
3 ++ #########B## A ++
|
||||||
|
| # # * |
|
||||||
|
| * |
|
||||||
|
| *** |
|
||||||
|
| |
|
||||||
|
| |
|
||||||
|
| *** # # |
|
||||||
|
2 ++ A ##############B### ++
|
||||||
|
| * # # |
|
||||||
|
| *** |
|
||||||
|
| |
|
||||||
|
| |
|
||||||
|
| |
|
||||||
|
| # # |
|
||||||
|
1 A* ##################B##### ++
|
||||||
|
** # # |
|
||||||
|
| |
|
||||||
|
+ + + + + + + + +
|
||||||
|
+-----------+----------+-----------+----------+-----------+----------+-----------+----------+
|
||||||
|
1 1.5 2 2.5 3 3.5 4 4.5 5
|
||||||
|
|
||||||
|
EOF
|
||||||
|
|
||||||
|
|
||||||
SKIP:
|
SKIP:
|
||||||
{
|
{
|
||||||
|
|
||||||
@@ -860,7 +1010,7 @@ skip "Skipping unreliable tests. Set RUN_ALL_TESTS environment variable to run t
|
|||||||
|
|
||||||
|
|
||||||
tryplot( testname => 'Histogram plot',
|
tryplot( testname => 'Histogram plot',
|
||||||
cmd => q{seq 50 | awk '{print $1*$1}'},
|
cmd => q{seq 50 | gawk '{print $1*$1}'},
|
||||||
options => [qw(--lines --points),
|
options => [qw(--lines --points),
|
||||||
qw(--histo 0 --binwidth 50 --ymin 0 --curvestyleall), 'with boxes'],
|
qw(--histo 0 --binwidth 50 --ymin 0 --curvestyleall), 'with boxes'],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
@@ -907,7 +1057,7 @@ tryplot( testname => 'Histogram plot',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'Cumulative histogram',
|
tryplot( testname => 'Cumulative histogram',
|
||||||
cmd => q{seq 50 | awk '{print $1*$1}'},
|
cmd => q{seq 50 | gawk '{print $1*$1}'},
|
||||||
options => [qw(--lines --points),
|
options => [qw(--lines --points),
|
||||||
qw(--histo 0 --histstyle cum --binwidth 50 --ymin 0 --curvestyleall), 'with boxes'],
|
qw(--histo 0 --histstyle cum --binwidth 50 --ymin 0 --curvestyleall), 'with boxes'],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
@@ -954,7 +1104,7 @@ tryplot( testname => 'Cumulative histogram',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'Circles',
|
tryplot( testname => 'Circles',
|
||||||
cmd => q{seq 5 | awk '{print $1,$1,$1/10}'},
|
cmd => q{seq 5 | gawk '{print $1,$1,$1/10}'},
|
||||||
options => [qw(--circles --domain)],
|
options => [qw(--circles --domain)],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
@@ -1008,7 +1158,7 @@ note( "Starting to run streaming tests. These will take several seconds each" );
|
|||||||
# points, and then "exit", so I should have two frames worth of data plotted. I
|
# points, and then "exit", so I should have two frames worth of data plotted. I
|
||||||
# pre-send a 0 so that the gnuplot autoscaling is always well-defined
|
# pre-send a 0 so that the gnuplot autoscaling is always well-defined
|
||||||
tryplot( testname => 'basic streaming test',
|
tryplot( testname => 'basic streaming test',
|
||||||
cmd => q{seq 500 | awk 'BEGIN{ print 0; } {print (NR==3)? "exit" : $0; fflush(); system("sleep 1.2");}'},
|
cmd => q{seq 500 | gawk 'BEGIN{ print 0; } {print (NR==3)? "exit" : $0; fflush(); system("sleep 1.2");}'},
|
||||||
options => [qw(--lines --points --stream)],
|
options => [qw(--lines --points --stream)],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
@@ -1094,7 +1244,7 @@ tryplot( testname => 'basic streaming test',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'basic streaming test, twice as fast',
|
tryplot( testname => 'basic streaming test, twice as fast',
|
||||||
cmd => q{seq 500 | awk 'BEGIN{ print 0; } {print (NR==3)? "exit" : $0; fflush(); system("sleep 0.6");}'},
|
cmd => q{seq 500 | gawk 'BEGIN{ print 0; } {print (NR==3)? "exit" : $0; fflush(); system("sleep 0.6");}'},
|
||||||
options => [qw(--lines --points --stream 0.4)],
|
options => [qw(--lines --points --stream 0.4)],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
@@ -1181,7 +1331,7 @@ EOF
|
|||||||
|
|
||||||
|
|
||||||
tryplot( testname => 'streaming with --xlen',
|
tryplot( testname => 'streaming with --xlen',
|
||||||
cmd => q{seq 500 | awk 'BEGIN{ print 0; } {print (NR==3)? "exit" : $0; fflush(); system("sleep 0.6");}'},
|
cmd => q{seq 500 | gawk 'BEGIN{ print 0; } {print (NR==3)? "exit" : $0; fflush(); system("sleep 0.6");}'},
|
||||||
options => [qw(--lines --points --stream 0.4 --xlen 1.1)],
|
options => [qw(--lines --points --stream 0.4 --xlen 1.1)],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
@@ -1267,7 +1417,7 @@ tryplot( testname => 'streaming with --xlen',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => 'streaming with --monotonic',
|
tryplot( testname => 'streaming with --monotonic',
|
||||||
cmd => q{seq 500 | awk '{if(NR==11) {print "exit";} else {x=(NR-1)%5; if(x==0) {print -1,-1;} print x,NR;}; fflush(); system("sleep 0.6");}'},
|
cmd => q{seq 500 | gawk '{if(NR==11) {print "exit";} else {x=(NR-1)%5; if(x==0) {print -1,-1;} print x,NR;}; fflush(); system("sleep 0.6");}'},
|
||||||
options => [qw(--lines --points --stream 0.4 --domain --monotonic)],
|
options => [qw(--lines --points --stream 0.4 --domain --monotonic)],
|
||||||
refplot => <<'EOF' );
|
refplot => <<'EOF' );
|
||||||
|
|
||||||
@@ -1673,7 +1823,7 @@ tryplot( testname => 'streaming with --monotonic',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => '--timefmt streaming plot with --xlen',
|
tryplot( testname => '--timefmt streaming plot with --xlen',
|
||||||
cmd => q{seq 5 | awk 'BEGIN{ print strftime("%d %b %Y %T",1382249107-1,1),-4;} {if(NR==3) {print "exit";} else{ print strftime("%d %b %Y %T",1382249107+$1,1),$1;} fflush(); system("sleep 0.6")}'},
|
cmd => q{seq 5 | gawk 'BEGIN{ print strftime("%d %b %Y %T",1382249107-1,1),-4;} {if(NR==3) {print "exit";} else{ print strftime("%d %b %Y %T",1382249107+$1,1),$1;} fflush(); system("sleep 0.6")}'},
|
||||||
options => ['--points', '--lines',
|
options => ['--points', '--lines',
|
||||||
'--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
'--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
||||||
qw(--stream 0.4 --xlen 3)],
|
qw(--stream 0.4 --xlen 3)],
|
||||||
@@ -1761,7 +1911,7 @@ tryplot( testname => '--timefmt streaming plot with --xlen',
|
|||||||
EOF
|
EOF
|
||||||
|
|
||||||
tryplot( testname => '--timefmt streaming plot with --monotonic',
|
tryplot( testname => '--timefmt streaming plot with --monotonic',
|
||||||
cmd => q{seq 10 | awk '{x=(NR-1)%5; if(x==0) {print strftime("%d %b %Y %T",1382249107-1,-4),-4;} print strftime("%d %b %Y %T",1382249107+x,1),NR; fflush(); system("sleep 0.6")}'},
|
cmd => q{seq 10 | gawk '{x=(NR-1)%5; if(x==0) {print strftime("%d %b %Y %T",1382249107-1,-4),-4;} print strftime("%d %b %Y %T",1382249107+x,1),NR; fflush(); system("sleep 0.6")}'},
|
||||||
options => ['--points', '--lines',
|
options => ['--points', '--lines',
|
||||||
'--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
'--domain', '--timefmt', '%d %b %Y %H:%M:%S',
|
||||||
qw(--stream 0.4 --monotonic)],
|
qw(--stream 0.4 --monotonic)],
|
||||||
@@ -2177,7 +2327,7 @@ sub tryplot
|
|||||||
my %args = @_;
|
my %args = @_;
|
||||||
|
|
||||||
my @options = ('--exit',
|
my @options = ('--exit',
|
||||||
'--extracmds', 'unset grid',
|
qw(--unset grid),
|
||||||
'--terminal', 'dumb 100,40');
|
'--terminal', 'dumb 100,40');
|
||||||
unshift @options, @{$args{options}};
|
unshift @options, @{$args{options}};
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user