En aquest tema, aprendrem com gestionar arxius en Ada. La gestió d'arxius és una part fonamental de moltes aplicacions, ja que permet emmagatzemar i recuperar dades de manera persistent. Ada proporciona una sèrie de paquets i subprogrames per treballar amb arxius de manera eficient i segura.

Continguts

  1. Introducció a la Gestió d'Arxius
  2. Tipus d'Arxius en Ada
  3. Operacions Bàsiques amb Arxius
  4. Exemple Pràctic: Lectura i Escriptura d'Arxius de Text
  5. Exercicis Pràctics

  1. Introducció a la Gestió d'Arxius

Ada ofereix diversos paquets per treballar amb arxius, sent els més comuns Ada.Text_IO per a arxius de text i Ada.Streams per a arxius binaris. En aquest tema, ens centrarem principalment en la gestió d'arxius de text.

  1. Tipus d'Arxius en Ada

Ada classifica els arxius en diferents tipus segons el seu contingut i la manera en què es gestionen:

  • Arxius de Text: Utilitzats per llegir i escriure dades en format de text.
  • Arxius Binari: Utilitzats per llegir i escriure dades en format binari.
  • Arxius de Flux: Utilitzats per gestionar fluxos de dades.

  1. Operacions Bàsiques amb Arxius

3.1 Obrir i Tancar Arxius

Per treballar amb arxius, primer hem d'obrir-los i, un cop acabem, tancar-los. A continuació es mostra com fer-ho amb arxius de text:

with Ada.Text_IO; use Ada.Text_IO;

procedure File_Handling is
   File : File_Type;
begin
   -- Obrir l'arxiu en mode d'escriptura
   Open (File, Out_File, "example.txt");

   -- Escriure dades a l'arxiu
   Put_Line (File, "Hola, món!");

   -- Tancar l'arxiu
   Close (File);
end File_Handling;

3.2 Lectura i Escriptura d'Arxius

Escriptura

Per escriure dades a un arxiu de text, utilitzem subprogrames com Put i Put_Line:

with Ada.Text_IO; use Ada.Text_IO;

procedure Write_To_File is
   File : File_Type;
begin
   Open (File, Out_File, "example.txt");
   Put_Line (File, "Aquesta és una línia de text.");
   Close (File);
end Write_To_File;

Lectura

Per llegir dades d'un arxiu de text, utilitzem subprogrames com Get i Get_Line:

with Ada.Text_IO; use Ada.Text_IO;

procedure Read_From_File is
   File : File_Type;
   Line : String (1 .. 100);
   Last : Natural;
begin
   Open (File, In_File, "example.txt");
   Get_Line (File, Line, Last);
   Put_Line (Line (1 .. Last));
   Close (File);
end Read_From_File;

  1. Exemple Pràctic: Lectura i Escriptura d'Arxius de Text

A continuació, es mostra un exemple complet que combina la lectura i escriptura d'arxius de text:

with Ada.Text_IO; use Ada.Text_IO;

procedure File_Example is
   File : File_Type;
   Line : String (1 .. 100);
   Last : Natural;
begin
   -- Escriure a l'arxiu
   Open (File, Out_File, "example.txt");
   Put_Line (File, "Aquesta és una línia de text.");
   Close (File);

   -- Llegir de l'arxiu
   Open (File, In_File, "example.txt");
   Get_Line (File, Line, Last);
   Put_Line (Line (1 .. Last));
   Close (File);
end File_Example;

  1. Exercicis Pràctics

Exercici 1: Escriure i Llegir un Arxiu de Text

Objectiu: Escriure un programa que escrigui diverses línies de text a un arxiu i després les llegeixi i les mostri per pantalla.

Instruccions:

  1. Escriu un programa que obri un arxiu en mode d'escriptura.
  2. Escriu tres línies de text a l'arxiu.
  3. Tanca l'arxiu.
  4. Obre l'arxiu en mode de lectura.
  5. Llegeix les línies de text i mostra-les per pantalla.
  6. Tanca l'arxiu.

Solució:

with Ada.Text_IO; use Ada.Text_IO;

procedure File_Exercise is
   File : File_Type;
   Line : String (1 .. 100);
   Last : Natural;
begin
   -- Escriure a l'arxiu
   Open (File, Out_File, "exercise.txt");
   Put_Line (File, "Primera línia de text.");
   Put_Line (File, "Segona línia de text.");
   Put_Line (File, "Tercera línia de text.");
   Close (File);

   -- Llegir de l'arxiu
   Open (File, In_File, "exercise.txt");
   while not End_Of_File (File) loop
      Get_Line (File, Line, Last);
      Put_Line (Line (1 .. Last));
   end loop;
   Close (File);
end File_Exercise;

Conclusió

En aquest tema, hem après com gestionar arxius en Ada, incloent-hi com obrir, tancar, llegir i escriure arxius de text. La gestió d'arxius és una habilitat essencial per a qualsevol programador, ja que permet emmagatzemar i recuperar dades de manera persistent. Amb els coneixements adquirits, estàs preparat per gestionar arxius en els teus propis projectes.

En el següent tema, explorarem com interfaciarnos amb altres llenguatges de programació des d'Ada.

© Copyright 2024. Tots els drets reservats