import lodash from 'lodash'
import fetch from 'node-fetch'
import moment from 'moment'
import { Common, Data, Cfg } from '#miao'
import { Character, Material } from '#miao.models'

const ignoreIds = [495, // 有奖问卷调查开启！
  1263, // 米游社《原神》专属工具一览
  423, // 《原神》玩家社区一览
  422, // 《原神》防沉迷系统说明
  762 // 《原神》公平运营声明
]

const ignoreReg = /(内容专题页|版本更新说明|调研|防沉迷|米游社|专项意见|更新修复与优化|问卷调查|版本更新通知|更新时间说明|预下载功能|周边限时|周边上新|角色演示)/
const fulltimeReg = /(魔神任务)/

let Cal = {
  async reqCalData () {
    let listApi = 'https://hk4e-api.mihoyo.com/common/hk4e_cn/announcement/api/getAnnList?game=hk4e&game_biz=hk4e_cn&lang=zh-cn&bundle_id=hk4e_cn&platform=pc&region=cn_gf01&level=55&uid=100000000'

    let request = await fetch(listApi)
    let listData = await request.json()

    let timeMap
    let timeMapCache = await redis.get('miao:calendar:detail')
    if (timeMapCache) {
      timeMap = JSON.parse(timeMapCache) || {}
    } else {
      let detailApi = 'https://hk4e-api.mihoyo.com/common/hk4e_cn/announcement/api/getAnnContent?game=hk4e&game_biz=hk4e_cn&lang=zh-cn&bundle_id=hk4e_cn&platform=pc&region=cn_gf01&level=55&uid=100000000'
      let request2 = await fetch(detailApi)
      let detailData = await request2.json()
      timeMap = {}
      if (detailData && detailData.data && detailData.data.list) {
        let versionTime = {}
        lodash.forEach(detailData.data.list, (ds) => {
          let vRet = /(\d\.\d)版本更新(通知|说明|维护预告)/.exec(ds.title)
          if (vRet && vRet[1]) {
            let content = /(?:更新时间)\s*〓([^〓]+)(?:〓|$)/.exec(ds.content)
            if (content && content[1]) {
              let tRet = /([0-9\\/\\: ]){9,}/.exec(content[1])
              if (tRet && tRet[0]) {
                versionTime[vRet[1]] = versionTime[vRet[1]] || tRet[0].replace('06:00', '11:00')
              }
            } else {
              content = ds.content
              content = content.replace(/(<|&lt;)[\w "%:;=\-\\/\\(\\),\\.]+(>|&gt;)|(&nbsp;)/g, '')
              if (/(将于)(([0-9\\/\\: ]){9,})(进行)/.exec(content)) {
                let tRet = /(将于)(([0-9\\/\\: ]){9,})(进行)/.exec(content)
                if (tRet && tRet[2]) {
                  versionTime[vRet[1]] = versionTime[vRet[1]] || tRet[2].replace('06:00', '11:00')
                }
              }
            }
          }
        })
        lodash.forEach(detailData.data.list, (ds) => {
          let { ann_id: annId, content, title } = ds
          if (ignoreReg.test(title)) {
            return true
          }
          content = content.replace(/(<|&lt;)[\w "%:;=\-\\/\\(\\),\\.]+(>|&gt;)|(&nbsp;)/g, '')
          content = /(?:活动时间|祈愿介绍|任务开放时间|冒险....包|折扣时间)\s*〓([^〓]+)(〓|$)/.exec(content)
          if (!content || !content[1]) {
            return true
          }
          content = content[1]
          let annTime = []

          // 第一种简单格式
          let timeRet = /(?:活动时间)?(?:〓|\s)*([0-9\\/\\: ~]{6,})/.exec(content)
          if (timeRet && timeRet[1]) {
            annTime = timeRet[1].split('~')
          }
          if (/\d\.\d版本更新(?:完成)?后/.test(content)) {
            let vRet = /(\d\.\d)版本更新(?:完成)?后/.exec(content)
            let vTime = ''
            if (vRet && vRet[1] && versionTime[vRet[1]]) {
              vTime = versionTime[vRet[1]]
            }
            if (!vTime) {
              return true
            }
            if (/永久开放/.test(content)) {
              annTime = [vTime, '2099/01/01 00:00:00']
            } else {
              timeRet = /([0-9\\/\\: ]){9,}/.exec(content)
              if (timeRet && timeRet[0]) {
                annTime = [vTime, timeRet[0]]
              }
            }
          } else if (/\d\.\d版本期间持续开放/.test(content)) {
            let vRet = /(\d\.\d)版本期间持续开放/.exec(content)
            let vTime = ''
            if (vRet && vRet[1] && versionTime[vRet[1]]) {
              vTime = versionTime[vRet[1]]
            }
            if (!vTime) {
              return true
            }
            let format = 'YYYY-MM-DD HH:mm:ss'
            let versionLastDay = moment(vTime, format).add(42, 'days').hours(6).format(format)
            annTime = [vTime, versionLastDay]
          } else if (/后永久开放/.test(content)) {
            annTime = [timeRet[1], '2099/01/01 00:00:00']
          }
          if (annTime.length === 2) {
            timeMap[annId] = {
              start: annTime[0].trim().replace(/\//g, '-'),
              end: annTime[1].trim().replace(/\//g, '-')
            }
          }
        })
      }
      let miaoApi = 'http://miao.games/api/calendar'
      try {
        request2 = await fetch(miaoApi)
        let data = await request2.json()
        if (data && data.status === 0 && data.data) {
          lodash.forEach(data.data, (ds, id) => {
            timeMap[id] = ds
          })
        }
      } catch (e) {
      }
      await Data.setCacheJSON('miao:calendar:detail', timeMap, 60 * 10)
    }
    return { listData, timeMap }
  },

  getDateList () {
    let today = moment()
    let temp = today.add(-7, 'days')
    let dateList = []
    let month = 0
    let date = []
    let week = []

    let startDate, endDate

    for (let idx = 0; idx < 13; idx++) {
      temp = today.add(1, 'days')
      let m = temp.month() + 1
      let d = temp.date()
      if (month === 0) {
        startDate = temp.format('YYYY-MM-DD')
        month = m
      }
      if (month !== m && date.length > 0) {
        dateList.push({
          month,
          date,
          week
        })
        date = []
        week = []
        month = m
      }
      date.push(d)
      week.push(temp.weekday())
      if (idx === 12) {
        dateList.push({
          month,
          date,
          week
        })
        endDate = temp.format('YYYY-MM-DD')
      }
    }

    let startTime = moment(startDate + ' 00:00:00')
    let endTime = moment(endDate + ' 23:59:59')

    let totalRange = endTime - startTime
    return {
      dateList,
      startTime,
      endTime,
      totalRange,
      nowLeft: (moment() - startTime) / totalRange * 100
    }
  },

  // 深渊日历信息
  getAbyssCal (s1, e1) {
    let now = moment()
    let check = []
    let f = 'YYYY-MM'
    let last = now.add(-1, 'M').format(f)
    let lastM = now.format('MMMM')
    let curr = now.add(1, 'M').format(f)
    let currM = now.format('MMMM')
    let next = now.add(1, 'M').format(f)
    let nextM = now.format('MMMM')

    check.push([moment(`${last}-16 04:00:00`), moment(`${curr}-01 03:59:59`), lastM + '下半'])
    check.push([moment(`${curr}-01 04:00:00`), moment(`${curr}-16 03:59:59`), currM + '上半'])
    check.push([moment(`${curr}-16 04:00:00`), moment(`${next}-01 03:59:59`), currM + '下半'])
    check.push([moment(`${next}-01 04:00:00`), moment(`${next}-16 03:59:59`), nextM + '上半'])

    let ret = []
    lodash.forEach(check, (ds) => {
      let [s2, e2] = ds
      if ((s2 <= s1 && s1 <= e2) || (s2 <= e1 && e1 <= e2)) {
        ret.push(ds)
      }
    })
    return ret
  },

  /**
   * 获取角色数据
   * @param dateList
   * @returns {{charBirth: {}, charNum: number, charTalent: (*|{})}}
   */
  getCharData (dateList) {
    let charBirth = {}
    let charTalent = {}
    // 初始化生日数据
    lodash.forEach(dateList, (m) => {
      lodash.forEach(m.date, (d) => {
        charBirth[`${m.month}-${d}`] = []
      })
    })
    // 初始化天赋数据
    let now = moment(new Date())
    if (now.hour() < 4) {
      now = now.add(-1, 'days')
    }
    let week = now.weekday()
    Material.forEach('talent', (material) => {
      let data = material.getData('name,abbr,city,icon,week,cid')
      data.chars = []
      charTalent[material.name] = data
    }, (ds) => ds.star === 4 && (week === 6 || ds.week === week % 3 + 1))
    // 遍历角色数据
    Character.forEach((char) => {
      if (charBirth[char.birth] && (char.isRelease || char.birth !== '1-1')) {
        charBirth[char.birth].push(char.getData('id,name:abbr,star,face'))
      }
      let t = char.materials?.talent
      if (t && charTalent[t] && !char.isTraveler) {
        let data = char.getData('id,name:abbr,star,face')
        data.weekly = char.getMaterials('weekly')?.icon
        charTalent[t].chars.push(data)
      }
    }, Cfg.get('notReleasedData') ? 'official' : 'release')
    let charNum = 0
    lodash.forEach(charBirth, (charList) => {
      charNum = Math.max(charNum, charList.length)
    })
    charTalent = lodash.values(charTalent)
    charTalent = lodash.sortBy(charTalent, 'cid')
    lodash.forEach(charTalent, (ds) => {
      ds.chars = lodash.sortBy(ds.chars, ['star', 'id']).reverse()
    })
    return { charBirth, charNum, charTalent }
  },

  /**
   * 获取日历列表
   * @param ds
   * @param target
   * @param startTime
   * @param endTime
   * @param totalRange
   * @param now
   * @param timeMap
   * @param isAct
   * @returns {boolean}
   */
  getList (ds, target, { startTime, endTime, totalRange, now, timeMap = {} }, isAct = false) {
    let type = isAct ? 'activity' : 'normal'
    let id = ds.ann_id
    let title = ds.title
    let banner = isAct ? ds.banner : ''
    let extra = { sort: isAct ? 5 : 10 }
    let detail = timeMap[id] || {}

    if (ignoreIds.includes(id) || ignoreReg.test(title) || detail.display === false) {
      return false
    }

    if (/神铸赋形/.test(title)) {
      type = 'weapon'
      title = title.replace(/(单手剑|双手剑|长柄武器|弓|法器|·)/g, '')
      extra.sort = 3
    } else if (/集录/.test(title)) {
      extra.sort = 2
    } else if (/祈愿/.test(title)) {
      type = 'character'
      let regRet = /·(.*)\(/.exec(title)
      if (regRet[1]) {
        let char = Character.get(regRet[1])
        extra.banner2 = char.getImgs()?.card
        extra.face = char.face
        extra.character = regRet[1]
        extra.elem = char.elem
        extra.sort = 1
      }
    } else if (/纪行/.test(title)) {
      type = 'pass'
    }

    let getDate = (d1, d2) => moment(d1 && d1.length > 6 ? d1 : d2)
    let sDate = getDate(detail.start, ds.start_time)
    let eDate = getDate(detail.end, ds.end_time)
    let sTime = moment.max(sDate, startTime)
    let eTime = moment.min(eDate, endTime)

    let sRange = sTime - startTime
    let eRange = eTime - startTime

    let left = sRange / totalRange * 100
    let width = eRange / totalRange * 100 - left

    let label = ''
    if (fulltimeReg.test(title) || eDate - sDate > 365 * 24 * 3600 * 1000) {
      if (sDate < now) {
        label = sDate.format('MM-DD HH:mm') + ' 后永久有效'
      } else {
        label = '永久有效'
      }
    } else if (now > sDate && eDate > now) {
      label = eDate.format('MM-DD HH:mm') + ' (' + moment.duration(eDate - now).humanize() + '后结束)'
      if (width > (isAct ? 38 : 55)) {
        label = sDate.format('MM-DD HH:mm') + ' ~ ' + label
      }
    } else if (sDate > now) {
      label = sDate.format('MM-DD HH:mm') + ' (' + moment.duration(sDate - now).humanize() + '后开始)'
    } else if (isAct) {
      label = sDate.format('MM-DD HH:mm') + ' ~ ' + eDate.format('MM-DD HH:mm')
    }
    if (sDate <= endTime && eDate >= startTime) {
      target.push({
        ...extra,
        id,
        title,
        type,
        mergeStatus: ['activity', 'normal'].includes(type) ? 1 : 0,
        banner,
        icon: ds.tag_icon,
        left,
        width,
        label,
        duration: eTime - sTime,
        start: sDate.format('MM-DD HH:mm'),
        end: eDate.format('MM-DD HH:mm')
      })
    }
  },

  async get () {
    moment.locale('zh-cn')
    let now = moment()

    let { listData, timeMap } = await Cal.reqCalData()

    let dl = Cal.getDateList()

    let list = []
    let abyss = []

    lodash.forEach(listData.data.list[1].list, (ds) => Cal.getList(ds, list, { ...dl, now, timeMap }, true))
    lodash.forEach(listData.data.list[0].list, (ds) => Cal.getList(ds, list, { ...dl, now, timeMap }, false))

    let abyssCal = Cal.getAbyssCal(dl.startTime, dl.endTime)
    lodash.forEach(abyssCal, (t) => {
      Cal.getList({
        title: `「深境螺旋」· ${t[2]}`,
        start_time: t[0].format('YYYY-MM-DD HH:mm'),
        end_time: t[1].format('YYYY-MM-DD HH:mm')
      }, abyss, { ...dl, now }, true)
    })

    list = lodash.sortBy(list, ['sort', 'start', 'duration'])

    let charCount = 0
    let charOld = 0
    let weaponCount = 0
    let ret = []
    lodash.forEach(list, (li) => {
      if (li.type === 'character') {
        charCount++
        li.left === 0 && charOld++
        li.idx = charCount
      }
      if (li.type === 'weapon') {
        weaponCount++
        li.idx = weaponCount
      }
      if (li.mergeStatus === 1) {
        lodash.forEach(list, (li2) => {
          if (li2.mergeStatus === 1 && li.left + li.width <= li2.left) {
            li.mergeStatus = 2
            li2.mergeStatus = 2
            ret.push([li, li2])
            return false
          }
        })
      }
      if (li.mergeStatus !== 2) {
        li.mergeStatus = 2
        ret.push([li])
      }
    })

    return {
      game: 'gs',
      ...dl,
      ...Cal.getCharData(dl.dateList),
      list: ret,
      abyss,
      charMode: `char-${charCount}-${charOld}`,
      nowTime: now.format('YYYY-MM-DD HH:mm'),
      nowDate: now.date()
    }
  },

  async render (e) {
    let calData = await Cal.get()
    let mode = 'calendar'
    if (/(日历列表|活动)$/.test(e.msg)) {
      mode = 'list'
    }

    return await Common.render('wiki/calendar', {
      ...calData,
      displayMode: mode
    }, { e, scale: 1.1 })
  }
}

export default Cal