using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Drawing;
using System.Globalization;
using System.Windows.Forms;

namespace Tabor
{
    public partial class Form1 : Form
    {
        private bool betoltve = false;
        private bool elkuldve = false;

        private readonly Color zold = Color.FromArgb(0, 100, 40);
        private readonly Color piros = Color.FromArgb(170, 20, 20);

        public Form1()
        {
            InitializeComponent();
        }

        // ---- indulás ----

        private void Form1_Load(object sender, EventArgs e)
        {
            this.AutoValidate = AutoValidate.EnableAllowFocusChange;
            this.AcceptButton = btnTovabb;
            this.CancelButton = btnMegse;
            btnMegse.CausesValidation = false;

            split.Panel1MinSize = 460;
            split.Panel2MinSize = 240;
            split.FixedPanel = FixedPanel.Panel2;

            cmbOsztaly.Items.AddRange(new object[] { "5. osztály", "6. osztály", "7. osztály", "8. osztály", "9. osztály", "10. osztály" });
            cmbBetu.Items.AddRange(new object[] { "Normál (9 pt)", "Nagy (12 pt)", "Nagyon nagy (15 pt)" });

            // hozzáférhetőség: név a címke nélküli, illetve a másik panelen lévő elemeknek
            txtMegj.AccessibleName = "Megjegyzés";
            cmbBetu.AccessibleName = "Betűméret";
            rtbOssz.AccessibleName = "A jelentkezés összegzése";
            ttSugo.SetToolTip(cmbBetu, "A felület betűméretének választása");
            ttSugo.SetToolTip(chkElfogad, "A küldéshez el kell fogadni a tájékoztatót.");

            float mentett = Properties.Settings.Default.BetuMeret;
            int index = mentett >= 15 ? 2 : (mentett >= 12 ? 1 : 0);
            cmbBetu.SelectedIndex = index;
            BetuBeallit(index);

            this.ActiveControl = txtNev;
            Kot(this);

            betoltve = true;
            GombFrissit();
            Frissit();
        }

        private void Kot(Control szulo)
        {
            foreach (Control c in szulo.Controls)
            {
                if (c == cmbBetu)
                {
                    continue;
                }

                if (c is TextBox)
                {
                    ((TextBox)c).TextChanged += Valtozas;
                }
                else if (c is ComboBox)
                {
                    ((ComboBox)c).SelectedIndexChanged += Valtozas;
                }
                else if (c is CheckBox)
                {
                    ((CheckBox)c).CheckedChanged += Valtozas;
                }
                else if (c is RadioButton)
                {
                    ((RadioButton)c).CheckedChanged += Valtozas;
                }

                Kot(c);
            }
        }

        private void Valtozas(object sender, EventArgs e)
        {
            Frissit();
        }

        private void Form1_FormClosed(object sender, FormClosedEventArgs e)
        {
            Properties.Settings.Default.Save();
        }

        private void Form1_FormClosing(object sender, FormClosingEventArgs e)
        {
            if (e.CloseReason != CloseReason.UserClosing || elkuldve)
            {
                return;
            }

            bool kitoltott = txtNev.Text.Trim().Length > 0 || txtEmail.Text.Trim().Length > 0;

            if (kitoltott && MessageBox.Show("A jelentkezés még nincs elküldve. Biztosan kilépsz?", "Kilépés", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.No)
            {
                e.Cancel = true;
            }
        }

        // ---- betűméret és méretezés ----

        private void BetuBeallit(int index)
        {
            float[] meretek = { 9f, 12f, 15f };

            this.SuspendLayout();

            try
            {
                this.Font = new Font(this.Font.FontFamily, meretek[index]);
                lblAr.Font = new Font(this.Font.FontFamily, meretek[index] * 1.6f, FontStyle.Bold);
                lblKartya.MaximumSize = new Size(Math.Max(120, split.Panel2.ClientSize.Width - 20), 0);
            }
            finally
            {
                this.ResumeLayout(true);
            }

            MinimumBeallit();
            Properties.Settings.Default.BetuMeret = meretek[index];
        }

        private void MinimumBeallit()
        {
            Size kivant = tlpValasztas.GetPreferredSize(Size.Empty);
            int keretSzel = this.Width - this.ClientSize.Width;
            int keretMag = this.Height - this.ClientSize.Height;

            // közelítés: a lap és a jobb panel minimuma, a gombsor és az állapotsor
            int szel = Math.Max(kivant.Width + 40, split.Panel1MinSize) + split.Panel2MinSize + split.SplitterWidth + keretSzel;
            int mag = kivant.Height + flpGombok.Height + ss.Height + 90 + keretMag;

            this.MinimumSize = new Size(szel, mag);
        }

        private void cmbBetu_SelectionChangeCommitted(object sender, EventArgs e)
        {
            BetuBeallit(cmbBetu.SelectedIndex);
        }

        private void split_SizeChanged(object sender, EventArgs e)
        {
            if (betoltve)
            {
                lblKartya.MaximumSize = new Size(Math.Max(120, split.Panel2.ClientSize.Width - 20), 0);
            }
        }

        private void btnElo_Click(object sender, EventArgs e)
        {
            split.Panel2Collapsed = !split.Panel2Collapsed;
        }

        // ---- ellenőrzés ----

        private bool Hiba(Control mezo, string uzenet, bool jelez)
        {
            if (jelez)
            {
                epHiba.SetError(mezo, uzenet);
            }

            return uzenet.Length == 0;
        }

        private bool NevOk(bool jelez)
        {
            return Hiba(txtNev, txtNev.Text.Trim().Length < 3 ? "A név legalább 3 karakter legyen." : "", jelez);
        }

        private bool EmailOk(bool jelez)
        {
            string s = txtEmail.Text.Trim();
            int at = s.IndexOf('@');
            bool ok = at > 0 && s.LastIndexOf('.') > at + 1 && !s.EndsWith(".");

            return Hiba(txtEmail, ok ? "" : "Az e-mail cím alakja: nev@pelda.hu", jelez);
        }

        private bool TelefonOk(bool jelez)
        {
            string uzenet = "";

            foreach (char c in txtTelefon.Text)
            {
                if (!char.IsDigit(c) && c != '+' && c != ' ' && c != '-')
                {
                    uzenet = "A telefonszám csak számjegyet, +, - jelet és szóközt tartalmazhat.";
                    break;
                }
            }

            return Hiba(txtTelefon, uzenet, jelez);
        }

        private bool OsztalyOk(bool jelez)
        {
            return Hiba(cmbOsztaly, cmbOsztaly.SelectedIndex < 0 ? "Válaszd ki az osztályt." : "", jelez);
        }

        private bool AdatokRendben(bool jelez)
        {
            bool a = NevOk(jelez);
            bool b = EmailOk(jelez);
            bool c = TelefonOk(jelez);
            bool d = OsztalyOk(jelez);

            return a && b && c && d;
        }

        private void txtNev_Validating(object sender, CancelEventArgs e)
        {
            if (!NevOk(true)) { e.Cancel = true; }
        }

        private void txtEmail_Validating(object sender, CancelEventArgs e)
        {
            if (!EmailOk(true)) { e.Cancel = true; }
        }

        private void txtTelefon_Validating(object sender, CancelEventArgs e)
        {
            if (!TelefonOk(true)) { e.Cancel = true; }
        }

        private void cmbOsztaly_Validating(object sender, CancelEventArgs e)
        {
            if (!OsztalyOk(true)) { e.Cancel = true; }
        }

        // ---- lapok és gombok ----

        private void tc_Selecting(object sender, TabControlCancelEventArgs e)
        {
            if (!betoltve)
            {
                return;
            }

            if (tc.SelectedTab == tabAdatok && e.TabPageIndex > 0 && !AdatokRendben(true))
            {
                tsslAllapot.Text = "✖ Előbb javítsd az Adatok lap hibáit.";
                e.Cancel = true;
            }
        }

        private void tc_SelectedIndexChanged(object sender, EventArgs e)
        {
            if (!betoltve)
            {
                return;
            }

            if (tc.SelectedTab == tabOsszegzes)
            {
                OsszegzesEpit();
            }

            GombFrissit();
        }

        private void GombFrissit()
        {
            btnVissza.Enabled = tc.SelectedIndex > 0;
            btnTovabb.Visible = tc.SelectedIndex < tc.TabCount - 1;
            btnKuld.Visible = tc.SelectedIndex == tc.TabCount - 1;

            this.AcceptButton = btnTovabb.Visible ? btnTovabb : btnKuld;
        }

        private void btnTovabb_Click(object sender, EventArgs e)
        {
            if (tc.SelectedIndex < tc.TabCount - 1)
            {
                tc.SelectedIndex = tc.SelectedIndex + 1;   // a Selecting ellenőriz
            }
        }

        private void btnVissza_Click(object sender, EventArgs e)
        {
            if (tc.SelectedIndex > 0)
            {
                tc.SelectedIndex = tc.SelectedIndex - 1;
            }
        }

        private void btnMegse_Click(object sender, EventArgs e)
        {
            this.Close();
        }

        protected override bool ProcessCmdKey(ref Message msg, Keys keyData)
        {
            if (keyData == Keys.Enter || keyData == (Keys.Shift | Keys.Enter))
            {
                TextBox mezo = this.ActiveControl as TextBox;

                if (mezo != null && !mezo.Multiline)
                {
                    this.SelectNextControl(mezo, keyData == Keys.Enter, true, true, true);
                    return true;
                }
            }

            return base.ProcessCmdKey(ref msg, keyData);
        }

        // ---- választások, díj, kártya ----

        private RadioButton ValasztottGomb(GroupBox csoport)
        {
            foreach (Control c in csoport.Controls)
            {
                RadioButton rb = c as RadioButton;

                if (rb != null && rb.Checked)
                {
                    return rb;
                }
            }

            return null;
        }

        private int TagAr(Control c)
        {
            int ar;

            if (c != null && c.Tag != null && int.TryParse(c.Tag.ToString(), out ar))
            {
                return ar;
            }

            return 0;
        }

        private List<CheckBox> Tevekenysegek()
        {
            List<CheckBox> lista = new List<CheckBox>();

            foreach (Control c in flpTev.Controls)
            {
                CheckBox cb = c as CheckBox;

                if (cb != null && cb.Checked)
                {
                    lista.Add(cb);
                }
            }

            return lista;
        }

        private int Ar()
        {
            int osszeg = TagAr(ValasztottGomb(grpTurnus)) + TagAr(ValasztottGomb(grpEtkezes));

            foreach (CheckBox cb in Tevekenysegek())
            {
                osszeg = osszeg + TagAr(cb);
            }

            return osszeg;
        }

        private void Frissit()
        {
            if (!betoltve)
            {
                return;
            }

            int kesz = 0;

            if (NevOk(false)) { kesz++; }
            if (EmailOk(false)) { kesz++; }
            if (OsztalyOk(false)) { kesz++; }
            if (ValasztottGomb(grpTurnus) != null) { kesz++; }
            if (ValasztottGomb(grpEtkezes) != null) { kesz++; }
            if (chkElfogad.Checked) { kesz++; }

            tspbKesz.Value = kesz;
            tsslAllapot.Text = $"Kitöltöttség: {kesz}/6 kötelező elem";

            RadioButton turnus = ValasztottGomb(grpTurnus);
            RadioButton etkezes = ValasztottGomb(grpEtkezes);
            List<string> tev = new List<string>();

            foreach (CheckBox cb in Tevekenysegek())
            {
                tev.Add(cb.Text.Replace("&", ""));
            }

            lblKartya.Text = "Név: " + (txtNev.Text.Trim().Length == 0 ? "–" : txtNev.Text.Trim())
                + "\r\nTurnus: " + (turnus == null ? "–" : turnus.Text.Replace("&", ""))
                + "\r\nÉtkezés: " + (etkezes == null ? "–" : etkezes.Text.Replace("&", ""))
                + "\r\nTevékenységek: " + (tev.Count == 0 ? "–" : string.Join(", ", tev));

            lblAr.Text = string.Format(CultureInfo.CurrentCulture, "{0:N0} Ft", Ar());
            this.Text = txtNev.Text.Trim().Length == 0 ? "Táborjelentkezés" : "Táborjelentkezés – " + txtNev.Text.Trim();
        }

        private void OsszegzesEpit()
        {
            List<string> sorok = new List<string>();
            RadioButton turnus = ValasztottGomb(grpTurnus);
            RadioButton etkezes = ValasztottGomb(grpEtkezes);

            sorok.Add("Név: " + txtNev.Text.Trim());
            sorok.Add("E-mail: " + txtEmail.Text.Trim());
            sorok.Add("Telefon: " + (txtTelefon.Text.Trim().Length == 0 ? "(nincs megadva)" : txtTelefon.Text.Trim()));
            sorok.Add("Születési dátum: " + dtpSzul.Value.ToString("yyyy. MMMM d."));
            sorok.Add("Osztály: " + (cmbOsztaly.SelectedIndex < 0 ? "–" : cmbOsztaly.Text));
            sorok.Add("Turnus: " + (turnus == null ? "–" : turnus.Text.Replace("&", "")));
            sorok.Add("Étkezés: " + (etkezes == null ? "–" : etkezes.Text.Replace("&", "")));
            sorok.Add("Megjegyzés: " + (txtMegj.Text.Trim().Length == 0 ? "(nincs)" : txtMegj.Text.Trim()));
            sorok.Add("Előzetes díj: " + lblAr.Text);

            rtbOssz.Text = string.Join(Environment.NewLine, sorok);
        }

        // ---- küldés ----

        private void btnKuld_Click(object sender, EventArgs e)
        {
            bool adatok = AdatokRendben(true);
            List<string> hibak = new List<string>();

            if (!adatok) { hibak.Add("Az Adatok lapon javítandó mezők vannak."); }
            if (ValasztottGomb(grpTurnus) == null) { hibak.Add("Válassz turnust."); }
            if (ValasztottGomb(grpEtkezes) == null) { hibak.Add("Válassz étkezést."); }
            if (!chkElfogad.Checked) { hibak.Add("Fogadd el az adatkezelési tájékoztatót."); }

            if (hibak.Count > 0)
            {
                lblHibak.ForeColor = piros;
                lblHibak.Text = "✖ " + string.Join("  ✖ ", hibak);
                tsslAllapot.Text = "✖ A jelentkezés nem küldhető el.";

                if (!adatok)
                {
                    tc.SelectedTab = tabAdatok;
                    txtNev.Focus();
                }
                else if (ValasztottGomb(grpTurnus) == null || ValasztottGomb(grpEtkezes) == null)
                {
                    tc.SelectedTab = tabValasztasok;
                }

                return;
            }

            elkuldve = true;
            lblHibak.ForeColor = zold;
            lblHibak.Text = "✔ Minden rendben, a jelentkezés elküldve.";
            tsslAllapot.Text = "✔ Elküldve.";
            btnKuld.Enabled = false;

            MessageBox.Show($"Köszönjük, {txtNev.Text.Trim()}! A jelentkezést rögzítettük.\r\nElőzetes díj: {lblAr.Text}", "Táborjelentkezés");
        }
    }
}