[Perl] Lot Perl, Vol 75, Parution 3

TONNERRE Patrick - ENIM/SDSI/DIP Patrick.TONNERRE at enim.eu
Mer 17 Fév 17:01:56 CET 2016


Patrice,

Merci pour ta réponse, nous avons pu l'intégrer avec succès dans nos tests, et doublée par un test avec la méthode open FILENAME, MODE du module

:)

-----Message d'origine-----
De : perl-bounces at mongueurs.net [mailto:perl-bounces at mongueurs.net] De la part de perl-request at mongueurs.net
Envoyé : mercredi 17 février 2016 16:09
À : perl at mongueurs.net
Objet : Lot Perl, Vol 75, Parution 3

Thèmes du jour :

   1. Re: news (Clément OUDOT)
   2. Re: news (sebastien deseille)
   3. Appel sous-routine (Patrick Dupre)
   4. Re: Appel sous-routine (Philippe Bruhat (BooK))
   5. [Filesys::SmbClient] Interprétation du champ "Protection"
      renvoyé par la fonction "stat" du module
      (TONNERRE Patrick - ENIM/SDSI/DIP)
   6. Re: [Filesys::SmbClient] Interprétation du champ "Protection"
      renvoyé par la fonction "stat" du module (Patrice Guerlais)


----------------------------------------------------------------------


------------------------------

Message: 5
Date: Wed, 17 Feb 2016 14:28:53 +0000
From: "TONNERRE Patrick - ENIM/SDSI/DIP"	<Patrick.TONNERRE at enim.eu>
To: "'perl at mongueurs.net'" <perl at mongueurs.net>
Subject: [Perl] [Filesys::SmbClient] Interprétation du champ
	"Protection" renvoyé par la fonction "stat" du module
Message-ID: <A146885A00512A498B3830C6F19447B3A70ADB45 at LOMX2.ENIM.L2>
Content-Type: text/plain; charset="iso-8859-1"

Bonjour 

Nous utilisons le module Filesys::SmbClient (http://search.cpan.org/~alian/Filesys-SmbClient-3.2/) pour tenter de vérifier depuis une machine Linux les droits de fichiers sur des partages Microsoft Windows.

La fonction stat nous renvoie :
Accès partage smb://LOIMAGE1/testpto2$/dir1 OK
file_41.txt smb://LOIMAGE1/testpto2$/dir1/file_41.txt
1219028812
1.84467440717735e+19
33252
1
500
500
0
19
512
1
1455704492
1455698171
1455713139

La valeur renvoyée pour le champ "protection" est 33252, mais nous ne savons pas l'interpréter.
Nous sommes preneurs de toute information ou pointeurs sur le sujet

Merci
-- 
Pat


------------------------------

Message: 6
Date: Wed, 17 Feb 2016 16:09:08 +0100
From: "Patrice Guerlais" <paguerlais at airfrance.fr>
To: Liste francophone pour les questions générales sur Perl
	<perl at mongueurs.net>
Subject: Re: [Perl] [Filesys::SmbClient] Interprétation du champ
	"Protection" renvoyé par la fonction "stat" du module
Message-ID:
	<OF951130B1.FB7A910F-ONC1257F5C.004FD951-C1257F5C.00533C1B at LocalDomain>
	
Content-Type: text/plain; charset="utf-8"


Bonjour,

33252 en décimal, ça fait 100744 en octal ;-)
On retrouve bien des droits 744 dans les 3 derniers chiffres. D'après un
vague souvenir le premier ("1") désigne un fichier, je ne sais plus pour la
signification des autres mais il me semble que ça correspond au type
d'objet.
Exemples avec perl -e '$m = (stat("<un object quelconque>"))[2] ; printf
("m=%d o%o\n", $m, $m)'
- sur une directory (".") : m=16877 o40755
- sur un fichier ("a") : m=33188 o100644
- sur un device de type filesystem ("/dev/sda") : m=25008 o60660
- sur un pseudo-device ("/dev/random") : m=8630 o20666
...
Dans ton cas, tu as affaire à un simple fichier (ou un lien) avec des
droits rwxr--r--.

Patrice

perl-bounces at mongueurs.net a écrit sur 17/02/2016 15:28:53 :

> De :
>
> "TONNERRE Patrick - ENIM/SDSI/DIP" <Patrick.TONNERRE at enim.eu>
>
> A :
>
> "'perl at mongueurs.net'" <perl at mongueurs.net>
>
> Date:
>
> 17/02/2016 15:29
>
> Objet :
>
> [Perl] [Filesys::SmbClient] Interprétation du champ "Protection"
> renvoyé par la fonction "stat" du module
>
> Envoyé par :
>
> perl-bounces at mongueurs.net
>
> Bonjour
>
> Nous utilisons le module Filesys::SmbClient (http://search.cpan.org/
> ~alian/Filesys-SmbClient-3.2/) pour tenter de vérifier depuis une
> machine Linux les droits de fichiers sur des partages Microsoft Windows.
>
> La fonction stat nous renvoie :
> Accès partage smb://LOIMAGE1/testpto2$/dir1 OK
> file_41.txt smb://LOIMAGE1/testpto2$/dir1/file_41.txt
> 1219028812
> 1.84467440717735e+19
> 33252
> 1
> 500
> 500
> 0
> 19
> 512
> 1
> 1455704492
> 1455698171
> 1455713139
>
> La valeur renvoyée pour le champ "protection" est 33252, mais nous
> ne savons pas l'interpréter.
> Nous sommes preneurs de toute information ou pointeurs sur le sujet
>
> Merci
> --
> Pat


Plus d'informations sur la liste de diffusion Perl