phpCBLConsult
Publicado por Vagner Rodrigues Fernandes 21/07/2007
[ Hits: 3.655 ]
Homepage: https://takedownsec.com.br/
O phpCBLConsult é um script feito em php com interface web.
Através dele é possível consultar se um determinado IP consta na black-list da CBL; utiliza comandos BSD/Linux lynx,grep e awk através da função system() do php.
<?php /* Copyright (c) 2007 * The Regents of the Vagner Rodrigues Fernandes. All rights reserved. * * phpCBLConsult(8) script developed in php for consult IP in db black-list CBL. * * Redistribution the source or binnary for are permitted. * * Written by Vagner Rodrigues Fernandes aka BugReport * vagner@vrodrigues.com / http://www.vrodrigues.com/ * */ $HOST=$_POST['host']; function createhtml() { print "<HTML> \n"; print "<FORM ACTION=\"cbl.php\" METHOD=\"post\"> \n"; print "<CENTER> \n"; print "<B><FONT SIZE=\"6\" FACE=\"arial\">CBL Consult</FONT></B><BR><BR> \n"; print "<TABLE BORDER=\"1\" BORDERCOLOR=\"black\" CELLSPACING=\"0\" CELLPADDING=\"3\"> \n"; print "<TR><TD>"; print "<CENTER>"; print "<BR>"; print "<INPUT TYPE=\"text\" name=\"host\"><br> \n"; print "<INPUT TYPE=\"submit\" value=\"Consult\"><BR><BR> \n"; print "</FORM> \n"; } if ($HOST == "") { createhtml(); } else { createhtml(); print "<FONT FACE=\"arial\" SIZE=\"1\">Variable Status: \n"; $return = system("lynx --source --dump http://cbl.abuseat.org/lookup.cgi?ip=$HOST | grep found | awk '{ print $5 }'"); print "</FONT>"; if ($return == "found") { print "<BR><a href=\"http://cbl.abuseat.org/lookup.cgi?ip=$HOST\"><FONT FACE=\"arial\" COLOR=\"red\">IP found in black-list CBL.</FONT></a>"; } else { print "<BR><FONT FACE=\"arial\">IP not found in black-list CBL.</FONT>"; } } print "</CENTER><BR>"; print "</TR></TD> \n"; print "</TABLE> \n"; print "<BR><FONT SIZE=\"1\" FACE=\"arial\"><i>Vagner Rodrigues Fernandes<BR>vagner@vrodrigues.com</i></FONT>"; print "<CENTER> \n"; print "</HTML> \n"; ?>
Redimensionando imagens com PHP
Sistema Básico de Curriculum Virtual
Nenhum coment�rio foi encontrado.
Servidor de Backup com Ubuntu Server 24.04 LTS, RAID e Duplicati (Dell PowerEdge T420)
Visualizar câmeras IP ONVIF no Linux sem necessidade de instalar aplicativos
Atualizar Debian Online de uma Versão para outra
Instalar driver Nvidia no Debian 13
Redimensionando, espelhando, convertendo e rotacionando imagens com script
Debian 13 Trixie para Iniciantes
Convertendo pacotes DEB que usam ZSTD (Padrão Novo) para XZ (Padrão Antigo)
Debian 13 "trixie&... lançado! (44)
Rust é o "C da nossa geração"? (3)
Gerenciador de arquivos é finalizado ao abrir pasta específica (2)