IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Tcl/Tk Discussion :

Commande "exec" dans un script TCL


Sujet :

Tcl/Tk

  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Septembre 2008
    Messages
    29
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2008
    Messages : 29
    Par défaut Commande "exec" dans un script TCL
    Je souhaite utiliser la commande "exec" dans un script TCL pour éxécuter un programme en C dont voici le source:
    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
    22
    #include <stdio.h>
    #include <unistd.h>
    #include <stdlib.h>
     
    main(int argc, char *argv[])
    	{
    	int offset, val1, valret=0x15;
     
    	if (argc == 3)
    		{
    		sscanf(argv[1],"%i",&offset);
    		sscanf(argv[2],"%i",&val1);
    		if ( (offset == 0) || (offset == 2))
    			{
    			printf("W 0x%02x", val1);
    			}
    		if ( offset == 1 )
    			{
    			printf("R 0x%02x", valret);
    			}
    		}
    	}
    Ce programme est compilé avec "gcc" sous Linux.
    Dans le script TCL, j'utilise la commande suivante:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    set r1 [ catch { eval exec ./LPTIO1 {$param1 $param2} } r2 ]
    Avec "param1=0" et "param2=0x45", la variable "r2" contient "W 0x45child process exited abnormally" soit la bonne réponse avec un message d'erreur. Quand je lance le programme "LPTIO1" en console Linux, je n'ai pas de message d'erreur. Mon problème est le message d'erreur avec la commande "exec". Comment dois je utiliser la commande "exec"?

    D'avance merci pour votre aide.

  2. #2
    Invité
    Invité(e)
    Par défaut
    Je pense que le problème ne vient pas d'exec mais de ton bout de code C qui ne quitte pas correctement.

    Je suis archi-nul en C, mais il me semble qu'il faut utiliser à la fin de ton code C un truc du genre exit(0) quand c'est Ok et exit(1) lorsqu'il y a eu une erreur.
    Dernière modification par Alcatîz ; 27/08/2011 à 18h41. Motif: orthographe

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Septembre 2008
    Messages
    29
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2008
    Messages : 29
    Par défaut [RESOLU] Commande "exec" dans un script TCL:
    Kroc.tk, merci pour la réponse. Cependant, le problème ne vient pas du programme en C car en console sous Linux, il n'y a pas de message d'erreur et les réponses attendues sont là.
    J'ai continué à rechercher et j'ai trouvé une solution sans la commande "exec" dans le script TCL. J'utilise le code suivant:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
      set f1 [open "| ./LPTIO1 $param1 $param2 " r]
      variable info [gets $f1] 
      close $f1
    J'ai le résultat dans la variable "info" sans message d'erreur. Est-ce la meilleure solution ?
    En tous cas, merci pour la collaboration et tous ce que vous faites Kroc.tk pour ce language que j'utilise dans le domaine professionnel pour des programmes de mesures automatisées avec pilotages d'appareils de mesure en GPIB.

    Salutations.

    majemoi

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [PowerShell] double quotes et variables dans une ligne de script Powershell
    Par Aenean dans le forum Scripts/Batch
    Réponses: 1
    Dernier message: 08/12/2014, 17h55

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo