package v1

import (
	"apsClient/conf"
	"apsClient/constvar"
	"apsClient/model"
	"apsClient/model/common"
	"apsClient/model/request"
	"apsClient/model/response"
	"apsClient/nsq"
	"apsClient/pkg/contextx"
	"apsClient/pkg/convertx"
	"apsClient/pkg/ecode"
	"apsClient/pkg/logx"
	"apsClient/pkg/safe"
	"apsClient/service"
	"apsClient/service/plc_address"
	"errors"
	"fmt"
	"github.com/gin-gonic/gin"
	"gorm.io/gorm"
	"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.TaskData}  "成功"
// @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
	}
	if params.Page <= 0 {
		params.Page = 1
	}
	if params.PageSize <= 0 {
		params.PageSize = 1
	}

	taskResponse, code := service.NewTaskService().GetTask(params.Page, params.PageSize, service.TaskModeCurrent) //取进行中的或未开始的
	if code != ecode.OK {
		ctx.Fail(code)
		return
	}
	if len(taskResponse.Tasks) == 0 {
		taskResponse, code = service.NewTaskService().GetTask(params.Page, params.PageSize, service.TaskModeLastFinished) //取上一个完成的
		if code != ecode.OK {
			ctx.Fail(code)
			return
		}
	}

	for _, task := range taskResponse.Tasks {
		if task.Procedure.Status == model.ProcedureStatusWaitProcess {
			task.CanStarted = true
		}
	}

	taskResponse.Prompt = conf.Conf.Prompt

	ctx.OkWithDetailed(taskResponse)
}

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

	taskResponse, code := service.NewTaskService().GetTask(params.Page, params.PageSize, service.TaskModeUnStarted) //时间到了未开始的
	if code != ecode.OK {
		ctx.Fail(code)
		return
	}
	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 := convertx.Atoi(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.UnknownErr)
		return
	}

	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,
		})
	}

	safe.Go(func() {
		caller := nsq.NewCaller(fmt.Sprintf(constvar.NsqTopicGetPlcAddress, conf.Conf.NsqConf.NodeId), fmt.Sprintf(constvar.NsqTopicSendPlcAddress, conf.Conf.NsqConf.NodeId))
		var addressResult common.ResponsePlcAddress
		err := caller.Call(common.RequestPlcAddress{DeviceId: conf.Conf.System.DeviceId}, &addressResult, time.Second*3)
		if err != nil {
			logx.Infof("get plc address err: %v", err.Error())
		}
	})

	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 := convertx.Atoi(idx)
	procedure, code := service.NewTaskService().GetProcedureById(id)
	if code != ecode.OK {
		ctx.Fail(code)
		return
	}
	err := service.NewTaskService().UpdateProcedureStatus(nil, id, model.ProcedureStatusFinished, procedure.Channel)
	if err != nil {
		logx.Errorf("UpdateProcedureStatus err: %v", err.Error())
		ctx.Fail(ecode.UnknownErr)
		return
	}

	msg := &common.MsgTaskStatusUpdate{
		WorkOrderId:  procedure.WorkOrderID,
		ProcedureID:  procedure.ProceduresInfo.ProcedureID,
		DeviceId:     procedure.ProceduresInfo.DeviceID,
		IsProcessing: false,
		IsFinish:     true,
	}

	caller := nsq.NewCaller(fmt.Sprintf(constvar.NsqTopicTaskProcedureStatusUpdate, conf.Conf.NsqConf.NodeId), "")
	err = caller.Send(msg)
	if err != nil {
		logx.Errorf("send task status update msg error:%v", err.Error())
	}

	ctx.Ok()
}

// 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) {
	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.Fail(ecode.UnknownErr)
		return
	}

	err = model.WithTransaction(func(db *gorm.DB) error {
		err = taskService.UpdateProcedureStatusAndChannel(db, params.ProcedureId, model.ProcedureStatusProcessing, params.Channel)
		if err != nil {
			return err
		}
		procedure.Channel = params.Channel
		err = taskService.UpdateOrderStatus(db, order.ID, model.OrderStatusProcessing)
		if err != nil {
			return err
		}
		return service.NewProgressService().Add(db, procedure, order)
	})
	if err != nil {
		logx.Errorf("SendProcessParams update order and procedure status error:%v", err.Error())
		ctx.FailWithMsg(ecode.NeedConfirmedErr, "更改工单状态失败")
		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("SendProcessParams: %v", err.Error())
		err = model.WithTransaction(func(db *gorm.DB) error {
			err = taskService.UpdateProcedureStatusAndChannel(db, params.ProcedureId, model.ProcedureStatusWaitProcess, params.Channel)
			if err != nil {
				return err
			}
			procedure.Channel = params.Channel
			err = taskService.UpdateOrderStatus(db, order.ID, model.OrderStatusWaitProcess)
			if err != nil {
				return err
			}
			return nil
		})
		ctx.FailWithMsg(ecode.NeedConfirmedErr, "糟糕，工艺下发失败。")
		return
	}
	if code != ecode.OK {
		logx.Errorf("get plcConfig err: %v", err.Error())
		return
	}
	plcConfig.CurrentTryTimes = 0
	err = service.PlcWrite(plcConfig, constvar.PlcStartAddressTypeTotalNumber, params.Channel, order.Amount.IntPart())
	if err != nil {
		ctx.FailWithMsg(ecode.NeedConfirmedErr, "糟糕，工艺下发失败。")
		return
	}

	msg := &common.MsgTaskStatusUpdate{
		WorkOrderId:  procedure.WorkOrderID,
		ProcedureID:  procedure.ProceduresInfo.ProcedureID,
		DeviceId:     procedure.ProceduresInfo.DeviceID,
		IsProcessing: true,
		IsFinish:     false,
	}

	caller := nsq.NewCaller(fmt.Sprintf(constvar.NsqTopicTaskProcedureStatusUpdate, conf.Conf.NsqConf.NodeId), "")
	err = caller.Send(msg)
	if err != nil {
		logx.Errorf("send task status update msg error:%v", err.Error())
	}

	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
}