package com.nbclass.activity.controller.keditor;

import java.io.File;
import java.io.IOException;
import java.text.SimpleDateFormat;
import java.util.ArrayList;
import java.util.Arrays;
import java.util.Collections;
import java.util.Comparator;
import java.util.Date;
import java.util.HashMap;
import java.util.Hashtable;
import java.util.List;
import java.util.Map;
import java.util.Random;

import javax.servlet.ServletException;
import javax.servlet.ServletOutputStream;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;

import org.apache.commons.fileupload.FileItemFactory;
import org.apache.commons.fileupload.FileUploadException;
import org.apache.commons.fileupload.disk.DiskFileItemFactory;
import org.apache.commons.fileupload.servlet.ServletFileUpload;
import org.apache.commons.lang3.StringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.web.bind.annotation.PostMapping;
import org.springframework.web.bind.annotation.RequestMapping;
import org.springframework.web.bind.annotation.RequestParam;
import org.springframework.web.bind.annotation.RestController;
import org.springframework.web.multipart.MultipartFile;

import com.fasterxml.jackson.databind.ObjectMapper;

import net.coobird.thumbnailator.Thumbnails;  

/**
 * kindeditor上传文件 - 保存到cdn
 * @author Leon
 * @datetime 2019年4月15日 下午4:50:49
 */
@RequestMapping("/console/kindeditor/cdn")
@RestController
public class KindEditorUploadToCDNController {  
  
	protected static Logger logger = LoggerFactory.getLogger(KindEditorUploadToCDNController.class);
	
	// CDN保存目录
	private static final String upload_dir = "/mnt/cdn/xgl-cases/keditor-attached/";
	
	private static final String cdn_domain = "https://cdn.szxgl.cn/";
	
	private static final long upload_max_size = 5242880; // 上传文件最大值，5M
	
    private static final ObjectMapper objectMapper = new ObjectMapper();  
    
    @PostMapping("/api/file-upload")
    public Map<String, Object> fileUpload(HttpServletRequest request,
            HttpServletResponse response,@RequestParam("imgFile")MultipartFile file) 
            throws ServletException, IOException, FileUploadException {
    	response.setContentType("text/html; charset=UTF-8");
   //     ServletContext application = request.getSession().getServletContext();  
        String savePath = upload_dir;
        
        // 文件保存目录URL  
   //     String saveUrl = request.getContextPath() + "/attached/";  
        
        // 定义允许上传的文件扩展名  
        HashMap<String, String> extMap = new HashMap<String, String>();  
        extMap.put("image", "gif,jpg,jpeg,png,bmp");
        extMap.put("flash", "swf,flv");
        extMap.put("media", "swf,flv,mp3,wav,wma,wmv,mid,avi,mpg,asf,rm,rmvb,mp4,mov");		// 上传音视频格式
        extMap.put("file", "doc,docx,xls,xlsx,ppt,htm,html,txt,zip,rar,gz,bz2");
  
        if (!ServletFileUpload.isMultipartContent(request)) {  
            return getError("请选择文件。");  
        }
        // 检查目录  
        File uploadDir = new File(savePath);  
        if (!uploadDir.isDirectory()) {
           	uploadDir.mkdirs(); 
        }
        // 检查目录写权限  
        if (!uploadDir.canWrite()) {  
            return getError("上传目录没有写权限。");  
        }  
  
        String dirName = request.getParameter("dir");  
        if (dirName == null) {  
            dirName = "image";  
        }  
        if (!extMap.containsKey(dirName)) {  
            return getError("目录名不正确。");  
        }
        // 创建文件夹  
        savePath += dirName + "/";  
        File saveDirFile = new File(savePath);  
        if (!saveDirFile.exists()) {  
            saveDirFile.mkdirs();  
        }  
        SimpleDateFormat sdf = new SimpleDateFormat("yyyyMMdd");  
        String ymd = sdf.format(new Date());  
        savePath += ymd + "/";
        File dirFile = new File(savePath);  
        if (!dirFile.exists()) {  
            dirFile.mkdirs();  
        }  
  
        FileItemFactory factory = new DiskFileItemFactory();  
        ServletFileUpload upload = new ServletFileUpload(factory);  
        upload.setHeaderEncoding("UTF-8");  
        //List items = upload.parseRequest(request);  
        //Iterator itr = items.iterator();  
       
        // FileItem item = (FileItem) itr.next();  
        String fileName = file.getOriginalFilename();
        
	    // 检查文件大小  
        if (file.getSize() > upload_max_size) {
	        return getError("上传文件大小超过限制，请上传5M内的文件。");  
	    }
	    // 检查扩展名  
	    String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();
	    if (!Arrays.<String> asList(extMap.get(dirName).split(",")).contains(fileExt)) {
	    	return getError("上传文件扩展名是不允许的扩展名。\n只允许" + extMap.get(dirName) + "格式。");  
	 	}
	    
	    SimpleDateFormat df = new SimpleDateFormat("yyyyMMddHHmmss");  
	    String newFileName = df.format(new Date()) + "_" + new Random().nextInt(1000) + "." + fileExt;  
	    try {  
	    	logger.info("savePath="+savePath+", newFileName="+newFileName);
	    //	File uploadedFile = new File(savePath, newFileName);  
	        File saveFile = new File(savePath+newFileName);  
	      	file.transferTo(saveFile);
	     	createThumbnail(savePath, newFileName); 
	    } catch (Exception e) {
	    	e.printStackTrace();
	    	return getError("上传文件失败。");  
	    }
	    String url = savePath + newFileName;
	    String host = cdn_domain;
	    url = url.replace("/mnt/cdn/", host);
	    
	    Map<String, Object> msg = new HashMap<String, Object>();  
	    msg.put("error", 0);  
	    msg.put("url", url);  
	    return msg;  
    }
	
    private Map<String, Object> getError(String message) {
        Map<String, Object> msg = new HashMap<String, Object>();
        msg.put("error", 1);
        msg.put("message", message);
        return msg;
    }
    
	/**
	 * @param savePath
	 * @param newFileName
	 */
	private void createThumbnail(String savePath, String newFileName){
		try {
			Thumbnails.of(savePath+newFileName)   
			.size(200,200)  
			.toFile(savePath+"thump"+newFileName);
		} catch (IOException e) {
			e.printStackTrace();
		}
	}  
	
    @SuppressWarnings("unchecked")
    @RequestMapping(value = "/api/file-manager")
    public void fileManager(HttpServletRequest request, HttpServletResponse response) throws ServletException, IOException {
    //	ServletContext application = request.getSession().getServletContext();  
        ServletOutputStream out = response.getOutputStream();  
        // 根目录路径，可以指定绝对路径，比如 /var/www/attached/  
        String rootPath = upload_dir;
        // 根目录URL，可以指定绝对路径，比如 http://www.yoursite.com/attached/  
        //String rootUrl = request.getContextPath() + "/attached/";  
        
        // 图片扩展名  
        String[] fileTypes = new String[] { "gif", "jpg", "jpeg", "png", "bmp" };  
  
        String dirName = request.getParameter("dir");  
        if (dirName != null) {  
            if (!Arrays.<String> asList(new String[] { "image", "flash", "media", "file" }).contains(dirName)) {  
            	out.println("Invalid Directory name.");  
            	return;  
            }  
            rootPath += dirName + "/";  
            File saveDirFile = new File(rootPath);  
            if (!saveDirFile.exists()) {  
            	saveDirFile.mkdirs();  
            }  
        }  
        // 根据path参数，设置各路径和URL  
        String path = StringUtils.trimToEmpty(request.getParameter("path"));  
        String currentPath = rootPath + path;
        String currentDirPath = path;  
        String moveupDirPath = "";  
        if (StringUtils.isNotBlank(path)) {  
            String str = currentDirPath.substring(0, currentDirPath.length() - 1);  
            moveupDirPath = str.lastIndexOf("/") >= 0 ? str.substring(0, str.lastIndexOf("/") + 1) : "";  
        }
  
        // 排序形式，name or size or type  
        String order = request.getParameter("order") != null ? request.getParameter("order").toLowerCase() : "name";  
  
        // 不允许使用..移动到上一级目录  
        if (path.indexOf("..") >= 0) {  
            out.println("Access is not allowed.");  
            return;  
        }  
        // 最后一个字符不是/  
        if (!"".equals(path) && !path.endsWith("/")) {  
            out.println("Parameter is not valid.");  
            return;  
        }  
        // 目录不存在或不是目录  
        File currentPathFile = new File(currentPath);  
        if (!currentPathFile.isDirectory()) {  
            out.println("Directory does not exist.");  
            return;  
        }  
        // 遍历目录取的文件信息  
        List<Hashtable<String, Object>> fileList = new ArrayList<Hashtable<String, Object>>();  
        if (currentPathFile.listFiles() != null) {  
            for (File file : currentPathFile.listFiles()) {  
                Hashtable<String, Object> hash = new Hashtable<String, Object>();  
                String fileName = file.getName();  
                if (file.isDirectory()) {
                    hash.put("is_dir", true);  
                    hash.put("has_file", (file.listFiles() != null));  
                    hash.put("filesize", 0L);  
                    hash.put("is_photo", false);  
                    hash.put("filetype", "");  
                } else if (file.isFile()) {  
                    String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();  
                    hash.put("is_dir", false);  
                    hash.put("has_file", false);  
                    hash.put("filesize", file.length());  
                    hash.put("is_photo", Arrays.<String> asList(fileTypes).contains(fileExt));  
                    hash.put("filetype", fileExt);  
                }
                hash.put("filename", fileName);  
                hash.put("datetime", new SimpleDateFormat("yyyy-MM-dd HH:mm:ss").format(file.lastModified()));  
                fileList.add(hash);  
            }
        }
  
        if ("size".equals(order)) {  
            Collections.sort(fileList, new SizeComparator());  
        } else if ("type".equals(order)) {  
            Collections.sort(fileList, new TypeComparator());  
        } else {  
            Collections.sort(fileList, new NameComparator());  
        }
        
        String currentUrl = currentPath;
	    String host = cdn_domain;
	    currentUrl = currentUrl.replace("/mnt/cdn/", host);
        
        Map<String, Object> msg = new HashMap<String, Object>();  
        msg.put("moveup_dir_path", moveupDirPath);  
        msg.put("current_dir_path", currentDirPath);  
        msg.put("current_url", currentUrl);  
        msg.put("total_count", fileList.size());  
        msg.put("file_list", fileList);  
        response.setContentType("application/json; charset=UTF-8");  
        String msgStr = objectMapper.writeValueAsString(msg);  
        out.println(msgStr);
    }
    
    @SuppressWarnings("rawtypes")
	class NameComparator implements Comparator {  
        public int compare(Object a, Object b) {  
            Hashtable hashA = (Hashtable) a;  
            Hashtable hashB = (Hashtable) b;  
            if (((Boolean) hashA.get("is_dir"))  
                    && !((Boolean) hashB.get("is_dir"))) {  
                return -1;  
            } else if (!((Boolean) hashA.get("is_dir"))  
                    && ((Boolean) hashB.get("is_dir"))) {  
                return 1;  
            } else {  
                return ((String) hashA.get("filename"))  
                        .compareTo((String) hashB.get("filename"));  
            }  
        }  
    }  
    
    @SuppressWarnings("rawtypes")
	class SizeComparator implements Comparator {  
        public int compare(Object a, Object b) {  
            Hashtable hashA = (Hashtable) a;  
            Hashtable hashB = (Hashtable) b;  
            if (((Boolean) hashA.get("is_dir"))  
                    && !((Boolean) hashB.get("is_dir"))) {  
                return -1;  
            } else if (!((Boolean) hashA.get("is_dir"))  
                    && ((Boolean) hashB.get("is_dir"))) {  
                return 1;  
            } else {  
                if (((Long) hashA.get("filesize")) > ((Long) hashB  
                        .get("filesize"))) {  
                    return 1;  
                } else if (((Long) hashA.get("filesize")) < ((Long) hashB  
                        .get("filesize"))) {  
                    return -1;  
                } else {  
                    return 0;  
                }  
            }  
        }  
    }  
    
    @SuppressWarnings("rawtypes")
	class TypeComparator implements Comparator {
        public int compare(Object a, Object b) {
            Hashtable hashA = (Hashtable) a;  
            Hashtable hashB = (Hashtable) b;  
            if (((Boolean) hashA.get("is_dir"))  
                    && !((Boolean) hashB.get("is_dir"))) {  
                return -1;  
            } else if (!((Boolean) hashA.get("is_dir"))  
                    && ((Boolean) hashB.get("is_dir"))) {  
                return 1;  
            } else {  
                return ((String) hashA.get("filetype"))  
                        .compareTo((String) hashB.get("filetype"));  
            }  
        }  
    }

}  
