[TUHS] Extracting files from various old dump/restore tapes

[Jan-Benedict Glaw]

On Wed, 2022-09-14 17:48:56 +0000, Lars Brinkhoff <lars at nocrew.org> wrote:
> Lars Brinkhoff wrote:
> > In the end I decided to roll my own rather than port an old version of
> > restore forward and possibly merge in a few other versions.
> 
> Now available from here:
> 
> https://github.com/larsbrinkhoff/tools-for-unusual-tape-formats

Here's some stuff to build it, at least on my side.

  * -Ilibword does not exist
  * Seems `classify-tape.c` got renamed to `classify.c`
  * read_32bits_l() is unused and produces a warning

Thanks! I'll include that into my autobuilder.

MfG, JBG



diff --git a/Makefile b/Makefile
index fca9d3c..ae61913 100644
--- a/Makefile
+++ b/Makefile
@@ -1,5 +1,5 @@
 
-CFLAGS = -g -W -Wall -Ilibword
+CFLAGS = -g -W -Wall
 
 TOOLS =	cpio classify restore
 
@@ -8,7 +8,7 @@ all: $(TOOLS)
 clean:
 	rm -f $(TOOLS) *.o
 
-classify: classify-tape.o tape-image.o
+classify: classify.o tape-image.o
 	$(CC) $(CFLAGS) $^ -o $@
 
 cpio: cpio.o mkdirs.o
diff --git a/classify.c b/classify.c
index 8f81213..2843164 100644
--- a/classify.c
+++ b/classify.c
@@ -43,12 +43,6 @@ read_16bits_l (uint8_t *start)
   return start[0] | (start[1] << 8);
 }
 
-static uint32_t
-read_32bits_l (uint8_t *start)
-{
-  return read_16bits_l (start) | (read_16bits_l (start + 2) << 16);
-}
-
 static word_t
 read_36bits (uint8_t *x)
 {

-- 
-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 195 bytes
Desc: not available
URL: <http://minnie.tuhs.org/pipermail/tuhs/attachments/20220914/30fde82b/attachment.sig>