Flexible Array Member/fr

C'est une caractéristique rarement utilisée en langage C. Elle a été introduite avec la norme C99. Elle n'a jamais été adoptée par le compilateur C++ (et cela pourrait être la raison de la rare utilisation). Quelques API à la C pourrait bénéficier de cette caractéristique, en particulier celles de bas niveau.

Contents

• 1 Introduction
• 2 Pascal
  • 2.1 Adressage direct
  • 2.2 Utilisation d'enregistrement supplémentaire
  • 2.3 Utilisation d'enegistrement avancé
• 3 Voir aussi

Introduction

Avertissement: cette section est à peu près un copier-coller de l'article Wikipedia

Le membre tableau flexible est un membre de struct, qui est un tableau sans dimension spécifiée. Il doit être le dernier membre d'un tel struct et doit être acompagné d'au moins un autre membre, comme dans l'exemple suivant:

typedef struct mystruct
    {
      DWORD a;
      DWORD b;
      DWORD c[]; // le membre tableau flexible doit être le dernier
    };

Généralement,de tels struct servent d'entête dans une plus large allocation mémoire variable:

struct mystruct* st= malloc(...);
    ...
    for (int i = 0; i < st->b; i++)
         st->c[i] = ...;

L'operateur sizeof sur un tel struct donne la taille du struct comme si le membre tableau flexible était vide. Cela peut inclure un rembourrage ajouté pour accueillir l'élément flexible ; le compilateur est également libre de réutiliser ce remplissage dans le cadre du tableau lui-même.

Il est courant d'allouer sizeof(struct) + array_len*sizeof(array element) octets.

Pascal

Pascal n'a pas de membre de tableau flexible, donc la structure doit être déclarée sans le membre supplémentaire, afin que sizeof(mystruct) renvoie la même valeur qu'en C.

type
      mystruct = record
        a : DWORD;
        b : DWORD;
      end;
      pmystruct = ^mystruct;

Il existe quelques options pour accéder aux éléments supplémentaires :

Adressage direct

En obtenant explicitement l'adresse qui suit la structure d'en-tête

var
     i   : integer;
     buf : Pmystruct;
     c   : PDword;
    begin
      GetMem(buf, sizeof(mystruct)+ extrasize);
      ...
      c:=Pointer(buf)+sizeof(mystruct);
      
      for i := 0 to buf.b-1 do
         c[i] := ...;

Utilisation d'enregistrement supplémentaire

Selon l'utilisation, l'enregistrement supplémentaire pourrait chevaucher l'enregistrement d'origine en utilisant absolute.

type
      mystructEx = record
        hdr : mystruct;
        c : PDword;
      end;
      pmystructEx = ^mystructEx;
    
    
    var
     i   : integer;
     buf : PmystructEx;
    begin
      GetMem(buf, sizeof(mystruct)+ extrasize);
      
      for i := 0 to buf.hdr.b-1 do
         buf.c[i] := ...;

Utilisation d'enegistrement avancé

Les enregistrements avancés permettent d'utiliser des méthodes et des propriétés pour les enregistrements. Ainsi, le champ pourrait être émulé via une méthode/propriété

{$modeswitch advancedrecords}
    
    type
      mystruct = packed record
        a,b: DWORD;
        function c: PDWORD; inline;
      end;
     
    function mystruct.c: PDWORD;
    begin
      Result := PDWORD(pbyte(@self.b)+sizeOf(self.b));
    end;

OU en utilisant un enregistrement vide. (Un enregistrement vide n'a pas de structure, mais permet d'obtenir une adresse, ce qui devrait faire gagner du temps sur le calcul de l'adresse)

{$modeswitch advancedrecords}
    
    type
      mystruct = packed record
        a,b: DWORD;
        function c: PDWORD; inline;
      strict private
        cStart: record end;
      end;
     
    function mystruct.c: PDWORD;
    begin
      Result := PDWORD(@cStart);
    end;

Voir aussi

• https://forum.lazarus.freepascal.org/index.php/topic,45998.0.html - fil de discussion original qui a commencé la discussion
• https://en.wikipedia.org/wiki/Flexible_array_member - article wikipedia sur les membres tableau flexible.
• Problèmes courants lors de la conversion des fichiers d'entête C

From the Free Pascal wiki, page "Flexible Array Member/fr", as the Internet Archive kept it on 2022-10-06. Copyright stays with the author who wrote it, according to the old wiki's Licensing page. If you have concerns about this material, message the admin.