partie 2 :DeCompression :
Décompression du fichier pour le codage RLE
function lecture_fichier_rle(nom_image,fichier)
%Décompresser fichier RLE
file=fopen(fichier);
i=1;comp=0;
[A,count]=fread(file,i);
comp=comp+count;
i=2;
while count~=0
[A,count]=fread(file,i);
comp=comp+count; %nombre d'éléments dans le fichier
i=i+1;
end
file2=fopen(fichier);
vecteur=char(fread(file2,comp));
vecteur=vecteur'; % Stocker les éléments dans un vecteur
code=vecteur;
code=code(1:end-1);
code_cell=tab_to_cell (code);
%Extraction de la qualité
code=code(1:end-1);
i=0;k=length(code);
while ~strcmp(code(k),' ')
i=i+1; k=k-1;
end % end while
qualite=code(length(code)-i+1:length(code));
% vérification de validité de la qualité avant traitement
for k=1:length(qualite)
if ~isdigit (qualite(k))
qualite=qualite(1:k-1); break;
end
end
qualite=str2num(qualite);
code_cell{end+1}=qualite;
load fichiers_mat/option
decompression_jpeg (code_cell,nom_image,option);