// package bot -- бот для игры в wartank
package bot

import (
	"context"
	"fmt"
	"log"
	"strings"
	"time"

	. "gitp78su.ipnodns.ru/svi/kern"
	. "gitp78su.ipnodns.ru/svi/kern/kc/helpers"
	. "gitp78su.ipnodns.ru/svi/kern/krn/ktypes"

	. "wartank/app/lev0/alias"
	. "wartank/app/lev0/types"
	"wartank/app/lev2/arena/arena_angar"
	"wartank/app/lev3/bot/bot_config"
	"wartank/app/lev3/bot/bot_net"
	"wartank/app/lev3/bot/bot_stat/tank_stat"
)

// ВарБот -- бот для игры в вартанк
type Бот struct {
	прилож         ИПриложение
	хран           IKernelStoreKv
	стата          ИТанкСтат
	errFinal       error // Финальная ошибка работы, если была
	ангар          ИАренаАнгар
	сеть           ИБотСеть
	еслиРаботает   ISafeBool
	еслиАвтозапуск ISafeBoolReact
	конфиг         *bot_config.БотКонфиг // Конфиг бота для хранения в базе
	кнт            context.Context       // Контекст бота
	фтОтмена       func()                // Функция отменя контекста бота
	лог            ILogBuf
	конт           ИБотКонтекст
}

// ЗагрузитьВарБот -- загружает бота из базы
func ЗагрузитьВарБот(конт IKernelCtx, номер АБотНомер) *Бот {
	лог := NewLogBuf()
	лог.Info("ЗагрузитьВарБот()\n")
	Hassert(номер != 0, "ЗагрузитьВарБот(): номер пустой")
	стрНомер := fmt.Sprint(номер)
	лог.Info("ЗагрузитьВарБот(): номер=%q\n", стрНомер)
	хран := конт.Get("kernStore").Val().(IKernelStoreKv)
	binData, err := хран.Get("/bots/" + стрНомер)
	if err != nil {
		if !strings.Contains(err.Error(), "not found") {
			Hassert(false, "ЗагрузитьВарБот(): in load bot '%v' from store, err=\n\t%v\n", номер, err)
		}
		Hassert(err == nil, "ЗагрузитьВарБот(): in load bot '%v' from store, err=\n\t%v\n", номер, err)
	}
	конфиг := &bot_config.БотКонфиг{}
	конфиг.Unmarshal(binData)
	сам := создатьЯдроВарБот(конт, конфиг)
	go сам.рестарт()
	_ = ИБот(сам)
	return сам
}

// Каждые два часа перезапускает себя
func (сам *Бот) рестарт() {
	time.Sleep(time.Hour * 2)
	сам.прилож.Cancel()
	сам.лог.Info("рестарт(): бот %q перезагружен\n", сам.конфиг.Логин_)
}

// НовВарБот -- возвращает новый WarBot
func НовВарБот(конт IKernelCtx, номер АБотНомер, логин, пароль string, еслиАвто bool) *Бот {
	лог := NewLogBuf()
	лог.Info("НовВарБот()\n")
	Hassert(логин != "", "НовВарБот(): логин пустой")
	Hassert(пароль != "", "НовВарБот(): пароль пустой")
	лог.Info("НовВарБот(): name=%q\n", логин)
	config := &bot_config.БотКонфиг{
		ЕслиАвтозапуск_: еслиАвто,
		Логин_:          логин,
		Пароль_:         пароль,
		Номер_:          номер,
	}
	сам := создатьЯдроВарБот(конт, config)
	сам.сохрКонфиг()
	_ = ИБот(сам)
	return сам
}

// Создаёт ядро бота
func создатьЯдроВарБот(конт IKernelCtx, конфиг *bot_config.БотКонфиг) *Бот {
	лог := NewLogBuf()
	лог.Info("создатьЯдроВарБот()\n")
	Hassert(конфиг != nil, "создатьЯдроВарБот(): ВарБотКонфиг==nil")
	ctx, fnCancel := context.WithCancel(конт.Ctx())
	приложение := конт.Get("приложение").Val().(ИПриложение)
	контБот := NewLocalCtx(конт.Ctx())
	сам := &Бот{
		конт:         контБот,
		прилож:       приложение,
		хран:         конт.Get("kernStore").Val().(IKernelStoreKv),
		стата:        tank_stat.НовТанкСтат(конт),
		еслиРаботает: NewSafeBool(),
		конфиг:       конфиг,
		кнт:          ctx,
		фтОтмена:     fnCancel,
		лог:          лог,
	}
	сам.еслиАвтозапуск = NewSafeBoolReact()
	сам.еслиАвтозапуск.Add(сам.Имя(), сам.автозапускИзм)
	сам.конт.Set("бот", сам, "создание ядра")
	сам.конт.Set("приложение", приложение, "Приложение WarBot")
	сам.сеть = bot_net.НовБотСеть(сам.конт)
	сам.ангар = arena_angar.НовАнгар(сам.конт)
	if сам.конфиг.ЕслиАвтозапуск_ {
		сам.еслиАвтозапуск.Set()
		сам.Пуск()
	}
	return сам
}

// ЕслиРабота -- возвращает признак, что бот подключен
func (сам *Бот) ЕслиРабота() bool {
	return сам.еслиРаботает.Get()
}

// Номер -- возвращает номер бота
func (сам *Бот) Номер() АБотНомер {
	return сам.конфиг.Номер()
}

// Имя -- возвращает имя бота
func (сам *Бот) Имя() string {
	return сам.конфиг.Логин()
}

// Пароль -- возвращает пароль бота
func (сам *Бот) Пароль() string {
	return сам.конфиг.Пароль_
}

// Пуск -- запускает бот в работу
func (сам *Бот) Пуск() {
	if сам.еслиРаботает.Get() {
		return
	}
	сам.ангар.Пуск()
	сам.еслиРаботает.Set()
}

// Error -- возвращает финальную ошибку работы, если была
func (сам *Бот) Error() error {
	return сам.errFinal
}

// Ангар -- возвращает ангар игры
func (сам *Бот) Ангар() ИАренаАнгар {
	return сам.ангар
}

// Стата -- возвращает статистику танка
func (сам *Бот) Стата() ИТанкСтат {
	return сам.стата
}

// Сеть -- возвращает ссылку на свой сетевой клиент
func (сам *Бот) Сеть() ИБотСеть {
	return сам.сеть
}

// Автозапуск -- возвращает признак автоматического запуска бота
func (сам *Бот) Автозапуск() ISafeBoolReact {
	return сам.еслиАвтозапуск
}

// Обратный вызов автоматического запуска бота
func (сам *Бот) автозапускИзм(знач bool) {
	сам.лог.Debug("Бот.автозапускИзм()")
	// сам.еслиАвтозапуск.Уст()
	сам.конфиг.ЕслиАвтозапуск_ = знач
	сам.сохрКонфиг()
}

// Сохраняет конфиг бота
func (сам *Бот) сохрКонфиг() {
	log.Printf("ВарБот.сохрКонфиг()")
	strConf := сам.конфиг.Marshall()
	стрНомер := fmt.Sprint(сам.Номер())
	err := сам.хран.Set("/bots/"+стрНомер, strConf)
	Hassert(err == nil, "ВарБот.сохрКонфиг(): err=\n\t%v\n", err)
}

// Контекст -- возвращает контекст бота
func (сам *Бот) Контекст() context.Context {
	return сам.кнт
}

// Закончить -- отменяет контекст бота
func (сам *Бот) Закончить() {
	сам.фтОтмена()
}

// КонтБот -- возвращает контекст бота
func (сам *Бот) КонтБот() ILocalCtx {
	return сам.конт
}