charta 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 7a519ab8c11228ddf45e3aa026fd28ed199d21d1
+  data.tar.gz: 93830bdbc7cc63b2e049a7071e235fcab76a496d
+SHA512:
+  metadata.gz: 4b30a72a075cc7b48a4894d3bfa1f9ab62472d40abb509aeeb2a0f778e4e328e8da8249c745fb1ca880f664158f619b5fb951353e5c5396f9328ef9bb38ea68e
+  data.tar.gz: 1cbfc29635b9a5874e20a83ed78902a2b762ebbd6431df4997b0b0afa57dda335231cecedec51fa71fdcb9bd50bc19b23ae948aae1194442f4edeaab078ce2d9

data/.gitignore

@@ -0,0 +1,11 @@
+*~
+/.bundle/
+/.yardoc
+/Gemfile.lock
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/
+.byebug_history

data/.travis.yml

@@ -0,0 +1,5 @@
+sudo: false
+language: ruby
+rvm:
+  - 2.2.3
+before_install: gem install bundler -v 1.14.6

data/CODE_OF_CONDUCT.md

@@ -0,0 +1,74 @@
+# Contributor Covenant Code of Conduct
+
+## Our Pledge
+
+In the interest of fostering an open and welcoming environment, we as
+contributors and maintainers pledge to making participation in our project and
+our community a harassment-free experience for everyone, regardless of age, body
+size, disability, ethnicity, gender identity and expression, level of experience,
+nationality, personal appearance, race, religion, or sexual identity and
+orientation.
+
+## Our Standards
+
+Examples of behavior that contributes to creating a positive environment
+include:
+
+* Using welcoming and inclusive language
+* Being respectful of differing viewpoints and experiences
+* Gracefully accepting constructive criticism
+* Focusing on what is best for the community
+* Showing empathy towards other community members
+
+Examples of unacceptable behavior by participants include:
+
+* The use of sexualized language or imagery and unwelcome sexual attention or
+advances
+* Trolling, insulting/derogatory comments, and personal or political attacks
+* Public or private harassment
+* Publishing others' private information, such as a physical or electronic
+  address, without explicit permission
+* Other conduct which could reasonably be considered inappropriate in a
+  professional setting
+
+## Our Responsibilities
+
+Project maintainers are responsible for clarifying the standards of acceptable
+behavior and are expected to take appropriate and fair corrective action in
+response to any instances of unacceptable behavior.
+
+Project maintainers have the right and responsibility to remove, edit, or
+reject comments, commits, code, wiki edits, issues, and other contributions
+that are not aligned to this Code of Conduct, or to ban temporarily or
+permanently any contributor for other behaviors that they deem inappropriate,
+threatening, offensive, or harmful.
+
+## Scope
+
+This Code of Conduct applies both within project spaces and in public spaces
+when an individual is representing the project or its community. Examples of
+representing a project or community include using an official project e-mail
+address, posting via an official social media account, or acting as an appointed
+representative at an online or offline event. Representation of a project may be
+further defined and clarified by project maintainers.
+
+## Enforcement
+
+Instances of abusive, harassing, or otherwise unacceptable behavior may be
+reported by contacting the project team at brice@ekylibre.com. All
+complaints will be reviewed and investigated and will result in a response that
+is deemed necessary and appropriate to the circumstances. The project team is
+obligated to maintain confidentiality with regard to the reporter of an incident.
+Further details of specific enforcement policies may be posted separately.
+
+Project maintainers who do not follow or enforce the Code of Conduct in good
+faith may face temporary or permanent repercussions as determined by other
+members of the project's leadership.
+
+## Attribution
+
+This Code of Conduct is adapted from the [Contributor Covenant][homepage], version 1.4,
+available at [http://contributor-covenant.org/version/1/4][version]
+
+[homepage]: http://contributor-covenant.org
+[version]: http://contributor-covenant.org/version/1/4/

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in charta.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2017 Brice TEXIER
+
+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 @@
+# Charta
+
+Charta is an overlay to RGeo. Basically, it was developped to permit to manipulate more easily spatial data without using factory system. It's always the case. The code was extracted from [Ekylibre](https://github.com/ekylibre/ekylibre).
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem 'charta'
+```
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install charta
+
+## Usage
+
+```ruby
+geom = Charta.new_geometry(<WKT, WKB, GeoJSON...>) #=> <#Charta::Geometry>
+geom.point_on_surface #=> <#Charta::Point>
+
+geom.transform(2154) # => <#Charta::Geometry>
+```
+
+## Development
+
+After checking out the repo, run `bundle` to install dependencies. Then, run `rake test` to run the tests.
+
+To install this gem onto your local machine, run `bundle exec rake install`. To release a new version, update the version number in `version.rb`, and then run `bundle exec rake release`, which will create a git tag for the version, push git commits and tags, and push the `.gem` file to [rubygems.org](https://rubygems.org).
+
+## Contributing
+
+Bug reports and pull requests are welcome on GitHub at https://github.com/ekylibre/charta. This project is intended to be a safe, welcoming space for collaboration, and contributors are expected to adhere to the [Contributor Covenant](http://contributor-covenant.org) code of conduct.
+
+
+## License
+
+The gem is available as open source under the terms of the [MIT License](http://opensource.org/licenses/MIT).
+

data/Rakefile

@@ -0,0 +1,10 @@
+require "bundler/gem_tasks"
+require "rake/testtask"
+
+Rake::TestTask.new(:test) do |t|
+  t.libs << "test"
+  t.libs << "lib"
+  t.test_files = FileList['test/**/*_test.rb']
+end
+
+task :default => :test

data/charta.gemspec

@@ -0,0 +1,30 @@
+# coding: utf-8
+
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'charta/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = 'charta'
+  spec.version       = Charta::VERSION
+  spec.authors       = ['Brice TEXIER']
+  spec.email         = ['brice@ekylibre.com']
+
+  spec.summary       = 'Simple tool over geos and co'
+  spec.homepage      = 'https://github.com/ekylibre/charta'
+  spec.license       = 'MIT'
+
+  spec.files         = `git ls-files -z`.split("\x0").reject do |f|
+    f.match(%r{^(test|spec|features)/})
+  end
+  spec.require_paths = ['lib']
+
+  spec.add_dependency 'nokogiri', '>= 1.7.0'
+  spec.add_dependency 'rgeo', '~> 0.6.0'
+  spec.add_dependency 'json', '>= 1.8.0'
+  spec.add_dependency 'rgeo-geojson', '~> 0.4.3'
+  spec.add_development_dependency 'bundler', '~> 1.14'
+  spec.add_development_dependency 'rake', '~> 10.0'
+  spec.add_development_dependency 'minitest', '~> 5.0'
+  spec.add_development_dependency 'byebug'
+end

data/lib/charta.rb

@@ -0,0 +1,176 @@
+# Gathers geomatic calculations
+# Completes RGeo
+require 'rgeo'
+require 'charta/geometry'
+require 'charta/geometry_collection'
+require 'charta/point'
+require 'charta/line_string'
+require 'charta/polygon'
+require 'charta/multi_polygon'
+require 'charta/bounding_box'
+require 'charta/geo_json'
+require 'charta/gml'
+require 'charta/kml'
+
+unless RGeo::CoordSys::Proj4.supported?
+  puts "Proj4 is not supported. Some actions won't work"
+end
+
+# Charta aims to supply easy geom/geog tools
+module Charta
+  SRS = {
+    WGS84: 4326,
+    CRS84: 4326,
+    RGF93: 2143
+  }.freeze
+
+  class << self
+    def new_geometry(coordinates, srs = nil, format = nil, _flatten_collection = true, _options = {})
+      geom_ewkt = nil
+      if coordinates.to_s =~ /\A[[:space:]]*\z/
+        geom_ewkt = empty_geometry(srs).to_ewkt
+      elsif coordinates.is_a?(::Charta::Geometry)
+        geom_ewkt = coordinates.to_ewkt
+      elsif coordinates.is_a?(Hash) || (coordinates.is_a?(String) && ::Charta::GeoJSON.valid?(coordinates)) # GeoJSON
+        srid = srs ? find_srid(srs) : :WGS84
+        geom_ewkt = ::Charta::GeoJSON.new(coordinates, srid).to_ewkt
+      elsif coordinates.is_a?(String)
+        geom_ewkt = if coordinates =~ /\A[A-F0-9]+\z/ # WKB
+                      if srs && srid = find_srid(srs)
+                        generate_ewkt RGeo::Geos.factory(srid: srid).parse_wkb(coordinates)
+                      else
+                        generate_ewkt Geometry.factory.parse_wkb(coordinates)
+                      end
+                    elsif format == 'gml' && ::Charta::GML.valid?(coordinates)
+                      # required format 'cause kml geometries return empty instead of failing
+                      ::Charta::GML.new(coordinates, srid).to_ewkt
+                    elsif format == 'kml' && ::Charta::KML.valid?(coordinates)
+                      ::Charta::KML.new(coordinates).to_ewkt
+                    elsif coordinates =~ /^SRID\=\d+\;/i
+                      generate_ewkt Geometry.feature(coordinates)
+                    else # WKT expected
+                      if srs && srid = find_srid(srs)
+                        begin
+                          f = RGeo::Geos.factory(srid: srid).parse_wkt(coordinates)
+                        rescue RGeo::Error::ParseError => e
+                          raise "Invalid EWKT (#{e.message}): #{coordinates}"
+                        end
+                        generate_ewkt f
+                      else
+                        generate_ewkt Geometry.feature(coordinates)
+                      end
+                    end
+      else # Default for RGeo
+        geom_ewkt = generate_ewkt coordinates
+      end
+      if geom_ewkt.to_s =~ /\A[[:space:]]*\z/
+        raise ArgumentError, "Invalid data: coordinates=#{coordinates.inspect}, srid=#{srid.inspect}"
+      end
+      type = Geometry.feature(geom_ewkt).geometry_type
+      # puts type.inspect
+      geom = case type
+             when RGeo::Feature::Point then
+               Point.new(geom_ewkt)
+             when RGeo::Feature::LineString then
+               LineString.new(geom_ewkt)
+             when RGeo::Feature::Polygon then
+               Polygon.new(geom_ewkt)
+             when RGeo::Feature::MultiPolygon then
+               MultiPolygon.new(geom_ewkt)
+             when RGeo::Feature::GeometryCollection then
+               GeometryCollection.new(geom_ewkt)
+             else
+               Geometry.new(geom_ewkt)
+             end
+      geom
+    end
+
+    def new_point(lat, lon, srid = 4326)
+      Point.new("SRID=#{srid};POINT(#{lon} #{lat})")
+    end
+
+    def make_line(points, options = {})
+      options[:srid] ||= new_geometry(points.first).srid if points.any?
+      options[:srid] ||= 4326
+
+      ewkt = "SRID=#{options[:srid]};LINESTRING(" + points.map { |wkt| p = new_geometry(wkt); "#{p.x} #{p.y}" }.join(', ') + ')'
+      new_geometry(ewkt)
+    end
+
+    def empty_geometry(srid = :WGS84)
+      GeometryCollection.empty(srid)
+    end
+
+    def generate_ewkt(feature)
+      generator = RGeo::WKRep::WKTGenerator.new(tag_format: :ewkt, emit_ewkt_srid: true)
+      generator.generate(feature)
+    end
+
+    def parse_ewkt(coordinates)
+      # parser = RGeo::WKRep::WKTParser.new(factory, support_ewkt: true)
+      # factory.parse_wkt(coordinates)
+      coordinates
+    end
+
+    def find_system_by_srid(_srid)
+      nil
+    end
+
+    def find_system_by_urn(_urn)
+      nil
+    end
+
+    def find_system(_srname)
+      nil
+    end
+
+    # Check and returns the SRID matching with srname or SRID.
+    def find_srid(srname_or_srid)
+      if srname_or_srid.to_s =~ /\Aurn:ogc:def:crs:.*\z/
+        x = srname_or_srid.split(':').last.upcase.to_sym
+        SRS[x] || x
+      elsif srname_or_srid.to_s =~ /\AEPSG::?(\d{4,5})\z/
+        srname_or_srid.split(':').last
+      elsif srname_or_srid.to_s =~ /\A\d+\z/
+        srname_or_srid.to_i
+      else
+        SRS[srname_or_srid] || srname_or_srid
+      end
+    end
+
+    def from(format, data)
+      unless respond_to?("from_#{format}")
+        raise "Unknown format: #{format.inspect}"
+      end
+      send("from_#{format}", data)
+    end
+
+    def from_gml(data, srid = nil, flatten_collection = false)
+      new_geometry(::Charta::GML.new(data, srid).to_ewkt, nil, nil, flatten_collection)
+    end
+
+    def from_kml(data, flatten_collection = false)
+      new_geometry(::Charta::KML.new(data).to_ewkt, nil, nil, flatten_collection)
+    end
+
+    def from_geojson(data, srid = nil)
+      new_geometry(::Charta::GeoJSON.new(data, srid).to_ewkt)
+    end
+
+    # Utility methods
+
+    def underscore(text)
+      text.gsub(/::/, '/')
+          .gsub(/([A-Z]+)([A-Z][a-z])/, '\1_\2')
+          .gsub(/([a-z\d])([A-Z])/, '\1_\2')
+          .tr('-', '_')
+          .downcase
+    end
+
+    def camelcase(text, first_letter = :upper)
+      ret = text.split(/[_\-]+/).map { |word| word[0..0].upcase + word[1..-1].downcase }.join
+      ret = text[0..0].downcase + text[1..-1] if first_letter == :lower
+      ret
+    end
+  end
+end

data/lib/charta/bounding_box.rb

@@ -0,0 +1,28 @@
+module Charta
+  class BoundingBox
+    attr_reader :y_min, :x_min, :y_max, :x_max
+
+    def initialize(y_min, x_min, y_max, x_max)
+      @y_min = y_min
+      @x_min = x_min
+      @y_max = y_max
+      @x_max = x_max
+    end
+
+    def width
+      @x_max - @x_min
+    end
+
+    def height
+      @y_max - @y_min
+    end
+
+    def svg_view_box
+      [x_min, -y_max, width, height]
+    end
+
+    def to_a
+      [[@y_min, @x_min], [@y_max, @x_max]]
+    end
+  end
+end

data/lib/charta/geo_json.rb

@@ -0,0 +1,168 @@
+require 'json'
+
+module Charta
+  # Represents a Geometry with SRID
+  class GeoJSON
+    attr_reader :srid
+
+    def initialize(data, srid = :WGS84)
+      srid ||= :WGS84
+      @json = self.class.flatten(data.is_a?(Hash) ? data : JSON.parse(data))
+      lsrid = @json['crs']['properties']['name'] if @json.is_a?(Hash) &&
+                                                    @json['crs'].is_a?(Hash) &&
+                                                    @json['crs']['properties'].is_a?(Hash)
+      lsrid ||= srid
+      @srid = ::Charta.find_srid(lsrid)
+    end
+
+    def geom
+      Charta.new_geometry(to_ewkt)
+    end
+
+    def to_hash
+      @json
+    end
+
+    def to_ewkt
+      "SRID=#{@srid};" + self.class.object_to_ewkt(@json)
+    end
+
+    def valid?
+      to_ewkt
+      true
+    rescue
+      false
+    end
+
+    class << self
+      # Test is given data is a valid GeoJSON
+      def valid?(data, srid = :WGS84)
+        new(data, srid).valid?
+      rescue
+        false
+      end
+
+      # Force coordinates to 2D
+      def flatten(hash)
+        if hash['type'] == 'FeatureCollection'
+          flatten_feature_collection(hash)
+        elsif hash['type'] == 'Feature'
+          flatten_feature(hash)
+        else
+          flatten_geometry(hash)
+        end
+      end
+
+      def flatten_feature_collection(hash)
+        hash.merge('features' => hash['features'].map { |f| flatten_feature(f) })
+      end
+
+      def flatten_feature(hash)
+        hash.merge('geometry' => flatten_geometry(hash['geometry']))
+      end
+
+      def flatten_geometry(hash)
+        coordinates = hash['coordinates']
+        flattened =
+          case hash['type']
+          when 'Point' then
+            flatten_position(coordinates)
+          when 'MultiPoint', 'LineString'
+            coordinates.map { |p| flatten_position(p) }
+          when 'MultiLineString', 'Polygon'
+            coordinates.map { |l| l.map { |p| flatten_position(p) } }
+          when 'MultiPolygon'
+            coordinates.map { |m| m.map { |l| l.map { |p| flatten_position(p) } } }
+          when 'GeometryCollection' then
+            return hash.merge('geometries' => hash['geometries'].map { |g| flatten_geometry(g) })
+          else
+            raise StandardError, "Cannot handle: #{hash['type'].inspect}. In #{hash.inspect}"
+          end
+
+        hash.merge('coordinates' => flattened)
+      end
+
+      def flatten_position(position)
+        position[0..1]
+      end
+
+      def object_to_ewkt(hash)
+        type = hash[:type] || hash['type']
+        send("#{type.gsub(/(.)([A-Z])/, '\1_\2').downcase}_to_ewkt", hash)
+      end
+
+      def feature_collection_to_ewkt(hash)
+        return 'GEOMETRYCOLLECTION EMPTY' if hash['features'].nil?
+        'GEOMETRYCOLLECTION(' + hash['features'].collect do |feature|
+          object_to_ewkt(feature)
+        end.join(', ') + ')'
+      end
+
+      alias geometry_collection_to_ewkt feature_collection_to_ewkt
+
+      def feature_to_ewkt(hash)
+        object_to_ewkt(hash['geometry'])
+      end
+
+      def point_to_ewkt(hash)
+        return 'POINT EMPTY' if hash['coordinates'].nil?
+        'POINT(' + hash['coordinates'].join(' ') + ')'
+      end
+
+      def line_string_to_ewkt(hash)
+        return 'LINESTRING EMPTY' if hash['coordinates'].nil?
+        'LINESTRING(' + hash['coordinates'].collect do |point|
+          point.join(' ')
+        end.join(', ') + ')'
+      end
+
+      def polygon_to_ewkt(hash)
+        return 'POLYGON EMPTY' if hash['coordinates'].nil?
+        'POLYGON(' + hash['coordinates'].collect do |hole|
+          '(' + hole.collect do |point|
+            point.join(' ')
+          end.join(', ') + ')'
+        end.join(', ') + ')'
+      end
+
+      def multi_point_to_ewkt(hash)
+        return 'MULTIPOINT EMPTY' if hash['coordinates'].nil?
+        'MULTIPOINT(' + hash['coordinates'].collect do |point|
+          '(' + point.join(' ') + ')'
+        end.join(', ') + ')'
+      end
+
+      def multi_line_string_to_ewkt(hash)
+        return 'MULTILINESTRING EMPTY' if hash['coordinates'].nil?
+        'MULTILINESTRING(' + hash['coordinates'].collect do |line|
+          '(' + line.collect do |point|
+            point.join(' ')
+          end.join(', ') + ')'
+        end.join(', ') + ')'
+      end
+
+      def multipolygon_to_ewkt(hash)
+        return 'MULTIPOLYGON EMPTY' if hash['coordinates'].nil?
+        'MULTIPOLYGON(' + hash['coordinates'].collect do |polygon|
+          '(' + polygon.collect do |hole|
+            '(' + hole.collect do |point|
+              point.join(' ')
+            end.join(', ') + ')'
+          end.join(', ') + ')'
+        end.join(', ') + ')'
+      end
+
+      # for PostGIS ST_ASGeoJSON compatibility
+      def multi_polygon_to_ewkt(hash)
+        return 'MULTIPOLYGON EMPTY' if hash['coordinates'].nil?
+        'MULTIPOLYGON(' + hash['coordinates'].collect do |polygon|
+          '(' + polygon.collect do |hole|
+            '(' + hole.collect do |point|
+              point.join(' ')
+            end.join(', ') + ')'
+          end.join(', ') + ')'
+        end.join(', ') + ')'
+      end
+    end
+  end
+end