root/lang/actionscript/tinyaction/brew.rb @ 7916

module X2
        class TempBrewer
                def initialize(funcs)
                        @funcs = funcs
                        @indent = 0
                end
                
                attr_reader :output
                
                def out_func(f)
                        rets = []
                        idt = "\t" * @indent
                        
                        # make arglist
                        args = (f[:args] != nil) ? f[:args].join(', ') : ""
                        
                        rets << "\n#{idt}static function #{f[:name]}(#{args})"
                        rets << "#{f[:body].gsub(/^/, idt)}"
                        
                        return rets.join("\n")
                end
                
                def check_body(funcs)
                        funcs.each{|f|
                                bd = f[:body]
                                bd.gsub!(/\A[^{]+/m, '')
                                bd.gsub!(/[^}]+\Z/m, '')
                                
                                raise "function body for #{f[:name]} is illegal" if bd.match(/\A\s*\{.*\}\s*\Z/m) == nil
                                
                                f[:body] = bd
                        }
                end
                
                def check_args(funcs)
                        funcs.each{|f|
                                f[:args].each{|a|
                                        raise "argument name #{a} for #{f[:name]} is illegal" if a.gsub(/^[_a-zA-Z$][_a-zA-Z$0-9]*$/ ,'').length > 0
                                }
                        }
                end
                
                def dump
                        check_args(@funcs)
                        check_body(@funcs)
                        @output = ""
                        
                        out_ln class_header
                        
                        @indent = 1
                        @funcs.each{|f|
                                out_ln out_func(f)
                        }
                        @indent = 0
                        
                        out_ln class_footer
                end
                
                def out_ln(ln)
                        @output << "#{ln}\n"
                end
                
                def class_header
                        "class Temp {"
                end

                def class_footer
                        "}"
                end
        end
end

funcs = [
        {
                :name => "testfunc",
                :args => ["pobj"],
                :body => %-
{
        pobj.x += 1;
} - },
        {
                :name => "testfunc2",
                :args => ["pobj2"],
                :body => %-
{
        pobj2.y += 0.1;
} -
        }
]

br = X2::TempBrewer.new(funcs)
br.dump

puts br.output