class Marty::ScriptForm < Marty::Form
  DASH = 0x2012.chr('utf-8')

  client_class do |c|
    c.include :script_form
  end

  ######################################################################

  endpoint :netzke_load do |params|

    return client.netzke_notify("Permission Denied") unless
      self.class.has_any_perm?

    script_name = params[:script_name]
    tag_id = root_sess[:selected_tag_id]

    # logic from basepack's form_panel.service -- need to set @record.
    @record = script = Marty::Script.find_script(script_name, tag_id)

    title = [script.name, script.find_tag.try(:name)].
      join(" #{Marty::ScriptForm::DASH} ") if script

    # create an empty record if no script
    js_data = @record ? js_record_data : {
      "body" => "",
      "id"   => -1,
      "meta" => {},
    }

    client.netzke_set_form_values(js_data)
    client.set_title title
    client.netzke_set_readonly_mode !can_save?(script)

    modes = {
      save: can_save?(script),
    }

    client.set_action_modes(modes)
  end

  def can_save?(script)
    script && self.class.has_dev_perm? && Mcfly.is_infinity(script.obsoleted_dt)
  end

  ######################################################################

  action :apply do |a|
    a.text     = I18n.t("script_form.save")
    a.tooltip  = I18n.t("script_form.save")
    a.icon_cls = "fa fa-save glyph"
    a.disabled = true
  end

  endpoint :submit do |params|

    return client.netzke_notify("Permission Denied") unless
      self.class.has_any_perm?

    # copied from corresponding method in form_panel.services
    data = ActiveSupport::JSON.decode(params[:data])
    data.each_pair do |k,v|
      data[k] = nil if v.blank? || v == "null"
    end

    @record = script = Marty::Script.find_by_id(data["id"])

    unless script
      client.netzke_notify "no record"
      return
    end

    if script.body == data["body"]
      client.netzke_notify "no save needed"
      # clear the error line if any
      client.set_line_error -1
      return
    end

    unless can_save?(script)
      client.netzke_notify "Permission denied"
      return
    end

    begin
      dev = Marty::Tag.find_by_name("DEV")
      Marty::ScriptSet.new(dev).parse_check(script.name, data["body"])
    rescue Delorean::ParseError => exc
      client.netzke_notify exc.message
      client.netzke_apply_form_errors({})
      client.set_line_error(exc.line)
      return
    end

    script.body = data["body"]

    if script.save
      client.netzke_set_form_values(js_record_data)
      client.refresh_parent(script.name)
      return true
    end

    client.netzke_notify(model_adapter.errors_array(script).join("\n"))
    client.netzke_apply_form_errors(build_form_errors(record))
  end

  endpoint :do_print do |script_id|
    return client.netzke_notify("Permission Denied") unless
      self.class.has_any_perm?

    script = Marty::Script.find_by_id(script_id)

    return client.netzke_notify("bad script") unless script

    begin
      rep_params = {
        script_id: script.id,
        title: script.name
      }

      path = Marty::Util.gen_report_path("ScriptReport",
                                         "PrettyScript",
                                         rep_params)
      client.get_report(path)
    rescue => exc
      return client.netzke_notify "ERROR: #{exc}"
    end
  end

  ######################################################################

  action :do_print do |a|
    a.text     = I18n.t("script_form.print")
    a.tooltip  = I18n.t("script_form.print")
    a.icon_cls = "fa fa-print glyph"
  end

  ######################################################################

  def default_bbar
    [
      :apply,
      :do_print,
    ]
  end

  ######################################################################

  def configure(c)
    super

    c.title = "Script Form"
    c.model = "Marty::Script"
    c.items =
      [
       {
         line_numbers:   true,
         indent_unit:    4,
         tab_mode:       "shift",
         match_brackets: true,
         hide_label:     true,
         xtype:          :codemirror,
         mode:           "text/x-delorean",
         name:           :body,
         empty_text:     "No script selected.",
         getter:         lambda { |r| r.body },
       },
      ]
  end
end

ScriptForm = Marty::ScriptForm