Compact Disc Audio track

La taille d'un fichier CDA étant fixe, ainsi que son organisation, il n'y a toujours qu'un seul et unique chunk, nommé "CDDA" (signifiant Compact Disc for Digital Audio).

L'identifiant créé par Windows est utilisé par le lecteur de CD de Windows 95 et Windows 98 (cdplayer.exe). Ce lecteur ne sait pas se connecter à FreeDB ou CDDB. Pour qu'il puisse afficher le nom de l'artiste et le titre des morceaux, il faut entrer manuellement ces informations dans le fichier cdplayer.ini (dans le répertoire d'installation de Windows), dans une section nommée d'après cet identifiant. Cet identifiant n'a aucun rapport avec le DiscId utilisé par FreeDB ou CDDB, c'est une création purement Microsoft, pour l'usage précité.

La position et la longueur des plages utilisent des frames comme unité. Il y a 75 frames par seconde. C'est le plus petit bloc de données qui peut être lu depuis un CD audio, correspondant à un secteur du CD.

Toutes les informations qui nécessitent plusieurs octets sont codées avec l'order-byte Intel (petit boutiste).

Le programme de démonstration fourni est un script Perl. Il faut lancer le script avec un paramètre : le chemin vers le répertoire ou le disque contenant les fichiers CDA.

#! /bin/perl -w 
 
use strict;

my $path_cda;	# chemin vers les CDA (paramètre du script)
my $data_cda;	# contenu d'un fichier CDA
my @liste_cda;	# la liste des fichiers CDA du répertoire
my $fic_cda;	# le nom du fichier CDA courant
my $mins;
my $secs;
my $frames;

# tester qu'un argument a été fourni 
$path_cda = shift;
die("argument: le nom du répertoire") if (!defined($path_cda));

# ouvrir, lire, puis refermer le fichier CDA 
opendir(DIR_CDA, $path_cda) or die ("impossible d'ouvrir le répertoire $path_cda");
@liste_cda = grep /.*cda$/i, readdir(DIR_CDA);
closedir(DIR_CDA);

print "plage début   durée   début                  durée\n";
print "      frames  frames  min:sec:frm            min:sec:frm\n";
foreach $fic_cda (@liste_cda)
{
    # charger le contenu du fichier CDA dans une variable
    open(CDA,  "<:raw", $path_cda.$fic_cda) or die("impossible d'ouvrir le fichier $fic_cda");
    $data_cda = <CDA>;
    close(CDA);
    
    # vérifier la taille du fichier, et le header
    die "taille invalide" if (length($data_cda) != 44);
    die "entête invalide" if (substr($data_cda, 0, 0x0f) ne "RIFF\$\x00\x00\x00CDDAfmt");
    
    # afficher le numéro de la plage
    printf sprintf("%02d    ", ord(substr($data_cda, 0x16, 1)));
    
    # afficher les informations sur la plage : position en frames
    $frames = unpack("V", substr($data_cda, 0x1c, 4));
    printf sprintf("%06d  ", $frames);
    
    # afficher les informations sur la plage : durée en frames
    $frames = unpack("V", substr($data_cda, 0x20, 4));
    printf sprintf("%06d  ", $frames);
    
    # afficher les informations sur la plage : position min:sec:frames
    ($frames, $secs, $mins) = unpack("CCC", substr($data_cda, 0x24, 3));
    printf sprintf("%02d:%02d:%02d = %06d frm  ", $mins, $secs, $frames, ((($mins * 60) + $secs) * 75) + $frames);
    
    # afficher les informations sur la plage : durée min:sec:frames
    ($frames, $secs, $mins) = unpack("CCC", substr($data_cda, 0x28, 3));
    printf sprintf("%02d:%02d:%02d = %06d frm", $mins, $secs, $frames, ((($mins * 60) + $secs) * 75) + $frames);
    
    print "\n";
}

Dans les colonnes affichant la position et la durée au format minutes:secondes:frames, le script ajoute le nombre de frames équivalent à cette durée. La position dans les deux systèmes devrait être identique. Dans la pratique on observe pourtant une différence de 150 frames, correspondant aux 2 secondes de prégap (voir le Red Book).

plage début   durée   début                  durée                   durée pochette
      frames  frames  min:sec:frm            min:sec:frm
01    000032  017015  00:02:32 = 000182 frm  03:46:65 = 017015 frm   3:46
02    017047  022780  03:49:22 = 017197 frm  05:03:55 = 022780 frm   5:03
03    039827  017398  08:53:02 = 039977 frm  03:51:73 = 017398 frm   3:51
04    057225  021387  12:45:00 = 057375 frm  04:45:12 = 021387 frm   4:45
05    078612  014570  17:30:12 = 078762 frm  03:14:20 = 014570 frm   3:14
06    093182  020045  20:44:32 = 093332 frm  04:27:20 = 020045 frm   4:27
07    113227  018970  25:11:52 = 113377 frm  04:12:70 = 018970 frm   4:12
08    132197  021068  29:24:47 = 132347 frm  04:40:68 = 021068 frm   4:40
09    153265  028952  34:05:40 = 153415 frm  06:26:02 = 028952 frm   6:26