ruby-gr 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: 2c233863f557d6d70810dbfef025d311444633b074163f3e894b01c0b9f54e52
+  data.tar.gz: c7e676efdb662b0ea85736d6b66c36e785f587f96961055c712743d79a716265
+SHA512:
+  metadata.gz: 2e78037e8e9f2b824ec1f357e834367d696c28fce14732d1fad360c08a0005526cc757cb615d4779aa4d48d2cb05f0d853d849445c80ca7400425fc66c7b7329
+  data.tar.gz: 9ebf89a908f4141ef7a2616b7414d48616f2209e203193f8a61662cc4def5a27799425b9d5b6003f0f5ece500359c1416d64e8637ae4f1a5a3fedfddb4ee06c9

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2019 kojix2
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

data/README.md

@@ -0,0 +1,44 @@
+# GR module for Ruby
+
+[![The MIT License](https://img.shields.io/badge/license-MIT-orange.svg)](LICENSE.md)
+[![Build Status](https://travis-ci.com/kojix2/GR.rb.svg?&branch=master)](https://travis-ci.org/kojix2/GR.rb)
+
+[GR framework](https://github.com/sciapp/gr) - the graphics library for visualisation - for Ruby
+
+:construction: Under construction.
+
+## Installation
+Install [GR](https://github.com/sciapp/gr/releases).
+Set environment variable GRDIR.
+
+```sh
+export GRDIR="/your/path/to/gr"
+```
+
+Add this line to your application's Gemfile:
+
+```sh
+gem 'ruby-gr'
+```
+
+## Quick Start
+
+```ruby
+require 'gr'
+
+x = [0, 0.2, 0.4, 0.6, 0.8, 1.0]
+y = [0.3, 0.5, 0.4, 0.2, 0.6, 0.7]
+
+GR.polyline(x, y)
+tick = GR.tick(0, 1)
+GR.axes(tick, tick, 0, 0, 1, 1, -0.001)
+GR.updatews
+```
+
+## Contributing
+
+Bug reports and pull requests are welcome on GitHub at https://github.com/kojix2/GR.rb.
+
+## License
+
+The gem is available as open source under the terms of the [MIT License](https://opensource.org/licenses/MIT).

data/lib/gr.rb

@@ -0,0 +1,550 @@
+# frozen_string_literal: true
+
+require 'ffi'
+
+module GR
+  class << self
+    attr_reader :ffi_lib
+  end
+
+  # Platforms |  path
+  # Windows   |  bin/libgr.dll
+  # MacOSX    |  lib/libGR.so (NOT .dylib)
+  # Ubuntu    |  lib/libGR.so
+  raise 'Please set env variable GRDIR' unless ENV['GRDIR']
+
+  ENV['GKS_FONTPATH'] ||= ENV['GRDIR']
+  @ffi_lib = case RbConfig::CONFIG['host_os']
+             when /mswin|msys|mingw|cygwin|bccwin|wince|emc/
+               File.expand_path('bin/libgr.dll', ENV['GRDIR'])
+                   .gsub('/', '\\') # windows backslash
+             else
+               File.expand_path('lib/libGR.so', ENV['GRDIR'])
+             end
+end
+
+require_relative 'gr_commons'
+require 'gr/ffi'
+require 'gr/grbase'
+
+module GR
+  extend GRCommons::JupyterSupport
+  extend GRBase
+
+  # 1. double is the default type
+  # 2. don't check size (for now)
+  class << self
+    def inqdspsize
+      inquiry %i[double double int int] do |*pts|
+        super(*pts)
+      end
+    end
+
+    def polyline(x, y)
+      n = equal_length(x, y)
+      super(n, x, y)
+    end
+
+    def polymarker(x, y)
+      n = equal_length(x, y)
+      super(n, x, y)
+    end
+
+    def inqtext(x, y, string)
+      inquiry [{ double: 4 }, { double: 4 }] do |tbx, tby|
+        super(x, y, string, tbx, tby)
+      end
+    end
+
+    def fillarea(x, y)
+      n = equal_length(x, y)
+      super(n, x, y)
+    end
+
+    def cellarray(xmin, xmax, ymin, ymax, dimx, dimy, color)
+      super(xmin, xmax, ymin, ymax, dimx, dimy, 1, 1, dimx, dimy, int(color))
+    end
+
+    def nonuniformcellarray(x, y, dimx, dimy, color)
+      raise ArgumentError unless length(x) == dimx + 1 && length(y) == dimy + 1
+
+      super(x, y, dimx, dimy, 1, 1, dimx, dimy, int(color))
+    end
+
+    def polarcellarray(x_org, y_org, phimin, phimax, rmin, rmax, dimphi, dimr, color)
+      super(x_org, y_org, phimin, phimax, rmin, rmax, dimphi, dimr, 1, 1, dimphi, dimr, int(color))
+    end
+
+    def gdp(x, y, primid, datrec)
+      n = equal_length(x, y)
+      ldr = length(datrec, :int)
+      super(n, x, y, primid, ldr, datrec)
+    end
+
+    def spline(px, py, m, method)
+      n = equal_length(px, py)
+      super(n, px, py, m, method)
+    end
+
+    def gridit(xd, yd, zd, nx, ny)
+      nd = equal_length(xd, yd, zd)
+      inquiry [{ double: nx }, { double: ny }, { double: nx * ny }] do |px, py, pz|
+        super(nd, xd, yd, zd, nx, ny, px, py, pz)
+      end
+    end
+
+    def inqlinetype
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def inqlinewidth
+      inquiry_double { |pt| super(pt) }
+    end
+
+    def inqlinecolorind
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def inqmarkertype
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def inqmarkercolorind
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def inqfillintstyle
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def inqfillstyle
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def inqfillcolorind
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def inqscale
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def inqtextext(x, y, string)
+      inquiry [{ double: 4 }, { double: 4 }] do |tbx, tby|
+        super(x, y, string, tbx, tby)
+      end
+    end
+
+    def inqwindow
+      inquiry %i[double double double double] do |*pts|
+        super(*pts)
+      end
+    end
+
+    def inqviewport
+      inquiry %i[double double double double] do |*pts|
+        super(*pts)
+      end
+    end
+
+    def inqspace
+      inquiry %i[double double int int] do |*pts|
+        super(*pts)
+      end
+    end
+
+    alias axes2d axes
+
+    def verrorbars(px, py, e1, e2)
+      n = equal_length(px, py, e1, e2)
+      super(n, px, py, e1, e2)
+    end
+
+    def herrorbars(px, py, e1, e2)
+      n = equal_length(px, py, e1, e2)
+      super(n, px, py, e1, e2)
+    end
+
+    def polyline3d(px, py, pz)
+      n = equal_length(px, py, pz)
+      super(n, px, py, pz)
+    end
+
+    def polymarker3d(px, py, pz)
+      n = equal_length(px, py, pz)
+      super(n, px, py, pz)
+    end
+
+    def surface(px, py, pz, option)
+      # TODO: check: Arrays have incorrect length or dimension.
+      nx = length(px)
+      ny = length(py)
+      super(nx, ny, px, py, pz, option)
+    end
+
+    def trisurface(px, py, pz)
+      n = [length(px), length(py), length(pz)].min
+      super(n, px, py, pz)
+    end
+
+    def gradient(x, y, z)
+      # TODO: check: Arrays have incorrect length or dimension.
+      nx = length(x)
+      ny = length(y)
+      inquiry [{ double: nx * ny }, { double: nx * ny }] do |pu, pv|
+        super(nx, ny, x, y, z, pu, pv)
+      end
+    end
+
+    def quiver(x, y, u, v, color)
+      # TODO: check: Arrays have incorrect length or dimension.
+      nx = length(x)
+      ny = length(y)
+      super(nx, ny, x, y, u, v, (color ? 1 : 0))
+    end
+
+    def contour(px, py, h, pz, major_h)
+      # TODO: check: Arrays have incorrect length or dimension.
+      nx = length(px)
+      ny = length(py)
+      nh = h.size
+      super(nx, ny, nh, px, py, h, pz, major_h)
+    end
+
+    def contourf(px, py, h, pz, major_h)
+      # TODO: check: Arrays have incorrect length or dimension.
+      nx = length(px)
+      ny = length(py)
+      nh = h.size
+      super(nx, ny, nh, px, py, h, pz, major_h)
+    end
+
+    def tricontour(x, y, z, levels)
+      npoints = length(x) # equal_length ?
+      nlevels = length(levels)
+      super(npoints, x, y, z, nlevels, levels)
+    end
+
+    def hexbin(x, y, nbins)
+      n = length(x)
+      super(n, x, y, nbins)
+    end
+
+    def inqcolormap
+      inquiry_int { |pt| super(pt) }
+    end
+
+    def setcolormapfromrgb(r, g, b, positions: nil)
+      n = equal_length(r, g, b)
+      if positions.nil?
+        positions = ::FFI::Pointer::NULL
+      else
+        raise if length(positions) != n
+      end
+      super(n, r, g, b, positions)
+    end
+
+    def inqcolor(color)
+      inquiry_int do |rgb|
+        super(color, rgb)
+      end
+    end
+
+    def hsvtorgb(h, s, v)
+      inquiry %i[double double double] do |r, g, b|
+        super(h, s, v, r, g, b)
+      end
+    end
+
+    def ndctowc(x, y)
+      inquiry %i[double double] do |px, py|
+        px.write_double x
+        py.write_double y
+        super(px, py)
+      end
+    end
+
+    def wctondc(x, y)
+      inquiry %i[double double] do |px, py|
+        px.write_double x
+        py.write_double y
+        super(px, py)
+      end
+    end
+
+    def wc3towc(x, y, z)
+      inquiry %i[double double double] do |px, py, pz|
+        px.write_double x
+        py.write_double y
+        pz.write_double z
+        super(px, py, pz)
+      end
+    end
+
+    def drawpath(points, codes, fill)
+      len = length(codes)
+      super(len, points, uint8(codes), fill)
+    end
+
+    def drawimage(xmin, xmax, ymin, ymax, width, height, data, model = 0)
+      super(xmin, xmax, ymin, ymax, width, height, int(data), model)
+    end
+
+    def setcoordxform(mat)
+      raise if mat.size != 6
+
+      super(mat)
+    end
+
+    def inqmathtex(x, y, string)
+      inquiry [{ double: 4 }, { double: 4 }] do |tbx, tby|
+        super(x, y, string, tbx, tby)
+      end
+    end
+
+    def inqbbox
+      inquiry %i[double double double double] do |*pts|
+        super(*pts)
+      end
+    end
+
+    def adjustlimits(_amin, _amax)
+      inquiry %i[double double] do |*pts|
+        super(*pts)
+      end
+    end
+
+    def version
+      super.read_string
+    end
+
+    def reducepoints(xd, yd, n)
+      nd = equal_length(xd, yd)
+      inquiry [{ double: n }, { double: n }] do |x, y|
+        # Different from Julia. x, y are initialized zero.
+        super(nd, xd, yd, n, x, y)
+      end
+    end
+
+    def shadepoints(x, y, dims: [1200, 1200], xform: 1)
+      n = length(x)
+      w, h = dims
+      super(n, x, y, xform, w, h)
+    end
+
+    def shadelines(x, y, dims: [1200, 1200], xform: 1)
+      n = length(x)
+      w, h = dims
+      super(n, x, y, xform, w, h)
+    end
+
+    def panzoom(x, y, zoom)
+      inquiry %i[double double double double] do |xmin, xmax, ymin, ymax|
+        super(x, y, zoom, zoom, xmin, xmax, ymin, ymax)
+      end
+    end
+  end
+
+  # Constants
+
+  ASF_BUNDLED = 0
+  ASF_INDIVIDUAL = 1
+
+  NOCLIP = 0
+  CLIP = 1
+
+  COORDINATES_WC = 0
+  COORDINATES_NDC = 1
+
+  INTSTYLE_HOLLOW = 0
+  INTSTYLE_SOLID = 1
+  INTSTYLE_PATTERN = 2
+  INTSTYLE_HATCH = 3
+
+  TEXT_HALIGN_NORMAL = 0
+  TEXT_HALIGN_LEFT = 1
+  TEXT_HALIGN_CENTER = 2
+  TEXT_HALIGN_RIGHT = 3
+  TEXT_VALIGN_NORMAL = 0
+  TEXT_VALIGN_TOP = 1
+  TEXT_VALIGN_CAP = 2
+  TEXT_VALIGN_HALF = 3
+  TEXT_VALIGN_BASE = 4
+  TEXT_VALIGN_BOTTOM = 5
+
+  TEXT_PATH_RIGHT = 0
+  TEXT_PATH_LEFT = 1
+  TEXT_PATH_UP = 2
+  TEXT_PATH_DOWN = 3
+
+  TEXT_PRECISION_STRING = 0
+  TEXT_PRECISION_CHAR = 1
+  TEXT_PRECISION_STROKE = 2
+
+  LINETYPE_SOLID = 1
+  LINETYPE_DASHED = 2
+  LINETYPE_DOTTED = 3
+  LINETYPE_DASHED_DOTTED = 4
+  LINETYPE_DASH_2_DOT = -1
+  LINETYPE_DASH_3_DOT = -2
+  LINETYPE_LONG_DASH = -3
+  LINETYPE_LONG_SHORT_DASH = -4
+  LINETYPE_SPACED_DASH = -5
+  LINETYPE_SPACED_DOT = -6
+  LINETYPE_DOUBLE_DOT = -7
+  LINETYPE_TRIPLE_DOT = -8
+
+  MARKERTYPE_DOT = 1
+  MARKERTYPE_PLUS = 2
+  MARKERTYPE_ASTERISK = 3
+  MARKERTYPE_CIRCLE = 4
+  MARKERTYPE_DIAGONAL_CROSS = 5
+  MARKERTYPE_SOLID_CIRCLE = -1
+  MARKERTYPE_TRIANGLE_UP = -2
+  MARKERTYPE_SOLID_TRI_UP = -3
+  MARKERTYPE_TRIANGLE_DOWN = -4
+  MARKERTYPE_SOLID_TRI_DOWN = -5
+  MARKERTYPE_SQUARE = -6
+  MARKERTYPE_SOLID_SQUARE = -7
+  MARKERTYPE_BOWTIE = -8
+  MARKERTYPE_SOLID_BOWTIE = -9
+  MARKERTYPE_HOURGLASS = -10
+  MARKERTYPE_SOLID_HGLASS = -11
+  MARKERTYPE_DIAMOND = -12
+  MARKERTYPE_SOLID_DIAMOND = -13
+  MARKERTYPE_STAR = -14
+  MARKERTYPE_SOLID_STAR = -15
+  MARKERTYPE_TRI_UP_DOWN = -16
+  MARKERTYPE_SOLID_TRI_RIGHT = -17
+  MARKERTYPE_SOLID_TRI_LEFT = -18
+  MARKERTYPE_HOLLOW_PLUS = -19
+  MARKERTYPE_SOLID_PLUS = -20
+  MARKERTYPE_PENTAGON = -21
+  MARKERTYPE_HEXAGON = -22
+  MARKERTYPE_HEPTAGON = -23
+  MARKERTYPE_OCTAGON = -24
+  MARKERTYPE_STAR_4 = -25
+  MARKERTYPE_STAR_5 = -26
+  MARKERTYPE_STAR_6 = -27
+  MARKERTYPE_STAR_7 = -28
+  MARKERTYPE_STAR_8 = -29
+  MARKERTYPE_VLINE = -30
+  MARKERTYPE_HLINE = -31
+  MARKERTYPE_OMARK = -32
+
+  OPTION_X_LOG = 1
+  OPTION_Y_LOG = 2
+  OPTION_Z_LOG = 4
+  OPTION_FLIP_X = 8
+  OPTION_FLIP_Y = 16
+  OPTION_FLIP_Z = 32
+
+  OPTION_LINES = 0
+  OPTION_MESH = 1
+  OPTION_FILLED_MESH = 2
+  OPTION_Z_SHADED_MESH = 3
+  OPTION_COLORED_MESH = 4
+  OPTION_CELL_ARRAY = 5
+  OPTION_SHADED_MESH = 6
+
+  MODEL_RGB = 0
+  MODEL_HSV = 1
+
+  COLORMAP_UNIFORM = 0
+  COLORMAP_TEMPERATURE = 1
+  COLORMAP_GRAYSCALE = 2
+  COLORMAP_GLOWING = 3
+  COLORMAP_RAINBOWLIKE = 4
+  COLORMAP_GEOLOGIC = 5
+  COLORMAP_GREENSCALE = 6
+  COLORMAP_CYANSCALE = 7
+  COLORMAP_BLUESCALE = 8
+  COLORMAP_MAGENTASCALE = 9
+  COLORMAP_REDSCALE = 10
+  COLORMAP_FLAME = 11
+  COLORMAP_BROWNSCALE = 12
+  COLORMAP_PILATUS = 13
+  COLORMAP_AUTUMN = 14
+  COLORMAP_BONE = 15
+  COLORMAP_COOL = 16
+  COLORMAP_COPPER = 17
+  COLORMAP_GRAY = 18
+  COLORMAP_HOT = 19
+  COLORMAP_HSV = 20
+  COLORMAP_JET = 21
+  COLORMAP_PINK = 22
+  COLORMAP_SPECTRAL = 23
+  COLORMAP_SPRING = 24
+  COLORMAP_SUMMER = 25
+  COLORMAP_WINTER = 26
+  COLORMAP_GIST_EARTH = 27
+  COLORMAP_GIST_HEAT = 28
+  COLORMAP_GIST_NCAR = 29
+  COLORMAP_GIST_RAINBOW = 30
+  COLORMAP_GIST_STERN = 31
+  COLORMAP_AFMHOT = 32
+  COLORMAP_BRG = 33
+  COLORMAP_BWR = 34
+  COLORMAP_COOLWARM = 35
+  COLORMAP_CMRMAP = 36
+  COLORMAP_CUBEHELIX = 37
+  COLORMAP_GNUPLOT = 38
+  COLORMAP_GNUPLOT2 = 39
+  COLORMAP_OCEAN = 40
+  COLORMAP_RAINBOW = 41
+  COLORMAP_SEISMIC = 42
+  COLORMAP_TERRAIN = 43
+  COLORMAP_VIRIDIS = 44
+  COLORMAP_INFERNO = 45
+  COLORMAP_PLASMA = 46
+  COLORMAP_MAGMA = 47
+
+  FONT_TIMES_ROMAN = 101
+  FONT_TIMES_ITALIC = 102
+  FONT_TIMES_BOLD = 103
+  FONT_TIMES_BOLDITALIC = 104
+  FONT_HELVETICA = 105
+  FONT_HELVETICA_OBLIQUE = 106
+  FONT_HELVETICA_BOLD = 107
+  FONT_HELVETICA_BOLDOBLIQUE = 108
+  FONT_COURIER = 109
+  FONT_COURIER_OBLIQUE = 110
+  FONT_COURIER_BOLD = 111
+  FONT_COURIER_BOLDOBLIQUE = 112
+  FONT_SYMBOL = 113
+  FONT_BOOKMAN_LIGHT = 114
+  FONT_BOOKMAN_LIGHTITALIC = 115
+  FONT_BOOKMAN_DEMI = 116
+  FONT_BOOKMAN_DEMIITALIC = 117
+  FONT_NEWCENTURYSCHLBK_ROMAN = 118
+  FONT_NEWCENTURYSCHLBK_ITALIC = 119
+  FONT_NEWCENTURYSCHLBK_BOLD = 120
+  FONT_NEWCENTURYSCHLBK_BOLDITALIC = 121
+  FONT_AVANTGARDE_BOOK = 122
+  FONT_AVANTGARDE_BOOKOBLIQUE = 123
+  FONT_AVANTGARDE_DEMI = 124
+  FONT_AVANTGARDE_DEMIOBLIQUE = 125
+  FONT_PALATINO_ROMAN = 126
+  FONT_PALATINO_ITALIC = 127
+  FONT_PALATINO_BOLD = 128
+  FONT_PALATINO_BOLDITALIC = 129
+  FONT_ZAPFCHANCERY_MEDIUMITALIC = 130
+  FONT_ZAPFDINGBATS = 131
+
+  PATH_STOP      = 0x00
+  PATH_MOVETO    = 0x01
+  PATH_LINETO    = 0x02
+  PATH_CURVE3    = 0x03
+  PATH_CURVE4    = 0x04
+  PATH_CLOSEPOLY = 0x4f
+
+  MPL_SUPPRESS_CLEAR = 1
+  MPL_POSTPONE_UPDATE = 2
+
+  XFORM_BOOLEAN = 0
+  XFORM_LINEAR = 1
+  XFORM_LOG = 2
+  XFORM_LOGLOG = 3
+  XFORM_CUBIC = 4
+  XFORM_EQUALIZED = 5
+end