// Copyright (C) 2003-2009 by Object Mentor, Inc. All rights reserved.
// Released under the terms of the CPL Common Public License version 1.0.
package fitnesse.responders.files;

import java.io.BufferedInputStream;
import java.io.BufferedOutputStream;
import java.io.File;
import java.io.FileInputStream;
import java.io.FileOutputStream;
import java.io.IOException;
import java.io.InputStream;
import java.io.OutputStream;
import java.util.regex.Matcher;
import java.util.regex.Pattern;

import util.FileUtil;
import fitnesse.FitNesseContext;
import fitnesse.authentication.AlwaysSecureOperation;
import fitnesse.authentication.SecureOperation;
import fitnesse.authentication.SecureResponder;
import fitnesse.http.Request;
import fitnesse.http.Response;
import fitnesse.http.SimpleResponse;
import fitnesse.http.UploadedFile;
import fitnesse.responders.ErrorResponder;

public class UploadResponder implements SecureResponder {
  private static final Pattern filenamePattern = Pattern.compile("([^/\\\\]*[/\\\\])*([^/\\\\]*)");

  private String rootPath;

  public Response makeResponse(FitNesseContext context, Request request) throws IOException {
    rootPath = context.rootPagePath;
    SimpleResponse response = new SimpleResponse();
    String resource = request.getResource().replace("%20", " ");
    UploadedFile uploadedFile = (UploadedFile) request.getInput("file");
    if (uploadedFile.isUsable()) {
      File file = makeFileToCreate(uploadedFile, resource);
      writeFile(file, uploadedFile);
    }

    response.redirect("/" + resource.replace(" ", "%20"));
    return response;
  }

  public void writeFile(File file, UploadedFile uploadedFile) throws IOException {
    boolean renamed = uploadedFile.getFile().renameTo(file);
    if (!renamed) {
      InputStream input = null;
      OutputStream output = null;
      try {
        input = new BufferedInputStream(new FileInputStream(uploadedFile.getFile()));
        output = new BufferedOutputStream(new FileOutputStream(file));
        FileUtil.copyBytes(input, output);
      } finally {
        input.close();
        output.close();
        uploadedFile.delete();
      }
    }
  }

  private File makeFileToCreate(UploadedFile uploadedFile, String resource) {
    String relativeFilename = makeRelativeFilename(uploadedFile.getName());
    String filename = relativeFilename;
    int prefix = 1;
    File file = new File(makeFullFilename(resource, filename));
    while (file.exists()) {
      filename = makeNewFilename(relativeFilename, prefix++);
      file = new File(makeFullFilename(resource, filename));
    }
    return file;
  }

  private String makeFullFilename(String resource, String filename) {
    return rootPath + "/" + resource + filename;
  }

  public static String makeRelativeFilename(String name) {
    Matcher match = filenamePattern.matcher(name);
    if (match.find())
      return match.group(2);
    else
      return name;
  }

  public static String makeNewFilename(String filename, int copyId) {
    String[] parts = filename.split("\\.");

    if (parts.length == 1)
      return filename + "_copy" + copyId;
    else {
      String newName = "";
      for (int i = 0; i < parts.length - 1; i++) {
        if (i != 0)
          newName += ".";
        newName += parts[i];
      }
      newName += "_copy" + copyId + "." + parts[parts.length - 1];
      return newName;
    }
  }

  public SecureOperation getSecureOperation() {
    return new AlwaysSecureOperation();
  }
}