defmodule LDAP.Forms.Credentials do
  use N2O, with: [:n2o, :nitro]
  use FORM, with: [:form]
  require ERP
  require Logger
  require Record

  Record.defrecord(:credentials, code: "0000")

  def parse(ERP."Employee"(person: ERP."Person"(cn: cn))), do: cn
  def parse(_), do: []

  def doc(), do: "One-time password PIN."
  def id(), do: credentials(code: LDAP.Forms.Credentials.parse(N2O.user()))

  def new(name, _phone) do
    document(
      name: FORM.atom([:otp, name]),
      sections: [sec(name: "Input the credentials: ")],
      buttons: [
        but(
          id: :decline,
          name: :decline,
          title: "Cancel",
          class: :cancel,
          postback: {:close, []}
        ),
        but(
          id: :proceed,
          name: :proceed,
          title: "Proceed",
          class: [:button, :sgreen],
          sources: [:company, :otp, :cn, :branch],
          postback: {:auth, name}
        )
      ],
      fields: [
        field(
          name: :company,
          id: :company,
          type: :select,
          title: "Company:",
          tooltips: [],
          options: [
            opt(
              name: 'quanterall',
              checked: true,
              title: "Quanterall"
            )
          ]
        ),
        field(
          name: :branch,
          id: :branch,
          type: :select,
          title: "Branch:",
          tooltips: [],
          options: [
            opt(name: '/acc/quanterall/Plovdiv', title: "Plovdiv"),
            opt(name: '/acc/quanterall/Sophia', title: "Sophia"),
            opt(
              name: '/acc/quanterall/Varna',
              checked: true,
              title: "Varna (HQ)"
            )
          ]
        ),
        field(
          pos: 2,
          id: :cn,
          name: :cn,
          type: :string,
          title: "Common Name:",
          fieldClass: :column3
        ),
        field(
          id: :otp,
          name: :otp,
          type: :otp,
          title: "Passphrase:",
          fieldClass: :column3
        )
      ]
    )
  end
end