Discussion :

[meischuh]

Bonjour,
j'ai un petit problème avec la commande Lancer Process externe en 4D 2004.
Je veux effectuer la sauvegarde du base Postgres avec l'utilitaire pgdump, mais il semble que les paramètres ne passent pas dans la commande.
Si j'execute la commande dans l'invite de commande ça fonctionne sans problème.
La code est le suivant $database est un ligne récupérée dans un tableau.
C_BLOB($in;$out)
$in:=""
$out:=""
$pg_dumpall:="\""+Dossier systeme(16)+"PostgreSQL"+<>SepPath+"8.2"+<>SepPath+"bin"+<>SepPath+"pg_dump.exe\" "
$dossier_sauv:=Selectionner dossier
Si (OK=1)
$commande:=$pg_dumpall+$database+" --format=c --blobs --user=postgr"+"es > \""+$dossier_sauv+$database+"\""
LANCER PROCESS EXTERNE($commande;$in;$out)
Fin de si

voila, si quelqu'un a une idée...

[ThibArg]

Peut-être est-ce parce que to chemin d'accès, tel que récupéré via <Sélectionner dossier> n'est pas au format POSIX ?

Pour tester, fait le test en mettant dans $dossier_sauv le chemin POSIX hard codé (genre "/Users/bibi/...etc...")

Thibaud

[meischuh]

bonjour,
merci pour votre réponse.
J'ai oublié de préciser une chose dans mon premier poste, il s'agit d'un chemin d'accès sous windows.
Pour la version Mac j'ai utilisé un plugin que j'avais fait en version 2003 pour executer les commandes shell.

[Steph4D]

Bonjour,

Essaye en typant les variables $in et $out en TEXTE, sauf si tu reçois plus de 32000 octets dans $out.

Peux-tu nous donner la ligne de commande que tu passes dans le Terminal ou Invite de commande et qui fonctionne ?

Quelle est l'erreur retournée si tu utilises le 4ème paramètre de la commande LANCER PROCESS EXTERNE : $error ?

Peux-tu essayer ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
C_ENTIER LONG(<>plateforme;<>systeme;<>machine;<>langue)
C_ALPHA(2;<>SepPath)
PROPRIETES PLATE FORME(<>plateforme;<>systeme;<>machine;<>langue)
Si (<>plateforme=Windows )
	<>SepPath:="\\"
Sinon 
	<>SepPath:=":"
Fin de si 
 
C_TEXTE($in;$out;$error)
$in:=""
$out:=""
$pg_dumpall:=Dossier systeme(16)+"PostgreSQL"+<>SepPath+"82"+<>SepPath+"bin"+<>SepPath+"pg_dump.exe"
$dossier_sauv:=Selectionner dossier
Si (OK=1)
	$commande:=$pg_dumpall+$database+" --format=c --blobs --user=postgr"+"es > "+$dossier_sauv+$database
	LANCER PROCESS EXTERNE($commande;$in;$out;$error)
Fin de si

A+

[meischuh]

Je vais essayer ça je vous tiens au courant, merci.

[meischuh]

voici l'erreur renvoyé par $error

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
$error=pg_dump: too many command-line arguments (first is ">")
Try "pg_dump --help" for more information.

voici la commande qui fonctionne dans l'invite de commande :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"C:\Program Files\PostgreSQL\8.2\bin\pg_dump.exe" nom_de_la_base --format=c --blobs --user=postgres > "C:\Documents and Settings\utilisateur\Bureau\nom_de_fichier"

Il semble que ce soit la destination du fichier qui pause problème >

[Steph4D]

Je ne connais pas du tout Postgre mais j'essaye de cherche pourquoi ça ne marche pas...

Je lis dans la Documentation PostgreSQL 7.2 : pg_dump que "Les formes d'options longues ne sont disponibles que sur certaines plateformes.".
Et je ne trouve pas d'option --user mais bien -S username, --superuser=username.

As-tu essayé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
$quote:=Caractere(Guillemets )
Si (OK=1)
	$commande:=$pg_dumpall+$database
	$commande:=$commande+" -F=c -b -S=postgres > "
	$commande:=$commande+$quote+$dossier_sauv+$database+$quote
	LANCER PROCESS EXTERNE($commande;$in;$out;$error)
Fin de si

[meischuh]

merci pour vos recherches.
Je pense approcher de la solution avec le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
		C_ENTIER LONG(<>plateforme;<>systeme;<>machine;<>langue)
		C_ALPHA(2;<>SepPath)
		PROPRIETES PLATE FORME(<>plateforme;<>systeme;<>machine;<>langue)
		Si (<>plateforme=Windows )
			<>SepPath:="\\"
		Sinon 
			<>SepPath:=":"
		Fin de si 
 
		C_TEXTE($in;$error)
		C_BLOB($out)
		$in:=""
 
		$pg_dumpall:=Dossier systeme(16)+"PostgreSQL"+<>SepPath+"8.2"+<>SepPath+"bin"+<>SepPath+"pg_dump.exe"
		$dossier_sauv:=Selectionner dossier
 
		Si (OK=1)
			$commande:="\""+$pg_dumpall+"\" "+$database+" --format=c --blobs --user=postgres"
			LANCER PROCESS EXTERNE($commande;$in;$out;$error)
			BLOB VERS DOCUMENT($dossier_sauv+$database;$out)  `on enregistre sur le disque
		Fin de si

J'envoie le résultat de la commande dans le blob et j'enregistre ensuite le blob dans un fichier.
Reste que l'execution de cette commande m'ouvre l'invite de commande ce que je préfère éviter et que l'utilisation du format c compresser plante l'invite de commande. Avec le format standard ou t (tar) ça ne pause pas de problème. Enfin il ne s'agit plus vraiment de problème 4D à ce niveau.
Encore merci.

[meischuh]

C'est bon ça fonctionne avec le paramètre --format=t
Je m'attaque maintenant à la restauration de base avec pg_restore.exe