package arena_angar

import (
	"fmt"
	"log"
	"strconv"
	"strings"
	"time"

	"wartank/app/lev0/alias"
	. "wartank/app/lev0/types"
	"wartank/app/lev1/stat_param"
	"wartank/app/lev2/arena"
	"wartank/app/lev2/arena_angar/fuel_attack"
	"wartank/app/lev2/arena_base"
	"wartank/app/lev2/arena_convoy"
	"wartank/app/lev2/arena_duel"
	"wartank/app/lev2/arena_masters"
	"wartank/app/lev2/arena_missions"
	"wartank/app/lev2/arena_upgrade"
	"wartank/app/lev3/bot/bot_net/bot_net_stat"
	"wartank/app/lev3/bot/bot_stat/stat_resurs"
)

/*
	Объект ангара приложения
*/

// Ангар -- ангар для танка
type АренаАнгар struct {
	ИАрена
	прилож ИПриложение
	бот    ИБот

	уровень  ИСтатПарам
	progress ИСтатПарам
	// топливо       *fuel.Топливо
	игроковОнлайн ИСтатПарам

	silverOnline ИСтатПарам

	сетьТанкСтат *bot_net_stat.БотСетьСтат
	танкПарам    *arena_upgrade.АренаАпгрейд
	словАрена    map[alias.АренаИмя]ИАрена
	ресурсы      *stat_resurs.СтатРесурсы
}

// НовАнгар -- возвращает новый *Angar
func НовАнгар(конт ИБотКонтекст) (*АренаАнгар, error) {
	танкПарам := arena_upgrade.НовТанкПараметры(конт)
	бот := конт.Получ("бот").(ИБот)
	сам := &АренаАнгар{
		бот:           бот,
		уровень:       stat_param.НовСтатПарам("уровень"),
		progress:      stat_param.НовСтатПарам("прогресс"),
		игроковОнлайн: stat_param.НовСтатПарам("онлайн"),
		silverOnline:  stat_param.НовСтатПарам("серебро онлайн"),
		танкПарам:     танкПарам,
		словАрена:     make(map[alias.АренаИмя]ИАрена),
	}
	аренаКонф := arena.АренаКонфиг{
		Бот_:         бот,
		АренаИмя_:    "Ангар",
		СтрКонтроль_: "<title>Ангар</title>",
		ФнПуск_:      сам.пуск,
		СтрУрл_:      "https://wartank.ru/angar",
	}
	конт.Уст("ангар", сам)
	сам.ИАрена = arena.НовАрена(конт, аренаКонф)
	var err error
	топливоБой, err := fuel_attack.НовТопливоБой(конт, сам)
	if err != nil {
		return nil, fmt.Errorf("НовАнгар(): in create <AngarAttackNet>, err=\n\t%w", err)
	}
	сам.словАрена["топливоБой"] = топливоБой
	// Статистика
	сам.сетьТанкСтат = bot_net_stat.НовБотСетьСтат(конт)

	конвой := arena_convoy.НовКонвой(конт, сам.бот)
	сам.словАрена["конвой"] = конвой
	сражение := arena_duel.НовАренаДуэль(конт, сам.бот)
	сам.словАрена["сражение"] = сражение
	битваМастеров := arena_masters.НовБитваМастеров(конт, сам.бот)
	сам.словАрена["битваМастеров"] = битваМастеров
	база, err := arena_base.НовБаза(конт, сам)
	if err != nil {
		return nil, fmt.Errorf("НовАнгар(): in make IBase, err=\n\t%w", err)
	}
	сам.словАрена["база"] = база
	миссии, err := arena_missions.НовМиссии(конт, сам.бот)
	if err != nil {
		return nil, fmt.Errorf("НовАнгар(): in make *Missions, err=\n\t%w", err)
	}
	сам.словАрена["миссии"] = миссии
	сам.ресурсы = stat_resurs.НовСтатРесурсы(конт, сам)
	_ = ИАнгар(сам)
	return сам, nil
}

// Обновить -- обновить ангар принудительно
func (сам *АренаАнгар) Обновить() {
	сам.РесурсыОбновить()
	сам.сетьТанкСтат.Update()
	сам.словАрена["конвой"].Пуск()
	сам.ресурсы.Топливо().Обновить()
}

// Запускает обработку ангара
func (сам *АренаАнгар) пуск() {
	{ // Запуск компонентов
		сам.танкПарам.Пуск()
		go сам.ресурсы.Топливо().Run()
	}
	фнЦикл := func() bool {
		сам.Обновить()
		// сам.конвойПроверить()
		if err := сам.ОбратВремяУст("01:00"); err != nil {
			сам.Отменить()
			log.Printf("Ангар.Run(): in update ICountTime, err=\n\t%v\n", err)
			return false
		}
		for _, арена := range сам.словАрена {
			арена.Пуск()
		}
		return true
	}
	go func() {
		ош := сам.ОбратВремяУст("01")
		if ош != nil {
			log.Printf("Ангар.Run(): in update ICountTime, ош=\n\t%v\n", ош)
			сам.прилож.Отменить()
			return
		}
		for {
			select {
			case <-сам.прилож.Конт().Done(): // Отмена контекста
				return
			case <-сам.ВремяОстат().КаналСиг(): // Метка времени
				if !фнЦикл() {
					return
				}
			default: // Запускается раз в минуту
				if !фнЦикл() {
					return
				}
				time.Sleep(time.Minute * 1)
			}
		}
	}()
}

// Обновляет ресурсы ангара
func (сам *АренаАнгар) РесурсыОбновить() {
	сам.ИАрена.Обновить()
	сам.золотоНайти()
	сам.сереброНайти()
}

// IMissions -- возвращает ссылку на объект миссий
func (сам *АренаАнгар) Миссии() ИМиссии {
	return сам.словАрена["миссии"].(ИМиссии)
}

// Сражение -- возвращает объект сражения
func (сам *АренаАнгар) Сражение() ИСражениеСцена {
	return сам.словАрена["сражение"].(ИСражениеСцена)
}

// Конвой -- возвращает объект конвоя
func (сам *АренаАнгар) Конвой() ИАренаКонвой {
	return сам.словАрена["конвой"].(ИАренаКонвой)
}

// Золото -- возвращает объект золота
func (сам *АренаАнгар) Золото() ИСтатПарам {
	return сам.ресурсы.Золото()
}

// Топливо -- возвращает объект топлива
func (сам *АренаАнгар) Топливо() ИСтатПарам {
	return сам.ресурсы.Топливо().Fuel()
}

// Уровень -- возвращает объект уровня игрока
func (сам *АренаАнгар) Уровень() ИСтатПарам {
	return сам.уровень
}

// Прогресс -- возвращает прогресс уровня игрока
func (сам *АренаАнгар) Прогресс() ИСтатПарам {
	return сам.progress
}

// ИгрокиОнлайн -- возвращает количество игроков онлайн
func (сам *АренаАнгар) ИгрокиОнлайн() ИСтатПарам {
	return сам.игроковОнлайн
}

// СереброВсего -- возвращает объект всего серебра в ангаре
func (сам *АренаАнгар) СереброВсего() ИСтатПарам {
	return сам.ресурсы.СереброВсего()
}

// СереброЗаработаноСессия -- возвращает объект серебра за сессию в ангаре
func (сам *АренаАнгар) СереброЗаработаноСессия() ИСтатПарам {
	return сам.silverOnline
}

// СереброОбновить -- на основе фактического серебра -- обновляет выработанное серебро
func (сам *АренаАнгар) СереброОбновить(silverFact int) {
	if сам.СереброВсего().Получ() == 0 { // Если запуск
		сам.СереброВсего().Уст(silverFact)
		return
	}
	if сам.СереброВсего().Получ() > silverFact { // Если потрачено серебро
		сам.СереброВсего().Уст(silverFact)
		return
	}
	if сам.СереброВсего().Получ() < silverFact { // Если заработано
		so := сам.silverOnline.Получ()
		sd := silverFact - сам.СереброВсего().Получ()
		сам.silverOnline.Уст(so + sd)
	}
	сам.СереброВсего().Уст(silverFact)
}

// База -- возвращает базу
func (сам *АренаАнгар) База() ИАренаБаза {
	return сам.словАрена["база"].(ИАренаБаза)
}

/* Проверяет на исполнение конвоя
func (сам *Ангар) конвойПроверить() {
	var (
		strOut   string
		еслиНайдено   bool
		lstAngar = сам.СписПолучить()
	)
	for _, strOut = range lstAngar {
		if strings.Contains(strOut, `>Конвой</span>`) {
			еслиНайдено = true
			break
		}
	}
	if !еслиНайдено {
		return
	}
	if !strings.Contains(strOut, `<a class="simple-but border gray mb1" href="convoy"><span><span>Конвой</span></span></a>`) {
		return
	}
	сам.конвой.UpdateLst()
}
*/

// Ищет в теле текста ангара серебро
func (сам *АренаАнгар) сереброНайти() {
	// _mt.Println("\tAngarNet.findSilver()")
	lstAngar := сам.СписПолучить()
	var strOut string
	for _, strSilver := range lstAngar {
		if strings.Contains(strSilver, `<img title="Серебро" `) {
			strOut = strSilver
			break
		}
	}
	// Выделить топливо
	lstSilver := strings.Split(strOut, `<img title="Серебро" alt="Серебро" src="/images/icons/silver.png?2"/> `)
	strSilver := lstSilver[1]
	iSilver, err := strconv.Atoi(strSilver)
	if err != nil {
		// log._rintf("ERRO AngarNet.findSilver(): silver(%v) not number, err=\n\t%v\n", strSilver, err)
		return
	}
	сам.СереброВсего().Уст(iSilver)
}

// Ищет в теле текста ангара золото
func (сам *АренаАнгар) золотоНайти() {
	var (
		lstAngar    = сам.бот.Ангар().СписПолучить()
		strOut      string
		еслиНайдено bool
	)

	for _, strGold := range lstAngar {
		if strings.Contains(strGold, `<img title="Золото" `) {
			strOut = strGold
			еслиНайдено = true
			break
		}
	}
	if !еслиНайдено {
		return
	}
	// Выделить топливо
	lstGold := strings.Split(strOut, `<img title="Золото" alt="Золото" src="/images/icons/gold.png?2"/> `)
	strGold := lstGold[1]
	iGold, err := strconv.Atoi(strGold)
	if err != nil {
		// log._rintf("ERRO AngarNet.findGold(): gold(%v) not number, err=\n\t%v\n", strGold, err)
		return
	}
	сам.бот.Ангар().Золото().Уст(iGold)
}