# 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
attr_reader :var_decls
attr_reader :var_inits
def initialize(root, name)
@name = name
@ctrl_ports = []
@var_decls = []
@var_inits = []
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
def slug
@name.downcase
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|
vars = false
f.each_line do |line|
if vars
if line =~ /^\};$/
vars = false
else
@var_decls << line.chomp
end
elsif line =~ /kNumParameters\s*=\s*(\d+)/
@n_ctrl_ports = $1.to_i
elsif line =~ /std::set<[^>]+>\s*_canDo;/
vars = true
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 line =~ /^#{@name}::#{@name}/
fun = 'constructor_'
elsif fun == 'getParameterName' and line =~ /case\s+kParam([A-Z])\:\s+vst_strncpy\s*\([^,]*,\s*\"([^"]+)\",/
@ctrl_ports << { sym: $1, name: $2 }
elsif fun == 'constructor_' and line =~ /\{\s*$/
fun = 'constructor'
elsif fun == 'constructor'
if line =~ /^\s+_canDo\./
fun = ''
else
@var_inits << line.chomp
end
end
end
end
end
end
end