Liste des liens
Générateur de plugin pour pluxml.
Tout le squelette d'un plugin sur un plateau.
Merci qui ? Merci Bronco !!
Oui, et quand on parle de Dieudo, on ne parle pas d'autre chose. C'est bien pratique.
D'ailleurs, on en parle plus. C'est bizarre...
En même temps, les pompiers cons ne sont pas forcément chemineaux...
Rassure-moi : tu les mets quand même dans une poche avant de les mettre au réfrigérateur ???
J'ai à peu prêt la même chose sur mon site (plus de 17 mille lignes de connexion bloquées) avec le même type de bots.
Ce qui m'étonne, c'est qu'il y a certaines connexions qui sont enregistrées mais avec des plages de "NULL" avant la date de la tentative de connexion. Etrange...
Un homme téléphone au curé de sa paroisse :
- est-ce qu’il est permis d’avoir des relations sexuelles le vendredi saint ?
- Bien sûr ! C’est permis ! Mais uniquement avec votre épouse car il faut que cela reste un sacrifice et non du plaisir…
Tout est dans le titre. A explorer. Vraiment bien rédigé et expliqué.
Mouaaaaaaahhhh Mouaaaahhhhhh :)
via Bronco
http://shaarli.warriordudimanche.net
Désolé Bro, je viens juste de prendre connaissance de ton problème et apparemment tu as résolu ton problème.
Je vais quand même essayé de te répondre, on ne sait jamais.
En fait, pour utiliser ob_start, il faut le faire dans le code que tu vas injecter non pas dans ta page de plugin (typiquement le fichier monPlugin.php si le plugin s'appelle mon Plugin) mais dans un fichier natif de plugin via un hook (par exemple, class.plx.motor.php).
L'injection sera du style :
public function AdminCategoriesTop() {
echo "<?php ob_start(); ?>";
}
public function AdminCategoriesFoot() {
echo '<?php
$content=ob_get_clean();
echo $content;
?>';
}Et non pas directement :
public function AdminCategoriesTop() {
ob_start();
}
public function AdminCategoriesFoot() {
$content=ob_get_clean();
}J'espère que ça pourra t'aider...
Très juste Auguste :)
"Quand les cheminots faisaient grève contre les décisions qui ont mené à cet état de fait, combien gueulait à la "prise d'otages" ?
Maintenant que PERSONNE n'a défendu les cheminots pendant leurs grèves, que tout le monde les a conspué pendant que la SNCF, l'État et RFF détricotaient le réseau ferré, vous avez 30, 40, 50 minutes de retard pour réfléchir à ces jours où vous leur avez craché à la gueule.
À moins que vous ne continuiez encore de le faire, parce qu'après tout, c'est leur faute non ? Ça a tellement bien marché jusqu'à présent, de ne pas les soutenir..."
Enfin, je ne suis plus tout seul à le dire...
Pour excel, il existe une petite macro qui marche du feu de dieu. Je ne sais plus où je l'ai trouvée mais je vous la partage ci dessous.
' Attribute VB_Name = "Deprotection"
'
'Déprotection sans échec du classeur ou de la feuille Excel avec extraction de mot de passe.
'
'Auteur : CHEPAKOIDIR
'
'PRINCIPE :
'Excel ne mémorise pas le mot de passe mais une clé sur 15 bits calculée à partir de ce mot de passe.
'Il y a donc 2^15 = 32768 possibilités de clés (de 0 à 32767) en tout et pour tout (c'est dire la fiabilité !).
'Il existe ainsi des milliards de mots de passe qui donnent la même clé. Ils sont EQUIVALENTS. On peut protéger
'avec un mot de passe et déprotéger avec un équivalent, reprotéger avec un autre équivalent, etc.
'Ceci pour répondre à ceux qui voudraient trouver le "bon" mot de passe. C'est impossible et ça n'a aucune importance,
'si vous voulez pirater un classeur sans que son propriétaire s'en rende compte (c'est pas bien ça), déprotégez-le puis
'reprotégez-le avec le mot de passe équivalent trouvé, il n'y verra que du feu.
'
'CALCUL DE LA CLE PAR EXCEL :
'Microsoft n'en fait pas un secret et l'on peut trouver facilement la méthode sur internet.
'On applique à chaque caractère du mot de passe une rotation à gauche sur 15 bits. Le premier caractère tourne de 1 bit,
'le deuxième caractère tourne de 2 bits, etc. Comme c'est une rotation sur 15 bits, le 15ème caractère tourne de 0 bits, le
'16ème tourne de 1 bit et on recommence par tranche de 15 ...
'Tous les résultats des rotations sont ensuite combinés avec des Ou Exclusifs (XOR pour les prétentieux).
'Puis on fait encore un ou exclusif entre le résultat final et la longueur du mot de passe.
'Enfin, on fait un dernier ou exclusif avec la constante CE4Bh. Notez que les ou exclusifs sont commutatifs.
'La clé ainsi calculée est stockée dans l'enregistrement numéro 13h du stream de la feuille ou du classeur.
'Par exemple, le mot de passe "toto" donne la clé CA4Bh. Le mot de passe "AAABABBBBAA/" donne la même.
'
'ALGORITHME :
'Cette macro utilise 15 boucles imbriquées de deux valeurs. Peu importe les valeurs, elles doivent juste être deux valeurs CONSECUTIVES
'et IDENTIQUES pour toutes les boucles (pour assurer que les 32768 possibilités soient couvertes). Ces deux valeurs doivent aussi être
'les codes ASCII de caractères acceptés par Excel dans les mots de passe. Exemples : "0" et "1" ou "A" et "B" ou "x" et "y".
'Le bit de poids faible de chaque variable de boucle correspond ainsi à 1 bit de la clé (0 ou 1 = 2 valeurs). Les autres bits des variables sont
'sans importance puisqu'ils sont constants et l'on est sûr de parcourir les 32768 possibilités mais pas forcément dans l'ordre,
'ce qui n'a aucune importance.
'A chaque tour, les 15 caractères sont concaténés pour former le mot de passe à essayer et on boucle jusqu'à trouver celui qui marche.
'Sur un pentium à 2 GHz normalement constitué, il faut un peu plus d'une minute dans le pire des cas pour faire sauter une protection.
'
'AUTRE METHODE :
'Il est possible de récupérer la clé de la feuille ou du classeur dans le fichier Excel (voir doc microsoft) et de calculer directement un mot de
'passe équivalent. Dans ce cas, il faut 2 secondes.
'Au boulot !!!
'
'ATTENTION, la feuille ou le classeur à déprotéger doivent être actifs au lancement de la macro et il vaut mieux désactiver ses macros.
Sub RemovePro()
Dim A As Byte, B As Byte, C As Byte, D As Byte, E As Byte
Dim F As Byte, G As Byte, H As Byte, i As Byte, J As Byte
Dim K As Byte, L As Byte, M As Byte, N As Byte, O As Byte
Dim Reponse As Byte, Temps As Variant
Dim Cible As Object, Passe As String
' Demande ce qu'il faut déprotéger.
Reponse = MsgBox("Voulez-vous déprotéger le classeur actif ?" & vbCrLf & "Si vous répondez non, c'est la feuille active qui sera déprotégée. ", _
vbYesNoCancel, "Déprotectionnateur")
On Error Resume Next
' Teste ce qu'il faut déprotéger.
Select Case Reponse
Case vbYes
' Définit le classeur actif comme cible à déprotéger.
Set Cible = ActiveWorkbook
' Teste si le classeur est protégé.
If Not (Cible.ProtectStructure Or Cible.ProtectWindows) Then
MsgBox "Le classeur actif n'est pas protégé. " & vbCrLf & vbCrLf & "Andouille !", vbOKOnly, "Déprotectionnateur"
Exit Sub
End If
' Teste si le classeur est protégé sans mot de passe.
Err.Clear
Cible.Unprotect vbNullString
If Err = 0 Then
MsgBox "La protection du classeur actif a été supprimée. " & vbCrLf & "Il n'y avait pas de mot de passe. Petit rigolo !", vbOKOnly, "Déprotectionnateur"
Exit Sub
End If
Case vbNo
' Définit la feuille active comme cible à déprotéger.
Set Cible = ActiveSheet
' Teste si la feuille est protégée (on ne teste pas UserInterfaceOnly qui ne peut être positionné que par macro et n'est pas enregistré avec le classeur).
If Not (Cible.ProtectContents Or Cible.ProtectDrawingObjects Or Cible.ProtectScenarios) Then
MsgBox "La feuille active n'est pas protégée. " & vbCrLf & vbCrLf & "Patate !", vbOKOnly, "Déprotectionnateur"
Exit Sub
End If
' Teste si la feuille est protégée sans mot de passe.
Err.Clear
Cible.Unprotect vbNullString
If Err = 0 Then
MsgBox "La protection de la feuille active a été supprimée. " & vbCrLf & "Il n'y avait pas de mot de passe. Quelle burne !", vbOKOnly, "Déprotectionnateur"
Exit Sub
End If
Case Else
' Annulation demandée par l'utilisateur.
MsgBox String(14, " ") & "Ciao !", vbOKOnly, "Déprotectionnateur"
Exit Sub
End Select
' Note l'instant de départ.
Temps = Timer
' Boucles de calcul des mots de passe. On utilise ici les codes ascii des caractères "0" et "1".
For A = 48 To 49
For B = 48 To 49
For C = 48 To 49
For D = 48 To 49
For E = 48 To 49
For F = 48 To 49
For G = 48 To 49
For H = 48 To 49
For i = 48 To 49
For J = 48 To 49
For K = 48 To 49
For L = 48 To 49
For M = 48 To 49
For N = 48 To 49
For O = 48 To 49
' Calcule le mot de passe.
Passe = Chr(A) & Chr(B) & Chr(C) & Chr(D) & Chr(E) & Chr(F) & Chr(G) & Chr(H) & Chr(i) & Chr(J) & Chr(K) & Chr(L) & Chr(M) & Chr(N) & Chr(O)
' Essaie de déprotéger la cible.
Err.Clear
Cible.Unprotect Passe
' Teste si la cible est bien déprotégé.
If Err = 0 Then
' Si oui, affiche le mot de passe et sort.
MsgBox "La protection a été supprimée en " & Timer - Temps & " secondes. " & vbCrLf & "Le mot de passe équivalent trouvé est :" & _
vbCrLf & vbCrLf & String(28, " ") & Passe, vbOKOnly, "Déprotectionnateur"
Exit Sub
End If
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
Next
' Message impossible à atteindre.
MsgBox "Mot de passe introuvable." & vbCrLf & vbCrLf & "C'est pas normal !!!", vbOKOnly, "Déprotectionnateur"
End SubEh oui... Bienvenue dans les sévices publics...
On peut dire merci à l'Europe et son économie de marché qui a détruit tout vrai service public. Il faut vendre, vendre et vendre encore. Et comme la majorité des utilisateurs sont des veaux, on les traite comme tels.
C'est fini le temps où la sncf s'occupait des trains (il y a qu'à voir la qualité des lignes de provinces pour s'en persuader, sans parler des retards réguliers, plus de 25% des trains sur la ligne que j'emprunte quotidiennement. Il n'y en a plus que pour le TGV.) : c'est devenu une vulgaire agence de voyages.
Quant à la poste, là aussi merci l'économie de marché : il faut qu'elle essaie de trouver un moyen de survivre tellement l'ouverture à la concurrence (déloyale) l'a mise à genoux.
Pour ce qui est des services publics, c'est à l'image de tout le reste (cf Bluetouf).