module Erubis::JavaGenerator

def self.supported_properties()   # :nodoc:
  return [
          [:indent,   '',       "indent spaces (ex. '  ')"],
          [:bufvar,   '_buf',   "output buffer variable name"],
          [:bufclass, 'StringBuffer', "output buffer class (ex. 'StringBuilder')"],
        ]
end

def add_expr_debug(src, code)
  code.strip!
  src << @indent if src.empty? || src[-1] == ?\n
  src << " System.err.println(\"*** debug: #{code}=\"+(#{code}));"
end

def add_expr_escaped(src, code)
  add_expr_literal(src, escaped_expr(code))
end

def add_expr_literal(src, code)
  src << @indent if src.empty? || src[-1] == ?\n
  code.strip!
  src << " #{@bufvar}.append(#{code});"
end

def add_postamble(src)
  src << "\n" if src[-1] == ?;
  src << @indent << "return " << @bufvar << ".toString();\n"
  #src << @indent << "System.out.print(" << @bufvar << ".toString());\n"
end

def add_preamble(src)
  src << "#{@indent}#{@bufclass} #{@bufvar} = new #{@bufclass}();"
end

def add_stmt(src, code)
  src << code
end

def add_text(src, text)
  return if text.empty?
  src << (src.empty? || src[-1] == ?\n ? @indent : ' ')
  src << @bufvar << ".append("
  i = 0
  text.each_line do |line|
    src << "\n" << @indent << '          + ' if i > 0
    i += 1
    src << '"' << escape_text(line) << '"'
  end
  src << ");" << (text[-1] == ?\n ? "\n" : "")
end

def escape_text(text)
  @@table_ ||= { "\r"=>"\\r", "\n"=>"\\n", "\t"=>"\\t", '"'=>'\\"', "\\"=>"\\\\" }
  return text.gsub!(/[\r\n\t"\\]/) { |m| @@table_[m] } || text
end

def init_generator(properties={})
  super
  @escapefunc ||= 'escape'
  @indent = properties[:indent] || ''
  @bufvar = properties[:bufvar] || '_buf'
  @bufclass = properties[:bufclass] || 'StringBuffer'
end