home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Internet Tools 1993 July / Internet Tools.iso / RockRidge / mail / pp / pp-6.0 / Format / p2explode / explode_only.c < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-18  |  1.0 KB  |  48 lines
  1. /* explode_alone:  standalone p2 explode
  2.  
  3. # ifndef lint
  4. static char Rcsid[] = "@(#)$Header: /xtel/pp/pp-beta/Format/p2explode/RCS/explode_only.c,v 6.0 1991/12/18 20:20:02 jpo Rel $";
  5. # endif
  6.  
  7. /*
  8.  * $Header: /xtel/pp/pp-beta/Format/p2explode/RCS/explode_only.c,v 6.0 1991/12/18 20:20:02 jpo Rel $
  9.  *
  10.  * $Log: explode_only.c,v $
  11.  * Revision 6.0  1991/12/18  20:20:02  jpo
  12.  * Release 6.0
  13.  *
  14.  */
  15.  
  16.  
  17.  
  18. #include "util.h"
  19. #include "retcode.h"
  20.  
  21. /*
  22.  * parameters -
  23.  * argv[0] = program name
  24.  * argv[1] = source directory
  25.  * argv[2] = destination directory
  26.  */
  27. #include    "util.h"
  28. extern int    unflatten();
  29. static int    x40084;
  30.  
  31. main(argc, argv)
  32. int    argc;
  33. char    **argv;
  34. {
  35.     int result = OK;
  36.     char    *error;
  37.     if (isatty (fileno(stderr)))
  38.         ll_dbinit(pp_log_norm, argv[0]);
  39.  
  40.     if(argc < 3)
  41.         err_abrt(RP_MECH, "Usage: %s src-dir dest-dir", argv[0]);
  42.     x40084 = FALSE;
  43.     if (argc == 4)
  44.         if (lexequ(argv[3], "-84") == 0) x40084 = TRUE;
  45.     result = unflatten(argv[1],argv[2],x40084,NULL, &error);
  46.     printf("Unflatten result was %s\n", (result == OK) ? "ok" : "notok");
  47. }
  48.