Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|

11.07.2009, 02:33
|
|
Постоянный
Регистрация: 05.12.2004
Сообщений: 647
Провел на форуме: 1698585
Репутация:
818
|
|
VKONTAKTE.RU - Скрипт сохранения фотографий с альбомов.
Скрипт написан на РНР, посредством cURL, сохраняет из указанного альбома все фотографии, можно как свои так и чужие "дампить" фотки.
Скрины:
DOWN
ЗЫ нестал запихивать в архив фотки, поленился =)
|
|
|

11.07.2009, 14:55
|
|
Участник форума
Регистрация: 28.04.2008
Сообщений: 172
Провел на форуме: 1191083
Репутация:
270
|
|
Вконтакте.ру
Скрипт логинится вконтакте и сохраняет куки в файл.
PHP код:
<?php
// vkCookie by art2222
require_once 'class.php';
$cs = new phpsploit();
$out = array();
foreach (file('logins.txt') as $value)
{
$cs -> cookiejar('1');
$cs -> allowredirection('1');
list($email, $pass) = explode(':', trim($value));
$cs -> post('http://pda.vkontakte.ru/login?pda=index&acknowledge=0',"email=$email&pass=$pass");
array_push($out,$cs->cookie_str);
}
file_put_contents('cookie.txt',implode($out,"\r\n"));
?>
Скачать вместе с либой
Последний раз редактировалось art2222; 11.07.2009 в 21:01..
|
|
|

11.07.2009, 21:00
|
|
Участник форума
Регистрация: 28.04.2008
Сообщений: 172
Провел на форуме: 1191083
Репутация:
270
|
|
Делаем скриншот любого сайта (браузер Safari)
PHP код:
<?php
$url = 'http://ya.ru';
//Тут можем установить качество картинки и ширину экрана.
$url = 'http://www.browsrcamp.com/index.php?url='.rawurlencode($url).'&width=1280&quality=2';
preg_match('#<a href="(.*)" target="_blank">#i', @file_get_contents($url) , $arr);
echo $arr[1]; //Здесь ссылка на скриншот.
?>
|
|
|

11.07.2009, 21:49
|
|
Постоянный
Регистрация: 12.12.2006
Сообщений: 906
Провел на форуме: 4205500
Репутация:
930
|
|
По заказу из этой темы написал парочку небольших реплэйсеров.
1. Создает файл, в котором указанная последовательность символов заменена на новую.
Код:
#!/usr/bin/env python3
filename = str(input("Enter file name: "))
S_old = str(input("Enter first string: "))
S_new = str(input("Enter second string: "))
with open(filename) as fin:
with open("out.txt", "a") as fout:
for line in fin:
if line.find(S_old) == -1:
fout.write(line)
else:
new_line = line
for i in range(new_line.count(S_old)):
new_line = new_line.replace(S_old, S_new)
fout.write(new_line)
2. Создает файл, в котором все транслитерируемые буквы английского алфавита заменены на русские, а русские буквы, имеющие внешне сходные аналоги в английском алфавите, на английские.
Код:
#!/usr/bin/env python3
import sys
Sym_for_change_ru = "аеорсухАВЕКМНОРСТХ"
Sym_for_change_en = "aeopcyxABEKMHOPCTX"
def Change_symbol(sym, lang):
if lang == "ru":
return Sym_for_change_en[Sym_for_change_ru.find(sym)]
else:
return Sym_for_change_ru[Sym_for_change_en.find(sym)]
filename = sys.argv[1]
Buffer = None
with open(filename) as fin:
with open("out.txt", "w") as fout:
for line in fin:
for word in line:
for symbol in word:
if symbol in Sym_for_change_ru:
fout.write(Change_symbol(symbol, "ru"))
elif symbol in Sym_for_change_en:
fout.write(Change_symbol(symbol, "en"))
else:
fout.write(symbol)
Последний раз редактировалось Fata1ex; 23.07.2009 в 03:17..
|
|
|

12.07.2009, 17:22
|
|
Постоянный
Регистрация: 27.10.2008
Сообщений: 491
Провел на форуме: 4002393
Репутация:
464
|
|
Вот набросал скриптик. Решения квадратных уравнений. Для школьников самый раз
PHP код:
<head>
<title>Квадратное уравнения</title>
<link rel="stylesheet" type="text/css" media="all" href="a.css">
</head>
<body>
<br><br><br><br>
<form method="get"><center>Введите задание</center><center>
<input size="2" type=text name=a value="<?php echo $a;?>" >x2+
<input size="2" type=text name=b >x
<input size="2" type=text name=c >=0 <br>
<input type=submit value=Обработать></form></center>
<br><br>
<br><br><br>
<centr><h1>
<?php
$a = $_GET['a'];
$b = $_GET['b'];
$c = $_GET['c'];
$d = $b*$b-4*$a*$c;
@$x1 = (-$b-sqrt($d))/(2*$a);
@$x2 = (-$b+sqrt($d))/(2*$a);
if (!$a) echo 'заполните поля';
elseif ($d<0)
{
echo $a.'x<sup>2</sup>+'.$b.'x+'.$c.'=0<br>';
echo 'D='.$b.'<sup>2</sup>-4'.$a.'*'.$c.'<br>';
echo 'D='.$d.'<0 Не имеет решения';
}
else
{
echo $a.'x<sup>2</sup>+'.$b.'x+'.$c.'=0<br>';
echo 'D='.$b.'<sup>2</sup>-4'.$a.'*'.$c.'<br>';
echo 'D='.$d;
echo '='.sqrt($d).'<sup>2</sup><br>';
echo 'X<sub>1</sub>='.'-'.$b.'-'.sqrt($d).'/2'.'*'.$a;
echo '=<strong>'.$x1.'</strong><br>';
echo 'X<sub>2</sub>='.'-'.$b.'+'.sqrt($d).'/2'.'*'.$a;
echo '=<strong>'.$x2.'</strong><br><br><br>';
echo 'Ответ: X<sub>1</sub>='.$x1.'; X<sub>2</sub>='.$x2;
}
?>
</h1></center>
примеры
Пошу не пинать))
|
|
|

21.07.2009, 14:42
|
|
Участник форума
Регистрация: 27.10.2008
Сообщений: 215
Провел на форуме: 810079
Репутация:
90
|
|
Скрипт парсинга файла passwd для создания комболиста из логинов.
Пригодится для брута FTP, SSH, etc, так как часто бывает, что на больших хостингах логин и пароль какого-нибудь пользователя (пользователей) совпадают.
Код:
#!/usr/bin/python
import sys
if len(sys.argv) != 3:
print "\nUsage: pparser.py <passwd file> <output file>"
try:
out = open (sys.argv[2], 'w')
for line in open(sys.argv[1], 'r').readlines():
l=line.split(':')[0]
out.write(l+':'+l+'\n')
print "\n[+] Successfull! Combolist for bruteforce created"
out.close()
except:
print "\n[-] Error: check your passwd file path"
pass
Последний раз редактировалось InFlame; 24.10.2009 в 10:57..
|
|
|

21.07.2009, 18:07
|
|
Крёстный отец :)
Регистрация: 22.06.2005
Сообщений: 1,330
Провел на форуме: 5302668
Репутация:
2054
|
|
может кому пригодится часть кода, взято с обменника.
PHP код:
<?php
*******
$filename = "./uploads/".$file;
// set the download rate limit
$download_rate = 150;
// set the download rate limit (premium)
// $download_rate = 5000;
// send headers
header("Content-Type: application/unknown");
header("Content-type: application/octet-stream"); // FireFox
header("Content-type: application/octetstream"); // IE
header("Content-Disposition: inline; filename=". str_replace(" ", "_", $file));
header('Content-length: ' . (string)(filesize($filename)));
// flush content
flush();
// open file stream
$f = fopen($filename, "r");
while(!feof($f)) {
// send the current file part to the browser
print fread($f, round($download_rate * 1024));
// flush the content to the browser
flush();
// sleep one second
sleep(1);
}
// close file stream
fclose($f);
*****
?>
__________________
Лучший способ защиты - это нападение!!!
|
|
|

22.07.2009, 06:11
|
|
Постоянный
Регистрация: 12.12.2006
Сообщений: 906
Провел на форуме: 4205500
Репутация:
930
|
|
zifanchuck, комплексные числа где?
|
|
|

22.07.2009, 16:24
|
|
Познающий
Регистрация: 29.03.2009
Сообщений: 87
Провел на форуме: 2185909
Репутация:
308
|
|
Cегодня понадобился, думаю, может еще кому-нибудь пригодится.
Код:
# gdns.pl
# Index all subdomains from a domain without using zone transfer or dns resolving.
# Intended use for this script is to enumerate all subdomains for a given domain.
# Author: DiabloHorn
# Date: 16-02-2008
# Version: 0.3
#changes
# fixed the - bug
# fixed the hang bug when it reached the end of the google results
#
###TODO###
# implement rotating proxy support
###POSSIBLE BUGS###
# the need to ctrl+c if results are less then 100
use LWP::UserAgent;
use HTML::LinkExtor;
use URI::URL;
$numArgs = $#ARGV + 1;
if($numArgs != 1){
print "gdns.pl <base domain>\n";
print "Example: gdns.pl kd-team.com\n";
print "Should find all subdomains indexed by google.";
exit(1);
}
#intentionally not using quotemeta, cause it fucks up in the search
$searchitem = $ARGV[0];
#if you change this....change the regexes.
my $baseSEngine = "http://www.google.com";
#start url for searching
$url = URI->new("$baseSEngine/search?hl=en&q=site%3A$searchitem");
$ua = LWP::UserAgent->new;
$ua->agent('Opera/9.20 (Windows NT 6.0; U; en)'); #this should help us a little to fool google.
print "[*] starting subdomain search on $searchitem\n";
#hash containing all found sub domains
my %allurls = ();
#hash containing all the "next" urls from google
my %nexturls = ();
#callback for each request to parse the page
sub callback {
my($tag, %attr) = @_;
#for this poc we are only interested in the <a href> tags
return if $tag ne 'a';
my @links = values %attr;
foreach $link(@links){
#extract all urls that contain the base domain
if($link =~ m!(^(http://|https://|ftp://|irc://)(([a-zA-Z0-9\-\.]*)(\.+))*$searchitem)!io){
if (!exists $allurls{$1}){
$allurls{$1} = $1;
print "$1\n";
}
}
#extract the google next urls
if($link =~ m!/search\?q=site:$searchitem&hl=\w+&start=\d+&sa=\w!io){
if (!exists $nexturls{$link}){
$nexturls{$link} = $link;
}
}
}
}
#setup the callback
$p = HTML::LinkExtor->new(\&callback);
# Request document and parse it as it arrives
$res = $ua->request(HTTP::Request->new(GET => $url),sub {$p->parse($_[0])});
$visitedGURLS = 0;
#for the moment beeing assume 10000 results.
while(1){
if($visitedGURLS == scalar keys(%nexturls)){
last;
}
foreach $nurl(sort keys(%nexturls)){
my $value = $nexturls{$nurl};
#prevent parsing pages twice
if($value ne "visited"){
my $temp = URI->new($baseSEngine.$value);
#you can comment this out if you only want clean finds.
#print "[*] searching next page $temp\n";
$res = $ua->request(HTTP::Request->new(GET => $temp),sub {$p->parse($_[0])});
$nexturls{$nurl} = "visited";
$visitedGURLS++;
sleep 3; #try and prevent getting blocked by google
}
}
}
|
|
|
[python] Парсер мейлов по резюме на rabota.mail.ru |

24.07.2009, 19:16
|
|
Новичок
Регистрация: 24.07.2009
Сообщений: 24
Провел на форуме: 71052
Репутация:
5
|
|
[python] Парсер мейлов по резюме на rabota.mail.ru
Парсер мейлов по резюме на rabota.mail.ru
country - код страны
lang - язык
sex - пол
edu - образование
Все эти значения можно получить в сорце http://rabota.mail.ru/resume_search/
delay - задержка в секундах
get_fio (1 или 0) - получать ли ФИО
get_phone (1 или 0) - получать ли телефон (если есть)
Резальтат будет записан в файл output.txt в кодировке utf-8. Кому нужна другая кодировка правьте сами
Формат: "email@host.domain", "phone", "fio"
Код:
#!/usr/bin/env python
# -*- coding: utf-8 -*-
import re
import urllib
import time
country = '0'
lang = '0'
sex = '0'
edu = '0'
delay = 0
get_fio = 1
get_phone = 1
page = 1
count = 1
output_file = open('output.txt', 'w')
while True:
source = urllib.urlopen('http://rabota.mail.ru/resume_search/?go=1&search_type=1&order_type=1&country=' + country + '&spec_group=0&salary_currency=2&lang=' + lang + '&lang_level=0&sex=' + sex + '&edu=' + edu + '&resume_on_page=3&publics=0&table=0&page=' + str(page)).read()
if len(re.findall('<div class="full"><a href="/resume/(.*?)/"', source)) != 0:
for id in re.findall('<div class="full"><a href="/resume/(.*?)/"', source):
vacancy = urllib.urlopen('http://rabota.mail.ru/resume/' + id).read()
email = re.findall('<td><a href="mailto:.*?">(.*?)</a></td>', vacancy)[0]
output = '"' + email + '"'
if get_phone:
try:
phone = re.findall('\t\t\t\t\t\t<td>(\+.*?)</td>', vacancy)[0].replace(' ', '')
except:
phone = 'None'
output += ', "' + phone + '"'
if get_fio:
fio = re.findall('<div class="cmp_name">(.*?)<br />', vacancy)[0]
output += ', "' + fio + '"'
print str(count) + '\t' + email
output_file.write(output.decode('windows-1251').encode('utf-8') + '\n')
output_file.flush()
count += 1
time.sleep(delay)
page += 1
else:
break
Последний раз редактировалось e4key; 24.07.2009 в 23:40..
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|