Installation d'Unix version 7 sur PDP-11 via l'émulateur SimH

Prérequis pour installer Unix version 7

Vous aurez besoin du logiciel gzip pour la décompression.
D'un éditeur de texte de votre choix.
D'un interpréteur perl pour créer la bande d'installation via le fichier mkdisttap.pl pour la V7.
De l'émulateur SimH.
Des sets d'Unix version 7 (V7) qui sont les suivants :
- f0.gz
- f1.gz
- f2.gz
- f3.gz
- f4.gz
- f5.gz
- f6.gz

Installation, configuration et téléchargement des éléments nécessaires

Installation des logiciels nécessaires

Installation des logiciels sous Debian :

sudo apt install perl gzip vim wget simh

Installation des logiciels sous FreeBSD :

sudo pkg install perl vim wget open-simh

Choisissez l'éditeur de texte de votre choix, vim n'est pas forcément l'idéal pour tout le monde.

J'ai constaté que le paquet simh a été retiré de Debian 13. Si souhaitez récupérer et installer le paquet .deb faîtes ceci :

wget http://ftp.fr.debian.org/debian/pool/main/s/simh/simh_3.8.1-6.1_amd64.deb

puis :

sudo dpkg -i simh_3.8.1-6.1_amd64.deb && sudo apt-get -f install

.

Construction des répertoires pour Unix version 7 et téléchargement de ses sets

Création répertoires pour la V7 :

mkdir -p emulateur/simh/Unix-V7

Se rendre dans le répertoire Unix-V7 :

cd emulateur/simh/Unix-V7/

Téléchargement des sets de la V7 :

wget -r -np https://www.tuhs.org/Archive/Distributions/Research/Keith_Bostic_v7/

Déplacer les sets dans le répertoire courant :

mv -v www.tuhs.org/Archive/Distributions/Research/Keith_Bostic_v7/f*.gz .

Suppression du répertoire www.tuhs.org devenu inutile :

rm -rf www.tuhs.org/

Décompression des sets et création de la bande Unix version 7

Décompression des sets avec gzip :

gzip -d *.gz

Fichier perl pour créer la bande :

mkdisttap.pl

#!/usr/local/bin/perl -w
use strict;
 
# Based on mkdisttap.pl
# ftp://ftp.mrynet.com/pub/os/PUPS/PDP-11/Boot_Images/2.11_on_Simh/211bsd/mkdisttap.pl
 
#
# $Id: mkdisttap.pl,v 1.1 2006/09/16 23:33:46 kirk Exp kirk $
#
 
# Based on the example in the HOWTO using dd.  Does not work!
# add_file("cat mtboot mtboot boot |", 512);
 
# Based on the maketape.c program and the maketape.data data file.
add_file("f0", 512);
end_file();
add_file("f1", 512);
end_file();
add_file("f2", 512);
end_file();
add_file("f3", 512);
end_file();
add_file("f4", 512);
end_file();
add_file("f5", 10240);
end_file();
add_file("f6", 10240);
end_file();
end_file();
 
sub end_file {
  print "\x00\x00\x00\x00";
}
 
sub add_file {
  my($filename, $blocksize) = @_;
  my($block, $bytes_read, $length);
 
  open(FILE, $filename) || die("Can't open $filename: $!");
  while($bytes_read = read(FILE, $block, $blocksize)) {
    if($bytes_read < $blocksize) {
      $block .= "\x00" x ($blocksize - $bytes_read);
      $bytes_read = $blocksize;
    }
    $length = pack("V", $bytes_read);
    print $length, $block, $length;
  }
  close(FILE);
}

Sous GNU/Linux il faut modifier le shebang (première ligne du fichier) #!/usr/local/bin/perl -w par #!/usr/bin/perl -w du fichier mkdisttap.pl.

Création du fichier mkdisttap.pl afficher ci-dessus avec votre éditeur de texte préféré :

vim mkdisttap.pl

ou :

nano mkdisttap.pl

Rendre le script perl mkdisttap.pl exécutable :

chmod 755 mkdisttap.pl

Création de la bande d'installation pour la V7 :

./mkdisttap.pl > v7.tap

Suppression des fichiers devenus inutiles :

rm f* mkdisttap.pl