3D13 - 2

Le hacker modèle

/_____________________________________\ <- sociétés sécurisées
| hackers (qui percent la sécurité )                          |
|------------------------------------------------ --|
| utilisateur (qui consultent des pages intéressantes) |
|------------------------------------------------- -|
| vicieuxxxx (qui aime les sites de cul uniquement) -|
|--------------------------------------------- -----|
| rats lamers (qui consultent les sites de hack, de    |
|                   cul, qui n'en tire pas profit (du hack)  |
|                  il dit que c'est pas bien mais il le fait)  |
|------------------ -------------------------------|
| sites racistes, pédophiles, nécrophiles, sectes...)  | <- eux faut les nicker, fuck à tous ces connards de merde
|_____________________________________|

C'est la fin de cet article, en gros : discretion, discretion et discretion (ainsi que courtoisie :-)

TCP/IP, liste détaillée des ports

Comme la liste est très longue, prennez le lien vers "ports.txt"

Turbo Pascal, on continue (Partie 2)

PROGRAM Exercice1_correction;

VAR prenom : string; nombre1, nombre2 : integer;

BEGIN

  WriteLn('Salut, c''est quoi donc qu''ton prénom ?');

  ReadLn(prenom);

  WriteLn('Entre un premier nombre à soustraire...');

  ReadLn(nombre1);

  WriteLn('..et un deuxième');

  ReadLn(nombre2);

  WriteLn(prenom,' tu veux savoir le résultat de ',nombre1,' - ',nombre2,', eh ben c''est ', nombre1-nombre2);

END.

PROGRAM Efface;

USES Crt;

BEGIN

  ClrScr;

  Write('Vous avez vu, l''écran s''est éffacé !');

  ReadLn;

END.

No comment - c'est compréhensible,
en parlant de commentaires, on peut en mettre en pascal de deux façons :
{ commentaire ici } et (* commentaire ici *), les plus employés sont les accolades {}
Donc, je reprend le programme précédent que je commente :

PROGRAM Efface; {identificateur nommant le programme}

USES Crt; { nom de l'unité utilisée, ici : Crt, utilisée pour les affichages }

BEGIN { début du programme }

  ClrScr; {effacement de l'écran, équivalent de CLS sous dos}

  Write('Vous avez vu, l''écran s''est effacé !'); { écrit la phrase, ne pas oublier de doubler

                                                     les apostrophes ' pour qu'il y en ait }

  ReadLn; { attend que l'utilisateur appuye sur <ENTREE> }

END. {fin du programme}

Aussi, vous allez programmer la durée de la note, voici les correspondances (durée note/millisecondes)
 

Exemple, si vous devez jouer un sol pendant la durée d'une blanche (2 secondes), vous taperez le code suivant :

PROGRAM Sol;

USES Crt;

BEGIN

Sound(392);

Delay(2000);

NoSound;

END.

Maintenant vous pourrez faire jouer "Au clair de la lune" par votre speaker...

Votre belle mère a un corps de mec !

Unix, initiation : je veux vite apprendre

login :

password :

Les bananes sont bonnes à la santé,

mangez en donc.

Signé : Fondération des Mangeurs de Banane.

Comment pirater le vrai fbi en 3 secondes !!!

Source de identTCPscan

#include <stdio.h>
#include <string.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <errno.h>
#include <fcntl.h>
#include <netinet/in.h>
#include <netdb.h>
#include <unistd.h>

enum errlist
{
  BAD_ARGS,BAD_HOST,NO_IDENT,SOCK_ERR
};

void
usage(error)
enum errlist error;
{
  fprintf(stderr,"ident-scan: ");
  switch(error)
  {
    case BAD_ARGS: fprintf(stderr,"usage: ident-scan hostname [low port] [hi port]\n");
                   break;
    case BAD_HOST: fprintf(stderr,"error: cant resolve hostname\n");
                   break;
    case NO_IDENT: fprintf(stderr,"error: ident isnt running on host\n");
                   break;
    case SOCK_ERR: fprintf(stderr,"error: socket() failed\n");
                   break;
  }
  exit(-1);
}

struct hostent *
fill_host(machine,host)
char *machine;
struct hostent *host;
{

  if ((host=gethostbyname(machine))==NULL)
  {
     if ((host=gethostbyaddr(machine,4,AF_INET))==NULL)
        return(host);
  }
  return(host);
}

int
main(argc,argv)
int argc;
char **argv;
{
  struct sockaddr_in forconnect,forport,forident;
  int i,sockfd,identfd,len=sizeof(forport),hiport=9999,loport=1,curport;
  struct servent *service;
  struct hostent *host;
  char identbuf[15], recieved[85], *uid;

  if ((argc<2) || (argc>4))
    usage(BAD_ARGS);
  if (argc>2)
     loport=atoi(argv[2]);
  if (argc>3)
     hiport=atoi(argv[3]);
  if ((host=fill_host(argv[1],host))==NULL)
    usage(BAD_HOST);
  forconnect.sin_family=host->h_addrtype;
  forconnect.sin_addr.s_addr=*((long *)host->h_addr);
  forident.sin_family=host->h_addrtype;
  forident.sin_addr.s_addr=*((long *)host->h_addr);
  forident.sin_port=htons(113);

  if ((identfd=socket(AF_INET,SOCK_STREAM,0))== -1)
     usage(SOCK_ERR);
  if ((connect(identfd,(struct sockaddr *)&forident,sizeof(forident)))!=0)
     usage(NO_IDENT);
  close(identfd);

  for(curport=loport;curport<=hiport;curport++)
  {
     for(i=0;i!=85;i++)
        recieved[i]='\0';
     forconnect.sin_port=htons(curport);
     if ((sockfd=socket(AF_INET,SOCK_STREAM,0))== -1)
        usage(SOCK_ERR);
 

     if (connect(sockfd,(struct sockaddr *)&forconnect,sizeof(forconnect))==0)
     {
       if (getsockname(sockfd,(struct sockaddr *)&forport,&len)==0)
       {
          if ((identfd=socket(AF_INET,SOCK_STREAM,0))== -1)
             usage(SOCK_ERR);
          if (connect(identfd,(struct sockaddr *)&forident,sizeof(forident))==
          {
             sprintf(identbuf,"%u,%u",htons(forconnect.sin_port),
                htons(forport.sin_port));

             write(identfd,identbuf,strlen(identbuf)+1);
             read(identfd,recieved,80);
             recieved[strlen(recieved)-1]='\0';
             uid=strrchr(recieved,' ');
             service=getservbyport(forconnect.sin_port,"tcp");
             printf("Port: %3d\tService: %10s\tUserid: %s\n",curport,
                (service==NULL)?"(?)":service->s_name,uid);
          }
       }
    }
    close(sockfd);
    close(identfd);
  }
}
-------------- <8 coupe ici 8> ---------------------------------------------------------------------

Les explosifs pratiques :-)

1°) Trempez le coton dans l'acide nitrique :

2°) Sortez le coton de l'acide nitrique et rincez le sous l'eau :

C'est tout pour l'instant car je voulais faire un recette inédite (au moins en france je crois), je n'allais pas vous rabacher sucre+désherbant=BOOM car tout le monde le sait, je vous donne quand même la formule pour ce mélange archi-connu car je l'ai jamais vu :

Le mot de la faim

                      °~-_-~°
                    T   o  o   T
                           ^
                      (   O   )
                       ------
                  I'll be back !

                           -.                       .-
                       _..-'(                       )`-.._
                    ./'. '||\\.       (\_/)       .//||` .`\.
                 ./'.|'.'||||\\|..    )o o(    ..|//||||`.`|.`\.
              ./'..|'.|| |||||\`````` '`"'` ''''''/||||| ||.`|..`\.
            ./'.||'.|||| ||||||||||||.     .|||||||||||| ||||.`||.`\.
           /'|||'.|||||| ||||||||||||{     }|||||||||||| ||||||.`|||`\
          '.|||'.||||||| ||||||||||||{     }|||||||||||| |||||||.`|||.`
         '.||| ||||||||| |/'   ``\||``     ''||/''   `\| ||||||||| |||.`
         |/' \./'     `\./         \!|\   /|!/         \./'     `\./ `\|
         V    V         V          }' `\ /' `{          V         V    V
         `    `         `               V               '         '    '