package com.zy.common.service;

import com.alibaba.fastjson.JSON;
import com.baomidou.mybatisplus.mapper.EntityWrapper;
import com.baomidou.mybatisplus.mapper.Wrapper;
import com.core.common.Arith;
import com.core.common.Cools;
import com.core.exception.CoolException;
import com.zy.asrs.entity.*;
import com.zy.asrs.entity.result.KeyValueVo;
import com.zy.asrs.service.*;
import com.zy.asrs.utils.Utils;
import com.zy.asrs.utils.VersionUtils;
import com.zy.common.model.LocTypeDto;
import com.zy.common.model.Shelves;
import com.zy.common.model.StartupDto;
import com.zy.common.properties.SlaveProperties;
import lombok.extern.slf4j.Slf4j;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import org.springframework.transaction.annotation.Transactional;

import java.time.LocalDate;
import java.time.format.DateTimeFormatter;
import java.time.temporal.ChronoUnit;
import java.util.ArrayList;
import java.util.List;

import static com.zy.asrs.utils.Utils.zerofill;

/**
 * 货架核心功能
 * Created by vincent on 2020/6/11
 */
@Slf4j
@Service
public class CommonService {

    @Autowired
    private WrkMastService wrkMastService;
    @Autowired
    private WrkLastnoService wrkLastnoService;
    @Autowired
    private RowLastnoService rowLastnoService;
    @Autowired
    private BasCrnpService basCrnpService;
    @Autowired
    private StaDescService staDescService;
    @Autowired
    private BasDevpService basDevpService;
    @Autowired
    private LocMastService locMastService;
    @Autowired
    private LocDetlService locDetlService;
    @Autowired
    private SlaveProperties slaveProperties;

    /**
     * 生成工作号
     *
     * @param wrkMk
     * @return workNo(工作号)
     */
    public int getWorkNo(Integer wrkMk) {
        WrkLastno wrkLastno = wrkLastnoService.selectById(wrkMk);
        if (Cools.isEmpty(wrkLastno)) {
            throw new CoolException("数据异常，请联系管理员");
        }

        int workNo = wrkLastno.getWrkNo();
        int sNo = wrkLastno.getSNo();
        int eNo = wrkLastno.getENo();
        workNo = workNo >= eNo ? sNo : workNo + 1;
        while (true) {
            WrkMast wrkMast = wrkMastService.selectById(workNo);
            if (null != wrkMast) {
                workNo = workNo >= eNo ? sNo : workNo + 1;
            } else {
                break;
            }
        }
        // 修改序号记录
        if (workNo > 0) {
            wrkLastno.setWrkNo(workNo);
            wrkLastnoService.updateById(wrkLastno);
        }
        // 检验
        if (workNo == 0) {
            throw new CoolException("生成工作号失败，请联系管理员");
        } else {
            if (wrkMastService.selectById(workNo) != null) {
                throw new CoolException("生成工作号" + workNo + "在工作档中已存在");
            }
        }
        return workNo;
    }

    //拆盘机处空板扫码，驱动托盘向码垛位，不入库
    @Transactional
    public StartupDto getScanBarcodeEmptyBoard() {
        StartupDto startupDto = new StartupDto();
        Integer staNo = 0;
        if (wrkMastService.selectCount(new EntityWrapper<WrkMast>().eq("io_type", 201).eq("staNo", 216)) < 2) {
            staNo = 216;
        }
        if (wrkMastService.selectCount(new EntityWrapper<WrkMast>().eq("io_type", 201).eq("staNo", 220)) < 2) {
            staNo = 220;
        }

        startupDto.setStaNo(staNo);
        return startupDto;
    }

    /**
     * 检索库位号
     *
     * @param whsType     类型 1:双深式货架
     * @param staDescId   路径ID
     * @param sourceStaNo 源站
     * @return locNo 检索到的库位号
     */
    @Transactional
    public StartupDto getLocNo(Integer whsType, Integer staDescId, Integer sourceStaNo, List<String> matNos, List<String> batchs, LocTypeDto locTypeDto, int times) {
        // 目标堆垛机号
        StartupDto startupDto = new StartupDto();
        RowLastno rowLastno = rowLastnoService.selectById(whsType);
        if (Cools.isEmpty(rowLastno)) {
            throw new CoolException("数据异常，请联系管理员");
        }
        // 目标库位
        LocMast locMast = null;


        for (int i = 0; i < 4; i++) {
            //找库位按堆垛机号来找，从下往上，从前往后，从左到右
            List<LocMast> locMastList = locMastService.selectList(new EntityWrapper<LocMast>()
                    .eq("crn_no", whsType)
                    .eq("loc_sts", "O")
                    .orderBy("lev1")
                    .orderBy("bay1")
                    .orderBy("row1"));
            BasCrnp crn_no = basCrnpService.selectOne(new EntityWrapper<BasCrnp>()
                    .eq("crn_no", whsType));
            if (locMastList.size() < 5 || crn_no.getInEnable().equals("N") || crn_no.getCrnSts() != 1) {
                if (whsType == 4) {
                    whsType = 1;
                } else {
                    whsType++;
                }
                i++;
                continue;
            }
            for (LocMast locMast1 : locMastList) {
                //判断库位是否为3的浅库位，如果是查看其深库位是否为空
                if (locMast1.getRow1() % 4 == 3) {
                    LocMast locMast2 = locMastService.selectOne(new EntityWrapper<LocMast>()
                            .eq("lev1", locMast1.getLev1())
                            .eq("bay1", locMast1.getBay1())
                            .eq("row1", locMast1.getRow1() + 1)
                    );
                    if (locMast2.getLocSts().equals("O")) {
                        locMast = locMast2;
                        break;
                    } else if (locMast2.getLocSts().equals("F")) {
                        locMast = locMast1;
                        break;
                    } else {
                        continue;
                    }

                } else if (locMast1.getRow1() % 4 == 2) {
                    LocMast locMast2 = locMastService.selectOne(new EntityWrapper<LocMast>()
                            .eq("lev1", locMast1.getLev1())
                            .eq("bay1", locMast1.getBay1())
                            .eq("row1", locMast1.getRow1() - 1)
                    );
                    if (locMast2.getLocSts().equals("F")) {
                        locMast = locMast1;
                        break;
                    } else {
                        continue;
                    }
                } else {
                    locMast = locMast1;
                    break;
                }
            }
            if (Cools.isEmpty(locMast)) {
                if (whsType == 4) {
                    whsType = 1;
                } else {
                    whsType++;
                }
                i++;
            }
            if (!Cools.isEmpty(locMast)) {
                break;
            }
        }

        Wrapper<StaDesc> wrapper = null;
        StaDesc staDesc = null;
        BasDevp staNo = null;

        // 获取目标站
        wrapper = new EntityWrapper<StaDesc>()
                .eq("type_no", staDescId)
                .eq("stn_no", sourceStaNo)
                .eq("crn_no", whsType);
        staDesc = staDescService.selectOne(wrapper);
        if (Cools.isEmpty(staDesc)) {
            log.error("type_no={},stn_no={},crn_no={}", staDescId, sourceStaNo, whsType);
            throw new CoolException("入库路径不存在");
        }
        staNo = basDevpService.selectById(staDesc.getCrnStn());
        if (!staNo.getAutoing().equals("Y")) {
            throw new CoolException("目标站" + staDesc.getCrnStn() + "不可用");
        }


        // 2.库位当前所属尺寸无空库位时，调整尺寸参数，向上兼容检索库位
        if (Cools.isEmpty(locMast) || !locMast.getLocSts().equals("O")) {
            // 当前巷道无空库位时，递归调整至下一巷道，检索全部巷道无果后，跳出递归
            if (times < 4) {
                times = times + 1;
                return getLocNo(1, staDescId, sourceStaNo, matNos, batchs, locTypeDto, times);
            }
            //1==>3==>4==>2
            // 轻货物找轻库位为空时，可以去找重库位仓
            if (locTypeDto.getLocType1() != 2) {
                log.error("系统没有空库位！！！ 尺寸规格： {}， 轮询次数：{},开始查询重库位仓", JSON.toJSONString(locTypeDto), times);
                int i = 0;
                if (locTypeDto.getLocType1() == 1) {
                    i = 3;
                } else if (locTypeDto.getLocType1() == 3) {
                    i = locTypeDto.getLocType1() + 1;
                } else if (locTypeDto.getLocType1() == 4) {
                    i = 2;
                }

                locTypeDto.setLocType1((short) i);
                times = 1;
                return getLocNo(1, staDescId, sourceStaNo, matNos, batchs, locTypeDto, times);
            }
            log.error("系统没有空库位！！！ 尺寸规格： {}， 轮询次数：{}", JSON.toJSONString(locTypeDto), times);
            throw new CoolException("没有空库位");
        }
        String locNo = locMast.getLocNo();

        // 生成工作号
        int workNo = getWorkNo(0);
        // 返回dto
        startupDto.setWorkNo(workNo);
        startupDto.setCrnNo(whsType);
        startupDto.setSourceStaNo(sourceStaNo);
        startupDto.setStaNo(staNo.getDevNo());
        startupDto.setLocNo(locNo);
        return startupDto;
    }

//    /**
//     * 检索库位号
//     *
//     * @param whsType     类型 1:双深式货架
//     * @param staDescId   路径ID
//     * @param sourceStaNo 源站
//     * @param matnr       物料号集合
//     * @return locNo 检索到的库位号
//     */
//    @Transactional
//    public StartupDto getLocNoRun(Integer whsType, Integer staDescId, Integer sourceStaNo, String matnr, String batch, String grade, Integer moveCrnNo, LocTypeDto locTypeDto, int times) {
//        if (Cools.isEmpty(matnr)) {  //物料号
//            matnr = "";
//        }
//        if (Cools.isEmpty(batch)) {  //批次
//            batch = "";
//        }
//        if (Cools.isEmpty(grade)) {  //备用
//            grade = "";
//        }
//
//        // 初始化参数
//        int crnNo = 0;      //堆垛机号
//        int nearRow = 0;    //最浅库位排
//        int curRow = 0;     //最深库位排
//        int rowCount = 0;   //轮询轮次
//        LocMast locMast = null;     // 目标库位
//
//        StartupDto startupDto = new StartupDto();
//        RowLastno rowLastno = rowLastnoService.selectById(whsType);
//        int sRow = rowLastno.getsRow();
//        int eRow = rowLastno.geteRow();
//        int crnNumber = rowLastno.getCrnQty();
//
//        if (Cools.isEmpty(rowLastno)) {
//            throw new CoolException("数据异常，请联系管理员");
//        }
//        // ===============>>>> 开始执行
//        curRow = rowLastno.getCurrentRow();
//
//        if (!Cools.isEmpty(moveCrnNo) && moveCrnNo!=0){
//            crnNumber = moveCrnNo;
//            if (times==0){
//                curRow = moveCrnNo*4-1;
//            }else {
//                curRow = moveCrnNo*4-2;
//            }
//        }
//
//        //此程序用于优化堆垛机异常时的运行时间
//        for (int i = times; i < crnNumber*2; i++) {
//            int[] locNecessaryParameters = Utils.LocNecessaryParameters(whsType, curRow, crnNumber);
//            curRow = locNecessaryParameters[1];
//            crnNo = locNecessaryParameters[2];
//            if (basCrnpService.checkSiteError(crnNo, true)) {
//                rowCount =  locNecessaryParameters[0];
//                nearRow = locNecessaryParameters[3];
//                List<LocMast> locMasts = locMastService.selectList(new EntityWrapper<LocMast>().eq("row1", nearRow).eq("loc_sts", "O"));
//                int crnCountO = wrkMastService.selectCount(new EntityWrapper<WrkMast>().eq("crn_no", crnNo).le("io_type",100));
//                if (locMasts.size()-crnCountO<=2){
//                    times++;
//                    continue;
//                }
//                break;
//            } else {
//                times++;
//            }
//        }
//        if (nearRow == 0) {
//            throw new CoolException("无可用堆垛机");
//        }
//
//        boolean signRule1 = false;
//        boolean signRule2 = false;
//
//
//        if (Utils.BooleanWhsTypeStaIoType(rowLastno)){
//            // 靠近摆放规则 --- 同天同规格物料 //分离版
//            if (!Cools.isEmpty(matnr) &&  staDescId == 1){
//                signRule1 = true;
//            }
//            // 靠近摆放规则 --- 同天同规格物料 //互通版
//            if (!Cools.isEmpty(matnr) && staDescId == 1) {
//                signRule2 = true;
//            }
//
//            if (!Cools.isEmpty(matnr) &&  (staDescId == 11 || staDescId == 111)) {
//                signRule1 = true;
//            }
//        }
//
//        if (signRule1){
//            if (nearRow!=curRow){
//                List<LocMast> locMasts = locMastService.selectList(new EntityWrapper<LocMast>().eq("row1", nearRow).eq("loc_sts", "O").orderBy("lev1"));
//                for (LocMast locMast1:locMasts){
//                    //获取巷道
//                    List<String> groupOutsideLocCrn = Utils.getGroupOutLocCrn(curRow,nearRow,locMast1.getLocNo(), curRow<nearRow);
//                    //获取目标库位所在巷道最浅非空库位
//                    LocMast locMastF = locMastService.selectLocByLocStsPakInF(curRow,nearRow,groupOutsideLocCrn);
//                    if (!Cools.isEmpty(locMastF) && locMastF.getLocSts().equals("F")){
//                        LocDetl locDetl = locDetlService.selectOne(new EntityWrapper<LocDetl>().eq("loc_no", locMastF.getLocNo()));
////                        if (!Cools.isEmpty(locDetl) && matnr.equals(locDetl.getMatnr()) && batch.equals(Cools.isEmpty(locDetl.getBatch()) ? "" : locDetl.getBatch()) && grade.equals(Cools.isEmpty(locDetl.getBrand()) ? "" : locDetl.getBrand())) {
//                            //获取目标库位所在巷道最浅非空库位
//                            locMast = locMastService.selectLocByLocStsPakInO(curRow,nearRow,groupOutsideLocCrn);
//                            break;
////                        }
//                    }
//                }
//            }
//        }else if (signRule2){
//            List<String> locNos = locDetlService.getSameDetlToday(matnr, sRow, eRow);
//            for (String locNo : locNos) {
//                if (Utils.isShallowLoc(slaveProperties, locNo)) {
//                    continue;
//                }
//                String shallowLocNo = Utils.getShallowLoc(slaveProperties, locNo);
//                // 检测目标库位是否为空库位
//                LocMast shallowLoc = locMastService.selectById(shallowLocNo);
//                if (shallowLoc != null && shallowLoc.getLocSts().equals("O")) {
//                    if (VersionUtils.locMoveCheckLocTypeComplete(shallowLoc, locTypeDto)) {
//                        if (basCrnpService.checkSiteError(shallowLoc.getCrnNo(), true)) {
//                            locMast = shallowLoc;
//                            crnNo = locMast.getCrnNo();
//                            break;
//                        }
//                    }
//                }
//            }
//        }
//
////        // 靠近摆放规则 --- 空托  //分离版
////        if (staDescId == 10 && Utils.BooleanWhsTypeStaIoType(whsType)) {
////            List<LocMast> locMasts = locMastService.selectList(new EntityWrapper<LocMast>().eq("row1", nearRow).eq("loc_sts", "O"));
////            for (LocMast locMast1:locMasts){
////                if (VersionUtils.locMoveCheckLocTypeComplete(locMast1, locTypeDto)) {
////                    continue;
////                }
////                String shallowLoc = Utils.getDeepLoc(slaveProperties,locMast1.getLocNo());
////                LocMast locMast2 = locMastService.selectOne(new EntityWrapper<LocMast>().eq("loc_no",shallowLoc));
////                if (!Cools.isEmpty(locMast2) && locMast2.getLocSts().equals("D")){
////                    locMast = locMast1;
////                    break;
////                }
////            }
////        }
//
//        // 靠近摆放规则 --- 空托 //互通版
//        if (staDescId == 10  && Utils.BooleanWhsTypeStaIoType(rowLastno)) {
//            List<LocMast> locMasts = locMastService.selectList(new EntityWrapper<LocMast>().eq("loc_sts", "D").ge("row1", sRow).le("row1", eRow));
//            if (!locMasts.isEmpty()) {
//                for (LocMast loc : locMasts) {
//                    if (Utils.isShallowLoc(slaveProperties, loc.getLocNo())) {
//                        continue;
//                    }
//                    String shallowLocNo = Utils.getShallowLoc(slaveProperties, loc.getLocNo());
//                    // 检测目标库位是否为空库位
//                    LocMast shallowLoc = locMastService.selectById(shallowLocNo);
//                    if (shallowLoc != null && shallowLoc.getLocSts().equals("O")) {
//                        if (VersionUtils.locMoveCheckLocTypeComplete(shallowLoc, locTypeDto)) {
//                            if (basCrnpService.checkSiteError(shallowLoc.getCrnNo(), true)) {
//                                locMast = shallowLoc;
//                                crnNo = locMast.getCrnNo();
//                                break;
//                            }
//                        }
//                    }
//                }
//            }
//        }
//
//        Wrapper<StaDesc> wrapper = null;
//        StaDesc staDesc = null;
//        BasDevp staNo = null;
//
//        if (Utils.BooleanWhsTypeSta(rowLastno, staDescId)) {
//            // 获取目标站
//            wrapper = new EntityWrapper<StaDesc>()
//                    .eq("type_no", staDescId)
//                    .eq("stn_no", sourceStaNo)
//                    .eq("crn_no", crnNo);
//            staDesc = staDescService.selectOne(wrapper);
//            if (Cools.isEmpty(staDesc)) {
//                log.error("type_no={},stn_no={},crn_no={}", staDescId, sourceStaNo, crnNo);
////                throw new CoolException("入库路径不存在");
//                crnNo = 0;
//            }else {
//                staNo = basDevpService.selectById(staDesc.getCrnStn());
//                if (!staNo.getAutoing().equals("Y")) {
//                    log.error("目标站"+staDesc.getCrnStn()+"不可用");
////                throw new CoolException("目标站"+staDesc.getCrnStn()+"不可用");
//                    crnNo = 0;
//                }
//                startupDto.setStaNo(staNo.getDevNo());
//            }
//            // 更新库位排号
//            if (Cools.isEmpty(locMast)){
//                rowLastno.setCurrentRow(curRow);
//                rowLastnoService.updateById(rowLastno);
//            }
//        }
//
//        // 开始查找库位 ==============================>>
//
//        // 1.按规则查找库位
//        if (Cools.isEmpty(locMast) && crnNo != 0) {
//            List<LocMast> locMasts = locMastService.selectList(new EntityWrapper<LocMast>()
//                    .eq("row1", nearRow)
//                    .eq("loc_sts", "O")
//                    .orderBy("lev1",true).orderBy("bay1",true));
//            for (LocMast locMast1 : locMasts) {
//                if (!VersionUtils.locMoveCheckLocTypeComplete(locMast1, locTypeDto)) {
//                    continue;
//                }
//                if (Utils.BooleanWhsTypeStaIoType(rowLastno)){
//                    String shallowLoc = Utils.getDeepLoc(slaveProperties, locMast1.getLocNo());
//                    LocMast locMast2 = locMastService.selectOne(new EntityWrapper<LocMast>()
//                            .eq("loc_no", shallowLoc).eq("loc_sts", "O"));
//                    if (!Cools.isEmpty(locMast2)) {
//                        locMast = locMast2;
//                        break;
//                    }
//                } else {
//                    if (!Cools.isEmpty(locMast1)) {
//                        locMast = locMast1;
//                        break;
//                    }
//                }
//            }
//
//            if (Cools.isEmpty(locMast) && Utils.BooleanWhsTypeStaIoType(rowLastno)){
//                for (LocMast locMast1 : locMasts) {
//                    if (!VersionUtils.locMoveCheckLocTypeComplete(locMast1, locTypeDto)) {
//                        continue;
//                    }
//                    if (Utils.BooleanWhsTypeStaIoType(rowLastno)){
//                        String shallowLoc = Utils.getDeepLoc(slaveProperties, locMast1.getLocNo());
//                        LocMast locMast2 = locMastService.selectOne(new EntityWrapper<LocMast>()
//                                .eq("loc_no", shallowLoc).eq("loc_sts", "O"));
//                        if (!Cools.isEmpty(locMast2)) {
//                            locMast = locMast2;
//                            break;
//                        } else {
//                            locMast2 = locMastService.selectOne(new EntityWrapper<LocMast>()
//                                    .eq("loc_no", shallowLoc).eq("loc_sts", "F"));
//                            if (!Cools.isEmpty(locMast2)) {
//                                locMast = locMast1;
//                                break;
//                            } else {
//                                locMast2 = locMastService.selectOne(new EntityWrapper<LocMast>()
//                                        .eq("loc_no", shallowLoc).eq("loc_sts", "D"));
//                                if (!Cools.isEmpty(locMast2)) {
//                                    locMast = locMast1;
//                                    break;
//                                }
//                            }
//                        }
//                    } else {
//                        if (!Cools.isEmpty(locMast1)) {
//                            locMast = locMast1;
//                            break;
//                        }
//                    }
//                }
//            }
//        }
//
//        if (!Cools.isEmpty(locMast) && !basCrnpService.checkSiteError(crnNo, true)) {
//            locMast = null;
//        }
//
//        // 递归查询
//        if (Cools.isEmpty(locMast) || !locMast.getLocSts().equals("O")) {
//            // 当前巷道无空库位时，递归调整至下一巷道，检索全部巷道无果后，跳出递归
//            if (times < rowCount*2) {
//                times = times + 1;
//                return getLocNoRun(whsType, staDescId, sourceStaNo, matnr, batch, grade,moveCrnNo, locTypeDto, times);
//            }
////            // 2.库位当前所属尺寸无空库位时，调整尺寸参数，向上兼容检索库位
////            if (locTypeDto.getLocType1() < 2) {
////                int i = locTypeDto.getLocType1() + 1;
////                locTypeDto.setLocType1((short)i);
////                return getLocNo(1, staDescId, sourceStaNo, matnr,batch,grade, locTypeDto, 0);
////            }
//            log.error("系统没有空库位！！！ 尺寸规格： {}， 轮询次数：{}", JSON.toJSONString(locTypeDto), times);
//            throw new CoolException("没有空库位");
//        }
//        String locNo = locMast.getLocNo();
//
//        // 生成工作号
//        int workNo = getWorkNo(0);
//        // 返回dto
//        startupDto.setWorkNo(workNo);
//        startupDto.setCrnNo(crnNo);
//        startupDto.setSourceStaNo(sourceStaNo);
//        startupDto.setLocNo(locNo);
//        return startupDto;
//    }
}