Discussion :

[CleM_71]

Bonjour, et meilleurs vœux pour cette nouvelle année.

Je développe un service à l'aide de Visual Studio 2008, en VB.net.

Il s'agit d'un service qui exécute diverses actions sur lancement avec passage de paramètres. J'utilise pour celà, par le biais d'un formulaire tier également développé en VB.net, la classe ServiceController, qui me permet de lancer mon service en lui passant des arguments via un tableau ...

Code :

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

1
2
3
4
5
6
7
Public ServiceAlias As New System.ServiceProcess.ServiceController
TabArgs(0) = "verifie"
TabArgs(1) = "quelquechose"
ServiceAlias.MachineName = "."
ServiceAlias.ServiceName = "Alias"
ServiceAlias.Start(TabArgs)

Mon service, avec un Select Case, fait des tests, et je souhaite renvoyer un code de sortie selon le résultat de mon test. Pour celà, j'utilise la procédure OnStop() du service.

Code :

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

1
2
3
4
Protected Overrides Sub OnStop()
        Me.ExitCode = 1250
    End Sub

Ma question est la suivante : comment faire pour obtenir ce code de sortie depuis mon application qui a lancé le service, sachant que la classe ServiceController n'inclut pas la propriété ExitCode ?

Pour information, lorsque je lance mon service à l'aide de SC, ça me retourne ceci :
---------------------
SERVICE_NAME: alias
TYPE : 10 WIN32_OWN_PROCESS
STATE : 2 START_PENDING
(NOT_STOPPABLE,NOT_PAUSABLE,IGNORES_SHUTDOWN)
WIN32_EXIT_CODE : 0 (0x0)
SERVICE_EXIT_CODE : 0 (0x0)
CHECKPOINT : 0x0
WAIT_HINT : 0x7d0
PID : 1444
FLAGS :
---------------------

Je vous remercie par avance de vos réponses.

[ram-0000]

Ce que tu veux faire n'a pas de sens car la philosophie d'un service est qu'il ne s'arrête jamais (sauf crash, action utilisateur et arrêt de la machine) donc c'est probablement pour cela qu'il n'existe pas de moyen pour récupérer le code de fin de service.

Il va falloir trouver un autre moyen.

[CleM_71]

En effet, j'aurais préféré que le service reste lancé perpétuellement, mais le lancement avec paramètres est le seul moyen que j'ai trouvé pour transmettre des données au service.

Par exemple, si je souhaite vérifier l'existence d'un fichier dans %WINDIR%\system32, répertoire auquel l'utilisateur lambda n'a pas les droits d'accès, je souhaite faire faire cette vérification par mon service fonctionnant sous le compte SYSTEM.

Concrètement, j'envoie à mon service deux arguments :
1) Quelle action ? => Tester l'existence
2) Quelle donnée ? => Le fichier C:\WINDOWS\system32\calc.exe

Le seul moyen que j'ai trouvé est donc le lancement avec paramètres, via la classe ServiceController.

Il existe bien une méthode ExecuteCommands dans ctete même classe, mais on ne peut transmettre qu'un seul entier en paramètre.

Je suis donc preneur d'une solution alternative pour pallier ce problème, sachant que mon application faisant appel au service est restreinte par les droits très limités de l'utilisateur qui la lance (pas le droit d'écrire dans le registre par exemple).

Cordialement.

Edit : j'ai consulté ça
http://www.developpez.net/forums/d53...rvice-windows/
et ça
http://www.developpez.net/forums/d46...laircissement/
sans succès :-(

[ram-0000]

Une idée comme cela :
Un service lancé en permanence qui écoute sur un pipe nommé et qui ne s'arrête jamais.
Un programme utilisateur qui communique avec le service par le biais du pipe nommé et envoie des commandes au service.
Le service reçoit les commandes, les exécute et retourne le résultat dans le pipe
Le client reçoit le résultat dans le pipe et affiche/traite le résultat.

A toi de définir maintenant le protocole entre le client et le service porté par le pipe.

Attention aux droits sur le pipe, ils doivent être compatibles entre le service qui a des privilèges systeme et le client qui a priori a des droits restreints.

Attention aussi à la sécurité, ce que tu veux faire permet à un utilisateur lambda d'e faire faire des choses avec des droits étendus et ce n'est pas forcémment une bonne idée, c'est comme cela qu'un utilisateur lambda peut devenir administrateur de la machine.

[CleM_71]

Merci pour cette piste qui va me diriger vers de belles recherches, car j'ignore complètement ce concept de pipe (disons que je sais que c'est un tunnel bidirectionnel mais je l'ai toujours utilisé en environnement Linux pour faire communiquer deux programmes, par exemple ps aux | grep unprocessus, mais en développement, aucune idée !).

Pour la sécurité, j'imagine effectivement que le risque est grand mais mon service a vraiment des fonctionnalités limitées, lesquelles sont de toutes façons imbriquées dans un Select Case.

Je m'en vais rechercher un tuto pour les pipes :-)

Merci !

[lysiandad]

[...]Je m'en vais rechercher un tuto pour les pipes :-)

Oui, les named pipes sont certainement adaptés à votre problématique. Un tutoriel vous aidera sans doute à démarrer rapidement.

Vous avez aussi cette ressource Microsoft qu'il peut être utile de lire, si vous êtes en framework 3.x :

http://msdn.microsoft.com/fr-fr/library/ms752253.aspx

Bonne suite.

'HTH

[CleM_71]

J'ai cherché un peu de partout et j'ai eu beaucoup de mal à trouver quelque chose de simple à mettre en œuvre.

Du coup, je me suis tourné vers ça http://www.codeproject.com/KB/vb/AsyncNamedPipes.aspx

Je vais tâcher de faire une mini-appli utilisant cette référence tierce, pour comprendre comment ça marche, et je me plongerai dans la source de la référence pour en analyser le fonctionnement.

[CleM_71]

Bonjour,

Mes recherches se poursuivent, et mon projet avance ! Avec la référence que je vous présentais précédemment, je suis parvenu à faire communiquer mon service et mon application, parfaitement, enfin presque ...

Mon application envoie à mon service un message, codé en octets, de type texte à l'origine.

En l'occurrence, voici le code permettant, après ouverture du pipe nommé, d'écrire dans le pipe.

Code :

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

1
2
3
4
5
6
7
' Message est un tableau d'octets, de taille 2048
' La fonction suivante convertit la chaîne de caractères en octets
' LeBouton.Tag contient un chemin absolu local de type "C:\Repertoire\Fichier.exe"
Message = System.Text.Encoding.Unicode.GetBytes("verifie?" + LeBouton.Tag)
' Ecriture du message dans le pipe nommé
StreamAlias.Write(Message, 0, Message.Length)

Du côté du service, je lis le message par l'intermédiaire d'une boucle Do Until ...
Voici la ligne me permettant, à priori, de récupérer le texte que j'ai envoyé dans le pipe.

Code :

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

1
2
3
' MesssageTexte est déclaré en String
 MessageTexte = System.Text.Encoding.Unicode.GetString(Tampon, 0, Tampon.Length)

Çà marche à merveille, sauf qu'il manque un guillemet à la fin !
Dans la fenêtre des variables locales, avec le visualiseur de type texte, voici le contenu de MessageTexte après affectation :

"verifie?C:\Program Files\7-Zip\7zFM.exe

Il manque donc un guillemet à la fin ! Ou bien il y en a un de trop au début ?

En vrac, voici ce que j'ai essayé :
- utilisation abusive de la fonction ToString() lors de l'affectation de MessageTexte
- essai de la fonction Insert() pour insérer un guillemet à la fin, et ce avec le code ASCII Chr(34) ou le caractère en lui même """"
- Essai de la fonction Replace() pour remplacer le guillemet du début par rien du tout : aucun guillemet n'est remplacé ...
- Essai de la fonction Remove() pour enlever le premier caractère : c'est la première mettre qui disparaît ...

J'en viens donc à vous pour tenter de trouver une solution pour que ma chaîne en soit une vraie ...

J'ai trouvé une solution, très lourde ...
Déclarer un tableau de Char de taille 2048, et avec un Foreach, traiter chaque caractère de la chaîne pour les concaténer dans une variable String. Ca marche mais c'est très loin de m'arranger, dans un soucis de clarté du code, et d'optimisation des traitements ...

Merci d'avance

[CleM_71]

Bonjour,

Je m'auto-réponds.

Mon problème venait du troisième argument de la fonction de conversation en String depuis les octets : je lisais la totalité du tampon au lieu de ne lire que la partie utilisée.

Par ailleurs, je suis parvenu à effectuer ce que je souhaitais avec les Pipes Nommés. J'ai commencé par faire tout ce dont j'avais besoin dans un Windows Form classique, plus facile à débuguer qu'un service ...

Lorsque j'ai migré mon code dans le service, la communication entre le "listener" et le "client" ne s'établit pas.

J'en viens à me demander, et donc, à VOUS demander, si un service fonctionnant avec le compte LocalSystem n'est pas enfermé dans une sorte de "sandbox", ce qui l'empêcherait de recevoir les connexions initiées par mon application tierce.

Merci

[Médinoc]

Pour les tubes nommés, je sais qu'il y a un paramètre à régler dans la base de registre ou plutôt dans les group policies, indiquant les noms des pipes auxquels le commun des mortels a le droit de se connecter.

[CleM_71]

Voilà une piste sympa !

J'ai commencé à éplucher le gpedit.msc, et je suis tombé sur une règle :

"Accès réseau : les canaux nommés qui sont accessibles de manière anonyme"

Il s'agit d'une liste de noms séparés par des virgules. J'y ai ajouté le nom de mon canal, mais le problème reste identique.

Pour info, je trouve ça dans "Configuration ordinateur", "Paramètres Windows", "Paramètres de sécurité", "Stratégies locales", "Options de sécurité".

[CleM_71]

Bon ... Point mort ...

Dans gpedit.msc j'ai bien rajouté mon pipe dans la liste de ceux qui peuvent être appelés anonymement.

J'ai redémarré le poste, le service, constaté que le pipe était bien accessible anonymement (j'ai regardé dans la base de registre).

J'ai téléchargé un outil (http://www.beyondlogic.org/solutions...ec/pipesec.htm) permettant de consulter et d'éditer les droits sur le pipe.

Je l'ai rendu accessible en tous droits par tout le monde (le temps d'un test, bien sûr) et je ne parviens toujours pas à me connecter à mon pipe ...

J'ai parcouru la référence que j'ai téléchargée (http://www.codeproject.com/KB/vb/AsyncNamedPipes.aspx) pour éplucher les propriétés du listenner, et constater tout est OK.

Je commence à être bien bloqué.

Quelqu'un a-t-il un mini code à me faire tester pour un connexion client-serveur avec un pipe nommé ?



_________

Edit et complément d'information :

mon client dispose d'une propriété isConnected. Celle ci est bien à True après l'appel de la méthode Connect.

Il semble donc que la connexion soit bonne, mais que c'est du côté du service que l'évènement ClientConnected déconne.

[CleM_71]

Désolé pour mon acharnement, mais je crois avoir trouvé le souci.

J'ai posé un timer avec un délai de 1000 ms. Dans l'évènement Tick() j'ai fait ça en sorte d'écrire un fichier texte sur mon disque.

Rien ne se passe ...

Il semble donc qu'aucun évènement ne fonctionne sur le service ...

Y a-t-il quelque chose à faire pour activer les évènements ??