contrib/smash_megafile/smash_megafile.c

   1 /* smash_megafile.c:
   2  *
   3  *     Break a Viewlogic metafile into a million little pieces
   4  *
   5  *
   6  * Copyright (C) 1998-2010 Mike Jarabek
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  21  *
  22  *  $Id$
  23  *
  24  */
  25
  26 #ifdef HAVE_CONFIG_H
  27 #include "config.h"
  28 #endif
  29
  30 #include <stdio.h>
  31 #include <stdlib.h>
  32 #include <string.h>
  33 #include <sys/stat.h>
  34
  35 #define RECLEN 0x14
  36
  37
  38 int main(int argc, char **argv)
  39 {
  40
  41   FILE *megafile, *output;
  42   char *extracted_file;
  43   char name[127];
  44   char buffer[127];         /* buffer for megafile index entries */
  45   char output_name[127];
  46
  47   int len;
  48
  49   if( argc != 2 )
  50     {
  51       fprintf( stderr, "Usage:\n %s <megafile>\n\n"
  52                "Where <megafile> is the name of a viewlogic megafile\n"
  53                "whithout any extensions.  The file <megafile>.lib and \n"
  54                "<megafile>.tbl must exist in the same directory\n",
  55                argv[0]);
  56       return 1;
  57     }
  58
  59
  60
  61   /* open the files */
  62   strcpy(name,argv[1]);
  63   strcat(name,".lib");
  64   megafile = fopen(name, "r");
  65
  66   if( megafile == NULL )
  67     {
  68       fprintf(stderr, "Error: unable to open magefile `%s' for reading\n",
  69               name);
  70       return(1);
  71     }
  72
  73   /* create a subdir to hold the exploded files */
  74
  75 #ifdef __MINGW32__
  76   mkdir(argv[1]);
  77 #else
  78   mkdir(argv[1], 0777);    /* try to be friendly */
  79 #endif
  80
  81   /* read each table entry and extract the file from the megafile */
  82   while(!feof(megafile))
  83     {
  84       if(fread(buffer, RECLEN, 1, megafile) == 0) break;  /* end of file? */
  85
  86       /* null terminate buffer */
  87       buffer[RECLEN+1] = 0;
  88
  89       /*printf("%s\n",buffer);*/
  90
  91       /* extract the name and size from the entry */
  92       sscanf(buffer,"%s %d",name,&len);
  93
  94       printf("%s:%d\n",name,len);
  95
  96       /* slurp in the required data and spit it out into the
  97        * output directory
  98        */
  99
 100       /* allocate some memory to hold the file */
 101       extracted_file = malloc(len);
 102
 103       fread(extracted_file, len, 1, megafile);
 104
 105       /* open up a file to dump in */
 106       strcpy(output_name, argv[1]);
 107       strcat(output_name, "/");
 108       strcat(output_name, name);
 109       output = fopen(output_name,"wb");
 110       if(output == NULL)
 111         {
 112           fclose(megafile);
 113           fprintf(stderr,"Error: unable to open file `%s' for writing\n",
 114                   output_name);
 115
 116           return 1;
 117         }
 118
 119       /* dump to the file */
 120       fwrite(extracted_file, len, 1, output);
 121       fclose(output);
 122
 123       /* and get the ^Z */
 124       fgetc(megafile);
 125
 126     }
 127
 128
 129   fclose(megafile);
 130
 131   return 0;
 132 }
 133