Hubba Posted March 6, 2015 Report Share Posted March 6, 2015 (edited) #!/usr/bin/pythonimport sysimport reimport stringimport httplibimport urllib2import redef StripTags(text): finished = 0 while not finished: finished = 1 start = text.find("<") if start >= 0: stop = text[start:].find(">") if stop >= 0: text = text[:start] + text[start+stop+1:] finished = 0 return textif len(sys.argv) != 2: print "\nExtracts emails from google results.\n" print "\nUsage : ./goog-mail.py <domain-name>\n" sys.exit(1)domain_name=sys.argv[1]d={}page_counter = 0try: while page_counter < 50 : results = 'http://groups.google.com/groups?q='+str(domain_name)+'&hl=en&lr=&ie=UTF-8&start=' + repr(page_counter) + '&sa=N' request = urllib2.Request(results) request.add_header('User-Agent','Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0)') opener = urllib2.build_opener() text = opener.open(request).read() emails = (re.findall('([\w\.\-]+@'+domain_name+')',StripTags(text))) for email in emails: d[email]=1 uniq_emails=d.keys() page_counter = page_counter +10except IOError: print "Can't connect to Google Groups!"+""page_counter_web=0try: print "\n\n+++++++++++++++++++++++++++++++++++++++++++++++++++++"+"" print "+ Google Web & Group Results:"+"" print "+++++++++++++++++++++++++++++++++++++++++++++++++++++\n\n"+"" while page_counter_web < 50 : results_web = 'http://www.google.com/search?q=%40'+str(domain_name)+'&hl=en&lr=&ie=UTF-8&start=' + repr(page_counter_web) + '&sa=N' request_web = urllib2.Request(results_web) request_web.add_header('User-Agent','Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 5.0)') opener_web = urllib2.build_opener() text = opener_web.open(request_web).read() emails_web = (re.findall('([\w\.\-]+@'+domain_name+')',StripTags(text))) for email_web in emails_web: d[email_web]=1 uniq_emails_web=d.keys() page_counter_web = page_counter_web +10except IOError: print "Can't connect to Google Web!"+""for uniq_emails_web in d.keys(): print uniq_emails_web+""SursaTest !anci-ste@alice.itfcrovace@alice.itantorake@alice.itlauradilu@alice.itsalvo_brusca67@alice.itpagescaos_calmo@alice.itclaudio.maccherani@alice.itpagesaicelombarda@alice.itmonicagasbarri@alice.itS.Camillo-Forlaninilportalone@alice.itmaterli1@alice.itlsantini@alice.itpincopallino@alice.itgratours@alice.itaicelombarda@alice.itCastrofilippofilippafarruggio@alice.itpagesfcrovace@alice.itluci.ba@alice.itpoate il face cineva sa mearga mai bine prinde maxim 10-20 email-uri si se opreste ..Il rog frumos sa-mi dea si mie sau sa posteze ! Edited March 6, 2015 by Hubba Quote Link to comment Share on other sites More sharing options...
geoxnox Posted March 7, 2015 Report Share Posted March 7, 2015 dupa cateva scanari iti blocheaza ipul Quote Link to comment Share on other sites More sharing options...