comment_strip-ruby 0.1.1 → 0.1.2.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA256:
-  metadata.gz: d24070b4b9375d49a394826ef6339b98756bfe214ab625853d589b5979dd4e40
-  data.tar.gz: 9676fb9a14da21d96892c4775312ec247bdcfe9f16011d0f09647a5b41f35f1a
+  metadata.gz: c52ca8b12ff14075e62b2e7e6fce5249e2bb11271d9b457ba40f510c2d185ac5
+  data.tar.gz: 934da47218a66a83e1f021581705d9412d40922f35df76cdfcaaed0eb81221b3
 SHA512:
-  metadata.gz: 6729cb06414a9501a1d405ffe1f8b7731511a7c360cb0d0d49bfd82de1e131e5ea6ec8f5b1ddd612ad0678cf8d80e76bb050b0fa7b67a9c14a6e8bffb942bbe5
-  data.tar.gz: ed74d41ead5ed929339fbff6143b4a8694d55c57cc65a849bef79d0621012824ef7dc50d455875c57485be59253fbf3109d590f77061397007f3fa196c80e0e8
+  metadata.gz: 936fd5d120b21214cda1dca24fdb8f26aad31ce4c152f832a2d67294f175a74ad677420cde36df3bfb0402835cbcdf9e358abb7a6194a17d24f2b24064fe0a16
+  data.tar.gz: 67b00be7468b64475114aebd29d67f7d226d24eed187b2a808e1526966b9b2389938713c499eba8f09d17a6490cdf1c3b05058929ef11c60f84edb226c3a1d8a

data/README.md

@@ -16,7 +16,17 @@ T.B.C.
 
 ## Installation
 
-Install using `gem install comment_strip-ruby` or add it to your `Gemfile`.
+Install directly:
+
+```bash
+$ gem install comment_strip-ruby
+```
+
+or add it to your `Gemfile`:
+
+```plaintext
+gem 'comment_strip-ruby'
+```
 
 ## Components
 
@@ -24,7 +34,16 @@ T.B.C.
 
 ## Examples
 
-T.B.C.
+It is as simple as the following:
+
+```Ruby
+require 'comment_strip'
+
+stripped = CommentStrip.strip($stdin.read, :C)
+
+puts "Stripped form of input:\n#{stripped}"
+```
+
 
 ## Project Information
 

data/lib/comment_strip/language_families/c.rb

@@ -0,0 +1,250 @@
+# ######################################################################## #
+# File:         comment_strip/language_families/c.rb
+#
+# Purpose:      Definition of strip() function for C-family languages.
+#
+# Created:      14th September 2020
+# Updated:      11th July 2022
+#
+# Home:         http://github.com/synesissoftware/comment_strip.r
+#
+# Copyright (c) 2020-2022, Matthew Wilson and Synesis Information Systems
+# All rights reserved.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are
+# met:
+#
+# * Redistributions of source code must retain the above copyright notice,
+#   this list of conditions and the following disclaimer.
+#
+# * Redistributions in binary form must reproduce the above copyright
+#   notice, this list of conditions and the following disclaimer in the
+#   documentation and/or other materials provided with the distribution.
+#
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
+# IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
+# THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
+# CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
+# EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
+# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
+# PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
+# LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
+# NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
+# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+#
+# ######################################################################## #
+
+
+require 'xqsr3/quality/parameter_checking'
+
+=begin
+=end
+
+module CommentStrip
+module LanguageFamilies
+
+module C
+
+    def self.strip input, lf, **options
+
+        return nil if input.nil?
+        return input if input.empty?
+
+        line    =   0
+        column  =   0
+
+        state   =   :text
+
+        r       =   ''
+
+        cc_lines =   0
+
+        input.each_char do |c|
+
+            case c
+            when ?\r, ?\n
+
+                line += 1
+                column = 0
+            else
+
+                column += 1
+            end
+
+            skip = false
+
+            case c
+            when ?\r, ?\n
+
+                case state
+                when :c_comment, :c_comment_star
+
+                    cc_lines += 1
+
+                    state = :c_comment
+                when :cpp_comment
+
+                    state = :text
+                when :sq_string, :sq_string_escape, :sq_string_closing
+
+                    state = :text
+                when :dq_string_escape
+
+                    state = :dq_string
+                when :slash_start
+
+                    r << '/'
+
+                    state = :text
+                end
+            else
+
+                # special cases:
+                #
+                # - for escaped single/double quote
+                # - for slash-start
+                # - for comment-star
+
+                case state
+                when :sq_string_open
+
+                    state = (?\\ == c) ? :sq_string_escape : :sq_string_closing
+                when :sq_string_escape
+
+                    state = :sq_string_closing
+                when :dq_string_escape
+
+                    state = :dq_string
+                when :c_comment_star
+
+                    case c
+                    when ?/
+
+                        r << ?\n * cc_lines
+                        cc_lines = 0
+
+                        state = :text
+                        skip = true
+                    when '*'
+
+                        ;
+                    else
+
+                        state = :c_comment
+                    end
+                else
+
+                    if false
+                    elsif state == :slash_start && ('/' != c && '*' != c)
+
+                        state = :text
+                        r << '/'
+                    else
+
+                        case c
+                        when '/'
+
+                            case state
+                            when :text
+
+                                state = :slash_start
+                            when :slash_start
+
+                                state = :cpp_comment
+                            when :c_comment_star
+
+                                r << ?\n * cc_lines
+                                cc_lines = 0
+
+                                state = :text
+                                skip = true
+                            end
+                        when '*'
+
+                            case state
+                            when :slash_start
+
+                                state = :c_comment
+                            when :c_comment
+
+                                state = :c_comment_star
+                            else
+
+                            end
+
+                        when ?\'
+
+                            case state
+                            when :text
+
+                                state = :sq_string_open
+                            when :sq_string_closing
+
+                                state = :text
+                            else
+
+                            end
+                        when '"'
+
+                            case state
+                            when :text
+
+                                state = :dq_string
+                            when :dq_string
+
+                                state = :text
+                            else
+                            end
+                        when ?\\
+
+                            case state
+                            when :sq_string_open
+
+                                state = :sq_string_escape
+                            when :sq_string_escape
+
+                                state = :sq_string
+                            when :dq_string
+
+                                state = :dq_string_escape
+                            else
+
+                            end
+                        else
+
+                            case state
+                            when :sq_string_escape
+
+                                state = :sq_string_closing
+                            else
+
+                            end
+                        end
+                    end
+                end
+            end
+
+
+            case state
+            when :slash_start
+            when :cpp_comment
+            when :c_comment
+            when :c_comment_star
+
+            else
+
+                r << c unless skip
+            end
+        end
+
+        r
+    end
+end # module C
+
+end # module LanguageFamilies
+end # module CommentStrip
+
+# ############################## end of file ############################# #
+

data/lib/comment_strip/strip.rb

@@ -4,11 +4,11 @@
 # Purpose:      Definition of strip() function
 #
 # Created:      14th September 2020
-# Updated:      10th February 2021
+# Updated:      11th July 2022
 #
 # Home:         http://github.com/synesissoftware/comment_strip.r
 #
-# Copyright (c) 2020-2021, Matthew Wilson and Synesis Information Systems
+# Copyright (c) 2020-2022, Matthew Wilson and Synesis Information Systems
 # All rights reserved.
 #
 # Redistribution and use in source and binary forms, with or without
@@ -37,236 +37,49 @@
 # ######################################################################## #
 
 
+require File.join(__dir__, 'language_families', 'c')
+
+require 'xqsr3/quality/parameter_checking'
 
 =begin
 =end
 
 module CommentStrip
 
+    include ::Xqsr3::Quality::ParameterChecking
+
     # Strips comments from an input string, according to the rules and
     # conventions of a given language-family
     #
     # === Signature
     #
     # * *Parameters:*
-    #   - +s+ (::String) the source code
+    #   - +input+ (::String, +nil+) the input source code
     #   - +lf+ (::String) the name of the language family. Currently only
     #      the value +'C'+ is accepted
     #   - +options+ (::Hash) options that moderate the behaviour
     #
     # * *Options:*
+    # None currently defined.
     #
-    def self.strip s, lf, **options
+    # === Signature
+    # (String) The stripped for of the input.
+    def strip input, lf, **options
 
-        case lf.upcase
+        check_parameter input, 'input', responds_to: [ :each_char, :empty?, :nil?, ], nil: true
+        check_parameter lf, 'lf', types: [ ::String, ::Symbol ]
+
+        case lf.to_s.upcase
         when 'C'
 
-            ;
+            LanguageFamilies::C.strip input, lf, **options
         else
 
-            raise "language family '#{lf}' unrecognised"
-        end
-
-        return nil if s.nil?
-        return s if s.empty?
-
-        line    =   0
-        column  =   0
-
-        state   =   :text
-
-        r       =   ''
-
-        cc_lines =   0
-
-        s.each_char do |c|
-
-            case c
-            when ?\r, ?\n
-
-                line += 1
-                column = 0
-            else
-
-                column += 1
-            end
-
-            skip = false
-
-            case c
-            when ?\r, ?\n
-
-                case state
-                when :c_comment, :c_comment_star
-
-                    cc_lines += 1
-
-                    state = :c_comment
-                when :cpp_comment
-
-                    state = :text
-                when :sq_string, :sq_string_escape, :sq_string_closing
-
-                    state = :text
-                when :dq_string_escape
-
-                    state = :dq_string
-                when :slash_start
-
-                    r << '/'
-
-                    state = :text
-                end
-            else
-
-                # special cases:
-                #
-                # - for escaped single/double quote
-                # - for slash-start
-                # - for comment-star
-
-                case state
-                when :sq_string_open
-
-                    state = (?\\ == c) ? :sq_string_escape : :sq_string_closing
-                when :sq_string_escape
-
-                    state = :sq_string_closing
-                when :dq_string_escape
-
-                    state = :dq_string
-                when :c_comment_star
-
-                    case c
-                    when ?/
-
-                        r << ?\n * cc_lines
-                        cc_lines = 0
-
-                        state = :text
-                        skip = true
-                    when '*'
-
-                        ;
-                    else
-
-                        state = :c_comment
-                    end
-                else
-
-                    if false
-                    elsif state == :slash_start && ('/' != c && '*' != c)
-
-                        state = :text
-                        r << '/'
-                    else
-
-                        case c
-                        when '/'
-
-                            case state
-                            when :text
-
-                                state = :slash_start
-                            when :slash_start
-
-                                state = :cpp_comment
-                            when :c_comment_star
-
-                                r << ?\n * cc_lines
-                                cc_lines = 0
-
-                                state = :text
-                                skip = true
-                            end
-                        when '*'
-
-                            case state
-                            when :slash_start
-
-                                state = :c_comment
-                            when :c_comment
-
-                                state = :c_comment_star
-                            else
-
-                            end
-
-                        when ?\'
-
-                            case state
-                            when :text
-
-                                state = :sq_string_open
-                            when :sq_string_closing
-
-                                state = :text
-                            else
-
-                            end
-                        when '"'
-
-                            case state
-                            when :text
-
-                                state = :dq_string
-                            when :dq_string
-
-                                state = :text
-                            else
-                            end
-                        when ?\\
-
-                            case state
-                            when :sq_string_open
-
-                                state = :sq_string_escape
-                            when :sq_string_escape
-
-                                state = :sq_string
-                            when :dq_string
-
-                                state = :dq_string_escape
-                            else
-
-                            end
-                        else
-
-                            case state
-                            when :sq_string_escape
-
-                                state = :sq_string_closing
-                            else
-
-                            end
-                        end
-                    end
-                end
-            end
-
-            $stderr.puts "[#{line}, #{column}] state=#{state}, c=#{c} (#{c.ord}); skip=#{skip} [#cc lines: #{cc_lines}]\n" if $DEBUG
-
-            case state
-            when :slash_start
-            when :cpp_comment
-            when :c_comment
-            when :c_comment_star
-
-            else
-
-                r << c unless skip
-            end
+            raise "language family '#{lf}' unrecognised or not supported1"
         end
-
-        r
-    end
-
-    # Strips comments
-    def strip s, lf, **options
-
-        ::CommentStrip.strip s, lf, **options
     end
 
+    extend self
 end # module CommentStrip
 
 # ############################## end of file ############################# #

data/lib/comment_strip/version.rb

@@ -4,11 +4,11 @@
 # Purpose:      Version for comment_strip.r library
 #
 # Created:      14th September 2020
-# Updated:      10th February 2021
+# Updated:      1st December 2023
 #
 # Home:         http://github.com/synesissoftware/comment_strip.r
 #
-# Copyright (c) 2020-2021, Matthew Wilson and Synesis Information Systems
+# Copyright (c) 2020-2023, Matthew Wilson and Synesis Information Systems
 # All rights reserved.
 #
 # Redistribution and use in source and binary forms, with or without
@@ -43,7 +43,7 @@
 module CommentStrip
 
     # Current version of the comment_strip.r library
-    VERSION                 =   '0.1.1'
+    VERSION                 =   '0.1.2.1'
 
     private
     VERSION_PARTS_          =   VERSION.split(/[.]/).collect { |n| n.to_i } # :nodoc:

data/lib/comment_strip.rb

@@ -4,11 +4,11 @@
 # Purpose:      Top-level include for comment_strip.r library
 #
 # Created:      14th September 2020
-# Updated:      14th September 2020
+# Updated:      11th July 2022
 #
 # Home:         http://github.com/synesissoftware/comment_strip.r
 #
-# Copyright (c) 2020, Matthew Wilson and Synesis Information Systems
+# Copyright (c) 2020-2022, Matthew Wilson and Synesis Information Systems
 # All rights reserved.
 #
 # Redistribution and use in source and binary forms, with or without
@@ -37,10 +37,17 @@
 # ######################################################################## #
 
 
+%w{
+    strip
+    version
+}.each { |mod_name| require File.join(__dir__, 'comment_strip', mod_name) }
+
 =begin
 =end
 
-require File.join(File.dirname(__FILE__), 'comment_strip', 'comment_strip')
+# Main module for comment_strip.r library
+module CommentStrip
+end # module CommentStrip
 
 # ############################## end of file ############################# #
 

data/test/scratch/ex1.rb

@@ -0,0 +1,7 @@
+#! /usr/bin/env ruby
+
+require 'comment_strip'
+
+stripped = CommentStrip.strip($stdin.read, :C)
+
+puts "Stripped form of input:\n#{stripped}"

data/test/unit/tc_strip.rb

@@ -1,6 +1,6 @@
 #! /usr/bin/env ruby
 
-$:.unshift File.join(File.dirname(__FILE__), '../..', 'lib')
+$:.unshift File.join(__dir__, '../..', 'lib')
 
 
 require 'comment_strip'
@@ -45,7 +45,7 @@ class Test_strip_1 < Test::Unit::TestCase
     def test_empty
 
         assert_equal "", strip('', 'C')
-        assert_equal "", ::CommentStrip.strip('', 'C')
+        assert_equal "", ::CommentStrip.strip('', :C)
     end
 
     def test_simple_main

data/test/unit/tc_version.rb

@@ -1,6 +1,6 @@
 #! /usr/bin/env ruby
 
-$:.unshift File.join(File.dirname(__FILE__), '../..', 'lib')
+$:.unshift File.join(__dir__, '../..', 'lib')
 
 
 require 'comment_strip'

data/test/unit/ts_all.rb

@@ -2,7 +2,7 @@
 #
 # executes all other tests
 
-this_dir    =   File.expand_path(File.dirname(__FILE__))
+this_dir = File.expand_path(__dir__)
 
 # all tc_*rb in current directory
 Dir[File.join(this_dir, 'tc_*rb')].each { |file| require file }

metadata

@@ -1,16 +1,32 @@
 --- !ruby/object:Gem::Specification
 name: comment_strip-ruby
 version: !ruby/object:Gem::Version
-  version: 0.1.1
+  version: 0.1.2.1
 platform: ruby
 authors:
 - Matt Wilson
 autorequire:
 bindir: bin
 cert_chain: []
-date: 2021-02-11 00:00:00.000000000 Z
-dependencies: []
-description: "Source code comment stripping library\n\n"
+date: 2023-12-01 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: xqsr3
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.38'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '0.38'
+description: 'Source code comment stripping library
+
+  '
 email: matthew@synesis.com.au
 executables: []
 extensions: []
@@ -19,9 +35,10 @@ files:
 - LICENSE
 - README.md
 - lib/comment_strip.rb
-- lib/comment_strip/comment_strip.rb
+- lib/comment_strip/language_families/c.rb
 - lib/comment_strip/strip.rb
 - lib/comment_strip/version.rb
+- test/scratch/ex1.rb
 - test/unit/tc_strip.rb
 - test/unit/tc_version.rb
 - test/unit/ts_all.rb
@@ -35,17 +52,19 @@ require_paths:
 - lib
 required_ruby_version: !ruby/object:Gem::Requirement
   requirements:
-  - - "~>"
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '2.0'
+  - - "<"
     - !ruby/object:Gem::Version
-      version: '2'
+      version: '4'
 required_rubygems_version: !ruby/object:Gem::Requirement
   requirements:
   - - ">="
     - !ruby/object:Gem::Version
       version: '0'
 requirements: []
-rubyforge_project:
-rubygems_version: 2.7.6.2
+rubygems_version: 3.2.15
 signing_key:
 specification_version: 4
 summary: comment_strip.r

data/lib/comment_strip/comment_strip.rb

@@ -1,52 +0,0 @@
-# ######################################################################## #
-# File:         comment_strip/comment_strip.rb
-#
-# Purpose:      Main file for comment_strip.r library
-#
-# Created:      14th September 2020
-# Updated:      14th September 2020
-#
-# Home:         http://github.com/synesissoftware/comment_strip.r
-#
-# Copyright (c) 2020, Matthew Wilson and Synesis Information Systems
-# All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions are
-# met:
-#
-# * Redistributions of source code must retain the above copyright notice,
-#   this list of conditions and the following disclaimer.
-#
-# * Redistributions in binary form must reproduce the above copyright
-#   notice, this list of conditions and the following disclaimer in the
-#   documentation and/or other materials provided with the distribution.
-#
-# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
-# IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
-# THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
-# PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
-# CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
-# EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
-# PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
-# PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
-# LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
-# NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
-# SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-#
-# ######################################################################## #
-
-
-require File.join(File.dirname(__FILE__), 'strip')
-require File.join(File.dirname(__FILE__), 'version')
-
-=begin
-=end
-
-# Main module for comment_strip.r library
-module CommentStrip
-end # module CommentStrip
-
-# ############################## end of file ############################# #
-
-