/*

 * Copyright (c) 2009, 2011, Oracle and/or its affiliates. All rights reserved.

 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.

 *

 * This code is free software; you can redistribute it and/or modify it

 * under the terms of the GNU General Public License version 2 only, as

 *

 * This code is distributed in the hope that it will be useful, but WITHOUT

 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or

 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License

 * version 2 for more details (a copy is included in the LICENSE file that

 * accompanied this code).

 *

 * You should have received a copy of the GNU General Public License version

 * 2 along with this work; if not, write to the Free Software Foundation,

 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.

 *

 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA

 * or visit www.oracle.com if you need additional information or have any

 * questions.

 */

import java.io.*;

import java.nio.*;

import java.nio.file.*;

import java.nio.file.attribute.*;

import java.nio.file.spi.*;

import java.util.*;

import java.util.zip.*;

import static java.nio.file.StandardCopyOption.*;

public class LargeZip {

     // If true, don't delete large ZIP file created for test.

     static final boolean debug = System.getProperty("debug") != null;

     //static final int DATA_LEN = 1024 * 1024;

     static final int DATA_LEN = 80 * 1024;

     static final int DATA_SIZE = 8;

     static long fileSize = 6L * 1024L * 1024L * 1024L; // 6GB

     static boolean userFile = false;

     static byte[] data;

     static File largeFile;

     static String lastEntryName;

     /* args can be empty, in which case check a 3 GB file which is created for

      * this test (and then deleted).  Or it can be a number, in which case

      * that designates the size of the file that's created for this test (and

      * then deleted).  Or it can be the name of a file to use for the test, in

      * which case it is *not* deleted.  Note that in this last case, the data

      * comparison might fail.

      */

     static void realMain (String[] args) throws Throwable {

         if (args.length > 0) {

             try {

                 fileSize = Long.parseLong(args[0]);

                 System.out.println("Testing with file of size " + fileSize);

             } catch (NumberFormatException ex) {

                 largeFile = new File(args[0]);

                 if (!largeFile.exists()) {

                     throw new Exception("Specified file " + args[0] + " does not exist");

                 }

                 userFile = true;

                 System.out.println("Testing with user-provided file " + largeFile);

             }

         }

         File testDir = null;

         if (largeFile == null) {

             testDir = new File(System.getProperty("test.scratch", "."),

                                     "LargeZip");

             if (testDir.exists()) {

                 if (!testDir.delete()) {

                     throw new Exception("Cannot delete already-existing test directory");

                 }

             }

             check(!testDir.exists() && testDir.mkdirs());

             largeFile = new File(testDir, "largezip.zip");

             createLargeZip();

         } else {

             if (args.length > 1)

                 updateLargeZip(args[1]); // add new entry with zfs

         }

         readLargeZip1();

         readLargeZip2();

         if (!userFile && !debug) {

             check(largeFile.delete());

             check(testDir.delete());

         }

     }

     static void createLargeZip() throws Throwable {

         int iterations = DATA_LEN / DATA_SIZE;

         ByteBuffer bb = ByteBuffer.allocate(DATA_SIZE);

         ByteArrayOutputStream baos = new ByteArrayOutputStream();

         for (int i = 0; i < iterations; i++) {

             bb.putDouble(0, Math.random());

             baos.write(bb.array(), 0, DATA_SIZE);

         }

         data = baos.toByteArray();

         try (FileOutputStream fos = new FileOutputStream(largeFile);

              BufferedOutputStream bos = new BufferedOutputStream(fos);

              ZipOutputStream zos = new ZipOutputStream(bos))

         {

             long length = 0;

             while (length < fileSize) {

                 ZipEntry ze = new ZipEntry("entry-" + length);

                 lastEntryName = ze.getName();

                 zos.putNextEntry(ze);

                 zos.write(data, 0, data.length);

                 zos.closeEntry();

                 length = largeFile.length();

             }

             System.out.println("Last entry written is " + lastEntryName);

         }

     }

     private static byte buf[] = new byte[4096];

     static void checkEntry(ZipEntry e, InputStream is) throws Throwable {

         long N = 0;

         int n = 0;

         while ((n = is.read(buf)) >= 0) {

            N += n;

         }

         check(N == e.getSize());

     }

     static void readLargeZip1() throws Throwable {

          ZipFile zipFile = new ZipFile(largeFile);

          ZipEntry entry = null;

          String entryName = null;

          int count = 0;

          System.out.println("ZipFile:");

          Enumeration<? extends ZipEntry> entries = zipFile.entries();

          while (entries.hasMoreElements()) {

               entry = entries.nextElement();

               entryName = entry.getName();

               System.out.println("    checking " + entryName);

               if (!entry.isDirectory()) {

                    try (InputStream zeis = zipFile.getInputStream(entry)) {

                        checkEntry(entry, zeis);

                    }

               }

               count++;

          }

          System.out.println("Number of entries read: " + count);

          check(!entry.isDirectory());

          if (userFile || check(entryName.equals(lastEntryName))) {

               ByteArrayOutputStream baos = new ByteArrayOutputStream();

               InputStream is = zipFile.getInputStream(entry);

               int len;

               while ((len = is.read(buf)) >= 0) {

                    baos.write(buf, 0, len);

               }

               baos.close();

               is.close();

               if (!userFile)

                   check(Arrays.equals(data, baos.toByteArray()));

          }

     }

     static void readLargeZip2() throws Throwable {

         System.out.println("ZipInputStream:");

         try (FileInputStream fis = new FileInputStream(largeFile);

              BufferedInputStream bis = new BufferedInputStream(fis);

              ZipInputStream zis = new ZipInputStream(bis))

         {

             ZipEntry entry = null;

             String entryName = null;

             int count = 0;

             while ((entry = zis.getNextEntry()) != null) {

                  entryName = entry.getName();

                  System.out.println("    checking " + entryName +

                                     ", method=" + entry.getMethod());

                  if (entryName.equals(lastEntryName)) {

                       break;

                  }

                  if (!entry.isDirectory()) {

                       checkEntry(entry, zis);

                  }

                  count++;

             }

             System.out.println("Number of entries read: " + count);

             System.out.println("Last entry read is " + entryName);

             if (!userFile) {

                  check(!entry.isDirectory());

                  ByteArrayOutputStream baos = new ByteArrayOutputStream();

                  byte buf[] = new byte[4096];

                  int len;

                  while ((len = zis.read(buf)) >= 0) {

                       baos.write(buf, 0, len);

                  }

                  baos.close();

                  check(Arrays.equals(data, baos.toByteArray()));

                  check(zis.getNextEntry() == null);

             }

         }

     }

     private static void updateFile(FileSystem fs, Path src) throws IOException {

          Path dst = fs.getPath(src.toString());

          Path parent = dst.getParent();

          if (parent != null && Files.notExists(parent))

               Files.createDirectories(parent);

          Files.copy(src, dst, REPLACE_EXISTING);

     }

     private static FileSystemProvider getZipFSProvider() {

         for (FileSystemProvider provider : FileSystemProvider.installedProviders()) {

              if ("jar".equalsIgnoreCase(provider.getScheme()))

                   return provider;

         }

         return null;

     }

     static void updateLargeZip(String pName) throws Throwable {

         FileSystemProvider provider = getZipFSProvider();

         if (provider == null) {

             System.err.println("ZIP filesystem provider is not installed");

             System.exit(1);

         }

         Map<String, Object> env = env = new HashMap<>();

         try (FileSystem fs = provider.newFileSystem(largeFile.toPath(), env)) {

             Path path = FileSystems.getDefault().getPath(pName);

             Files.walkFileTree(

                 path,

                 new SimpleFileVisitor<Path>() {

                     @Override

                     public FileVisitResult visitFile(Path file,

                                                      BasicFileAttributes attrs)

                         throws IOException

                     {

                         updateFile(fs, file);

                         return FileVisitResult.CONTINUE;

                     }

             });

         }

     }

     //--------------------- Infrastructure ---------------------------

     static volatile int passed = 0, failed = 0;

     static void pass() {passed++;}

     static void pass(String msg) {System.out.println(msg); passed++;}

     static void fail() {failed++; Thread.dumpStack();}

     static void fail(String msg) {System.out.println(msg); fail();}

     static void unexpected(Throwable t) {failed++; t.printStackTrace();}

     static void unexpected(Throwable t, String msg) {

         System.out.println(msg); failed++; t.printStackTrace();}

     static boolean check(boolean cond) {if (cond) pass(); else fail(); return cond;}

     static void equal(Object x, Object y) {

          if (x == null ? y == null : x.equals(y)) pass();

          else fail(x + " not equal to " + y);}

     public static void main(String[] args) throws Throwable {

          try {realMain(args);} catch (Throwable t) {unexpected(t);}

          System.out.println("\nPassed = " + passed + " failed = " + failed);

          if (failed > 0) throw new AssertionError("Some tests failed");}

}