Rastrear emails na internet

Publicado por Roberto Fettuccia (última atualização em 29/01/2013)

[ Hits: 7.403 ]

Download garimpaEmail




Caros colegas do mundo livre, posto aqui com muito orgulho um script que faz uma varredura de contatos de emails na internet, este opera graças ao navegador em modo texto chamado w3m, o script faz na verdade um filtro de milhares de strings de texto, retornando somente o desejado.

Este script automatiza uma busca pelos principais sites, como o Google, Bing e Yahoo.

Antes de utilizar, devemos criar dois arquivos de texto na mesma raiz de execução do script, vamos lá!

Arquivo: cidades.lst

Obs.: Em campos com espaço utilizar "+".

INICIO --------------------------------------
porto+alegre-rs,centro
porto+alegre-rs,partenon
florianópolis-sc,itacurubi
canoas-rs,centro
canoas-rs,igara
canoas-rs,niterói
rio+de+janeiro-rj,centro
rio+de+janeiro-rj,lapa
FIM --------------------------------------

Arquivo: verbo.lst

Deve conter os ramos de negócio ou objeto alvo da busca. Vamos usar como exemplo o ramo automotivo:

INICIO -------------------------------------------------
acessorios
carros usados
carros novos
veículos novos
vaículos usados
veículos semi-novos
venda carros
venda veículos
revenda carros
revenda veículos
serviço autorizados
autorizada oficina
mecânica autorizada
peças originais
venda-direta carro
serviços carro
FIM --------------------------------------

  



Esconder código-fonte

#!/bin/bash

# informações
# Garimpaemail 1.0 - 16-01-13
# escript desenvolvido por roberto fettuccia.
# testado RHEL6, centos6.3, ubuntu 11.04, debian 5.4
# mail : rpaulafettuccia@gmail.com
#--------------------------------------------------------------
# INSTALAR dependência : w3m
#---------------------------------------------------------------
# modo de uso:
# garimpaemail.sh [assunto] >> [arquivo]
# garimpaemail.sh contato >> emails.txt

PIDX="$(echo $$)"
assunto="$1"
cidadesFLL="./cidades.lst"
verbos="./verbo.lst"

touch /var/tmp/$PIDX

garimpar()
{
w3m -no-cookie "www.google.com.br/search?hp&q=$str&oq=$str" | expand | grep @ | grep '[^@^.^]' | sed "s/ /\n/g" | grep "@" >> /var/tmp/$PIDX
w3m -no-cookie "http://br.bing.com/search?q=$str" | expand | grep @ | grep '[^@^.^]' | sed "s/ /\n/g" | grep "@" >> /var/tmp/$PIDX
w3m -no-cookie "http://cade.search.yahoo.com/search?p=$str" | expand | grep @ | grep '[^@^.^]' | sed "s/ /\n/g" | grep "@" >> /var/tmp/$PIDX

sed -i 's/@yahoo./@yahoo.com.br /g' /var/tmp/"$PIDX"
sed -i 's/@gmail./@gmail.com /g' /var/tmp/"$PIDX"
sed -i 's/@hotmail./@hotmail.com /g' /var/tmp/"$PIDX"
sed -i 's/@terra./@terra.com.br /g' /var/tmp/"$PIDX"
sed -i 's/br./br/g' /var/tmp/"$PIDX"
sed -i 's/ com//g ' /var/tmp/"$PIDX"
cat /var/tmp/$PIDX | sort -u
rm -f /var/tmp/$PIDX
}


for line in $(cat "$cidadesFLL" );
        do
                for line in $(cat "$verbos");
                do
                         verb="$line"
                         cidade="$(echo $line | awk -F, '{print $1}' | sed 's/+/ /g')"
                         bairro="$(echo $line | awk -F, '{print $2}' | sed 's/+/ /g')"
                         str="$cidade $bairro $verb"
                         garimpar
                done
done

# dependências w3m, sed.
# USO :
# ./garimpaemail.sh


PIDX="$(echo $$)"
cidadesFLL="./cidades.lst"
verbos="./verbo.lst"

touch /var/tmp/$PIDX

garimpar()
{
w3m -no-cookie "www.google.com.br/search?hp&q=$str&oq=$str" | expand | grep @ | grep '[^@^.^]' | sed "s/ /\n/g" | grep "@" >> /var/tmp/$PIDX
w3m -no-cookie "http://br.bing.com/search?q=$str" | expand | grep @ | grep '[^@^.^]' | sed "s/ /\n/g" | grep "@" >> /var/tmp/$PIDX
w3m -no-cookie "http://cade.search.yahoo.com/search?p=$str" | expand | grep @ | grep '[^@^.^]' | sed "s/ /\n/g" | grep "@" >> /var/tmp/$PIDX

sed -i 's/@yahoo./@yahoo.com.br /g' /var/tmp/"$PIDX"
sed -i 's/@gmail./@gmail.com /g' /var/tmp/"$PIDX"
sed -i 's/@hotmail./@hotmail.com /g' /var/tmp/"$PIDX"
sed -i 's/@terra./@terra.com.br /g' /var/tmp/"$PIDX"
sed -i 's/br./br/g' /var/tmp/"$PIDX"
sed -i 's/ com//g ' /var/tmp/"$PIDX"
cat /var/tmp/$PIDX | sort -u
rm -f /var/tmp/$PIDX
}

for line in $(cat "$cidadesFLL" );
        do
                for line in $(cat "$verbos");
                do
                         verb="$line"
                         cidade="$(echo $line | awk -F, '{print $1}' | sed 's/+/ /g')"
                         bairro="$(echo $line | awk -F, '{print $2}' | sed 's/+/ /g')"
                         str="$cidade $bairro $verb"
                         garimpar
                done
done

Scripts recomendados

Find em arquivos compactados (grep em arquivos tgz)

ORACLE 10.2g - Fazendo Backup

Script para gravar 2 (ou 4) CDs simultaneamente

Alterando resolução de monitor externo

Script para fazer levantamento de hardware e software no Gentoo


  

Comentários

Nenhum comentário foi encontrado.


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts