Add FMILibrary-2.0.3 to org.simantics.fmil.core\native.

[simantics/fmil.git] / org.simantics.fmil.core / native / FMILibrary / src / ZIP / src / fmi_zip_zip.c

diff --git a/org.simantics.fmil.core/native/FMILibrary/src/ZIP/src/fmi_zip_zip.c b/org.simantics.fmil.core/native/FMILibrary/src/ZIP/src/fmi_zip_zip.c
new file mode 100644 (file)
index 0000000..945fd33
--- /dev/null
+++ b/org.simantics.fmil.core/native/FMILibrary/src/ZIP/src/fmi_zip_zip.c
@@ -0,0 +1,91 @@
+/*
+    Copyright (C) 2012 Modelon AB
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the BSD style license.
+
+     This program 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
+    FMILIB_License.txt file for more details.
+
+    You should have received a copy of the FMILIB_License.txt file
+    along with this program. If not, contact Modelon AB <http://www.modelon.com>.
+*/
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <minizip.h>
+
+#include <JM/jm_types.h>
+#include <JM/jm_callbacks.h>
+#include <JM/jm_portability.h>
+
+jm_status_enu_t fmi_zip_zip(const char* zip_file_path, int n_files_to_zip, const char** files_to_zip, jm_callbacks* callbacks)
+{
+       /* A call to minizip may change the current directory and therefore we must change it back */
+       char cd[FILENAME_MAX];
+
+#define N_BASIC_ARGS 4
+       int argc;
+       char** argv;
+       int k;
+       int status;
+
+       /* Temporary save the current directory */
+       if (jm_portability_get_current_working_directory(cd, sizeof(cd) / sizeof(char)) == jm_status_error) {
+               jm_log(callbacks, "UNZIP", jm_log_level_error, "Could not get Current Directory");\r
+               return jm_status_error;
+       }
+
+       argc = N_BASIC_ARGS + n_files_to_zip;
+       argv = callbacks->calloc(sizeof(char*), argc);  
+       /* Failed to allocate memory, return error */
+       if (argv == NULL) {
+               callbacks->logger(NULL, "FMIZIP", jm_log_level_error, "Failed to allocate memory.");
+               return jm_status_error; 
+       }
+
+       /* Input arguments to the corresponding minizip main() function call */
+       /*
+       Usage : minizip [-o] [-a] [-0 to -9] [-p password] [-j] file.zip [files_to_add]\r
+\r
+       -o  Overwrite existing file.zip\r
+       -a  Append to existing file.zip\r
+       -0  Store only\r
+       -1  Compress faster\r
+       -9  Compress better\r
+\r
+       -j  exclude path. store only the file name.
+       */
+       argv[0]="minizip";
+       argv[1]="-o";
+       argv[2]="-1";
+       argv[3]=(char*)zip_file_path;
+
+       /* Append the input argument list with the files to unzip */
+       jm_log_info(callbacks, "FMIZIP", "Will compress following files: \n");
+       for (k = 0; k < n_files_to_zip; k++) {
+               jm_log_info(callbacks, "FMIZIP", "\t%s\n", files_to_zip[k]);
+               argv[N_BASIC_ARGS + k] = (char*)files_to_zip[k];
+       }
+
+       /* Zip */
+       status = minizip(argc, (char**)argv);
+
+       /* Free allocated memory */
+       callbacks->free(argv);
+
+       /* Reset the current directory */
+       if (jm_portability_set_current_working_directory(cd) == jm_status_error) {\r
+               jm_log(callbacks, "UNZIP", jm_log_level_warning, "Could not change back Current Directory");\r
+               return jm_status_warning;\r
+       }
+
+       /* Return error status */
+       if (status == 0) {
+               return jm_status_success;
+       } else {
+               return jm_status_error; 
+       }
+}