modules/libmar/src/mar_extract.c

   1 /* -*- Mode: C++; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -*- */
   2 /* vim:set ts=2 sw=2 sts=2 et cindent: */
   3 /* ***** BEGIN LICENSE BLOCK *****
   4  * Version: MPL 1.1/GPL 2.0/LGPL 2.1
   5  *
   6  * The contents of this file are subject to the Mozilla Public License Version
   7  * 1.1 (the "License"); you may not use this file except in compliance with
   8  * the License. You may obtain a copy of the License at
   9  * http://www.mozilla.org/MPL/
  10  *
  11  * Software distributed under the License is distributed on an "AS IS" basis,
  12  * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
  13  * for the specific language governing rights and limitations under the
  14  * License.
  15  *
  16  * The Original Code is Mozilla Archive code.
  17  *
  18  * The Initial Developer of the Original Code is Google Inc.
  19  * Portions created by the Initial Developer are Copyright (C) 2005
  20  * the Initial Developer. All Rights Reserved.
  21  *
  22  * Contributor(s):
  23  *  Darin Fisher <darin@meer.net>
  24  *
  25  * Alternatively, the contents of this file may be used under the terms of
  26  * either the GNU General Public License Version 2 or later (the "GPL"), or
  27  * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
  28  * in which case the provisions of the GPL or the LGPL are applicable instead
  29  * of those above. If you wish to allow use of your version of this file only
  30  * under the terms of either the GPL or the LGPL, and not to allow others to
  31  * use your version of this file under the terms of the MPL, indicate your
  32  * decision by deleting the provisions above and replace them with the notice
  33  * and other provisions required by the GPL or the LGPL. If you do not delete
  34  * the provisions above, a recipient may use your version of this file under
  35  * the terms of any one of the MPL, the GPL or the LGPL.
  36  *
  37  * ***** END LICENSE BLOCK ***** */
  38
  39 #include <sys/types.h>
  40 #include <sys/stat.h>
  41 #include <fcntl.h>
  42 #include <string.h>
  43 #include <stdlib.h>
  44 #include <stdio.h>
  45 #include "mar.h"
  46 #include "mar_private.h"
  47
  48 #ifdef XP_WIN
  49 #include <io.h>
  50 #include <direct.h>
  51 #endif
  52
  53 /* Ensure that the directory containing this file exists */
  54 static int mar_ensure_parent_dir(const char *path)
  55 {
  56   char *slash = strrchr(path, '/');
  57   if (slash)
  58   {
  59     *slash = '\0';
  60     mar_ensure_parent_dir(path);
  61 #ifdef XP_WIN
  62     _mkdir(path);
  63 #else
  64     mkdir(path, 0755);
  65 #endif
  66     *slash = '/';
  67   }
  68   return 0;
  69 }
  70
  71 static int mar_test_callback(MarFile *mar, const MarItem *item, void *unused) {
  72   FILE *fp;
  73   char buf[BLOCKSIZE];
  74   int fd, len, offset = 0;
  75
  76   if (mar_ensure_parent_dir(item->name))
  77     return -1;
  78
  79 #ifdef XP_WIN
  80   fd = _open(item->name, _O_BINARY|_O_CREAT|_O_TRUNC|_O_WRONLY, item->flags);
  81 #else
  82   fd = creat(item->name, item->flags);
  83 #endif
  84   if (fd == -1)
  85     return -1;
  86
  87   fp = fdopen(fd, "wb");
  88   if (!fp)
  89     return -1;
  90
  91   while ((len = mar_read(mar, item, offset, buf, sizeof(buf))) > 0) {
  92     if (fwrite(buf, len, 1, fp) != 1)
  93       break;
  94     offset += len;
  95   }
  96
  97   fclose(fp);
  98   return len == 0 ? 0 : -1;
  99 }
 100
 101 int mar_extract(const char *path) {
 102   MarFile *mar;
 103   int rv;
 104
 105   mar = mar_open(path);
 106   if (!mar)
 107     return -1;
 108
 109   rv = mar_enum_items(mar, mar_test_callback, NULL);
 110
 111   mar_close(mar);
 112   return rv;
 113 }