开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 磁盘/存储 > SCSI/ASPI > 查看源码
mkisofs.c
资源名称：cdrecord-1.8.tar.gz　[点击查看]
上传用户：xiejiait
上传日期：2007-01-06
资源大小：881k
文件大小：46k
源码类别：

SCSI/ASPI

开发平台：

MultiPlatform

mkisofs.c：源码内容
  1. /*
  2.  * Program mkisofs.c - generate iso9660 filesystem  based upon directory
  3.  * tree on hard disk.
  5.    Written by Eric Youngdale (1993).
  7.    Copyright 1993 Yggdrasil Computing, Incorporated
  9.    This program is free software; you can redistribute it and/or modify
  10.    it under the terms of the GNU General Public License as published by
  11.    the Free Software Foundation; either version 2, or (at your option)
  12.    any later version.
  14.    This program is distributed in the hope that it will be useful,
  15.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17.    GNU General Public License for more details.
  19.    You should have received a copy of the GNU General Public License
  20.    along with this program; if not, write to the Free Software
  21.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  23. static char rcsid[] ="$Id: mkisofs.c,v 1.32 1999/03/07 21:48:49 eric Exp $";
  25. #include "config.h"
  26. #include <errno.h>
  27. #include "mkisofs.h"
  28. #include "match.h"
  30. #ifdef linux
  31. #include <getopt.h>
  32. #else
  33. #include "getopt.h"
  34. #endif
  36. #include "iso9660.h"
  37. #include <ctype.h>
  39. #ifndef VMS
  40. #include <time.h>
  41. #else
  42. #include <sys/time.h>
  43. #include "vms.h"
  44. #endif
  46. #include <stdlib.h>
  47. #include <sys/stat.h>
  49. #ifndef VMS
  50. #ifdef HAVE_UNISTD_H
  51. #include <unistd.h>
  52. #endif
  53. #endif
  54. #include <fctldefs.h>
  56. #include "exclude.h"
  58. #ifdef no_more_needed
  59. #ifdef __NetBSD__
  60. #include <sys/time.h>
  61. #include <sys/resource.h>
  62. #endif
  63. #endif /* no_more_needed */
  65. #ifdef USE_LIBSCHILY
  66. #include <standard.h>
  67. #endif
  69. struct directory * root = NULL;
  71. static char version_string[] = "mkisofs 1.12";
  73. char * outfile;
  74. FILE * discimage;
  75. unsigned int next_extent = 0;
  76. unsigned int last_extent = 0;
  77. unsigned int session_start = 0;
  78. unsigned int path_table_size = 0;
  79. unsigned int path_table[4] = {0,};
  80. unsigned int path_blocks = 0;
  83. unsigned int jpath_table_size = 0;
  84. unsigned int jpath_table[4] = {0,};
  85. unsigned int jpath_blocks = 0;
  87. struct iso_directory_record root_record;
  88. struct iso_directory_record jroot_record;
  90. char * extension_record = NULL;
  91. int extension_record_extent = 0;
  92. int extension_record_size = 0;
  94. /* These variables are associated with command line options */
  95. int use_eltorito = 0;
  96. int hard_disk_boot = 0;
  97. int not_bootable = 0;
  98. int no_emul_boot = 0;
  99. int load_addr = 0;
  100. int load_size = 0;
  101. int boot_info_table = 0;
  102. int use_sparcboot = 0;
  103. int use_genboot = 0;
  104. int use_RockRidge = 0;
  105. int use_Joliet = 0;
  106. int verbose = 1;
  107. int gui = 0;
  108. int all_files  = 1; /* New default is to include all files */
  109. int follow_links = 0;
  110. int rationalize = 0;
  111. int generate_tables = 0;
  112. int print_size = 0;
  113. int split_output = 0;
  114. char * preparer = PREPARER_DEFAULT;
  115. char * publisher = PUBLISHER_DEFAULT;
  116. char * appid = APPID_DEFAULT;
  117. char * copyright = COPYRIGHT_DEFAULT;
  118. char * biblio = BIBLIO_DEFAULT;
  119. char * abstract = ABSTRACT_DEFAULT;
  120. char * volset_id = VOLSET_ID_DEFAULT;
  121. char * volume_id = VOLUME_ID_DEFAULT;
  122. char * system_id = SYSTEM_ID_DEFAULT;
  123. char * boot_catalog = BOOT_CATALOG_DEFAULT;
  124. char * boot_image = BOOT_IMAGE_DEFAULT;
  125. char * genboot_image = BOOT_IMAGE_DEFAULT;
  126. int volume_set_size = 1;
  127. int volume_sequence_number = 1;
  129. int jhide_trans_tbl;  /* Hide TRANS.TBL from Joliet tree */
  130. int hide_rr_moved;  /* Name RR_MOVED .rr_moved in Rock Ridge tree */
  131. int omit_period = 0;             /* Violates iso9660, but these are a pain */
  132. int transparent_compression = 0; /* So far only works with linux */
  133. int omit_version_number = 0;     /* May violate iso9660, but noone uses vers*/
  134. int no_rr = 0;  /* Do not use RR attributes from old session*/
  135. int RR_relocation_depth = 6;     /* Violates iso9660, but most systems work */
  136. int full_iso9660_filenames = 0;  /* Used with Amiga.  Disc will not work with
  137.   DOS */
  138. int allow_untranslated = 0;  /* Minimal (only truncation of 30+ characters)
  139. translation of filenames. This is for HP-UX,
  140. which does not recognize ANY extentions
  141. (Rock Ridge, Joliet), causing pain when
  142. loading software. pfs_mount can be used
  143. to read the extensions, but the untranslated
  144. filenames can be read by the "native" cdfs
  145. mounter. Completely violates iso9660. */
  146. int allow_leading_dots = 0;  /* DOS cannot read names with leading dots */
  147. int split_SL_component = 1;  /* circumvent a bug in the SunOS driver */
  148. int split_SL_field = 1;  /* circumvent a bug in the SunOS */
  150. char *trans_tbl = "TRANS.TBL";  /* default name for translation table */
  152. struct rcopts{
  153.   char * tag;
  154.   char ** variable;
  155. };
  157. struct rcopts rcopt[] = {
  158.   {"PREP", &preparer},
  159.   {"PUBL", &publisher},
  160.   {"APPI", &appid},
  161.   {"COPY", &copyright},
  162.   {"BIBL", &biblio},
  163.   {"ABST", &abstract},
  164.   {"VOLS", &volset_id},
  165.   {"VOLI", &volume_id},
  166.   {"SYSI", &system_id},
  167.   {NULL, NULL}
  168. };
  170. /*
  171.  * In case it isn't obvious, the option handling code was ripped off from GNU-ld.
  172.  */
  173. struct ld_option
  174. {
  175.   /* The long option information.  */
  176.   struct option opt;
  177.   /* The short option with the same meaning ('' if none).  */
  178.   char shortopt;
  179.   /* The name of the argument (NULL if none).  */
  180.   const char *arg;
  181.   /* The documentation string.  If this is NULL, this is a synonym for
  182.      the previous option.  */
  183.   const char *doc;
  184.   enum
  185.     {
  186.       /* Use one dash before long option name.  */
  187.       ONE_DASH,
  188.       /* Use two dashes before long option name.  */
  189.       TWO_DASHES,
  190.       /* Don't mention this option in --help output.  */
  191.       NO_HELP
  192.     } control;
  193. };
  195. /* Codes used for the long options with no short synonyms.  150 isn't
  196.    special; it's just an arbitrary non-ASCII char value.  */
  197. #define OPTION_HELP 150
  198. #define OPTION_QUIET 151
  199. #define OPTION_NOSPLIT_SL_COMPONENT 152
  200. #define OPTION_NOSPLIT_SL_FIELD 153
  201. #define OPTION_PRINT_SIZE 154
  202. #define OPTION_SPLIT_OUTPUT 155
  203. #define OPTION_ABSTRACT 156
  204. #define OPTION_BIBLIO 157
  205. #define OPTION_COPYRIGHT 158
  206. #define OPTION_SYSID 159
  207. #define OPTION_VOLSET 160
  208. #define OPTION_VOLSET_SIZE 161
  209. #define OPTION_VOLSET_SEQ_NUM 162
  210. #define OPTION_I_HIDE 163
  211. #define OPTION_J_HIDE 164
  212. #define OPTION_LOG_FILE 165
  213. #define OPTION_PVERSION 166
  214. #define OPTION_NOBAK 167
  215. #define OPTION_SPARCLABEL 168
  216. #define OPTION_HARD_DISK_BOOT 169
  217. #define OPTION_NO_EMUL_BOOT 170
  218. #define OPTION_NO_BOOT 171
  219. #define OPTION_BOOT_LOAD_ADDR 172
  220. #define OPTION_BOOT_LOAD_SIZE 173
  221. #define OPTION_BOOT_INFO_TABLE 174
  222. #define OPTION_HIDE_TRANS_TBL 175
  223. #define OPTION_HIDE_RR_MOVED 176
  224. #define OPTION_GUI 177
  225. #define OPTION_TRANS_TBL 178
  226. #define OPTION_P_LIST 179
  227. #define OPTION_I_LIST 180
  228. #define OPTION_J_LIST 181
  229. #define OPTION_X_LIST 182
  230. #define OPTION_NO_RR 183
  232. static const struct ld_option ld_options[] =
  233. {
  234.   { {"all-files", no_argument, NULL, 'a'},
  235.       'a', NULL, "Process all files (don't skip backup files)", ONE_DASH },
  236.   { {"nobak", no_argument, NULL, OPTION_NOBAK},
  237.       '', NULL, "Do not include backup files", ONE_DASH },
  238.   { {"no-bak", no_argument, NULL, OPTION_NOBAK},
  239.       '', NULL, "Do not include backup files", ONE_DASH },
  240.   { {"abstract", required_argument, NULL, OPTION_ABSTRACT},
  241.       '', "FILE", "Set Abstract filename" , ONE_DASH },
  242.   { {"appid", required_argument, NULL, 'A'},
  243.       'A', "ID", "Set Application ID" , ONE_DASH },
  244.   { {"biblio", required_argument, NULL, OPTION_BIBLIO},
  245.       '', "FILE", "Set Bibliographic filename" , ONE_DASH },
  246.   { {"copyright", required_argument, NULL, OPTION_COPYRIGHT},
  247.       '', "FILE", "Set Copyright filename" , ONE_DASH },
  248.   { {"eltorito-boot", required_argument, NULL, 'b'},
  249.       'b', "FILE", "Set El Torito boot image name" , ONE_DASH },
  250.   { {"sparc-boot", required_argument, NULL, 'B'},
  251.       'B', "FILES", "Set sparc boot image names" , ONE_DASH },
  252.   { {"generic-boot", required_argument, NULL, 'G'},
  253.       'G', "FILE", "Set generic boot image name" , ONE_DASH },
  254.   { {"sparc-label", required_argument, NULL, OPTION_SPARCLABEL},
  255.       '', "label text", "Set sparc boot disk label" , ONE_DASH },
  256.   { {"eltorito-catalog", required_argument, NULL, 'c'},
  257.       'c', "FILE", "Set El Torito boot catalog name" , ONE_DASH },
  258.   { {"cdrecord-params", required_argument, NULL, 'C'},
  259.       'C', "PARAMS", "Magic paramters from cdrecord" , ONE_DASH },
  260.   { {"omit-period", no_argument, NULL, 'd'},
  261.       'd', NULL, "Omit trailing periods from filenames", ONE_DASH },
  262.   { {"disable-deep-relocation", no_argument, NULL, 'D'},
  263.       'D', NULL, "Disable deep directory relocation", ONE_DASH },
  264.   { {"follow-links", no_argument, NULL, 'f'},
  265.       'f', NULL, "Follow symbolic links", ONE_DASH },
  266.   { {"help", no_argument, NULL, OPTION_HELP},
  267.       '', NULL, "Print option help", ONE_DASH },
  268.   { {"hide", required_argument, NULL, OPTION_I_HIDE},
  269.       '', "GLOBFILE", "Hide ISO9660/RR file" , ONE_DASH },
  270.   { {"hide-list", required_argument, NULL, OPTION_I_LIST},
  271.       '', "FILE", "File with list of ISO9660/RR files to hide" , ONE_DASH },
  272.   { {"hide-joliet", required_argument, NULL, OPTION_J_HIDE},
  273.       '', "GLOBFILE", "Hide Joliet file" , ONE_DASH },
  274.   { {"hide-joliet-list", required_argument, NULL, OPTION_J_LIST},
  275.       '', "FILE", "File with list of Joliet files to hide" , ONE_DASH },
  276.   { {"hide-joliet-trans-tbl", no_argument, NULL, OPTION_HIDE_TRANS_TBL},
  277.       '', NULL, "Hide TRANS.TBL from Joliet tree" , ONE_DASH },
  278.   { {"hide-rr-moved", no_argument, NULL, OPTION_HIDE_RR_MOVED},
  279.       '', NULL, "Rename RR_MOVED to .rr_moved in Rock Ridge tree" , ONE_DASH },
  280.   { {"gui", no_argument, NULL, OPTION_GUI},
  281.       '', NULL, "Switch behaviour for GUI", ONE_DASH },
  282.   { {NULL, required_argument, NULL, 'i'},
  283.       'i', "ADD_FILES", "No longer supported" , TWO_DASHES },
  284.   { {"joliet", no_argument, NULL, 'J'},
  285.       'J', NULL, "Generate Joliet directory information", ONE_DASH },
  286.   { {"full-iso9660-filenames", no_argument, NULL, 'l'},
  287.       'l', NULL, "Allow full 32 character filenames for iso9660 names", ONE_DASH },
  288.   { {"allow-leading-dots", no_argument, NULL, 'L'},
  289.       'L', NULL, "Allow iso9660 filenames to start with '.'", ONE_DASH },
  290.   { {"log-file", required_argument, NULL, OPTION_LOG_FILE},
  291.       '', "LOG_FILE", "Re-direct messages to LOG_FILE", ONE_DASH },
  292.   { {"exclude", required_argument, NULL, 'm'},
  293.       'm', "GLOBFILE", "Exclude file name" , ONE_DASH },
  294.   { {"exclude-list", required_argument, NULL, OPTION_X_LIST},
  295.       '', "FILE", "File with list of file names to exclude" , ONE_DASH },
  296.   { {"prev-session", required_argument, NULL, 'M'},
  297.       'M', "FILE", "Set path to previous session to merge" , ONE_DASH },
  298.   { {"omit-version-number", no_argument, NULL, 'N'},
  299.       'N', NULL, "Omit version number from iso9660 filename", ONE_DASH },
  300.   { {"no-rr", no_argument, NULL, OPTION_NO_RR},
  301.       0, NULL, "Inhibit reading of Rock Ridge attributes from previous session" , ONE_DASH },
  302.   { {"no-split-symlink-components", no_argument, NULL, OPTION_NOSPLIT_SL_COMPONENT},
  303.       0, NULL, "Inhibit splitting symlink components" , ONE_DASH },
  304.   { {"no-split-symlink-fields", no_argument, NULL, OPTION_NOSPLIT_SL_FIELD},
  305.       0, NULL, "Inhibit splitting symlink fields" , ONE_DASH },
  306.   { {"output", required_argument, NULL, 'o'},
  307.       'o', "FILE", "Set output file name" , ONE_DASH },
  308.   { {"path-list", required_argument, NULL, OPTION_P_LIST},
  309.       '', "FILE", "File with list of pathnames to process" , ONE_DASH },
  310.   { {"preparer", required_argument, NULL, 'p'},
  311.       'p', "PREP", "Set Volume preparer" , ONE_DASH },
  312.   { {"print-size", no_argument, NULL, OPTION_PRINT_SIZE},
  313.       '', NULL, "Print estimated filesystem size and exit", ONE_DASH },
  314.   { {"publisher", required_argument, NULL, 'P'},
  315.       'P', "PUB", "Set Volume publisher" , ONE_DASH },
  316.   { {"quiet", no_argument, NULL, OPTION_QUIET},
  317.       '', NULL, "Run quietly", ONE_DASH },
  318.   { {"rational-rock", no_argument, NULL, 'r'},
  319.       'r', NULL, "Generate rationalized Rock Ridge directory information", ONE_DASH },
  320.   { {"rock", no_argument, NULL, 'R'},
  321.       'R', NULL, "Generate Rock Ridge directory information", ONE_DASH },
  322.   { {"split-output", no_argument, NULL, OPTION_SPLIT_OUTPUT},
  323.       '', NULL, "Split output into files of approx. 1GB size", ONE_DASH },
  324.   { {"sysid", required_argument, NULL, OPTION_SYSID},
  325.       '', "ID", "Set System ID" , ONE_DASH },
  326.   { {"translation-table", no_argument, NULL, 'T'},
  327.       'T', NULL, "Generate translation tables for systems that don't understand long filenames", ONE_DASH },
  328.   { {"table-name", required_argument, NULL, OPTION_TRANS_TBL},
  329.       '', "TABLE_NAME", "Translation table file name", ONE_DASH },
  330.   { {"untranslated-filenames", no_argument, NULL, 'U'},
  331.       'U', NULL, "Allow Untranslated filenames (for HPUX & AIX). Forces on -d, -l, -L, -N", ONE_DASH },
  332.   { {"verbose", no_argument, NULL, 'v'},
  333.       'v', NULL, "Verbose", ONE_DASH },
  334.   { {"version", no_argument, NULL, OPTION_PVERSION},
  335.       '', NULL, "Print the current version", ONE_DASH },
  336.   { {"volid", required_argument, NULL, 'V'},
  337.       'V', "ID", "Set Volume ID" , ONE_DASH },
  338.   { {"volset", required_argument, NULL, OPTION_VOLSET},
  339.       '', "ID", "Set Volume set ID" , ONE_DASH },
  340.   { {"volset-size", required_argument, NULL, OPTION_VOLSET_SIZE},
  341.       '', "#", "Set Volume set size" , ONE_DASH },
  342.   { {"volset-seqno", required_argument, NULL, OPTION_VOLSET_SEQ_NUM},
  343.       '', "#", "Set Volume set sequence number" , ONE_DASH },
  344.   { {"old-exclude", required_argument, NULL, 'x'},
  345.       'x', "FILE", "Exclude file name(depreciated)" , ONE_DASH },
  346.   { {"hard-disk-boot", no_argument, NULL, OPTION_HARD_DISK_BOOT},
  347.       '', NULL, "Boot image is a hard disk image", ONE_DASH },
  348.   { {"no-emul-boot", no_argument, NULL, OPTION_NO_EMUL_BOOT},
  349.       '', NULL, "Boot image is 'no emulation' image", ONE_DASH },
  350.   { {"no-boot", no_argument, NULL, OPTION_NO_BOOT},
  351.       '', NULL, "Boot image is not bootable", ONE_DASH },
  352.   { {"boot-load-seg", required_argument, NULL, OPTION_BOOT_LOAD_ADDR},
  353.       '', "#", "Set load segment for boot image" , ONE_DASH },
  354.   { {"boot-load-size", required_argument, NULL, OPTION_BOOT_LOAD_SIZE},
  355.       '', "#", "Set numbers of load sectors", ONE_DASH },
  356.   { {"boot-info-table", no_argument, NULL, OPTION_BOOT_INFO_TABLE},
  357.       '', NULL, "Patch boot image with info table", ONE_DASH },
  358. #ifdef ERIC_neverdef
  359.   { {"transparent-compression", no_argument, NULL, 'z'},
  360.       'z', NULL, "Enable transparent compression of files", ONE_DASH },
  361. #endif
  362. };
  364. #define OPTION_COUNT (sizeof ld_options / sizeof ld_options[0])
  366. #if defined(ultrix) || defined(_AUX_SOURCE)
  367. char *strdup(s)
  368. char *s;{char *c;if(c=(char *)malloc(strlen(s)+1))strcpy(c,s);return c;}
  369. #endif
  371. void read_rcfile __PR((char * appname));
  372. void usage __PR((int excode));
  373. static void hide_reloc_dir __PR((void));
  375. void FDECL1(read_rcfile, char *, appname)
  376. {
  377.   FILE * rcfile = (FILE *)NULL;
  378.   struct rcopts * rco;
  379.   char * pnt, *pnt1;
  380.   char linebuffer[256];
  381.   static char rcfn[] = ".mkisofsrc";
  382.   char filename[1000];
  383.   int linum;
  385.   strcpy(filename, rcfn);
  386.   if (access(filename, R_OK) == 0)
  387.   rcfile = fopen(filename, "r");
  388.   if (!rcfile && errno != ENOENT)
  389. #ifdef USE_LIBSCHILY
  390.     errmsg("Cannot open '%s'.n", filename);
  391. #else
  392.     perror(filename);
  393. #endif
  395.   if (!rcfile)
  396.     {
  397.       pnt = getenv("MKISOFSRC");
  398.       if (pnt && strlen(pnt) <= sizeof(filename))
  399. {
  400.   strcpy(filename, pnt);
  401.   if (access(filename, R_OK) == 0)
  402.   rcfile = fopen(filename, "r");
  403.   if (!rcfile && errno != ENOENT)
  404. #ifdef USE_LIBSCHILY
  405.     errmsg("Cannot open '%s'.n", filename);
  406. #else
  407.     perror(filename);
  408. #endif
  409. }
  410.     }
  412.   if (!rcfile)
  413.     {
  414.       pnt = getenv("HOME");
  415.       if (pnt && strlen(pnt) + strlen(rcfn) + 2 <= sizeof(filename))
  416. {
  417.   strcpy(filename, pnt);
  418.   strcat(filename, "/");
  419.   strcat(filename, rcfn);
  420.   if (access(filename, R_OK) == 0)
  421.   rcfile = fopen(filename, "r");
  422.   if (!rcfile && errno != ENOENT)
  423. #ifdef USE_LIBSCHILY
  424.     errmsg("Cannot open '%s'.n", filename);
  425. #else
  426.     perror(filename);
  427. #endif
  428. }
  429.     }
  430.   if (!rcfile && strlen(appname)+sizeof(rcfn)+2 <= sizeof(filename))
  431.     {
  432.       strcpy(filename, appname);
  433.       pnt = strrchr(filename, '/');
  434.       if (pnt)
  435. {
  436.   strcpy(pnt + 1, rcfn);
  437.   if (access(filename, R_OK) == 0)
  438.   rcfile = fopen(filename, "r");
  439.   if (!rcfile && errno != ENOENT)
  440. #ifdef USE_LIBSCHILY
  441.     errmsg("Cannot open '%s'.n", filename);
  442. #else
  443.     perror(filename);
  444. #endif
  445. }
  446.     }
  447.   if (!rcfile)
  448.     return;
  449.   if ( verbose > 0 )
  450.     {
  451.       fprintf(stderr, "Using "%s"n", filename);
  452.     }
  454.   /* OK, we got it.  Now read in the lines and parse them */
  455.   linum = 0;
  456.   while (fgets(linebuffer, sizeof(linebuffer), rcfile))
  457.     {
  458.       char *name;
  459.       char *name_end;
  460.       ++linum;
  461.       /* skip any leading white space */
  462. pnt = linebuffer;
  463.       while (*pnt == ' ' || *pnt == 't')
  464. ++pnt;
  465.       /* If we are looking at a # character, this line is a comment. */
  466. if (*pnt == '#')
  467.   continue;
  468.       /* The name should begin in the left margin.  Make sure it is in
  469.  upper case.  Stop when we see white space or a comment. */
  470. name = pnt;
  471.       while (*pnt && isalpha((unsigned char)*pnt))
  472. {
  473.   if(islower((unsigned char)*pnt))
  474.     *pnt = toupper((unsigned char)*pnt);
  475.   pnt++;
  476. }
  477.       if (name == pnt)
  478. {
  479.   fprintf(stderr, "%s:%d: name requiredn", filename, linum);
  480.   continue;
  481. }
  482.       name_end = pnt;
  483.       /* Skip past white space after the name */
  484.       while (*pnt == ' ' || *pnt == 't')
  485. pnt++;
  486.       /* silently ignore errors in the rc file. */
  487.       if (*pnt != '=')
  488. {
  489.   fprintf(stderr, "%s:%d: equals sign requiredn", filename, linum);
  490.   continue;
  491. }
  492.       /* Skip pas the = sign, and any white space following it */
  493.       pnt++; /* Skip past '=' sign */
  494.       while (*pnt == ' ' || *pnt == 't')
  495. pnt++;
  497.       /* now it is safe to NUL terminate the name */
  499. *name_end = 0;
  501.       /* Now get rid of trailing newline */
  503.       pnt1 = pnt;
  504.       while (*pnt1)
  505. {
  506.   if (*pnt1 == 'n')
  507.     {
  508.       *pnt1 = 0;
  509.       break;
  510.     }
  511.   pnt1++;
  512. };
  513.       /* OK, now figure out which option we have */
  514.       for(rco = rcopt; rco->tag; rco++) {
  515. if(strcmp(rco->tag, name) == 0)
  516.   {
  517.     *rco->variable = strdup(pnt);
  518.     break;
  519.   };
  520.       }
  521.       if (rco->tag == NULL)
  522. {
  523.   fprintf(stderr, "%s:%d: field name "%s" unknownn", filename, linum,
  524.   name);
  525. }
  526.      }
  527.   if (ferror(rcfile))
  528. #ifdef USE_LIBSCHILY
  529.     errmsg("Read error on '%s'.n", filename);
  530. #else
  531.     perror(filename);
  532. #endif
  533.   fclose(rcfile);
  534. }
  536. char * path_table_l = NULL;
  537. char * path_table_m = NULL;
  539. char * jpath_table_l = NULL;
  540. char * jpath_table_m = NULL;
  542. int goof = 0;
  544. #ifndef TRUE
  545. #define TRUE 1
  546. #endif
  548. #ifndef FALSE
  549. #define FALSE 0
  550. #endif
  552. void usage(excode)
  553. int excode;
  554. {
  555.   const char * program_name = "mkisofs";
  556. #if 0
  557. fprintf(stderr,"Usage:n");
  558. fprintf(stderr,
  559. "mkisofs [-o outfile] [-R] [-V volid] [-v] [-a] 
  560. [-T]n [-l] [-d] [-V] [-D] [-L] [-p preparer]"
  561. "[-P publisher] [ -A app_id ] [-z] n 
  562. [-b boot_image_name] [-c boot_catalog-name] 
  563. [-x path -x path ...] pathn");
  564. #endif
  566.   int i;
  567. /*  const char **targets, **pp;*/
  569.   fprintf (stderr, "Usage: %s [options] file...n", program_name);
  571.   fprintf (stderr, "Options:n");
  572.   for (i = 0; i < OPTION_COUNT; i++)
  573.     {
  574.       if (ld_options[i].doc != NULL)
  575. {
  576.   int comma;
  577.   int len;
  578.   int j;
  580.   fprintf (stderr, "  ");
  582.   comma = FALSE;
  583.   len = 2;
  585.   j = i;
  586.   do
  587.     {
  588.       if (ld_options[j].shortopt != ''
  589.   && ld_options[j].control != NO_HELP)
  590. {
  591.   fprintf (stderr, "%s-%c", comma ? ", " : "", ld_options[j].shortopt);
  592.   len += (comma ? 2 : 0) + 2;
  593.   if (ld_options[j].arg != NULL)
  594.     {
  595.       if (ld_options[j].opt.has_arg != optional_argument)
  596. {
  597.   fprintf (stderr, " ");
  598.   ++len;
  599. }
  600.       fprintf (stderr, "%s", ld_options[j].arg);
  601.       len += strlen (ld_options[j].arg);
  602.     }
  603.   comma = TRUE;
  604. }
  605.       ++j;
  606.     }
  607.   while (j < OPTION_COUNT && ld_options[j].doc == NULL);
  609.   j = i;
  610.   do
  611.     {
  612.       if (ld_options[j].opt.name != NULL
  613.   && ld_options[j].control != NO_HELP)
  614. {
  615.   fprintf (stderr, "%s-%s%s",
  616.   comma ? ", " : "",
  617.   ld_options[j].control == TWO_DASHES ? "-" : "",
  618.   ld_options[j].opt.name);
  619.   len += ((comma ? 2 : 0)
  620.   + 1
  621.   + (ld_options[j].control == TWO_DASHES ? 1 : 0)
  622.   + strlen (ld_options[j].opt.name));
  623.   if (ld_options[j].arg != NULL)
  624.     {
  625.       fprintf (stderr, " %s", ld_options[j].arg);
  626.       len += 1 + strlen (ld_options[j].arg);
  627.     }
  628.   comma = TRUE;
  629. }
  630.       ++j;
  631.     }
  632.   while (j < OPTION_COUNT && ld_options[j].doc == NULL);
  634.   if (len >= 30)
  635.     {
  636.       fprintf (stderr, "n");
  637.       len = 0;
  638.     }
  640.   for (; len < 30; len++)
  641.     fputc (' ', stderr);
  643.   fprintf (stderr, "%sn", ld_options[i].doc);
  644. }
  645.     }
  646.   exit(excode);
  647. }
  650. /* 
  651.  * Fill in date in the iso9660 format 
  652.  *
  653.  * The standards  state that the timezone offset is in multiples of 15
  654.  * minutes, and is what you add to GMT to get the localtime.  The U.S.
  655.  * is always at a negative offset, from -5h to -8h (can vary a little
  656.  * with DST,  I guess).  The Linux iso9660 filesystem has had the sign
  657.  * of this wrong for ages (mkisofs had it wrong too for the longest time).
  658.  */
  659. int FDECL2(iso9660_date,char *, result, time_t, crtime){
  660.   struct tm *local;
  661.   local = localtime(&crtime);
  662.   result[0] = local->tm_year;
  663.   result[1] = local->tm_mon + 1;
  664.   result[2] = local->tm_mday;
  665.   result[3] = local->tm_hour;
  666.   result[4] = local->tm_min;
  667.   result[5] = local->tm_sec;
  669.   /* 
  670.    * Must recalculate proper timezone offset each time,
  671.    * as some files use daylight savings time and some don't... 
  672.    */
  673.   result[6] = local->tm_yday; /* save yday 'cause gmtime zaps it */
  674.   local = gmtime(&crtime);
  675.   local->tm_year -= result[0];
  676.   local->tm_yday -= result[6];
  677.   local->tm_hour -= result[3];
  678.   local->tm_min -= result[4];
  679.   if (local->tm_year < 0) 
  680.     {
  681.       local->tm_yday = -1;
  682.     }
  683.   else 
  684.     {
  685.       if (local->tm_year > 0) local->tm_yday = 1;
  686.     }
  688.   result[6] = -(local->tm_min + 60*(local->tm_hour + 24*local->tm_yday)) / 15;
  690.   return 0;
  691. }
  693. /* hide "./rr_moved" if all its contents are hidden */
  694. static void
  695. hide_reloc_dir()
  696. {
  697. struct directory_entry * s_entry;
  699. for (s_entry = reloc_dir->contents; s_entry; s_entry = s_entry->next) {
  700.     if(strcmp(s_entry->name,".")==0 || strcmp(s_entry->name,"..")==0)
  701. continue;
  703.     if((s_entry->de_flags & INHIBIT_ISO9660_ENTRY) == 0)
  704. return;
  705. }
  707. /* all entries are hidden, so hide this directory */
  708. reloc_dir->dir_flags |= INHIBIT_ISO9660_ENTRY;
  709. reloc_dir->self->de_flags |= INHIBIT_ISO9660_ENTRY;
  710. }
  712. /* get pathnames from the command line, and then from given file */
  713. static char *
  714. FDECL6(get_pnames, int, argc, char **, argv, int, opt, char *, pname, int, pnsize, FILE *, fp)
  715. {
  716. if (opt < argc)
  717.     return (argv[opt]);
  719. if (fp == NULL)
  720.     return ((char *)0);
  722. if (fgets(pname, pnsize, fp)) {
  723. pname[strlen(pname)-1] = ''; /* Discard newline */
  724. return (pname);
  725. }
  726. return ((char *)0);
  727. }
  729. extern char * cdrecord_data;
  731. int FDECL2(main, int, argc, char **, argv){
  732.   struct directory_entry de;
  733. #ifdef HAVE_SBRK
  734.   unsigned long mem_start;
  735. #endif
  736.   struct stat statbuf;
  737.   char * merge_image = NULL;
  738.   struct iso_directory_record * mrootp = NULL;
  739.   struct output_fragment * opnt;
  740.   int longind;
  741.   char shortopts[OPTION_COUNT * 3 + 2];
  742.   struct option longopts[OPTION_COUNT + 1];
  743.   int c;
  744.   char *log_file = 0;
  745.   char * node;
  746.   char *pathnames = 0;
  747.   FILE *pfp = NULL;
  748.   char pname[1024], *arg;
  749.   int no_path_names = 1;
  751. #ifdef __EMX__ 
  752. /* This gives wildcard expansion with Non-Posix shells with EMX */ 
  753. _wildcard(&argc, &argv); 
  754. #endif 
  755. save_args(argc, argv); 
  757.   if (argc < 2) {
  758. #ifdef USE_LIBSCHILY
  759. errmsgno(EX_BAD, "Missing pathspec.n");
  760. #endif
  761. usage(1);
  762.   }
  764.   /* Get the defaults from the .mkisofsrc file */
  765.   read_rcfile(argv[0]);
  767.   outfile = NULL;
  769.   /*
  770.    * Copy long option initialization from GNU-ld.
  771.    */
  772.   /* Starting the short option string with '-' is for programs that
  773.      expect options and other ARGV-elements in any order and that care about
  774.      the ordering of the two.  We describe each non-option ARGV-element
  775.      as if it were the argument of an option with character code 1.  */
  776.   {
  777.     int i, is, il;
  778.     shortopts[0] = '-';
  779.     is = 1;
  780.     il = 0;
  781.     for (i = 0; i < OPTION_COUNT; i++)
  782.       {
  783. if (ld_options[i].shortopt != '')
  784.   {
  785.     shortopts[is] = ld_options[i].shortopt;
  786.     ++is;
  787.     if (ld_options[i].opt.has_arg == required_argument
  788. || ld_options[i].opt.has_arg == optional_argument)
  789.       {
  790. shortopts[is] = ':';
  791. ++is;
  792. if (ld_options[i].opt.has_arg == optional_argument)
  793.   {
  794.     shortopts[is] = ':';
  795.     ++is;
  796.   }
  797.       }
  798.   }
  799. if (ld_options[i].opt.name != NULL)
  800.   {
  801.     longopts[il] = ld_options[i].opt;
  802.     ++il;
  803.   }
  804.       }
  805.     shortopts[is] = '';
  806.     longopts[il].name = NULL;
  807.   }
  809.   while ((c = getopt_long_only (argc, argv, shortopts, longopts, &longind)) != EOF)
  810.     switch (c)
  811.       {
  812.       case 1:
  813. /*
  814.  * A filename that we take as input.
  815.  */
  816. optind--;
  817. goto parse_input_files;
  818.       case 'C':
  819. /*
  820.  * This is a temporary hack until cdrecord gets the proper hooks in
  821.  * it.
  822.  */
  823. cdrecord_data = optarg;
  824. break;
  825.       case OPTION_GUI:
  826. gui++;
  827. break;
  828.       case 'i':
  829. #ifdef USE_LIBSCHILY
  830. comerrno(EX_BAD, "-i option no longer supported.n");
  831. #else
  832. fprintf(stderr, "-i option no longer supported.n");
  833. exit(1);
  834. #endif
  835. break;
  836.       case 'J':
  837. use_Joliet++;
  838. break;
  839.       case 'a':
  840. all_files++;
  841. #ifdef USE_LIBSCHILY
  842. errmsgno(EX_BAD, "Option -a is obsolete. All files are included by default.n");
  843. #else
  844. fprintf(stderr, "Option -a is obsolete. All files are included by default.n");
  845. #endif
  846. break;
  847.       case OPTION_NOBAK:
  848. all_files = 0;
  849. break;
  850.       case 'b':
  851. use_eltorito++;
  852. boot_image = optarg;  /* pathname of the boot image on disk */
  853. if (boot_image == NULL) {
  854. #ifdef USE_LIBSCHILY
  855.         comerrno(EX_BAD, "Required Eltorito boot image pathname missingn");
  856. #else
  857.         fprintf(stderr, "Required Eltorito boot image pathname missingn");
  858. exit(1);
  859. #endif
  860. }
  861. break;
  862.       case 'B':
  863. use_sparcboot++;
  864. scan_sparc_boot(optarg); /* list of pathnames of boot images */
  865. break;
  866.       case 'G':
  867. use_genboot++;
  868. genboot_image = optarg;  /* pathname of the boot image on disk */
  869. if (genboot_image == NULL) {
  870. #ifdef USE_LIBSCHILY
  871.         comerrno(EX_BAD, "Required generic boot image pathname missingn");
  872. #else
  873.         fprintf(stderr, "Required generic boot image pathname missingn");
  874. exit(1);
  875. #endif
  876. }
  877. break;
  878.       case OPTION_SPARCLABEL:
  879. sparc_boot_label(optarg); /* Sun disk label string */
  880. break;
  881.       case 'c':
  882. use_eltorito++;
  883. boot_catalog = optarg;  /* pathname of the boot image on cd */
  884. if (boot_catalog == NULL) {
  885. #ifdef USE_LIBSCHILY
  886.         comerrno(EX_BAD, "Required boot catalog pathname missingn");
  887. #else
  888.         fprintf(stderr, "Required boot catalog pathname missingn");
  889. exit(1);
  890. #endif
  891. }
  892. break;
  893.       case OPTION_ABSTRACT:
  894. abstract = optarg;
  895. if(strlen(abstract) > 37) {
  896. #ifdef USE_LIBSCHILY
  897. comerrno(EX_BAD, "Abstract filename string too longn");
  898. #else
  899. fprintf(stderr, "Abstract filename string too longn");
  900. exit(1);
  901. #endif
  902. };
  903. break;
  904.       case 'A':
  905. appid = optarg;
  906. if(strlen(appid) > 128) {
  907. #ifdef USE_LIBSCHILY
  908. comerrno(EX_BAD, "Application-id string too longn");
  909. #else
  910. fprintf(stderr, "Application-id string too longn");
  911. exit(1);
  912. #endif
  913. };
  914. break;
  915.       case OPTION_BIBLIO:
  916. biblio = optarg;
  917. if(strlen(biblio) > 37) {
  918. #ifdef USE_LIBSCHILY
  919. comerrno(EX_BAD, "Bibliographic filename string too longn");
  920. #else
  921. fprintf(stderr, "Bibliographic filename string too longn");
  922. exit(1);
  923. #endif
  924. };
  925. break;
  926.       case OPTION_COPYRIGHT:
  927. copyright = optarg;
  928. if(strlen(copyright) > 37) {
  929. #ifdef USE_LIBSCHILY
  930. comerrno(EX_BAD, "Copyright filename string too longn");
  931. #else
  932. fprintf(stderr, "Copyright filename string too longn");
  933. exit(1);
  934. #endif
  935. };
  936. break;
  937.       case 'd':
  938. omit_period++;
  939. break;
  940.       case 'D':
  941. RR_relocation_depth = 32767;
  942. break;
  943.       case 'f':
  944. follow_links++;
  945. break;
  946.       case 'l':
  947. full_iso9660_filenames++;
  948. break;
  949.       case 'L':
  950.         allow_leading_dots++;
  951.         break;
  952.      case OPTION_LOG_FILE:
  953. log_file = optarg;
  954. break;
  955.       case 'M':
  956. merge_image = optarg;
  957. break;
  958.       case 'N':
  959. omit_version_number++;
  960. break;
  961.       case OPTION_NO_RR:
  962. no_rr++;
  963. break;
  964.       case 'o':
  965. outfile = optarg;
  966. break;
  967.       case OPTION_P_LIST:
  968. pathnames = optarg;
  969. break;
  970.       case 'p':
  971. preparer = optarg;
  972. if(strlen(preparer) > 128) {
  973. #ifdef USE_LIBSCHILY
  974. comerrno(EX_BAD, "Preparer string too longn");
  975. #else
  976. fprintf(stderr, "Preparer string too longn");
  977. exit(1);
  978. #endif
  979. };
  980. break;
  981.       case OPTION_PRINT_SIZE:
  982. print_size++;
  983. break;
  984.       case 'P':
  985. publisher = optarg;
  986. if(strlen(publisher) > 128) {
  987. #ifdef USE_LIBSCHILY
  988. comerrno(EX_BAD, "Publisher string too longn");
  989. #else
  990. fprintf(stderr, "Publisher string too longn");
  991. exit(1);
  992. #endif
  993. };
  994. break;
  995.       case OPTION_QUIET:
  996. verbose = 0;
  997. break;
  998.       case 'R':
  999. use_RockRidge++;
  1000. break;
  1001.       case 'r':
  1002. rationalize++;
  1003. use_RockRidge++;
  1004. break;
  1005.       case OPTION_SPLIT_OUTPUT:
  1006. split_output++;
  1007. break;
  1008.       case OPTION_SYSID:
  1009. system_id = optarg;
  1010. if(strlen(system_id) > 32) {
  1011. #ifdef USE_LIBSCHILY
  1012. comerrno(EX_BAD, "System ID string too longn");
  1013. #else
  1014. fprintf(stderr, "System ID string too longn");
  1015. exit(1);
  1016. #endif
  1017. };
  1018. break;
  1019.       case OPTION_TRANS_TBL:
  1020. trans_tbl = optarg;
  1021. /* fall through */
  1022.       case 'T':
  1023. generate_tables++;
  1024. break; 
  1025.       case 'U': 
  1026. allow_untranslated++; 
  1027. omit_period++; 
  1028. full_iso9660_filenames++; 
  1029. allow_leading_dots++; 
  1030. omit_version_number++; 
  1031. break;
  1032.       case 'V':
  1033. volume_id = optarg;
  1034. if(strlen(volume_id) > 32) {
  1035. #ifdef USE_LIBSCHILY
  1036. comerrno(EX_BAD, "Volume ID string too longn");
  1037. #else
  1038. fprintf(stderr, "Volume ID string too longn");
  1039. exit(1);
  1040. #endif
  1041. };
  1042. break;
  1043.       case OPTION_VOLSET:
  1044. volset_id = optarg;
  1045. if(strlen(volset_id) > 128) {
  1046. #ifdef USE_LIBSCHILY
  1047. comerrno(EX_BAD, "Volume set ID string too longn");
  1048. #else
  1049. fprintf(stderr, "Volume set ID string too longn");
  1050. exit(1);
  1051. #endif
  1052. };
  1053. break;
  1054.       case OPTION_VOLSET_SIZE:
  1055. volume_set_size = atoi(optarg);
  1056. break;
  1057.       case OPTION_VOLSET_SEQ_NUM:
  1058. volume_sequence_number = atoi(optarg);
  1059. if (volume_sequence_number > volume_set_size) {
  1060. #ifdef USE_LIBSCHILY
  1061. comerrno(EX_BAD, "Volume set sequence number too bign");
  1062. #else
  1063. fprintf(stderr, "Volume set sequence number too bign");
  1064. exit(1);
  1065. #endif
  1066. }
  1067. break;
  1068.       case 'v':
  1069. verbose++;
  1070. break;
  1071.       case 'z':
  1072. #ifdef VMS
  1073. #ifdef USE_LIBSCHILY
  1074. comerrno(EX_BAD, "Transparent compression not supported with VMSn");
  1075. #else
  1076. fprintf(stderr, "Transparent compression not supported with VMSn");
  1077. exit(1);
  1078. #endif
  1079. #else
  1080. transparent_compression++;
  1081. #endif
  1082. break;
  1083.       case 'x':
  1084.       case 'm':
  1085. /*
  1086.  * Somehow two options to do basically the same thing got added somewhere along
  1087.  * the way.  The 'match' code supports limited globbing, so this is the one
  1088.  * that got selected.  Unfortunately the 'x' switch is probably more intuitive.
  1089.  */
  1090.         add_match(optarg);
  1091. break;
  1092.       case OPTION_X_LIST:
  1093. add_list(optarg);
  1094. break;
  1095.       case OPTION_I_HIDE:
  1096. i_add_match(optarg);
  1097. break;
  1098.       case OPTION_I_LIST:
  1099. i_add_list(optarg);
  1100. break;
  1101.       case OPTION_J_HIDE:
  1102. j_add_match(optarg);
  1103. break;
  1104.       case OPTION_J_LIST:
  1105. j_add_list(optarg);
  1106. break;
  1107.       case OPTION_HIDE_TRANS_TBL:
  1108. jhide_trans_tbl++;
  1109. break;
  1110.       case OPTION_HIDE_RR_MOVED:
  1111. hide_rr_moved++;
  1112. break;
  1113.       case OPTION_HELP:
  1114. usage(0);
  1115. break;
  1116.       case OPTION_PVERSION:
  1117. printf("%s (%s-%s-%s)n", version_string, HOST_CPU, HOST_VENDOR, HOST_OS);
  1118. exit (0);
  1119. break;
  1120.       case OPTION_NOSPLIT_SL_COMPONENT:
  1121. split_SL_component = 0;
  1122. break;
  1123.       case OPTION_NOSPLIT_SL_FIELD:
  1124. split_SL_field = 0;
  1125. break;
  1126.       case OPTION_HARD_DISK_BOOT:
  1127. use_eltorito++;
  1128. hard_disk_boot++;
  1129. break;
  1130.       case OPTION_NO_EMUL_BOOT:
  1131. use_eltorito++;
  1132. no_emul_boot++;
  1133. break;
  1134.       case OPTION_NO_BOOT:
  1135. use_eltorito++;
  1136. not_bootable++;
  1137. break;
  1138.       case OPTION_BOOT_LOAD_ADDR:
  1139. use_eltorito++;
  1140. {
  1141. long val;
  1142. char *ptr;
  1144. val = strtol(optarg, &ptr, 0);
  1145. if(*ptr || val < 0 || val >= 0x10000) {
  1146. #ifdef USE_LIBSCHILY
  1147. comerrno(EX_BAD, "Boot image load address invalid.n");
  1148. #else
  1149. fprintf(stderr, "Boot image load address invalid.n");
  1150. exit(1);
  1151. #endif
  1152. }
  1153. load_addr = val;
  1154. }
  1155. break;
  1156.       case OPTION_BOOT_LOAD_SIZE:
  1157. use_eltorito++;
  1158. {
  1159. long val;
  1160. char *ptr;
  1162. val = strtol(optarg, &ptr, 0);
  1163. if(*ptr || val < 0 || val >= 0x10000) {
  1164. #ifdef USE_LIBSCHILY
  1165. comerrno(EX_BAD, "Boot image load size invalid.n");
  1166. #else
  1167. fprintf(stderr, "Boot image load size invalid.n");
  1168. exit(1);
  1169. #endif
  1170. }
  1171. load_size = val;
  1172. }
  1173. break;
  1174.       case OPTION_BOOT_INFO_TABLE:
  1175. use_eltorito++;
  1176. boot_info_table++;
  1177. break;
  1178.       default:
  1179. usage(1);
  1180.       }
  1182. parse_input_files:
  1184.   if( merge_image != NULL )
  1185.     {
  1186.       if (open_merge_image(merge_image) < 0)
  1187. {
  1188.   /*
  1189.    * Complain and die.
  1190.    */
  1191. #ifdef USE_LIBSCHILY
  1192.   comerr("Unable to open previous session image %sn",
  1193.   merge_image);
  1194. #else
  1195.   fprintf(stderr,"Unable to open previous session image %sn",
  1196.   merge_image);
  1197.   exit(1);
  1198. #endif
  1199. }
  1200.     }
  1201. /*
  1202.  * We don't need root privilleges anymore.
  1203.  */
  1204. #ifdef HAVE_SETREUID
  1205. if (setreuid(-1, getuid()) < 0)
  1206. #else
  1207. #ifdef HAVE_SETEUID
  1208. if (seteuid(getuid()) < 0)
  1209. #else
  1210. if (setuid(getuid()) < 0)
  1211. #endif
  1212. #endif
  1213. #ifdef USE_LIBSCHILY
  1214. comerr("Panic cannot set back efective uid.n");
  1215. #else
  1216. {perror("Panic cannot set back efective uid.");exit(1);}
  1217. #endif
  1220. #ifdef no_more_needed
  1221. #ifdef __NetBSD__
  1222.     {
  1223. int resource;
  1224.     struct rlimit rlp;
  1225. if (getrlimit(RLIMIT_DATA,&rlp) == -1) 
  1226. perror("Warning: getrlimit");
  1227. else {
  1228. rlp.rlim_cur=33554432;
  1229. if (setrlimit(RLIMIT_DATA,&rlp) == -1)
  1230. perror("Warning: setrlimit");
  1231. }
  1232. }
  1233. #endif
  1234. #endif /* no_more_needed */
  1235. #ifdef HAVE_SBRK
  1236.   mem_start = (unsigned long) sbrk(0);
  1237. #endif
  1239.   /* if the -hide-joliet option has been given, set the Joliet option */
  1240.   if (!use_Joliet && j_ishidden())
  1241.     use_Joliet++;
  1243.   if(verbose > 1) fprintf(stderr,"%s (%s-%s-%s)n", version_string, HOST_CPU, HOST_VENDOR, HOST_OS);
  1245.   if(cdrecord_data == NULL && merge_image != NULL)
  1246.     {
  1247. #ifdef USE_LIBSCHILY
  1248.       comerrno(EX_BAD, "Multisession usage bug: Must specify -C if -M is used.n");
  1249. #else
  1250.       fprintf(stderr, "Multisession usage bug: Must specify -C if -M is used.n");
  1251.       exit(1);
  1252. #endif
  1253.     }
  1255.   if(cdrecord_data != NULL && merge_image == NULL)
  1256.     {
  1257. #ifdef USE_LIBSCHILY
  1258.       errmsgno(EX_BAD, "Warning: -C specified without -M: old session data will not be merged.n");
  1259. #else
  1260.       fprintf(stderr, "Warning: -C specified without -M: old session data will not be merged.n");
  1261. #endif
  1262.     }
  1264.   /*  The first step is to scan the directory tree, and take some notes */
  1266.   if(!argv[optind]) {
  1267. #ifdef USE_LIBSCHILY
  1268. errmsgno(EX_BAD, "Missing pathspec.n");
  1269. #endif
  1270. usage(1);
  1271.   }
  1273.   if(use_RockRidge){
  1274. #if 1
  1275. extension_record = generate_rr_extension_record("RRIP_1991A",
  1276.        "THE ROCK RIDGE INTERCHANGE PROTOCOL PROVIDES SUPPORT FOR POSIX FILE SYSTEM SEMANTICS",
  1277.        "PLEASE CONTACT DISC PUBLISHER FOR SPECIFICATION SOURCE.  SEE PUBLISHER IDENTIFIER IN PRIMARY VOLUME DESCRIPTOR FOR CONTACT INFORMATION.", &extension_record_size);
  1278. #else
  1279. extension_record = generate_rr_extension_record("IEEE_P1282",
  1280.        "THE IEEE P1282 PROTOCOL PROVIDES SUPPORT FOR POSIX FILE SYSTEM SEMANTICS",
  1281.        "PLEASE CONTACT THE IEEE STANDARDS DEPARTMENT, PISCATAWAY, NJ, USA FOR THE P1282 SPECIFICATION.", &extension_record_size);
  1282. #endif
  1283.   }
  1285.   if (log_file) {
  1286.     FILE *lfp;
  1287.     int i;
  1289.     /* open log file - test that we can open OK */
  1290.     if ((lfp = fopen(log_file, "w")) == NULL) {
  1291. #ifdef USE_LIBSCHILY
  1292.       comerr("can't open logfile: %sn", log_file);
  1293. #else
  1294.       fprintf(stderr,"can't open logfile: %sn", log_file);
  1295.       exit (1);
  1296. #endif
  1297.     }
  1298.     fclose(lfp);
  1300.     /* redirect all stderr message to log_file */
  1301.     fprintf(stderr, "re-directing all messages to %sn", log_file);
  1302.     fflush(stderr);
  1304.     /* associate stderr with the log file */
  1305.     if (freopen(log_file, "w", stderr) == NULL) {
  1306. #ifdef USE_LIBSCHILY
  1307.       comerr("can't open logfile: %sn", log_file);
  1308. #else
  1309.       fprintf(stderr,"can't open logfile: %sn", log_file);
  1310.       exit (1);
  1311. #endif
  1312.     }
  1313.     if(verbose > 1) {
  1314.       for (i=0;i<argc;i++)
  1315.        fprintf(stderr,"%s ", argv[i]);
  1317.       fprintf(stderr,"n%s (%s-%s-%s)n", version_string, HOST_CPU, HOST_VENDOR, HOST_OS);
  1318.     }
  1319.   }
  1321.   /*
  1322.    * Find name of root directory.
  1323.    */
  1324.   node = strchr(argv[optind], '=');
  1325.   if ( node == NULL ) {
  1326.     node = argv[optind];
  1327.   } else {
  1328.     ++node;
  1329.   }
  1331.   /*
  1332.    * See if boot catalog file exists in root directory, if not
  1333.    * we will create it.
  1334.    */
  1335.   if (use_eltorito)
  1336.     init_boot_catalog(node);
  1338.   /*
  1339.    * Find the device and inode number of the root directory.
  1340.    * Record this in the hash table so we don't scan it more than
  1341.    * once.
  1342.    */
  1343.   stat_filter(node, &statbuf);
  1344.   add_directory_hash(statbuf.st_dev, STAT_INODE(statbuf));
  1346.   memset(&de, 0, sizeof(de));
  1348.   de.filedir = root;  /* We need this to bootstrap */
  1350.   if (cdrecord_data != NULL && merge_image == NULL) {
  1351.     /* in case we want to add a new session, but don't want to merge old one */
  1352.     get_session_start(NULL);
  1353.   }
  1355.   if( merge_image != NULL )
  1356.     {
  1357.       mrootp = merge_isofs(merge_image);
  1358.       if( mrootp == NULL )
  1359. {
  1360.   /*
  1361.    * Complain and die.
  1362.    */
  1363. #ifdef USE_LIBSCHILY
  1364.   comerr("Unable to find previous session image %sn",
  1365.   merge_image);
  1366. #else
  1367.   fprintf(stderr,"Unable to find previous session image %sn",
  1368.   merge_image);
  1369.   exit(1);
  1370. #endif
  1371. }
  1373.       memcpy(de.isorec.extent, mrootp->extent, 8);      
  1374.     }
  1376.   /*
  1377.    * Create an empty root directory. If we ever scan it for real, we will fill in the
  1378.    * contents.
  1379.    */
  1380.   find_or_create_directory(NULL, "", &de, TRUE);
  1382.   /* see if we have a list of pathnames to process */
  1383.   if (pathnames) {
  1384. /* "-" means take list from the standard input */
  1385. if (strcmp(pathnames, "-")) {
  1386.     if ((pfp = fopen(pathnames, "r")) == NULL) {
  1387. #ifdef USE_LIBSCHILY
  1388. comerr("Unable to open pathname list %s.n", pathnames);
  1389. #else
  1390. fprintf(stderr, "Unable to open pathname list %s.n", pathnames);
  1391. exit (1);
  1392. #endif
  1393.     }
  1394. }
  1395. else
  1396.     pfp = stdin;
  1397.   }
  1399.   /*
  1400.    * Scan the actual directory (and any we find below it)
  1401.    * for files to write out to the output image.  Note - we
  1402.    * take multiple source directories and keep merging them
  1403.    * onto the image.
  1404.    */
  1405.     while((arg = get_pnames(argc, argv, optind, pname, sizeof(pname), pfp)) != NULL)
  1406.     {
  1407.       struct directory * graft_dir;
  1408.       struct stat        st;
  1409.       char             * short_name;
  1410.       int                status;
  1411.       char   graft_point[1024];
  1413.       /*
  1414.        * We would like a syntax like:
  1415.        *
  1416.        * /tmp=/usr/tmp/xxx
  1417.        *
  1418.        * where the user can specify a place to graft each
  1419.        * component of the tree.  To do this, we may have to create
  1420.        * directories along the way, of course.
  1421.        * Secondly, I would like to allow the user to do something
  1422.        * like:
  1423.        *
  1424.        * /home/baz/RMAIL=/u3/users/baz/RMAIL
  1425.        *
  1426.        * so that normal files could also be injected into the tree
  1427.        * at an arbitrary point.
  1428.        *
  1429.        * The idea is that the last component of whatever is being
  1430.        * entered would take the name from the last component of
  1431.        * whatever the user specifies.
  1432.        *
  1433.        * The default will be that the file is injected at the
  1434.        * root of the image tree.
  1435.        */
  1436.       node = strchr(arg, '=');
  1437.       short_name = NULL;
  1439.       if( node != NULL )
  1440. {
  1441.   char * pnt;
  1442.   char * xpnt;
  1444.   *node = '';
  1445.   strcpy(graft_point, arg);
  1446.   *node = '=';
  1447.   node++;
  1449.   graft_dir = root;
  1450.   xpnt = graft_point;
  1451.   if( *xpnt == PATH_SEPARATOR )
  1452.     {
  1453.       xpnt++;
  1454.     }
  1456.   /*
  1457.    * Loop down deeper and deeper until we
  1458.    * find the correct insertion spot.
  1459.    */
  1460.   while(1==1)
  1461.     {
  1462.       pnt = strchr(xpnt, PATH_SEPARATOR);
  1463.       if( pnt == NULL )
  1464. {
  1465.   if( *xpnt != '' )
  1466.     {
  1467.       short_name = xpnt;
  1468.     }
  1469.   break;
  1470. }
  1471.       *pnt = '';
  1472.       graft_dir = find_or_create_directory(graft_dir, 
  1473.    graft_point, 
  1474.    NULL, TRUE);
  1475.       *pnt = PATH_SEPARATOR;
  1476.       xpnt = pnt + 1;
  1477.     }
  1478. }
  1479.       else
  1480. {
  1481.   graft_dir = root;
  1482.   node = arg;
  1483. }
  1485.       /*
  1486.        * Now see whether the user wants to add a regular file,
  1487.        * or a directory at this point.
  1488.        */
  1489.       status = stat_filter(node, &st);
  1490.       if( status != 0 )
  1491. {
  1492.   /*
  1493.    * This is a fatal error - the user won't be getting what
  1494.    * they want if we were to proceed.
  1495.    */
  1496. #ifdef USE_LIBSCHILY
  1497.   comerr("Invalid node - %sn", node);
  1498. #else
  1499.   fprintf(stderr, "Invalid node - %sn", node);
  1500.   exit(1);
  1501. #endif
  1502. }
  1503.       else
  1504. {
  1505.   if( S_ISDIR(st.st_mode) )
  1506.     {
  1507.       if (!scan_directory_tree(graft_dir, node, &de))
  1508. {
  1509.   exit(1);
  1510. }
  1511.     }
  1512.   else
  1513.     {
  1514.       if( short_name == NULL )
  1515. {
  1516.   short_name = strrchr(node, PATH_SEPARATOR);
  1517.   if( short_name == NULL || short_name < node )
  1518.     {
  1519.       short_name = node;
  1520.     }
  1521.   else
  1522.     {
  1523.       short_name++;
  1524.     }
  1525. }
  1526.       if( !insert_file_entry(graft_dir, node, short_name) )
  1527. {
  1528.  exit(1);
  1529. }
  1530.     }
  1531. }
  1533.       optind++;
  1534.       no_path_names = 0;
  1535.     }
  1537.   if (pfp && pfp != stdin)
  1538.     fclose(pfp);
  1540.   /*
  1541.    * exit if we don't have any pathnames to process - not going to happen
  1542.    * at the moment as we have to have at least one path on the command line
  1543.    */
  1544.   if (no_path_names) {
  1545. #ifdef USE_LIBSCHILY
  1546. errmsgno(EX_BAD, "No pathnames found.n");
  1547. #endif
  1548. usage(1);
  1549.   }
  1551.   /*
  1552.    * Now merge in any previous sessions.  This is driven on the source
  1553.    * side, since we may need to create some additional directories.
  1554.    */
  1555.   if( merge_image != NULL )
  1556.     {
  1557.       if (merge_previous_session(root, mrootp) < 0) {
  1558. #ifdef USE_LIBSCHILY
  1559. comerrno(EX_BAD, "Cannot merge previous session.n");
  1560. #else
  1561. fprintf(stderr, "Cannot merge previous session.n");
  1562. exit(1);
  1563. #endif
  1564.       }
  1565.     }
  1567.   /* hide "./rr_moved" if all its contents have been hidden */
  1568.   if (reloc_dir && i_ishidden())
  1569.     hide_reloc_dir();
  1571.   /* insert the boot catalog if required */
  1572.   if (use_eltorito)
  1573.     insert_boot_cat();
  1575.   /*
  1576.    * Sort the directories in the required order (by ISO9660).  Also,
  1577.    * choose the names for the 8.3 filesystem if required, and do
  1578.    * any other post-scan work.
  1579.    */
  1580.   goof += sort_tree(root);
  1582.   if (goof)
  1583.     {
  1584. #ifdef USE_LIBSCHILY
  1585.       comerrno(EX_BAD, "ISO9660/Rock Ridge tree sort failed.n");
  1586. #else
  1587.       fprintf(stderr, "ISO9660/Rock Ridge tree sort failed.n");
  1588.       exit(1);
  1589. #endif
  1590.     }
  1592.   if( use_Joliet )
  1593.     {
  1594.       goof += joliet_sort_tree(root);
  1595.     }
  1597.   if (goof)
  1598.     {
  1599. #ifdef USE_LIBSCHILY
  1600.       comerrno(EX_BAD, "Joliet tree sort failed.n");
  1601. #else
  1602.       fprintf(stderr, "Joliet tree sort failed.n");
  1603.       exit(1);
  1604. #endif
  1605.     }
  1606.   
  1607.   /*
  1608.    * Fix a couple of things in the root directory so that everything
  1609.    * is self consistent.
  1610.    */
  1611.   root->self = root->contents;  /* Fix this up so that the path 
  1612.    tables get done right */
  1614.   /*
  1615.    * OK, ready to write the file.  Open it up, and generate the thing.
  1616.    */
  1617.   if (print_size){
  1618.   discimage = fopen("/dev/null", "wb");
  1619.   if (!discimage){
  1620. #ifdef USE_LIBSCHILY
  1621.   comerr("Unable to open /dev/nulln");
  1622. #else
  1623.   fprintf(stderr,"Unable to open /dev/nulln");
  1624.   exit(1);
  1625. #endif
  1626.   }
  1627.   } else if (outfile){
  1628.   discimage = fopen(outfile, "wb");
  1629.   if (!discimage){
  1630. #ifdef USE_LIBSCHILY
  1631.   comerr("Unable to open disc image filen");
  1632. #else
  1633.   fprintf(stderr,"Unable to open disc image filen");
  1634.   exit(1);
  1635. #endif
  1636.   };
  1637.   } else {
  1638.   discimage =  stdout;
  1640. #if defined(__CYGWIN32__) || defined(__EMX__)
  1641. setmode(fileno(stdout), O_BINARY);
  1642. #endif
  1643.   }
  1645.   /* Now assign addresses on the disc for the path table. */
  1647.   path_blocks = (path_table_size + (SECTOR_SIZE - 1)) >> 11;
  1648.   if (path_blocks & 1) path_blocks++;
  1650.   jpath_blocks = (jpath_table_size + (SECTOR_SIZE - 1)) >> 11;
  1651.   if (jpath_blocks & 1) jpath_blocks++;
  1653.   /*
  1654.    * Start to set up the linked list that we use to track the
  1655.    * contents of the disc.
  1656.    */
  1657.   if (use_sparcboot)
  1658. outputlist_insert(&sunlabel_desc);
  1659.   if (use_genboot)
  1660. outputlist_insert(&genboot_desc);
  1661.   outputlist_insert(&padblock_desc);
  1663.   /*
  1664.    * PVD for disc.
  1665.    */
  1666.   outputlist_insert(&voldesc_desc);
  1668.   /*
  1669.    * SVD for El Torito. MUST be immediately after the PVD!
  1670.    */
  1671.   if( use_eltorito)
  1672.     {
  1673.       outputlist_insert(&torito_desc);
  1674.     }
  1676.   /*
  1677.    * SVD for Joliet.
  1678.    */
  1679.   if( use_Joliet)
  1680.     {
  1681.       outputlist_insert(&joliet_desc);
  1682.     }
  1684.   /*
  1685.    * Finally the last volume desctiptor.
  1686.    */
  1687.   outputlist_insert(&end_vol);
  1690.   outputlist_insert(&pathtable_desc);
  1691.   if( use_Joliet)
  1692.     {
  1693.       outputlist_insert(&jpathtable_desc);
  1694.     }
  1696.   outputlist_insert(&dirtree_desc);
  1697.   if( use_Joliet)
  1698.     {
  1699.       outputlist_insert(&jdirtree_desc);
  1700.     }
  1702.   outputlist_insert(&dirtree_clean);
  1704.   if(extension_record) 
  1705.     { 
  1706.       outputlist_insert(&extension_desc);
  1707.     }
  1709.   outputlist_insert(&files_desc);
  1711.   /*
  1712.    * Allow room for the various headers we will be writing.  There
  1713.    * will always be a primary and an end volume descriptor.
  1714.    */
  1715.   last_extent = session_start;
  1716.   
  1717.   /*
  1718.    * Calculate the size of all of the components of the disc, and assign
  1719.    * extent numbers.
  1720.    */
  1721.   for(opnt = out_list; opnt; opnt = opnt->of_next )
  1722.     {
  1723.       if( opnt->of_size != NULL )
  1724. {
  1725.   (*opnt->of_size)(last_extent);
  1726. }
  1727.     }
  1729.   /*
  1730.    * Generate the contents of any of the sections that we want to generate.
  1731.    * Not all of the fragments will do anything here - most will generate the
  1732.    * data on the fly when we get to the write pass.
  1733.    */
  1734.   for(opnt = out_list; opnt; opnt = opnt->of_next )
  1735.     {
  1736.       if( opnt->of_generate != NULL )
  1737. {
  1738.   (*opnt->of_generate)();
  1739. }
  1740.     }
  1741.   c = 0;
  1742.   if (use_sparcboot) {
  1743. c = make_sun_label();
  1744. outputlist_insert(&sunboot_desc);
  1745.   }
  1747.   if( in_image != NULL )
  1748.     {
  1749.       fclose(in_image);
  1750.     }
  1752.   if( print_size > 0 )
  1753.     {
  1754.       fprintf(stderr,"Total extents scheduled to be written = %dn", 
  1755.       (last_extent - session_start) + c);
  1756. exit(0);
  1757.     }
  1758.   /*
  1759.    * Now go through the list of fragments and write the data that corresponds to
  1760.    * each one.
  1761.    */
  1762.   for(opnt = out_list; opnt; opnt = opnt->of_next )
  1763.     {
  1764.       if( opnt->of_write != NULL )
  1765. {
  1766.   (*opnt->of_write)(discimage);
  1767. }
  1768.     }
  1770.   if( verbose > 0 )
  1771.     {
  1772. #ifdef HAVE_SBRK
  1773.       fprintf(stderr,"Max brk space used %xn", 
  1774.       (unsigned int)(((unsigned long)sbrk(0)) - mem_start));
  1775. #endif
  1776.       fprintf(stderr,"%d extents written (%d Mb)n", last_extent, last_extent >> 9);
  1777.     }
  1779. #ifdef VMS
  1780.   return 1;
  1781. #else
  1782.   return 0;
  1783. #endif
  1784. }
  1786. void *
  1787. FDECL1(e_malloc, size_t, size)
  1788. {
  1789. void* pt = 0;
  1790. if( (size > 0) && ((pt=malloc(size))==NULL) ) {
  1791. #ifdef USE_LIBSCHILY
  1792. comerr("Not enough memoryn");
  1793. #else
  1794. fprintf(stderr, "Not enough memoryn");
  1795. exit (1);
  1796. #endif
  1797. }
  1798. return pt;
  1799. }