CGI Web Programming/fr

Ceci est le début d'un tutorial relatif à la programmation cgi web. A remarquer que l'utilisation d'un cadre d'application (framework) sera sans doute plus productif. Tout le monde est invité à contribuer.

A propos de CGI

CGI (Common Gateway Interface) fonctionne simplement comme ceci :

Nous avons deux ordinateurs :

• Ordinateur serveur - Cet ordinateur stockera les fichiers hébergés (pages web, images et CGI);
• Ordinateur client - En général, cet ordinateur utilise un navigateur pour demander les fichiers hébergés sur l'ordinateur serveur.

Vous pouvez employer les CGI seulement si votre serveur d'hébergement supporte les CGI. Après avoir hébergé vos fichiers, le CGI est généralement utilisé ainsi : **http://www.yourserver.com\[.xx\]/yourlogin/cgi-bin/cginame.exe**

Notes:

• Le fichier CGI n'a pas besoin de l'extension .exe.
• Le CGI devra être (évidemment) compilé pour la plateforme de l'ordinateur serveur (Linux, Windows ...)

A propos des CGI FreePascal et comment tester vos CGI

Un CGI Free Pascal est un programme exécutable normal, comme tout programme sur votre ordinateur. Contrairement aux CGI en Perl, un CGI Free Pascal n'est pas interprété. C'est un programme exécutable indépendant.

Pour tester un CGI, vous devez avoir installé sur votre ordianteur un serveur HTTP avec support pour les CGI. Un bon, et recommandé, serveur HTTP est Apache, disponible pour Windows et Linux. Un autre serveur HTTP est Xitami qui supporte les CGI en perl et les 16bits (mais Xitami est vraiment archaïque).

Un exemple simple

Ceci est un exemple de programme CGI minimal de démonstration...

1. Définir un cookie
2. Préciser le type de contenu (c-à-d prévoir que le contenu devra être du texte pour HTTP)
3. Lire les Cookies
4. Lire les données du formulaire via GET
5. Lire les données du formulaire via POST

program mini;

uses dos;

var
  a:string;
  c:char;
begin
  // set a cookie (must come before content-type line below)
  // don't forget to change the expires date
writeln('Set-cookie:widget=value; path=/; expires= Mon, 21-Mar-2005  18:37:00 GMT');

  // output legal http page
  writeln('Content-Type:text/html',#10#13);

  // demonstrate get cookies
  a:= GetEnv('HTTP_COOKIE');
  writeln('cookies:',a);
  
  // demonstrate GET result
  a:='';
  a:= GetEnv('QUERY_STRING');
  writeln('GET: ',a);
    
  // demonstrate POST result 
  a:='';
  while not eof(input) do
  begin
     read(c);
     a:= a+c;
  end;   
  writeln('POST: ',a);
end.

Un simple compteur de visites

L'application hitcounter présente un simple compteur de visite pour votre site web. Il est possible d'entrer des listes de blocages dans un fichier de configuration. Ainsi, les robots et votre propre ordinateur pourront être exclus des statistiques. Il y a encore beaucoup d'améliorations possibles bien sûr, comme un cookie afin que vous obteniez un seul hit par session, mais il donne une bonne introduction à la programmation CGI. Si vous utilisez le code et le modifiez, s'il vous plaît envoyez-moi un patch pour que je puisse le mettre à jour.

Vous pouvez trouver le code ici : 1

Débogage de CGI

Parce qu'une application CGI n'écrit pas sur l'écran, et est démarré depuis un autre processus (le serveru web), le débogage est plus difficile que pour une application de bureau.

Une solution consiste à laisser l'application CGI démarrer un débogueur: Quand elle est utilisée par un programme, cette unité, comme partie de l'initialisation, lancera un nouveau processus qui ouvre un terminal (Windows:cmd, Linux:xterm...) et démarre le débogueur gdb en l'attachant au processus appelant.

Un court "sleep" garantit que gdb interrompt le programme pendant l'initialisation.

A été testé sur :

• Windows XP32 avaec Apache 2.2 s'exécutant comme une application ou un service (ne fonctionne plus sur les versions plus récentes de Windows, voir 2.
• Ubuntu 10.04 x64 avec Apache 2.2
• Debian unstable x64 avec Apache 2 (Fév. 2013)

D'autres instructions sont dans l'unité:

unit SelfDebug;

{
Instructions:
-Include unit anywhere in the program.
-Change DEBUGGER constant to match your debugger (gdb, ddd,gdbtui...)
-For Windows, if the program to debug is running as a service (e.g. CGI application
 from Apache running as a service), make sure the service is configured with
 "Interact with desktop" checked. Failing to do so, the debugger will be started
 without a console, break the program and hang waiting for input. Killing the debugger
 is your only option.
-For Linux, if the program to debug is running as a different user (e.g. CGI application),
 run "xhost +" in a terminal to enable all users to connect to xserver.
 If needed, change DISPLAY to match your DISPLAY environment variable
}

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils,Process;

implementation

const
  {$ifdef windows}
  DEBUGGER='C:\lazarus\mingw\bin\7.3\gdb.exe';
  {$endif}
  {$ifdef linux}
  DEBUGGER='gdb';
  DISPLAY=':0.0';
  {$endif}
  MSWAIT=2000;

var
  AProcess: TProcess;

initialization
AProcess := TProcess.Create(nil);
{$ifdef windows}
AProcess.CommandLine := format('cmd /C START "Debugging %s" /WAIT "%s" "%s" %d"',[paramstr(0),debugger,paramstr(0),GetProcessID]);
{$endif}
{$ifdef linux}
AProcess.CommandLine := format('xterm -display %s -T "Debugging %s" -e "%s" "%s" %d',[DISPLAY,paramstr(0),DEBUGGER,paramstr(0),GetProcessID]);
{$endif}
AProcess.Execute;
sleep(MSWAIT);
finalization
AProcess.Free;
end.

Source

D'autres solutions sont l'écriture vers un fichier ou un événement log/syslog.

Existing CGI Frameworks

Il existe des unités CGI et des cadre d'application qui rendent trivial le travail avec CGI (et permet à chacun de définir des cookies, des sessions, traiter les méthodes POST et les GET).

Il y aussi un CGIModule pour Lazarus, et quelques unités CGI et HTML dans la FCL de Free Pascal.

Voir :

• Cadre d'application Brook, le cadre d'application Free Pascal parfait pour vos applications Web.
• FastPlaz, Cadre d'application Free Pascal pour vos applications Web avec un style MVC.
• fcl-web, un cadre d'application FPC et Lazarus (WebLaz)
• Powtils
• ExtPascal une enveloppe (wrapper) Ext JS.
• Fano Framework, cadre d'application Web pour la programmation moderne en Pascal. C'est écrit en Free Pascal.

From the Free Pascal wiki, page "CGI Web Programming/fr", as it stood on 2020-05-01 after a change by E-ric, out of the wiki's dump of 2024-05-26. 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.