package v1

import (
	"apsClient/conf"
	"apsClient/constvar"
	"apsClient/model"
	"apsClient/model/request"
	"apsClient/model/response"
	"apsClient/pkg/contextx"
	"apsClient/pkg/ecode"
	"apsClient/pkg/logx"
	"apsClient/service"
	"apsClient/service/plc_address"
	"errors"
	"github.com/gin-gonic/gin"
	"github.com/jinzhu/gorm"
	"github.com/spf13/cast"
	"sort"
	"sync"
	"time"
)

type TaskApi struct{}

// TaskCountdown
// @Tags      Task
// @Summary   新任务倒计时
// @Produce   application/json
// @Success   200   {object}  contextx.Response{data=response.TaskCountdown}  "成功"
// @Router    /v1/task/countdown [get]
func (slf *TaskApi) TaskCountdown(c *gin.Context) {
	ctx, ok := contextx.NewContext(c, nil)
	if !ok {
		return
	}
	var resp response.TaskCountdown
	workOrder, err := service.NewTaskService().GetNextTask()
	if err == nil {
		seconds := workOrder.StartTime - time.Now().Unix()
		resp.CountDownHour = seconds / 3600
		resp.CountDownMinute = seconds % 3600 / 60
		resp.ShowCountDown = true
	}
	ctx.OkWithDetailed(resp)
}

// TaskGet
// @Tags      Task
// @Summary   获取任务
// @Produce   application/json
// @Param     object  query    request.TaskList true  "查询参数"
// @Success   200   {object}  contextx.Response{data=response.TaskResponse}  "成功"
// @Router    /v1/task/get [get]
func (slf *TaskApi) TaskGet(c *gin.Context) {
	var params request.TaskList
	ctx, ok := contextx.NewContext(c, &params)
	if !ok {
		return
	}

	channelAmount, err := service.NewDevicePlcService().GetDeviceChannelAmount()
	if err != nil {
		ctx.FailWithMsg(ecode.NeedConfirmedErr, err.Error())
		return
	}
	taskCount := service.NewTaskService().NewTaskCount(conf.Conf.CurrentDeviceID)
	params.Page = 1
	if params.PageSize <= 0 {
		if params.TaskMode == constvar.TaskModeUnStarted {
			params.PageSize = int(taskCount)
		} else {
			params.PageSize = channelAmount
		}
	}

	taskMode := constvar.TaskModeCurrent
	if params.TaskMode == constvar.TaskModeUnStarted {
		taskMode = params.TaskMode
	}

	taskResponse, code := service.NewTaskService().GetTask(params.DeviceID, params.Page, params.PageSize, taskMode, nil) //取进行中的或未开始的
	if code != ecode.OK {
		ctx.Fail(code)
		return
	}

	if len(taskResponse.Tasks) < channelAmount && taskMode == constvar.TaskModeCurrent {
		var existsChannel = make(map[int32]bool, channelAmount)
		for _, task := range taskResponse.Tasks {
			existsChannel[task.Channel] = true
		}
		for i := 0; i < channelAmount; i++ {
			if existsChannel[int32(i)] {
				continue
			}
			taskResponseTemp, code := service.NewTaskService().GetTask(params.DeviceID, params.Page, 1, constvar.TaskModeLastFinished, []int32{int32(i)}) //取上一个完成的
			if code != ecode.OK {
				ctx.Fail(code)
				return
			}
			taskResponse.Tasks = append(taskResponse.Tasks, taskResponseTemp.Tasks...)
		}
	}

	sort.Slice(taskResponse.Tasks, func(i, j int) bool {
		return taskResponse.Tasks[i].Channel < taskResponse.Tasks[i].Channel
	})

	nowTs := time.Now().Unix()
	flagMap := make(map[int32]struct{}, 0)
	for _, task := range taskResponse.Tasks {
		if _, ok := flagMap[task.Channel]; !ok && !service.TaskFlagGet(task.Channel) && task.Procedure.StartTime <= nowTs {
			task.CanStarted = true
			flagMap[task.Channel] = struct{}{}
		}
	}

	taskResponse.Prompt = conf.Conf.Prompt
	taskResponse.ChannelAmount = channelAmount
	taskResponse.TaskCount = taskCount

	ctx.OkWithDetailed(taskResponse)
}

// GetProcessParams
// @Tags      Task
// @Summary   任务开始（获取工艺参数）
// @Produce   application/json
// @Param     id  path    int true  "工序id"
// @Success   200   {object}  contextx.Response{data=response.ProcessParamsResponse}  "成功"
// @Router    /v1/task/start/{id} [get]
func (slf *TaskApi) GetProcessParams(c *gin.Context) {
	ctx, ok := contextx.NewContext(c, nil)
	if !ok {
		return
	}
	idx := c.Param("id")
	if idx == "" {
		ctx.Fail(ecode.ParamsErr)
		return
	}
	id := cast.ToUint(idx)
	procedure, code := service.NewTaskService().GetProcedureById(id)
	if code != ecode.OK {
		ctx.Fail(code)
		return
	}

	order, err := service.NewTaskService().GetOrderByWorkOrderId(procedure.WorkOrderID)
	if err != nil {
		ctx.Fail(ecode.DBErr)
		return
	}
	var processModel *model.ProcessModel
	if procedure.ProcessModelNumber != "" {
		processModel, err = service.GetProcessModelByNumber(procedure.ProcessModelNumber)
		if err != nil || processModel == nil || processModel.ParamsMap == nil {
			ctx.FailWithMsg(ecode.ParamsErr, "未获取到工艺参数，请在工艺模型库中上传！")
			return
		}
	} else {
		processModel, err = service.NewTaskService().GetProcessParams(procedure, order)
		if err != nil || processModel == nil || processModel.ParamsMap == nil {
			ctx.FailWithMsg(ecode.ParamsErr, "未获取到工艺参数，请在工艺模型库中上传！")
			return
		}
	}

	processParamsArr := make([]response.ProcessParams, 0, len(processModel.ParamsMap))
	for k, v := range processModel.ParamsMap {
		processParamsArr = append(processParamsArr, response.ProcessParams{
			Key:   k,
			Value: v,
		})
	}

	resp := response.ProcessParamsResponse{
		Number: processModel.Number,
		Params: processParamsArr,
	}
	ctx.OkWithDetailed(resp)
}

// TaskFinish
// @Tags      Task
// @Summary   任务结束
// @Produce   application/json
// @Param     id  path    int true  "工序id"
// @Success   200   {object}  contextx.Response{service.GetProcessModel}  "成功"
// @Router    /v1/task/finish/{id} [put]
func (slf *TaskApi) TaskFinish(c *gin.Context) {
	ctx, ok := contextx.NewContext(c, nil)
	if !ok {
		return
	}
	idx := c.Param("id")
	if idx == "" {
		ctx.Fail(ecode.ParamsErr)
		return
	}
	id := cast.ToUint(idx)
	procedure, code := service.NewTaskService().GetProcedureById(id)
	if code != ecode.OK {
		ctx.Fail(code)
		return
	}
	if procedure.Status == model.ProcedureStatusFinished {
		ctx.Ok()
		return
	}
	if procedure.Status != model.ProcedureStatusProcessing {
		ctx.Fail(ecode.ParamsErr)
		return
	}

	err := model.WithTransaction(func(db *gorm.DB) error {
		err := service.NewTaskService().UpdateProcedureStatusAndChannel(db, id, model.ProcedureStatusFinished, procedure.Channel, procedure.ProcessModelNumber)
		if err != nil {
			return err
		}
		record := model.TaskStatusSync{
			WorkOrderId:  procedure.WorkOrderID,
			ProcedureID:  procedure.ProcedureID,
			DeviceId:     procedure.DeviceID,
			IsProcessing: false,
			IsFinish:     true,
		}
		return service.NewTaskService().SaveTaskStatusSync(db, &record)
	})

	if err != nil {
		logx.Errorf("TaskFinish UpdateProcedureStatus err: %v", err.Error())
		ctx.Fail(ecode.UnknownErr)
		return
	}

	service.TaskFlagUnset(procedure.Channel)

	ctx.Ok()
}

var mutex sync.Mutex

// TaskStart
// @Tags      Task
// @Summary   下发工艺参数（开始任务）
// @Produce   application/json
// @Param     object  body    request.SendProcessParams true  "查询参数"
// @Success   200   {object}  contextx.Response{service.GetProcessModel}  "成功"
// @Router    /v1/task/sendProcessParams [post]
func (slf *TaskApi) TaskStart(c *gin.Context) {
	mutex.Lock()
	defer mutex.Unlock()
	var params request.SendProcessParams
	ctx, ok := contextx.NewContext(c, &params)
	if !ok {
		return
	}
	taskService := service.NewTaskService()
	procedure, code := taskService.GetProcedureById(params.ProcedureId)
	if code != ecode.OK {
		ctx.Fail(code)
		return
	}
	order, err := taskService.GetOrderByWorkOrderId(procedure.WorkOrderID)
	if err != nil {
		ctx.Fail(ecode.UnknownErr)
		return
	}

	if procedure.Status == model.ProcedureStatusProcessing {
		ctx.Ok()
		return
	}
	processModel, err := taskService.GetProcessParams(procedure, order)
	if err != nil || processModel == nil || processModel.ParamsMap == nil {
		ctx.FailWithMsg(ecode.ParamsErr, "未获取到工艺参数，请在工艺模型库中上传！")
		return
	}
	plcConfig, code := service.NewDevicePlcService().GetDevicePlc()
	if code != ecode.OK || plcConfig.ID == 0 {
		ctx.FailWithMsg(ecode.NeedConfirmedErr, "请先配置PLC")
		return
	}
	plcConfig.MaxTryTimes = 2
	err = SendParams(processModel.ParamsMap, plcConfig)
	if err != nil {
		ctx.FailWithMsg(ecode.NeedConfirmedErr, "PLC请求失败，请检查PLC配置！")
		return
	}
	plcConfig.CurrentTryTimes = 0
	err = service.PlcWrite(plcConfig, constvar.PlcStartAddressTypeTotalNumber, procedure.Channel, order.Amount.IntPart())
	if err != nil {
		ctx.FailWithMsg(ecode.NeedConfirmedErr, "PLC请求失败，请检查PLC配置！")
		return
	}
	err = model.WithTransaction(func(db *gorm.DB) error {
		err = taskService.UpdateProcedureStatusAndChannel(db, params.ProcedureId, model.ProcedureStatusProcessing, procedure.Channel, processModel.Number)
		if err != nil {
			return err
		}
		err = taskService.UpdateOrderStatus(db, order.ID, model.OrderStatusProcessing)
		if err != nil {
			return err
		}
		err = service.NewProgressService().Add(db, procedure, order)
		if err != nil {
			return err
		}
		record := model.TaskStatusSync{
			WorkOrderId:  procedure.WorkOrderID,
			ProcedureID:  procedure.ProcedureID,
			DeviceId:     procedure.DeviceID,
			IsProcessing: true,
			IsFinish:     false,
		}
		return service.NewTaskService().SaveTaskStatusSync(db, &record)
	})
	if err != nil {
		logx.Errorf("SendProcessParams update order and procedure status error:%v", err.Error())
		ctx.FailWithMsg(ecode.DBErr, "更改工单状态失败")
		return
	}

	service.TaskFlagSet(procedure.Channel)
	ctx.Ok()
}

// UpdateProcessParams
// @Tags      Task
// @Summary   更新工艺参数（进行中的任务）
// @Produce   application/json
// @Param     object  body    request.SendProcessParams true  "查询参数"
// @Success   200   {object}  contextx.Response{}  "成功"
// @Router    /v1/task/updateProcessParams [post]
func (slf *TaskApi) UpdateProcessParams(c *gin.Context) {
	mutex.Lock()
	defer mutex.Unlock()
	var params request.SendProcessParams
	ctx, ok := contextx.NewContext(c, &params)
	if !ok {
		return
	}
	taskService := service.NewTaskService()
	procedure, code := taskService.GetProcedureById(params.ProcedureId)
	if code != ecode.OK {
		ctx.Fail(code)
		return
	}
	order, err := taskService.GetOrderByWorkOrderId(procedure.WorkOrderID)
	if err != nil {
		ctx.Fail(ecode.UnknownErr)
		return
	}

	if procedure.Status != model.ProcedureStatusProcessing { //只能进行中的可以更新
		ctx.FailWithMsg(ecode.ParamsErr, "只能进行中的工序可以更新工艺参数")
		return
	}
	processModel, err := taskService.GetProcessParams(procedure, order)
	if err != nil || processModel == nil || processModel.ParamsMap == nil {
		ctx.FailWithMsg(ecode.ParamsErr, "未获取到工艺参数，请在工艺模型库中上传！")
		return
	}

	plcConfig, code := service.NewDevicePlcService().GetDevicePlc()
	if code != ecode.OK || plcConfig.ID == 0 {
		ctx.FailWithMsg(ecode.NeedConfirmedErr, "请先配置PLC")
		return
	}
	plcConfig.MaxTryTimes = 2
	err = SendParams(processModel.ParamsMap, plcConfig)
	if err != nil {
		logx.Errorf("update process params err: %v", err.Error())
		ctx.FailWithMsg(ecode.NeedConfirmedErr, "PLC请求失败，请检查PLC配置！")
		return
	}
	_ = taskService.UpdateProcessModelNumber(nil, params.ProcedureId, processModel.Number)
	ctx.Ok()
}

func SendParams(paramsMap map[string]interface{}, plcConfig *model.DevicePlc) error {
	if len(paramsMap) == 0 {
		return errors.New("empty params")
	}
	if plcConfig.CurrentTryTimes > plcConfig.MaxTryTimes {
		return plcConfig.CurrentErr
	}
	if plcConfig.CurrentTryTimes == 0 {
		logx.Info("----------------开始下发工艺参数-----------------")
	}
	var failedNumbers int
	for k, v := range paramsMap {
		address, ok := plc_address.Get(k)
		if !ok {
			logx.Errorf("miss param address, k:%v, v:%v", k, v)
			continue
		}
		err := service.PlcWriteDirect(plcConfig, address, v)
		if err != nil {
			plcConfig.CurrentErr = err
			failedNumbers++
			logx.Errorf("plc write err:%v, address: %v, key: %v value: %v", err.Error(), address, k, v)
		} else {
			delete(paramsMap, k)
			logx.Infof("plc write ok: key: %v, value: %v", k, v)
		}
	}
	if failedNumbers >= 1 { //写入plc失败, 重试
		plcConfig.CurrentTryTimes++
		return SendParams(paramsMap, plcConfig)
	}
	logx.Info("----------------下发工艺参数完毕-----------------")
	return nil
}

// TaskListByChannel
// @Tags      Task
// @Summary   获取任务列表2
// @Produce   application/json
// @Param     object  query    request.SimpleTaskList true  "查询参数"
// @Success   200   {object}  contextx.Response{data=map[int32]response.taskResponse}  "成功"
// @Router    /v1/task/listByChannel [get]
func (slf *TaskApi) TaskListByChannel(c *gin.Context) {
	var params request.TaskListByChannel
	ctx, ok := contextx.NewContext(c, &params)
	if !ok {
		return
	}

	channelAmount, err := service.NewDevicePlcService().GetDeviceChannelAmount()
	if err != nil {
		ctx.FailWithMsg(ecode.NeedConfirmedErr, err.Error())
		return
	}
	params.DeviceID = conf.Conf.CurrentDeviceID

	dataMap := make(map[int32]*response.TaskResponse, channelAmount)
	if params.Channel != nil {
		taskResponse, err := getTaskResponseByChannel(params, *params.Channel)
		if err != nil {
			ctx.FailWithMsg(ecode.DBErr, err.Error())
			return
		}
		dataMap[*params.Channel] = taskResponse
		ctx.OkWithDetailed(dataMap)
		return
	}

	//不传channel取所有channel的
	var wg sync.WaitGroup
	var mu sync.Mutex
	for i := 0; i < channelAmount; i++ {
		wg.Add(1)
		go func(channel int32) {
			defer wg.Done()
			taskResponse, err := getTaskResponseByChannel(params, channel)
			if err != nil {
				ctx.FailWithMsg(ecode.DBErr, err.Error())
				return
			}
			mu.Lock()
			defer mu.Unlock()
			dataMap[channel] = taskResponse
		}(int32(i))
	}
	wg.Wait()
	ctx.OkWithDetailed(dataMap)
}

func getTaskResponseByChannel(params request.TaskListByChannel, channel int32) (taskResponse *response.TaskResponse, err error) {
	taskResponse, err = service.NewTaskService().GetTask2(params.DeviceID, params.Offset, params.Limit, []int32{channel}, params.Type) //取进行中的或未开始的
	if err != nil {
		return
	}

	nowTs := time.Now().Unix()
	flagMap := make(map[int32]struct{}, 0)
	for _, task := range taskResponse.Tasks {
		if _, ok := flagMap[task.Channel]; !ok && !service.TaskFlagGet(task.Channel) && task.Procedure.StartTime <= nowTs {
			task.CanStarted = true
			flagMap[task.Channel] = struct{}{}
		}
	}
	taskResponse.Prompt = conf.Conf.Prompt
	return
}