Tue Sep 16 15:34:21 1997 Thomas Bushnell, n/BSG <thomas@gnu.ai.mit.edu>

	* rr.c (gnuext_live): New variable.
	(rrip_work): Comprehend AU, TR, MD, and FL, all as GNU
	extensions.  Recognize GNU extension id field when processing ER
	fields.
	(release_rrip): Free RR->trans if it's live.
	* inode.c (read_disknode): Interpret and install the values set by
	AU, TR, MD, and FL extensions.
	(diskfs_node_norefs): Free NP->translator if it's set.
	* isofs.h (struct disknode): New members `translen' and
	`translator'.
	* rr.h (struct gn_au, struct gn_tr, struct gn_md, struct gn_fl):
	New strucures.
	(GNUEXT_SRC, GNUEXT_DES, GNUEXT_ID, GNUEXT_VERS): New macros.
	(struct rrip_lookup): New members author, translen, trans,
	allmode, flags.
	(VALID_AU, VALID_TR, VALID_MD, VALID_FL): New macros.

	* Makefile (DIST_FILES): Add, referring to EXTENSIONS.
	* EXTENSIONS: New file.

1 files changed, 68 insertions, 25 deletions

diff --git a/isofs/rr.c b/isofs/rr.c
index 3f2ad300..f7b7f53a 100644
--- a/isofs/rr.c
+++ b/isofs/rr.c
@@ -27,6 +27,7 @@
 /* These tell whether the specified extensions are on or not. */
 int susp_live = 0;
 int rock_live = 0;
+int gnuext_live = 0;
 
 /* How far to skip when reading SUSP fields. */
 int susp_skip = 0;
@@ -38,6 +39,8 @@ release_rrip (struct rrip_lookup *rr)
     free (rr->name);
   if ((rr->valid & VALID_SL) && rr->target)
     free (rr->target);
+  if ((rr->valid & VALID_TR) && rr->trans)
+    free (rr->trans);
 }
 
 
@@ -186,35 +189,20 @@ rrip_work (struct dirrect *dr, struct rrip_lookup *rr,
 	  struct su_er *er = body;
 	  char *c;
 
-	  /* The only extension we currently support is Rock-Ridge. */
-	  
 	  /* Make sure the ER field is valid */
 	  if ((void *) er->more + er->len_id + er->len_des + er->len_src
 	      < terminus)
-	    goto nomatch;
-	  
-	  if (er->ext_ver != ROCK_VERS)
-	    goto nomatch;
+	    goto next_field;
 	  
-	  c = er->more;
-	  if (memcmp (ROCK_ID, c, er->len_id))
-	    goto nomatch;
-
-	  /* At this point we know we have Rock-Ridge, but
-	     we check these and moan about it if they are wrong. */
-
-	  c += er->len_id;
-	  if (memcmp (ROCK_DES, c, er->len_des))
-	    fprintf (stderr, "isofs warning: Rock-Ridge extension description is not standard: %s\n", c);
-
-	  c += er->len_des;
-	  if (memcmp (ROCK_SRC, c, er->len_src))
-	    fprintf (stderr, "isofs warning: Rock-Ridge extensions source is not standard: %s\n", c);
-
-	  rock_live = 1;
-
-	nomatch:
-	  goto next_field;
+	  /* Check for rock-ridge */
+	  if (er->ext_ver == ROCK_VERS
+	      && !memcmp (ROCK_ID, er->more, er->lenid))
+	    rock_live = 1;
+
+	  /* Check for Gnuext */
+	  else if (er->ext_ver == GNUEXT_VERS
+		   && !memcmp (GNUEXT_ID, er->more, er->lenid))
+	    gnuext_live = 1;
 	}
 
       /* PD fields are padding and just get ignored. */
@@ -554,6 +542,61 @@ rrip_work (struct dirrect *dr, struct rrip_lookup *rr,
 	  goto next_field;
 	}
 
+      /* The rest are GNU ext. */
+      if (!gnuext_live)
+	goto next_field;
+
+      /* Author */
+      if (susp->sig[0] == 'A'
+	  && susp->sig[1] == 'U'
+	  && susp->version == 1)
+	{
+	  struct gn_au *au = body;
+
+	  rr->author = isonum_733 (au->author);
+	  rr->valid |= VALID_AU;
+
+	  goto next_field;
+	}
+      
+      if (susp->sig[0] == 'T'
+	  && susp->sig[1] == 'R'
+	  && susp->version == 1)
+	{
+	  struct gn_tr *tr = body;
+	  
+	  rr->translen = tr->len;
+	  rr->trans = malloc (rr->translen);
+	  memcpy (tr->data, rr->trans, rr->translen);
+	  rr->valid |= VALID_TR;
+	  
+	  goto next_field;
+	}
+      
+      if (susp->sig[0] == 'M'
+	  && susp->sig[1] == 'D'
+	  && susp->version == 1)
+	{
+	  struct gn_md *md = body;
+
+	  rr->allmode = isonum_733 (md->mode);
+	  rr->valid |= VALID_MD;
+	  
+	  goto next_field;
+	}
+      
+      if (susp->sig[0] == 'F'
+	  && susp->sig[1] == 'L'
+	  && susp->version == 1)
+	{
+	  struct gn_fl *fl = body;
+	  
+	  rr->flags = isonum_733 (fl->flags);
+	  rr->valid |= VALID_FL;
+	  
+	  goto next_field;
+	}
+
     next_field:
       bp = bp + susp->len;
     }