package com.ruoyi.system.service.impl;

import java.math.BigDecimal;
import java.util.ArrayList;
import java.util.Iterator;
import java.util.List;
import java.util.stream.Collectors;

import com.ruoyi.common.core.utils.DateUtils;
import com.ruoyi.logistics.constant.JDDictConstants;
import com.ruoyi.logistics.domain.SysDeptRate;
import com.ruoyi.logistics.service.ISysDeptRateService;
import lombok.extern.slf4j.Slf4j;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import com.ruoyi.common.core.constant.UserConstants;
import com.ruoyi.common.core.exception.ServiceException;
import com.ruoyi.common.core.text.Convert;
import com.ruoyi.common.core.utils.SpringUtils;
import com.ruoyi.common.core.utils.StringUtils;
import com.ruoyi.common.datascope.annotation.DataScope;
import com.ruoyi.common.security.utils.SecurityUtils;
import com.ruoyi.system.api.domain.SysDept;
import com.ruoyi.system.api.domain.SysRole;
import com.ruoyi.system.api.domain.SysUser;
import com.ruoyi.system.domain.dto.DeptImportDTO;
import com.ruoyi.system.domain.vo.TreeSelect;
import com.ruoyi.system.mapper.SysDeptMapper;
import com.ruoyi.system.mapper.SysRoleMapper;
import com.ruoyi.system.service.ISysDeptService;

/**
 * 部门管理 服务实现
 * 
 * @author lydgt
 */
@Slf4j
@Service
public class SysDeptServiceImpl implements ISysDeptService
{
    @Autowired
    private SysDeptMapper deptMapper;

    @Autowired
    private SysRoleMapper roleMapper;

    @Autowired
    private ISysDeptRateService deptRateService;

    /**
     * 查询部门管理数据
     * 
     * @param dept 部门信息
     * @return 部门信息集合
     */
    @Override
    @DataScope(deptAlias = "d")
    public List<SysDept> selectDeptList(SysDept dept)
    {
        return deptMapper.selectDeptList(dept);
    }

    /**
     * 查询部门树结构信息
     * 
     * @param dept 部门信息
     * @return 部门树信息集合
     */
    @Override
    public List<TreeSelect> selectDeptTreeList(SysDept dept)
    {
        List<SysDept> depts = SpringUtils.getAopProxy(this).selectDeptList(dept);
        return buildDeptTreeSelect(depts);
    }

    /**
     * 构建前端所需要树结构
     * 
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<SysDept> buildDeptTree(List<SysDept> depts)
    {
        List<SysDept> returnList = new ArrayList<SysDept>();
        List<Long> tempList = depts.stream().map(SysDept::getDeptId).collect(Collectors.toList());
        for (SysDept dept : depts)
        {
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(dept.getParentId()))
            {
                recursionFn(depts, dept);
                returnList.add(dept);
            }
        }
        if (returnList.isEmpty())
        {
            returnList = depts;
        }
        return returnList;
    }

    /**
     * 构建前端所需要下拉树结构
     * 
     * @param depts 部门列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<SysDept> depts)
    {
        List<SysDept> deptTrees = buildDeptTree(depts);
        return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 根据角色ID查询部门树信息
     * 
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Long> selectDeptListByRoleId(Long roleId)
    {
        SysRole role = roleMapper.selectRoleById(roleId);
        return deptMapper.selectDeptListByRoleId(roleId, role.isDeptCheckStrictly());
    }

    /**
     * 根据部门ID查询信息
     * 
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public SysDept selectDeptById(Long deptId)
    {
        return deptMapper.selectDeptById(deptId);
    }

    /**
     * 根据ID查询所有子部门（正常状态）
     * 
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public int selectNormalChildrenDeptById(Long deptId)
    {
        return deptMapper.selectNormalChildrenDeptById(deptId);
    }

    /**
     * 是否存在子节点
     * 
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Long deptId)
    {
        int result = deptMapper.hasChildByDeptId(deptId);
        return result > 0;
    }

    /**
     * 查询部门是否存在用户
     * 
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Long deptId)
    {
        int result = deptMapper.checkDeptExistUser(deptId);
        return result > 0;
    }

    /**
     * 校验部门名称是否唯一
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public boolean checkDeptNameUnique(SysDept dept)
    {
        Long deptId = StringUtils.isNull(dept.getDeptId()) ? -1L : dept.getDeptId();
        SysDept info = deptMapper.checkDeptNameUnique(dept.getDeptName(), dept.getParentId());
        if (StringUtils.isNotNull(info) && info.getDeptId().longValue() != deptId.longValue())
        {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验部门是否有数据权限
     * 
     * @param deptId 部门id
     */
    @Override
    public void checkDeptDataScope(Long deptId)
    {
        if (!SysUser.isAdmin(SecurityUtils.getUserId()) && StringUtils.isNotNull(deptId))
        {
            SysDept dept = new SysDept();
            dept.setDeptId(deptId);
            List<SysDept> depts = SpringUtils.getAopProxy(this).selectDeptList(dept);
            if (StringUtils.isEmpty(depts))
            {
                throw new ServiceException("没有权限访问部门数据！");
            }
        }
    }

    /**
     * 新增保存部门信息
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int insertDept(SysDept dept)
    {
        SysDept info = deptMapper.selectDeptById(dept.getParentId());
        // 如果父节点不为正常状态,则不允许新增子节点
        if (!UserConstants.DEPT_NORMAL.equals(info.getStatus()))
        {
            throw new ServiceException("部门停用，不允许新增");
        }
        dept.setAncestors(info.getAncestors() + "," + dept.getParentId());
        return deptMapper.insertDept(dept);
    }

    /**
     * 修改保存部门信息
     * 
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int updateDept(SysDept dept)
    {
        SysDept newParentDept = deptMapper.selectDeptById(dept.getParentId());
        SysDept oldDept = deptMapper.selectDeptById(dept.getDeptId());
        if (StringUtils.isNotNull(newParentDept) && StringUtils.isNotNull(oldDept))
        {
            String newAncestors = newParentDept.getAncestors() + "," + newParentDept.getDeptId();
            String oldAncestors = oldDept.getAncestors();
            dept.setAncestors(newAncestors);
            updateDeptChildren(dept.getDeptId(), newAncestors, oldAncestors);
        }
        int result = deptMapper.updateDept(dept);
        if (UserConstants.DEPT_NORMAL.equals(dept.getStatus()) && StringUtils.isNotEmpty(dept.getAncestors())
                && !StringUtils.equals("0", dept.getAncestors()))
        {
            // 如果该部门是启用状态，则启用该部门的所有上级部门
            updateParentDeptStatusNormal(dept);
        }
        return result;
    }

    /**
     * 修改该部门的父级部门状态
     * 
     * @param dept 当前部门
     */
    private void updateParentDeptStatusNormal(SysDept dept)
    {
        String ancestors = dept.getAncestors();
        Long[] deptIds = Convert.toLongArray(ancestors);
        deptMapper.updateDeptStatusNormal(deptIds);
    }

    /**
     * 修改子元素关系
     * 
     * @param deptId 被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors)
    {
        List<SysDept> children = deptMapper.selectChildrenDeptById(deptId);
        for (SysDept child : children)
        {
            child.setAncestors(child.getAncestors().replaceFirst(oldAncestors, newAncestors));
        }
        if (children.size() > 0)
        {
            deptMapper.updateDeptChildren(children);
        }
    }

    /**
     * 删除部门管理信息
     * 
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptById(Long deptId)
    {
        return deptMapper.deleteDeptById(deptId);
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<SysDept> list, SysDept t)
    {
        // 得到子节点列表
        List<SysDept> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysDept tChild : childList)
        {
            if (hasChild(list, tChild))
            {
                recursionFn(list, tChild);
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysDept> getChildList(List<SysDept> list, SysDept t)
    {
        List<SysDept> tlist = new ArrayList<SysDept>();
        Iterator<SysDept> it = list.iterator();
        while (it.hasNext())
        {
            SysDept n = (SysDept) it.next();
            if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getDeptId().longValue())
            {
                tlist.add(n);
            }
        }
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysDept> list, SysDept t)
    {
        return getChildList(list, t).size() > 0 ? true : false;
    }

    /**
     * 导入部门数据
     * 
     * @param deptList 部门数据列表
     * @return 导入结果
     */
    @Override
    public String importDept(List<DeptImportDTO> deptList) {
        if (StringUtils.isNull(deptList) || deptList.size() == 0) {
            throw new ServiceException("导入部门数据不能为空！");
        }

        int successNum = 0;
        int failureNum = 0;
        StringBuilder successMsg = new StringBuilder();
        StringBuilder failureMsg = new StringBuilder();
        int rowNum = 2;
        for (DeptImportDTO importDTO : deptList) {
            try {
                // 将导入对象转换为 SysDept 实体对象
                SysDept dept = convertToSysDept(importDTO);

                // 根据父组织编码和名称查询父部门 ID
                SysDept parentId = null;
                if (StringUtils.isNotBlank(importDTO.getParentDeptCode()) && StringUtils.isNotBlank(importDTO.getParentDeptName())) {
                    parentId = deptMapper.selectDeptByInfo(importDTO.getParentDeptCode(), importDTO.getParentDeptName());
                }

                if(StringUtils.isBlank(dept.getDeptName())){
                    failureNum++;
                    failureMsg.append(String.format("第%d行：部门名称不能为空；", rowNum));
                    rowNum++;
                    continue;
                }

                // 设置父部门 ID，如果为 null 则默认为顶级部门（0）
                dept.setParentId(parentId == null ? 0L : parentId.getDeptId());

                /*if (null != deptMapper.checkDeptCodeUnique(dept.getDeptCode())) {
                    failureNum++;
                    failureMsg.append(String.format("%1$s、部门已存在；", dept.getDeptCode()));
                } else */
                if (null != deptMapper.checkDeptNameUnique(dept.getDeptName(), dept.getParentId())) {
                    failureNum++;
                    failureMsg.append(String.format("第%d行：%s 部门已存在；", rowNum, dept.getDeptName()));                } else {
                    // 新增部门
                    this.insertDept(dept);
                    
                    // 处理费率配置
                    try {
                        List<SysDeptRate> rateList = new ArrayList<>();
                        
                        // 解析京东费率配置
                        if (StringUtils.isNotBlank(importDTO.getJdRateConfig())) {
                            List<SysDeptRate> jdRates = parseRateConfig(importDTO.getJdRateConfig(), "1", rowNum);
                            rateList.addAll(jdRates);
                        }
                        
                        // 解析顺丰费率配置
                        if (StringUtils.isNotBlank(importDTO.getSfRateConfig())) {
                            List<SysDeptRate> sfRates = parseRateConfig(importDTO.getSfRateConfig(), "2", rowNum);
                            rateList.addAll(sfRates);
                        }
                        
                        // 如果有费率配置，进行校验并保存
                        if (!rateList.isEmpty()) {
                            deptRateService.insertSysDeptRate(rateList, dept.getDeptId());
                        }
                    } catch (Exception rateEx) {
                        // 费率配置失败，回滚部门创建
                        this.deleteDeptById(dept.getDeptId());
                        throw rateEx;
                    }
                    
                    successNum++;
                    successMsg.append(String.format("%1$s、导入成功；", dept.getDeptName()));
                }
            } catch (Exception e) {
                log.info("导入部门数据异常", e);
                failureNum++;
                String msg = String.format("%1$s、导入失败：%2$s", importDTO.getDeptName(), e.getMessage());
                failureMsg.append(msg);
            }
            rowNum++;
        }

        if (failureNum > 0) {
            failureMsg.insert(0, "很抱歉，导入失败！共 " + failureNum + " 条数据，格式如下：");
            successMsg.insert(0, "恭喜您，导入成功！共 " + successNum + " 条数据，格式如下：");
            return failureMsg.toString();
        } else {
            successMsg.insert(0, "恭喜您，全部导入成功！共 " + successNum + " 条数据，格式如下：");
            return successMsg.toString();
        }
    }

    /**
     * 将 DeptImportDTO 转换为 SysDept 实体
     * 
     * @param importDTO 导入对象
     * @return SysDept 实体
     */
    private SysDept convertToSysDept(DeptImportDTO importDTO) {
        SysDept dept = new SysDept();
        dept.setDeptName(importDTO.getDeptName());
        dept.setDeptCode(importDTO.getDeptCode());
        dept.setLeader(importDTO.getLeader());
        dept.setPhone(importDTO.getPhone());
        dept.setInvoiceName(importDTO.getInvoiceName());
        dept.setInvoiceNum(importDTO.getInvoiceNum());
        dept.setCompanyAddress(importDTO.getCompanyAddress());
        dept.setOpenBank(importDTO.getOpenBank());
        dept.setBankAccount(importDTO.getBankAccount());
        dept.setCreateBy(SecurityUtils.getUsername());
        dept.setCreateTime(DateUtils.getNowDate());
        return dept;
    }

    /**
     * 解析费率配置字符串
     * 格式：快递产品,费率区间开始-费率区间结束,折扣;快递产品,费率区间开始-费率区间结束,折扣
     * 示例：京东标快,0-100,9.1;京东标快,100-200,9.0
     *
     * @param rateConfig 费率配置字符串
     * @param companyType 公司类型（1-京东，2-顺丰）
     * @param rowNum 行号
     * @return SysDeptRate 对象列表
     */
    private List<SysDeptRate> parseRateConfig(String rateConfig, String companyType, int rowNum) {
        List<SysDeptRate> rateList = new ArrayList<>();
        
        // 按分号分割多个配置项
        String[] configItems = rateConfig.split(";");
        
        for (String item : configItems) {
            if (StringUtils.isBlank(item)) {
                continue;
            }
            
            // 按逗号分割：快递产品,费率区间开始-费率区间结束,折扣
            String[] parts = item.split(",");
            if (parts.length != 3) {
                throw new ServiceException(String.format("第%d行：费率配置格式错误，正确格式为：快递产品,费率区间开始-费率区间结束,折扣", rowNum));
            }
            
            String productName = parts[0].trim();
            String intervalStr = parts[1].trim();
            String rateStr = parts[2].trim();
            
            // 解析产品类型
            String productType = parseProductType(productName, companyType, rowNum);
            
            // 解析区间
            String[] intervals = intervalStr.split("-");
            if (intervals.length != 2) {
                throw new ServiceException(String.format("第%d行：费率区间格式错误，正确格式为：开始-结束", rowNum));
            }
            
            Long intervalBegins;
            Long intervalEnds;
            try {
                intervalBegins = Long.parseLong(intervals[0].trim());
                intervalEnds = Long.parseLong(intervals[1].trim());
            } catch (NumberFormatException e) {
                throw new ServiceException(String.format("第%d行：费率区间必须为数字", rowNum));
            }
            
            // 解析折扣
            BigDecimal rate;
            try {
                rate = new BigDecimal(rateStr);
            } catch (NumberFormatException e) {
                throw new ServiceException(String.format("第%d行：折扣必须为数字", rowNum));
            }
            
            // 创建 SysDeptRate 对象
            SysDeptRate deptRate = new SysDeptRate();
            deptRate.setCompanyType(companyType);
            deptRate.setProductType(productType);
            deptRate.setIntervalBegins(intervalBegins);
            deptRate.setIntervalEnds(intervalEnds);
            deptRate.setRate(rate);
            
            rateList.add(deptRate);
        }
        
        return rateList;
    }

    /**
     * 解析产品类型名称为编码
     *
     * @param productName 产品名称
     * @param companyType 公司类型（1-京东，2-顺丰）
     * @param rowNum 行号
     * @return 产品类型编码
     */
    private String parseProductType(String productName, String companyType, int rowNum) {
        if ("1".equals(companyType)) {
            // 京东产品类型
            if ("京东标快".equals(productName)) {
                return JDDictConstants.PRODUCT_CODE_ED_M_0001;
            } else if ("京东特快".equals(productName)) {
                return JDDictConstants.PRODUCT_CODE_ED_M_0002;
            } else if ("特快重货".equals(productName)) {
                return JDDictConstants.PRODUCT_CODE_FR_M_0004;
            } else {
                throw new ServiceException(String.format("第%d行：未知的京东产品类型：%s", rowNum, productName));
            }
        } else if ("2".equals(companyType)) {
            // 顺丰产品类型
            if ("顺丰特快".equals(productName)) {
                return JDDictConstants.PRODUCT_CODE_SF_01;
            } else if ("顺丰标快".equals(productName)) {
                return JDDictConstants.PRODUCT_CODE_SF_02;
            } else {
                throw new ServiceException(String.format("第%d行：未知的顺丰产品类型：%s", rowNum, productName));
            }
        } else {
            throw new ServiceException(String.format("第%d行：未知的公司类型：%s", rowNum, companyType));
        }
    }
}
