package com.ebts.system.service.impl;

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

import com.ebts.common.constant.ReturnConstants;
import com.ebts.common.exception.EbtsException;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import com.ebts.common.annotation.DataScope;
import com.ebts.common.constant.UserConstants;
import com.ebts.common.core.entity.TreeSelect;
import com.ebts.common.core.entity.entity.Dept;
import com.ebts.common.core.entity.entity.Role;
import com.ebts.common.exception.CustomException;
import com.ebts.common.utils.StringUtils;
import com.ebts.system.dao.DeptDao;
import com.ebts.system.dao.RoleDao;
import com.ebts.system.service.DeptService;

/**
 * 部门管理 服务实现
 *
 * @author binlin
 */
@Service
public class DeptServiceImpl implements DeptService {
    private Logger logger = LoggerFactory.getLogger(DeptServiceImpl.class);

    @Autowired
    private DeptDao sysDeptDao;

    @Autowired
    private RoleDao roleDao;

    /**
     * 查询部门管理数据
     *
     * @param dept 部门信息
     * @return 部门信息集合
     */
    @Override
    @DataScope(deptAlias = "d")
    public List<Dept> selectDeptList(Dept dept) {
        try {
            return sysDeptDao.selectDeptList(dept);
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 构建前端所需要树结构
     *
     * @param depts 部门列表
     * @return 树结构列表
     */
    @Override
    public List<Dept> buildDeptTree(List<Dept> depts) {
        try {
            List<Dept> returnList = new ArrayList<Dept>();
            List<Long> tempList = new ArrayList<Long>();
            for (Dept dept : depts) {
                tempList.add(dept.getDeptId());
            }
            for (Iterator<Dept> iterator = depts.iterator(); iterator.hasNext(); ) {
                Dept dept = (Dept) iterator.next();
                // 如果是顶级节点, 遍历该父节点的所有子节点
                if (!tempList.contains(dept.getParentId())) {
                    recursionFn(depts, dept);
                    returnList.add(dept);
                }
            }
            if (returnList.isEmpty()) {
                returnList = depts;
            }
            return returnList;
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 构建前端所需要下拉树结构
     *
     * @param depts 部门列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildDeptTreeSelect(List<Dept> depts) {
        try {
            List<Dept> deptTrees = buildDeptTree(depts);
            return deptTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 根据角色ID查询部门树信息
     *
     * @param roleId 角色ID
     * @return 选中部门列表
     */
    @Override
    public List<Integer> selectDeptListByRoleId(Long roleId) {
        try {
            Role role = roleDao.selectRoleById(roleId);
            return sysDeptDao.selectDeptListByRoleId(roleId, role.isDeptCheckStrictly());
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 根据部门ID查询信息
     *
     * @param deptId 部门ID
     * @return 部门信息
     */
    @Override
    public Dept selectDeptById(Long deptId) {
        try {
            return sysDeptDao.selectDeptById(deptId);
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 根据ID查询所有子部门（正常状态）
     *
     * @param deptId 部门ID
     * @return 子部门数
     */
    @Override
    public int selectNormalChildrenDeptById(Long deptId) {
        try {
            return sysDeptDao.selectNormalChildrenDeptById(deptId);
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 是否存在子节点
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public boolean hasChildByDeptId(Long deptId) {
        try {
            int result = sysDeptDao.hasChildByDeptId(deptId);
            return result > 0 ? true : false;
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 查询部门是否存在用户
     *
     * @param deptId 部门ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkDeptExistUser(Long deptId) {
        try {
            int result = sysDeptDao.checkDeptExistUser(deptId);
            return result > 0 ? true : false;
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 校验部门名称是否唯一
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public String checkDeptNameUnique(Dept dept) {
        try {
            Long deptId = StringUtils.isNull(dept.getDeptId()) ? -1L : dept.getDeptId();
            Dept info = sysDeptDao.checkDeptNameUnique(dept.getDeptName(), dept.getParentId());
            if (StringUtils.isNotNull(info) && info.getDeptId().longValue() != deptId.longValue()) {
                return UserConstants.NOT_UNIQUE;
            }
            return UserConstants.UNIQUE;
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 新增保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int insertDept(Dept dept) {
        try {
            Dept info = sysDeptDao.selectDeptById(dept.getParentId());
            // 如果父节点不为正常状态,则不允许新增子节点
            if (!UserConstants.DEPT_NORMAL.equals(info.getStatus())) {
                throw new CustomException("部门停用，不允许新增");
            }
            dept.setAncestors(info.getAncestors() + "," + dept.getParentId());
            return sysDeptDao.insertDept(dept);
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 修改保存部门信息
     *
     * @param dept 部门信息
     * @return 结果
     */
    @Override
    public int updateDept(Dept dept) {
        try {
            Dept newParentDept = sysDeptDao.selectDeptById(dept.getParentId());
            Dept oldDept = sysDeptDao.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 = sysDeptDao.updateDept(dept);
            if (UserConstants.DEPT_NORMAL.equals(dept.getStatus())) {
                // 如果该部门是启用状态，则启用该部门的所有上级部门
                updateParentDeptStatus(dept);
            }
            return result;
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 修改该部门的父级部门状态
     *
     * @param dept 当前部门
     */
    private void updateParentDeptStatus(Dept dept) {
        try {
            Long updateBy = dept.getUpdateBy();
            dept = sysDeptDao.selectDeptById(dept.getDeptId());
            dept.setUpdateBy(updateBy);
            sysDeptDao.updateDeptStatus(dept);
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 修改子元素关系
     *
     * @param deptId       被修改的部门ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateDeptChildren(Long deptId, String newAncestors, String oldAncestors) {
        try {
            List<Dept> children = sysDeptDao.selectChildrenDeptById(deptId);
            for (Dept child : children) {
                child.setAncestors(child.getAncestors().replace(oldAncestors, newAncestors));
            }
            if (children.size() > 0) {
                sysDeptDao.updateDeptChildren(children);
            }
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

    /**
     * 删除部门管理信息
     *
     * @param deptId 部门ID
     * @return 结果
     */
    @Override
    public int deleteDeptById(Long deptId) {
        try {
            return sysDeptDao.deleteDeptById(deptId);
        }catch (RuntimeException e){
            logger.error(e.getMessage());
            throw new EbtsException(ReturnConstants.OP_ERROR,e);
        }
    }

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

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

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