// package arena_arsenal -- объект оружейной на базе
package arena_arsenal

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

	. "wartank/app/lev0/types"
	"wartank/app/lev1"
	"wartank/app/lev1/web_log"
	"wartank/app/lev2/arena"

	. "gitp78su.ipnodns.ru/svi/kern"
	. "gitp78su.ipnodns.ru/svi/kern/krn/ktypes"
)

const (
	стрКумулятивы = "кумулятивы"
	стрБронебойки = "бронебойки"
	стрФугасы     = "фугасы"
	стрРемки      = "ремки"
)

// Арсенал -- объект оружейной на базе
type АренаАрсенал struct {
	ИАрена
	вЛог         ИВебЛог
	лог          ILogBuf
	бот          ИБот
	база         ИАренаБаза
	фугас        ИСтатПарам
	бронебойка   ИСтатПарам
	кумулятив    ИСтатПарам
	ремка        ИСтатПарам
	продуктИмя   string     // Что сейчас делается
	продуктКол   ИСтатПарам // Сколько делается прямо сейчас
	продуктВремя string     // Сколько осталось времени прямо сейчас
	конт         ILocalCtx
}

// НовАрсенал -- возвращает новый *Arsenal
func НовАрсенал(конт ILocalCtx) ИАренаАрсенал {
	лог := NewLogBuf()
	лог.Info("НовАрсенал()\n")

	сам := &АренаАрсенал{
		бот:        конт.Get("бот").Val().(ИБот),
		база:       конт.Get("база").Val().(ИАренаБаза),
		фугас:      lev1.НовСтатПарам(стрФугасы),
		бронебойка: lev1.НовСтатПарам(стрБронебойки),
		кумулятив:  lev1.НовСтатПарам(стрКумулятивы),
		ремка:      lev1.НовСтатПарам(стрРемки),
		продуктКол: lev1.НовСтатПарам("свинец"),
		конт:       конт,

		лог: лог,
	}
	аренаКонфиг := arena.АренаКонфиг{
		Бот_:         сам.бот,
		АренаИмя_:    "Арсенал",
		СтрКонтроль_: `<span class="green2">Ремкомплект</span><br/>`,
		ФнПуск_:      сам.пуск,
		СтрУрл_:      "https://wartank.ru/production/Armory",
	}
	сам.ИАрена = arena.НовАрена(конт, аренаКонфиг)
	сам.вЛог = web_log.НовВебЛог(true)
	// go сам.пуск()
	сам.вЛог.Добавить("НовАрсенал(): Арсенал создан")
	конт.Set("арсенал", сам, "Арсенал бота")
	return сам
}

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

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

// ПродуктВремяСейчас -- сколько осталось времени до производства продукта
func (сам *АренаАрсенал) ПродуктВремяСейчас() string {
	return сам.продуктВремя
	// return сам.Секция.ВремяОпрос().Стр()
}

// запускает обработку арсенала
func (сам *АренаАрсенал) пуск() {
	еслиПостроить := true
	фнРабота := func() {
		defer func() {
			for сам.ВремяОстат().ПолучМилСек() > 0 {
				select {
				case <-сам.конт.Ctx().Done():
					return
				default:
					time.Sleep(time.Second * 5)
				}
			}
		}()
		сам.вЛог.Добавить("Арсенал.пуск().фнРабота()\n")
		еслиПостроить = сам.проверитьПостроить()
		if еслиПостроить {
			еслиПостроено, ош := сам.построить()
			if ош != nil {
				return
			}
			if еслиПостроено {
				сам.вЛог.Добавить("построено")
				return
			}
		}
		{ // апгрейд
			счёт := 5
			for счёт > 0 {
				if сам.проапгрейдить() {
					break
				}
				счёт--
			}
		}
		_ = сам.уровеньОбновить()
		сам.забрать()
		сам.сделать()
		сам.лог.Info("пуск(): бот=%q, цикл завершён\n", сам.бот.Имя())
	}
	for {
		фнРабота()
	}
}

// Проверяет необходимость постройки
func (сам *АренаАрсенал) проверитьПостроить() bool {
	сам.вЛог.Добавить("Арсенал.проверитьПостроить()\n")
	_ = сам.Сеть().ВебВоркер().Получ("https://wartank.ru/building-upgrade/Armory")
	return true
}

// Обновляет текущий уровень арсенала (может быть не построена)
func (сам *АренаАрсенал) уровеньОбновить() bool {
	сам.вЛог.Добавить("Арсенал.уровеньОбновить()\n")
	списСтр := сам.Сеть().ВебВоркер().Получ("http://wartank.ru/buildings")
	// <span class="green2">Оружейная - 0</span><br/>
	var (
		еслиНайти = false
		стр       = ""
	)
	for _, стр = range списСтр {
		if strings.Contains(стр, `<span class="green2">Оружейная -`) {
			еслиНайти = true
			break
		}
	}
	if !еслиНайти {
		сам.вЛог.Добавить("Арсенал.уровеньОбновить(): не надо\n")
		return false
	}
	_стр := strings.TrimPrefix(стр, `<span class="green2">Оружейная - `)
	_стр = strings.TrimSuffix(_стр, `</span><br/>`)
	иУровень, ош := strconv.Atoi(_стр)
	if ош != nil {
		сам.лог.Err("уровеньОбновить(): строка уровня сбойная, стр=%q, ош=\n\t%v\n", стр, ош)
		сам.вЛог.Добавить("ОШИБКА Арсенал.уровеньОбновить(): строка уровня сбойная, стр=%q, ош=\n\t%v\n", стр, ош)
		return false
	}
	сам.Уровень().Уст(иУровень)
	сам.лог.Info("уровеньОбновить(): уровень=%d\n", иУровень)
	сам.вЛог.Добавить("Арсенал.уровеньОбновить(): уровень=%d\n", иУровень)
	return true
}

// Строит арсенал при нулевом уровне
func (сам *АренаАрсенал) построить() (bool, error) {
	сам.вЛог.Добавить("Арсенал.построить()\n")
	списСтр := сам.Сеть().ВебВоркер().Получ("https://wartank.ru/building-upgrade/Armory")
	// <span class="green2">Арсенал - 0</span><br/>
	var (
		еслиНайти = false
		стр       = ""
	)
	for _, стр = range списСтр {
		if strings.Contains(стр, `ILinkListener-upgradeLink-link`) {
			еслиНайти = true
			break
		}
	}
	if !еслиНайти {
		сам.вЛог.Добавить("Арсенал.построить(): не надо\n")
		return true, nil
	}
	// <a class="simple-but border mb5" href="Armory?30-1.ILinkListener-upgradeLink-link">
	// Пробуем построить арсенал
	_стр := strings.TrimPrefix(стр, `<a class="simple-but border mb5" href="`)
	_стр = strings.TrimSuffix(_стр, `">`)
	ссылка := "https://wartank.ru/building-upgrade/" + _стр
	// https://wartank.ru/building-upgrade/Armory?35-1.ILinkListener-upgradeLink-link
	списСтр = сам.Сеть().ВебВоркер().Получ(ссылка)
	еслиНайти = false
	// "<a class=\"simple-but border mb5\" href=\"Armory?14-1.ILinkListener-upgradeLink-link\">"
	for _, стр = range списСтр {
		if strings.Contains(стр, `ILinkListener-upgradeLink-link`) {
			еслиНайти = true
			break
		}
	}
	if !еслиНайти {
		сам.вЛог.Добавить("Арсенал.построить(): не надо\n")
		return true, nil
	}
	сам.лог.Info("построить(): ок\n")
	сам.вЛог.Добавить("Арсенал.построить(): ок\n")
	return true, nil
}

// Пытается проапгрейдить арсенал
func (сам *АренаАрсенал) проапгрейдить() bool {
	сам.вЛог.Добавить("Арсенал.проапгрейдить()\n")
	var (
		еслиНайти = false
		списСтр   []string
		стр       = ""
	)
	фнКупить := func() bool {
		defer time.Sleep(time.Millisecond * 1000)
		списСтр = сам.Сеть().ВебВоркер().Получ("https://wartank.ru/building-upgrade/Armory")
		for _, стр = range списСтр {
			// <a class="simple-but border mb5" href="Armory?5-1.ILinkListener-upgradeLink-link">
			if strings.Contains(стр, `ILinkListener-upgradeLink-link`) {
				еслиНайти = true
				break
			}
		}
		if !еслиНайти {
			сам.вЛог.Добавить("Арсенал.проапгрейдить(): не надо\n")
			return true
		}
		// Пробуем улучшить шахту
		_стр := strings.TrimPrefix(стр, "<a class=\"simple-but border mb5\" href=\"")
		_стр = strings.TrimSuffix(_стр, "\">")
		// https://wartank.ru/building-upgrade/Armory?4-1.ILinkListener-upgradeLink-link
		// <a class="simple-but border mb5" href="Armory?50-1.ILinkListener-upgradeLink-link">
		ссылка := "https://wartank.ru/building-upgrade/" + _стр
		списСтр = сам.Сеть().ВебВоркер().Получ(ссылка)
		// Проверить, что постройка состоялась
		for _, стр := range списСтр {
			if strings.Contains(стр, "ILinkListener-upgradeLink-link") {
				log.Printf("Арсенал.проапгрейдить().фнКупить(): покупка арсенала не прошла\n\tlink=%v\n\tстр=\n\t%v\n", ссылка, стр)
				return false // Покупка не оплачена
			}
		}
		сам.вЛог.Добавить("Арсенал.проапгрейдить().фнКупить(): ок\n")
		return true
	}

	фнПодтверждение := func() bool {
		for _, стр = range списСтр {
			// <a class="simple-but border w50 mXa mb10" w:id="confirmLink" href="../wicket/page?7-1.ILinkListener-confirmLink"><span><span>да, подтверждаю</span></span></a>
			if strings.Contains(стр, `ILinkListener-confirmLink`) {
				еслиНайти = true
				break
			}
		}
		if !еслиНайти {
			сам.вЛог.Добавить("Арсенал.проапгрейдить().фнПодтверждение(): не надо\n")
			return true
		}
		// Пробуем построить шахту
		_стр := strings.TrimPrefix(стр, `<a class="simple-but border w50 mXa mb10" w:id="confirmLink" href="..`)
		_стр = strings.TrimSuffix(_стр, `"><span><span>да, подтверждаю</span></span></a>`)
		// https://wartank.ru/wicket/page?6-1.ILinkListener-confirmLink
		ссылка := "https://wartank.ru" + _стр
		списСтр = сам.Сеть().ВебВоркер().Получ(ссылка)
		// Проверить, что постройка состоялась
		for _, стр := range списСтр {
			if strings.Contains(стр, "<title>Вы сделали слишком большую паузу</title>") {
				сам.вЛог.Добавить("ОШИБКА Арсенал.проапгрейдить().фнПодтверждение(): подтверждение покупка склада топлива не прошла\n\tlink=%v\n\tстр=\n\t%v\n", ссылка, стр)
				return false // Покупка не оплачена
			}
		}
		сам.вЛог.Добавить("Арсенал.проапгрейдить().фнПодтверждение(): ок\n")
		return true
	}

	фнКомплекс := func() {
		count := 5
		for count > 0 {
			if фнКупить() {
				if фнПодтверждение() {
					break
				}
			}
			count--
		}
	}
	фнКомплекс()
	return true
}

// Проверяет на забрать оружейную
func (сам *АренаАрсенал) забрать() bool {
	var (
		strOut      string
		ind         int
		еслиНайдено bool
		lstBase     = сам.СписПолучить()
	)
	for ind, strOut = range lstBase {
		if strings.Contains(strOut, `Моя амуниция`) {
			еслиНайдено = true
			ind += 17
			strOut = lstBase[ind]
			break
		}
	}
	if !еслиНайдено {
		return false
	}
	if !strings.Contains(strOut, `"><span><span>Забрать</span></span></a>`) {
		return false
	}
	lstLink := strings.Split(strOut, `<a class="simple-but border" href="`)
	strLink := lstLink[1]
	lstLink = strings.Split(strLink, `"><span><span>Забрать</span></span></a>`)
	// https://wartank.ru/buildings?80-1.ILinkListener-buildings-0-building-rootBlock-actionPanel-takeProductionLink
	strLink = "https://wartank.ru/" + lstLink[0]
	var (
		лстАрсенал []string
		ош         error
	)
	time.Sleep(time.Millisecond * 100)
	лстАрсенал, ош = сам.Сеть().Get(strLink)
	if ош != nil {
		log.Printf("Арсенал.забрать(): при выполнении Get-запроса? err=\n\t%v\n", ош)
		return false
	}
	if len(лстАрсенал) == 0 {
		log.Printf("Арсенал.забрать(): len lstBase(%v)==0", len(lstBase))
		return false
	}
	for _, strOut = range лстАрсенал {
		if strings.Contains(strOut, `<title>Производство</title>`) {
			return false
		}
	}
	if ош = сам.СтрОбновить(лстАрсенал); ош != nil {
		log.Printf("Арсенал.checkArsenalGet(): при обновлении lstBase, err=\n\t%v\n", ош)
	}
	if ош = сам.СтрОбновить(лстАрсенал); ош != nil {
		log.Printf("Арсенал.checkArsenalGet(): при обновлении lstArsenal, err=\n\t%v\n", ош)
	}
	return true
}

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

// Бронебойки -- возвращает объект бронебойных снарядов
func (сам *АренаАрсенал) Бронебойки() ИСтатПарам {
	return сам.бронебойка
}

// Кумулятивы -- возвращает объект бронебойных снарядов
func (сам *АренаАрсенал) Кумулятивы() ИСтатПарам {
	return сам.кумулятив
}

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

// Выбирает что надо делать, запускает процесс изготовления
func (сам *АренаАрсенал) сделать() bool {
	сам.Обновить()
	// _mt.Println("\tArsenalNet.сделать()")
	var (
		ремкаКол  = сам.Ремки().Получ()
		фугасКол  = сам.Фугасы().Получ()
		кумульКол = сам.Кумулятивы().Получ()
		ббКол     = сам.Бронебойки().Получ()
		снарядТип string
	)
	if ремкаКол < 70 { // Контроль ремки по времени суток и минимальному количеству ремок
		for !сам.сделатьРемку() {
		}
		сам.продуктИмя = стрРемки
		return true
	}
	{ // Контроль по числу снарядов. В равных долях без приоритетов
		// снарядТип = стрФугасы
		снарядТип = стрБронебойки
		if ббКол > фугасКол {
			снарядТип = стрФугасы
		}

		if фугасКол > кумульКол {
			снарядТип = стрКумулятивы
		}

		switch снарядТип {
		case стрФугасы: // Мало фугасов
			for !сам.сделатьФугасы() {
			}
		case стрКумулятивы: // Мало кумулятивов
			for !сам.сделатьКумули() {
			}
		case стрБронебойки: // Мало бронебойных
			for !сам.сделатьБронебойки() {
			}
		default:
			// log._rintf("ERRO Арсенал.сделать(): неизвестный тип арсенала(%v)", typeArmor)
		}
		сам.продуктИмя = снарядТип
	}
	return true
}

// Создать бронебойные
func (сам *АренаАрсенал) сделатьБронебойки() bool {
	var (
		стрВых      string
		lstArsenal  = сам.СписПолучить()
		еслиНайдено bool
		инд         int
	)
	for инд, стрВых = range lstArsenal {
		if strings.Contains(стрВых, `<span class="green2">Бронебойный снаряд</span><br/>`) {
			еслиНайдено = true
			break
		}
	}
	if !еслиНайдено {
		return false
	}
	стрВых = lstArsenal[инд+10]
	// Получить ссылку на бронебойные
	lstArmor := strings.Split(стрВых, `<a class="simple-but border" href="`)
	if len(lstArmor) <= 1 { // Тут возможно есть пустая строка
		return true // Считаем, что производство уже запущено
	}
	strLink := lstArmor[1]
	lstArmor = strings.Split(strLink, `"><span><span>Начать производство</span></span></a>`)
	strLink = "https://wartank.ru/production/" + lstArmor[0]
	time.Sleep(time.Millisecond * 50)
	if _, err := сам.Сеть().Get(strLink); err != nil {
		// log._rintf("ERRO ArsenalNet.makeArmor(): in update lstArsenal,  err=\n\t%v\n", err)
		return false
	}
	сам.АренаСостояние().СостояниеУст(стрБронебойки)
	return true
}

// Создать кумулятивные
func (сам *АренаАрсенал) сделатьКумули() bool {
	var (
		стрВых      string
		lstArsenal  = сам.СписПолучить()
		еслиНайдено bool
		инд         int
	)
	for инд, стрВых = range lstArsenal {
		if strings.Contains(стрВых, `<span class="green2">Кумулятивный снаряд</span><br/>`) {
			еслиНайдено = true
			break
		}
	}
	if !еслиНайдено {
		return false
	}
	стрВых = lstArsenal[инд+10]
	if !strings.Contains(стрВых, `>Начать производство<`) {
		return false
	}
	// Получить ссылку на кумулятив
	списКумул := strings.Split(стрВых, `<a class="simple-but border" href="`)
	strLink := списКумул[1]
	списКумул = strings.Split(strLink, `"><span><span>Начать производство</span></span></a>`)
	strLink = "https://wartank.ru/production/" + списКумул[0]
	time.Sleep(time.Millisecond * 50)
	if _, err := сам.Сеть().Get(strLink); err != nil {
		// log._rintf("ERRO ArsenalNet.makeКумуль(): in make product arsenal кумуль , err=\n\t%v\n", err)
		return false
	}
	сам.АренаСостояние().СостояниеУст(стрКумулятивы)
	return true
}

// Создать фугасы
func (сам *АренаАрсенал) сделатьФугасы() bool {
	var (
		lstArsenal  = сам.СписПолучить()
		стрВых      string
		еслиНайдено bool
		инд         int
	)

	for инд, стрВых = range lstArsenal {
		if strings.Contains(стрВых, `<span class="green2">Фугасный снаряд</span><br/>`) {
			еслиНайдено = true
			break
		}
	}
	if !еслиНайдено {
		return false
	}
	стрВых = lstArsenal[инд+10]
	if !strings.Contains(стрВых, `"><span><span>Начать производство</span></span></a>`) {
		return false
	}
	// Получить ссылку на ремку
	списКумул := strings.Split(стрВых, `<a class="simple-but border" href="`)
	strLink := списКумул[1]
	списКумул = strings.Split(strLink, `"><span><span>Начать производство</span></span></a>`)
	strLink = "https://wartank.ru/production/" + списКумул[0]
	time.Sleep(time.Millisecond * 50)
	if _, err := сам.Сеть().Get(strLink); err != nil {
		// log._rintf("ERRO ArsenalNet.makeФугас(): in make request arsenal product, err=\n\t%v\n", err)
		return false
	}
	сам.АренаСостояние().СостояниеУст(стрФугасы)
	// log._rintf("INFO Арсенал.makeФугас()\n")
	return true
}

// Создать ремку. Выполняется если подходят условия
func (сам *АренаАрсенал) сделатьРемку() bool {
	// _mt.Println("\tArsenalNet.makeРемка()")
	var (
		стрВых      string
		еслиНайдено bool
		инд         int
	)
	lstArsenal := сам.Сеть().ВебВоркер().Получ("https://wartank.ru/production/Armory")
	// <span class="green2">Ремкомплект</span><br/>
	for инд, стрВых = range lstArsenal {
		if strings.Contains(стрВых, `<span class="green2">Ремкомплект</span><br/>`) {
			еслиНайдено = true
			break
		}
	}
	if !еслиНайдено {
		return false
	}
	стрВых = lstArsenal[инд+10]
	// Если кривая строка, то надо вернуться
	if strings.Contains(стрВых, `</div></div></div></div></div></div></div></div>`) {
		return true
	}
	// Получить ссылку на ремку
	_ссылка := strings.TrimPrefix(стрВых, `<a class="simple-but border" href="`)
	_ссылка = strings.TrimSuffix(_ссылка, `"><span><span>Начать производство</span></span></a>`)
	// https://wartank.ru/production/Armory?37-1.ILinkListener-productions-3-production-startProduceLink
	ссылка := "https://wartank.ru/production/" + _ссылка
	time.Sleep(time.Millisecond * 50)
	_ = сам.Сеть().ВебВоркер().Получ(ссылка)
	сам.АренаСостояние().СостояниеУст(стрРемки)
	return true
}