Discussion :

[qqoos]

bonjour,

Dans un module en REXX, il me faut controler qu'une chaine de caractere existe dans un membre de PDS crypté ou non.

Dans le cas ou le membre n'est pas crypté, pas de probleme.

If POS("toto", ligne.i) > 0 Then Ok = 1

Ca ne marche pas dans le cas ou le membre est crypté.

Comment savoir si le membre est crypté, et si oui comment le décrypter ou comment rechercher ?

merci d'avance à tous

[Lemmings1406]

Bonjour,

Quand tu parles de membres cryptés, avec quoi est fait le cryptage (un outil maison, un outil du marché et lequel? ou par une autre méthode).

Mais si les membres sont cryptés, il est à mon avis quasi impossible de rechercher une chaine de caractère à l'intérieur à moins de connaître l'algorythme de cryptage. Le but premier d'un fichier crypter, c'est de ne pas pouvoir le lire.

[qqoos]

le cryptage est UNICODE : UTF8

[bernard59139]

Bonjour

UTF8 n'est pas du cryptage, mais de l'encodage.

je suis très curieux de savoir comment encoder "utf8" un pds. EN sachant comment il a été codé, je pourrais te répondre.

[Lemmings1406]

Bonjour,

Il faudrait peut-être (mais je n'ai jamais essayé) que tu encodes la chaine de caractère à rechercher et qu'ensuite tu fasses la recherche à partir de ton rexx comme tu le ferais normalement.

Je ne vois pas d'autres solutions pour l'instant, sinon, il faut décoder les membres concernés avant d'effectuer ta recherche.

[qqoos]

finalement j'ai trouvé cette solution :

convertir le literal rechercher en hexa UTF8 : ex: OPEN donne '4F50454E'

transformer chaque ligne en hexa ligHexa=C2X(ligne)

rechercher ce literal dans la ligne : If Pos('4F50454E', ligHexa) > 0 then c'est trouvé.

merci à tous