Bermain – main dengan modem sierra 881u di ubuntu jaunty

selama ini, sulit sekali ditemui sopwer2 yang ditujukan untuk memanajemeni modem kesayanganku, sierra wireless 881u di lingkungan linux ubuntu jaunty.
ada sih beberapa yang bisa dipakai untuk dialup dan monitor sinyalnya, misalnya umtsmon.

tapi ada beberapa keperluan yang belum bisa dipenuhi, misalnya :
bagaimana cara mengubah jaringan yang kita gunakan secara on the fly, dari GPRS ke UMTS dan mengetahui status modem secara lengkap.
salah satu cara adalah dengan menggumanakan minicom (text mode) atau cutecom (GUI).

tutorial minicom bisa dilihat di sini.
jika terjadi error di konsole minicom anda, coba set “Hardware Flow Control”
menjadi “No”.
berdasarkan praktek saya, setelah modem sierra 881u ditancapkan ke port usb,
akan ada 3 virtual device yg terdetect, yaitu ttyUSB0, ttyUSB1 dan ttyUSB2,
anda bisa liat dengan perintah dmesg di konsole.
nah, dari ketiga device tsb, di minicom yg bisa sempurna keluar tulisannya
atau text nya adalah ttyUSB2.

kita bisa mengganti jaringan 2G All ke 3G All , dan sebaliknya lewat minicom ini.

Agar lebih praktis, saya merangkai perl skrip yang bisa switch jaringan, dan
mengetahui status modem.
dasarnya adalah AT Command yang kita gunakan di minicom tadi.

sedangkan referensi AT Command untuk modem sierra bisa dilihat di sini.

NB : skrip perl menyusul, bingung mau ditaruh dimana, geocities mau tutup….

skrip bash brutedial di ubuntu

supaya tangan gak capek2 tekan tombol terus2an, maka dibuatlah yang kayak gini :

bahan2nya :
bash script, pppconfig, wget, dengan root akses.

maen gps dolo ahhh……

Yahoo Messenger lewat web

Setelah capek berbingung ria mencari alternatip pengganti YM6 (di saat menggunakan koneksi dengan query), maka ketemulah apa yang di idam2 kan….

Yahoo Messenger via web situs yahoo asli yang kutahu selama ini adalah versi mobile nya :

http://m.yahoo.com/

ternyata yahoo messenger sudah ada versi web nya…. (udah pada tau ya… ).

http://webmessenger.yahoo.com/

terasa lebih ringan daripada meebo yang bikin mabok…..koneksinya…

atau anda punya alternatip YM via web yg laen (selain ebuddy dan meebo tentunya) ???

Petunjuk pemakaian skrip perl

Karena ada banyaknya pertanyaan mengenai bagaimana cara pemakaian skrip perl TBYB dan Rapidshare, maka berikut ini sedikit petunjuknya :

DI WINDOWS :

Download dulu activeperl di :

http://www.activestate.com/activeperl/

lalu install di windows anda.

khusus untuk skrip rapidshare, anda harus menambahkan modul
Crypt-SSLeay, karena memerlukan koneksi https/ssl, dengan cara
mengetikkan di command prompt :

C:\ppm install http://theoryx5.uwinnipeg.ca/ppms/Crypt-SSLeay.ppd

untuk menjalankan skrip perl nya, tinggal ketik di command prompt :

C:\>skrip.pl

cara yang lain di windows adalah menggunakan cygwin,
tapi nginstallnya lebih beresiko gagal, karena membutuhkan koneksi
internet yang stabil.

DI LINUX :

Paket perl secara native telah terinstall di linux,
jadi anda tinggal jalankan di linux box anda perintah :

$chmod +x skrip.pl
$./skrip.pl

jika modul Crypt-SSLeay belum terinstall di linux box anda,
maka anda harus menginstallnya dulu sesuai dengan petunjuk
masing2 distro.

silahkan menambahkan atau memberi komentar/pertanyaan lagi
seputar petunjuk pemakaian skrip perl ini.

THX.

[PERL] UPDATE Rapidshare Premium User Checker

Ada sedikit perubahan pada code, karena skrip lama akan langsung
mengeksekusi “die” sewaktu hasil parsing pada iterasi multi user checker nya tidak cocok. Hal ini akan membuat proses pengecekan multi user akan langsung berhenti.

Di skrip update v003 ini, proses akan terus berlangsung, sampai user terakhir selesai dicek.

Silahkan mengunduh skrip baru di geocities lagi .

Silahken bila ada komentar || saran lagi…..

THX.

[PERL] Rapidshare Premium User Checker

Setelah merasa membutuhkan tool untuk mengecek kevalidan premium
user rapidshare, maka saya membuat skrip kecil dengan perl.

Fasilitas :
[+] Single user checker
[+] Multi User checker
[+] Support Proxy

untuk cek multi user, buat satu file, misalnya : “cekuserpremix.txt” ,

isi dengan format :


userrapid:passwordrapid


contoh :


7598271:www.freekonta.pl
Didadidadoum:www.freekonta.pl
1549391:www.freekonta.pl


Berikut ini code perl nya :


#!/usr/bin/perl
#
# rapidcheckuserv002.pl

use strict;
use LWP;
use HTTP::Cookies;
use Getopt::Std;
use Crypt::SSLeay;

my $bannerku=<new;
push @{ $browser->requests_redirectable }, 'POST';
$browser -> agent($Agent);
if ($opt_p) {
if ($opt_p=~m/(.+?)\:(.+?)\@((?:.+?)\:(?:.+))/) {
$opt_p = "http://$3";
$ENV{HTTPS_PROXY} = $opt_p;
$ENV{HTTPS_PROXY_USERNAME} = $1;
$ENV{HTTPS_PROXY_PASSWORD} = $2;
#$browser ->proxy(['http', 'https'], 'http://'.$opt_p.'/') if ($opt_p);
#$browser ->proxy(['https'], 'https://'.$opt_p.'/') if ($opt_p);
} elsif ($opt_p=~m/((?:.+?)\:(?:.+))/) {
$opt_p = "http://$1";
$ENV{HTTPS_PROXY} = $opt_p;
} else {
printlog ("\n[*] Silahken memasukkan Opsi Proxy seperti pada contoh !!!\n\n");
die("\n");
}
}
$browser ->timeout(45);
my @waktu = localtime(time);
my $log = 'rapidcuv002-'.$waktu[3].($waktu[4]+1).($waktu[5]+1900).'-'.$waktu[2].'-'.$waktu[1].'-'.$waktu[0].'.txt';
my $kokis = "lwpcookiesrapidcuv002.txt";
$browser->cookie_jar(HTTP::Cookies->new(file => $kokis, autosave => 1));

my $url = "https://ssl.rapidshare.com/cgi-bin/premiumzone.cgi";

printlog ("\n[*] Processing: $url .....\n\n");
#printlog ("\n[*] Processing: $user :: $passwod\n\n");

if ($opt_l) {
if ($opt_l=~m/(.+?)\:(.+)/) {
#$user = $1;
#$passwod = $2;
printlog ("\n[*] Processing: $1 :: $2\n\n");
&poss($url,$1,$2);
} else {die("\n[~] Format user:password salah !!!\n\n");}
}
elsif ($opt_f) {
open(UF, $opt_f) || die "\nI can't open the list\n";
@daptar=;
close(UF);
foreach $elemen(@daptar){
chomp($elemen);
if ($elemen=~/(.+):(.+)/) {
printlog ("\n[*] Processing: $1 :: $2\n\n");
&poss($url,$1,$2);
} #of if
sleep 1;
} #of foreach
}
else {
printlog ("\n[*] Silahken memasukkan Opsi seperti pada contoh !!!\n\n");
die("\n");
}

sub poss {
my $uurl = shift;
my $uuser = shift;
my $upasswod = shift;

my $lihat = HTTP::Request->new(POST => $uurl);
$lihat->content_type('application/x-www-form-urlencoded');
$lihat->referer('https://ssl.rapidshare.com/premiumzone.html');
my $loginsend = 'uselandingpage=1&'.
'login='.$uuser.'&'.
'password='.$upasswod;
$lihat->content-length($loginsend);
$lihat->content($loginsend);
my $lihatresponse = $browser->request($lihat);
if ($lihatresponse->is_success) {
#printlog($lihatresponse->as_string);
my $kutukupret=join("",$lihatresponse->as_string);
#my $cucok=$kutukupret=~m/Overview of the Account\: (.+?)\\\/sg;
if ($kutukupret=~m/Overview of the Account\: (.+?)\\\/sg) {
printlog("\n[+] Login Premium Account $1 Berhasil\n");
}
elsif ($kutukupret=~m/\

Your Premium Account has not been found\.\/sg) {
printlog("\n[+] Your Premium Account has not been found. \n\n");
die("[-] Error...\n\n");
}
elsif ($kutukupret=~m/\

The Account has been found\, but the password is incorrect\.\/sg) {
printlog("\n[+] The Account has been found, but the password is incorrect. \n\n");
die("[-] Error...\n\n");
}
else { printlog("\n[-] Login Gagal ! Mungkin diblokir atau Password salah.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/\ Expiration date\:\ \(.+?)/sg) {
printlog("\n[+] Tanggal Expired : $1 \n");
}
else { printlog("\n[-] TGL Expired Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/\ Traffic left\:\\ \\document\.write\(setzeTT\(\"\"\+Math\.ceil\((.+?)\)\)\)\;\ (.+?)\\/sg) {
printlog("\n[+] Traffic left : $1 $2 ");
}
else { printlog("\n[-] Traffic left 1 Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/credited to the download quota\.\'\)\" style\=\"cursor\:help\"\>(.+?)\\)\\/sg) {
printlog("($1) \n");
}
else { printlog("\n[-] Traffic left 2 Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/\ RapidPoints\:\\ \(.+?)\\/sg) {
printlog("\n[+] RapidPoints : $1 \n");
}
else { printlog("\n[-] RapidPoints Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/\ Server time\:\\ \(.+?)\\/sg) {
printlog("\n[+] Server time : $1 \n");
}
else { printlog("\n[-] Server time Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/\ Used storage\:\\ \\document\.write\(setzeTT\(\"(.+?)\"\)\)\(.+?)\\/sg) {
printlog("\n[+] Used storage : $1 $2\n");
}
else { printlog("\n[-] Used storage Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/help\"\>RapidPoints PU\\:\\ \(.+?)\\/sg) {
printlog("\n[+] RapidPoints PU : $1 \n");
}
else { printlog("\n[-] RapidPoints PU Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/\ TrafficShare left\:\\ \(.+?)\\/sg) {
printlog("\n[+] TrafficShare left : $1 \n");
}
else { printlog("\n[-] TrafficShare left Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}
if ($kutukupret=~m/\ Files\:\\ \(.+?)\\/sg) {
printlog("\n[+] Files : $1 \n");
}
else { printlog("\n[-] Files Gagal ! Mungkin diblokir atau overlimit.\n");
printlog($lihatresponse->as_string);
die("[-] Error...\n\n");
}

}
else {
print "[-] Error: ".$lihatresponse->status_line."\n\n" ; printlog ($lihatresponse->as_string);
die("[-] Error...\n\n");
}
printlog ("\n[*] *************\n\n");
} #end of sub

sub printlog {
print @_[0];
open(lo,">>$log");
print lo @_[0];
close(lo);
return;
}


maap, kalo penulisan codenya jadi kacau,
silahken donglotz di geocities.

cek multi user rapid lebih maknyuz…..

ini file log nya :

[*] Processing: https://ssl.rapidshare.com/cgi-bin/premiumzone.cgi .....

[*] Processing: rapidhackhit :: philips

[+] Login Premium Account rapidhackhit Berhasil

[+] Tanggal Expired : Mon, 2. Feb 2009

[+] Traffic left : -3062217/1000 MB (+0 GB)

[+] RapidPoints : 2000

[+] Server time : 04.01.2009 16:54:57

[+] Used storage : 14 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 4

[*] *************

[*] Processing: 7337748 :: Ftd4g6te

[+] Login Premium Account 7337748 Berhasil

[+] Tanggal Expired : Thu, 21. May 2009

[+] Traffic left : -3033957/1000 MB (+0 GB)

[+] RapidPoints : 6000

[+] Server time : 04.01.2009 16:55:15

[+] Used storage : 0 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 0

[*] *************

[*] Processing: 3578799 :: 5TKFme5hUB

[+] Login Premium Account 3578799 Berhasil

[+] Tanggal Expired : Mon, 5. Jan 2009

[+] Traffic left : -2328952/1000 MB (+0 GB)

[+] RapidPoints : 17000

[+] Server time : 04.01.2009 16:55:48

[+] Used storage : 0 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 1

[*] *************

[*] Processing: 800953 :: 473680

[+] Login Premium Account 800953 Berhasil

[+] Tanggal Expired : Fri, 20. Feb 2009

[+] Traffic left : -2207469/1000 MB (+0 GB)

[+] RapidPoints : 19000

[+] Server time : 04.01.2009 16:56:19

[+] Used storage : 0 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 1

[*] *************

[*] Processing: stipo :: eeepc

[+] Login Premium Account stipo Berhasil

[+] Tanggal Expired : Sun, 19. Apr 2009

[+] Traffic left : -3369326/1000 MB (+0 GB)

[+] RapidPoints : 7000

[+] Server time : 04.01.2009 16:56:51

[+] Used storage : 2 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 2

[*] *************

[*] Processing: 7609420 :: cB3Xsd3418Tuv3y9Y

[+] Login Premium Account 7609420 Berhasil

[+] Tanggal Expired : Fri, 13. Mar 2009

[+] Traffic left : -4302137/1000 MB (+0 GB)

[+] RapidPoints : 3000

[+] Server time : 04.01.2009 16:57:23

[+] Used storage : 41 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 3

[*] *************

[*] Processing: 555816 :: 305509

[+] Login Premium Account 555816 Berhasil

[+] Tanggal Expired : Wed, 14. Jan 2009

[+] Traffic left : -3355262/1000 MB (+0 GB)

[+] RapidPoints : 7000

[+] Server time : 04.01.2009 16:58:00

[+] Used storage : 0 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 1

[*] *************

[*] Processing: 7337748 :: Ftd4g6te

[+] Login Premium Account 7337748 Berhasil

[+] Tanggal Expired : Thu, 21. May 2009

[+] Traffic left : -3033957/1000 MB (+0 GB)

[+] RapidPoints : 6000

[+] Server time : 04.01.2009 16:58:38

[+] Used storage : 0 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 0

[*] *************

[*] Processing: 7490064 :: zwd9ab

[+] Login Premium Account 7490064 Berhasil

[+] Tanggal Expired : Sat, 3. Jan 2009

[+] Traffic left : 12000000/1000 MB (+0 GB)

[+] RapidPoints : 0

[+] Server time : 04.01.2009 16:59:11

[+] Used storage : 0 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 5.00 GB

[+] Files : 0

[*] *************

[*] Processing: 5792166 :: www.rapidhack.pl

[+] Login Premium Account 5792166 Berhasil

[+] Tanggal Expired : Mon, 9. Feb 2009

[+] Traffic left : 799287/1000 MB (+16 GB)

[+] RapidPoints : 12100

[+] Server time : 04.01.2009 16:59:48

[+] Used storage : 312 MB

[+] RapidPoints PU : 0

[+] TrafficShare left : 21.00 GB

[+] Files : 2

[*] *************

TO DO :
[+] Ngatasin versi bahasa german nya…..
[+] Pengennya langsung check masih ada quota kagak….

Ada komentar || saran ?

YF Auto Create User + aktivasi TBYB

Ternyata enak juga pake YF client editan bang rizal2gb…..

THX to bang rizal2gb.

kagak pake ribet banyak kotak peringatan, kagak perlu install segala ;D

Yang jadi masalah, kalo pengen kecepatan dan durasi nya gak dibatasi,

kita harus beli premium account YF nya 

atau pake cara lain dengan menggunakan fasilitas Try Before You Buy,

pilih paket TOTAL, dengan durasi 4 jam dan kecepatan tidak dibatasi.

Untuk mempersingkat perolehan user YF dengan fasilitas TBYB,

maka saya membuat satu skrip kecil yang bisa sekali jalan aja.

hmmmmm…… yummy…….

salam buat warga CP yang telah banyak memberikan inspirasi……

EDIT & UPDATE : 8 jan 2009

ini dia source codenya. .

UPDATE : 5 pebruari 2009

ini dia update source codenya. .

silahken apabila ada komentar dan saran…

[update] CyberPhreaking Menu

cuman ngasih tahu…….

telah datang update CPMenu.

Beberapa perbaikan di cpmenu ini meliputi :
[+] fix di link advertising
[+] penambahan submenu di menu forum regional cyberphreaking
[+] penyesuaian di menu user control panel
[+] fix logo cpmenu (yg dulu tdk keliatan)
[+] fix id menu agar tidak crash dengan KaskusMenu

bisa diunduh di rapid.

Terima kasih kepada temen2 sekalian atas masukannya selama ini,

mohon agar kritik dan saran tetep diberikan ,

agar add-on ini lebih komplit lagi.

Promo Indosat [lagi]

Hari ini akyu dapet sms dari temen, yang isinya sebagai berikut :

per tgl 31/3/2008 tarif nelpon IM3 HANYA Rp 480 , berlaku pukul 23-11 sesama ISAT. Fitur sms: 10 gratis 10, CS-an, voucher sms TETAP BERLAKU. GPRS Rp 1,1/kb – ISAT KDR.

Berlaku sampai dengan 30 April 2008.

Kalo mentari, dapet info dari temen juga :

isi ulang mulai 10 ribu ke atas, dapat bonus 50 persen, jadi kalo ngisi 10 ribu, dapetnya 15 ribu, dan seterusnya.  Berlaku sampai kapan ??? Lha itu dia, akyu belum tau….

nah selamat menikmati…..  (jaringan lambat dan sibuk lagi)….

CyberPhreakingMenu [Firefox Add-ons]

Akses yang cepat ke forum kesayangan kita merupakan suatu hal yang disukai oleh para netter, padahal kondisi koneksi internet di negara kita paling sering lemotz…..

Salah satu solusinya adalah dengan menggunakan bookmark di browser kesayangan kita, firefox, tapi cukup capek juga kalau harus menyusunnya satu persatu.

Solusi yang lain adalah menyusun add-ons di firefox yang gunanya adalah juga mempercepat akses ke forum kesayangan, dengan menu – menu yang ada di dalamnya.

Atas request teman – teman di room CP_brotherhood, maka saya menyusun add-ons yang tujuannya memunculkan menu – menu yang ada di forum.

Add-ons di atas bisa anda download di rapidshare atau cakung.
Mendukung firefox v1.5 sampai dengan v4.*

Semoga bisa membantu teman – teman terutama yang akses internetnya “agak” lambat dan “suka” putus – putus (idle).

Kalau ada bug atau eror, mohon dilaporkan ke forum atau kasih komen di sini…

Terima kasih kepada fich atas karyanya (kaskusmenu.xpi), yang telah mengilhami CPmenu ini.

[EOF]