# Copyright (c) 2021 Harald Eilertsen
#
# 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.

module MakePlugin
  class PluginInfo
    PLUGIN_FIELDS = %w{Type Use Description Comment}

    attr_reader :name
    attr_reader :n_ctrl_ports
    attr_reader :ctrl_ports
    attr_reader :use
    attr_reader :desc
    attr_reader :comment

    def initialize(root, name)
      @name = name
      @ctrl_ports = []
      self.find_plugin_info(root)
      if @n_ctrl_ports != @ctrl_ports.length
        raise "Expected #{@n_ctrl_ports} but found #{@ctrl_ports.length}"
      end
    end

    def type
      case @type
      when 'Saturation'
        'DistortionPlugin'
      when 'EQ'
        'EQPlugin'
      else
        'EffectsPlugin'
      end
    end

    def raw_type
      @type
    end

    private

    def find_plugin_info(root)
      found = false

      db = File.join(root, '../../cheatsheet/src/database.js')
      File.open(db) do |f|
        pat = /^\s*(\w+): \"([^"]+)\",/
        f.each_line do |line|
          break if found && line =~ /^\s*\},$/

          pat.match(line) do |m|
            if m[1] == 'Name' && m[2] == @name
              found = true
            elsif found && PLUGIN_FIELDS.include?(m[1])
              eval(%Q{@#{m[1].downcase.to_sym} = "#{m[2]}"})
            end
          end
        end
      end

      header_file = File.join(root, '../WinVST', @name, "#{@name}.h")

      File.open(header_file) do |f|
        f.each_line do |line|
          if line =~ /kNumParameters\s*=\s*(\d+)/
            @n_ctrl_ports = $1.to_i
          end
        end
      end

      class_file = File.join(root, '../WinVST', @name, "#{@name}.cpp")
      fun = ""

      File.open(class_file) do |f|
        f.each_line do |line|
          if line =~ /void #{@name}::(\w+)/
            fun = $1
          elsif fun == 'getParameterName' and line =~ /case\s+kParam([A-Z])\:\s+vst_strncpy\s*\([^,]*,\s*\"(\w+)\",/
            @ctrl_ports << $2
          end
        end
      end
    end
  end
end