[Kylix] probleme pour lancer le shell

Version imprimable

09/08/2002, 16h48
miky

probleme pour lancer le shell

Salut, Quelqu'un peut il m'aider ?
J'aimerais pouvoir lancer une commande shell avec kylix tout en gardant la main pour recuperer le resultat ou faire une nouvelle commande.

ex : possiblité de se connecter en root puis lancer des commandes.
(commande root + mot de passe + commande )...

J'ai deja vu des tutoriaux pour lancer des commandes mais aucune ne permet à la fois de garder la main et recevoir le resultat.

Merci !

le résultat, tu parles de ce qui est afficher a l'ecran n'est-ce pas ?
http://community.borland.com/article...,27500,00.html
regarde pour le popen, mais le code est assez degeux
je l'avais refait pour quelqu'un qui me l'avait deja demandé:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
 
program ReadOutput; 
 
{$APPTYPE CONSOLE} 
 
uses 
  Libc, 
  Classes, 
  SysUtils; 
 
const BufferSize = 1024; 
 
var 
 Output: PIOFile; 
  Line: PChar; 
  CountRead: Cardinal; 
  S: String; 
  Results: TStringList; 
  I: Integer; 
begin 
 Output := Libc.popen('ls -l /', 'r'); 
  if Output = nil then 
  begin 
   Writeln('Error Popen'); 
    Exit; 
  end; 
  try 
   S := ''; 
   GetMem(Line, BufferSize + 1); 
    try 
      while Libc.feof(Output) = 0 do 
      begin 
        CountRead := Libc.fread(Line, 1, BufferSize, Output); 
        Line[CountRead] := #0; 
        S := S + Line; 
      end; 
    finally 
     FreeMem(Line); 
    end; 
  finally 
   Libc.pclose(Output); 
   Libc.Wait(nil); 
  end; 
  Results := TStringList.Create; 
  try 
    Results.Text := S; 
    for I := 0 to Results.Count - 1 do 
      Writeln(Results[I]); 
  finally 
   Results.Free; 
  end; 
end.

12/08/2002, 10h30
miky

Lancer une commande shell

Tout d'abord merci pour ta reponse rapide !
Je connais le lien que tu ma envoyé, malheuresemnt cela ne repond pas exactement à ma question, car avec ce code je ne peut pas interagir avec la reponse de la commande ...

Je reviens à mon exemple si tu veut avec kylix te connecter en root, afin de lancer des commandes root cela me parait impossible avec le code + haut.( A moins que je ne me trompe).

Si pour toi la reponse cela est possible merci de me donner un exemple.
Merci.
12/08/2002, 13h26
RDM

Re: Lancer une commande shell

Citation:

Envoyé par miky

Je reviens à mon exemple si tu veut avec kylix te connecter en root, afin de lancer des commandes root

Peux tu expliciter ce que tu veux EXACTEMENT faire, donne un exemple aussi, pour que je comprenne...
12/08/2002, 14h00
miky

En faite je veux faire un programme qui permette de lancer des commandes shell.

Je m'explique :
- Avec le code que tu ma donné tu peut faire un ls et récuperer le resultat.
Par contre si, via le programme tu veux te connecter en root, donc faire un 'su root', tu ne peut pas récuperer le resultat qui sera 'password :' pour donner ton mot de passe root.

Merci pour ta reponse.
13/08/2002, 09h39
RDM

su ne peut se lancer a partir d'un programme ou script. il doit etre lancer directement à partir d'un terminal.