Dissidents - sex

Faire l'amour souvent, c'est bon pour le cœur.

Poulet — Thu, 27 Dec 2007 16:34:00 +0000

Oui j'utilise le tag sex alors que ça attire les rétroliens douteux (semblerait-il), mais on s'en fout, ça n'est plus qu'une question de mois avant d'avoir BHM.

En réponse à Asgeir qui demande plus d'articles çaÿqses, un lien sur le sujet. Intéressant.

Naturellement, je ne veux frustrer personne ici. Adressez-vous à Asgeir.

J'en profite pour féliciter rayman, qui a (paraîtrait-il) (enfin) réussi à pécho (totalement ?), et pour dire à Pwasson que je l'aime et que j'ai besoin d'elle.

Allez-y moquez-vous j'm'en fous.

Dissidents is back.

Cygal — Tue, 20 Nov 2007 16:54:00 +0100

Ouais, personne l'a remarqué, mais bon, faut faire les choses bien.

Ça faisait quelques jours que Dissidents n'était plus accessible : les 2.5 Go auquel j'ai accès étaient utilisés, la faute à un script de backup qui faisait des backups toutes les minutes, et avec le spam dans les trackbacks, ça représentait dans les 4Mo par backup, c'est vite monté. Donc voilà, Dark-Side, les bots qui floodent les trackbacks, et les gens qui tombent sur "des photos de (Poulet|Pwasson) à poil" en faisant des recherches pas très catholiques sur Google (c'est assez drôle de parcourir les logs du coup) peuvent êtres rassurés : ça marche. \o/

Je tiens à remercier Pmol et nos sponsors (mais surtout Pmol) sans qui toute cette aventure n'aurait pas été possible.

Donc, quelques bouts du logs d'aujourd'hui, pour le fun :

20/Nov/2007:00:00:38 "Des-photos-de-Pwasson-a-poil" "photo teen angie lita"
20/Nov/2007:00:10:49 "Medibuntu-devient-sex" "brutal facesitting diva"
20/Nov/2007:00:14:31 "Des-photos-de-Pwasson-a-poil" "bodybuilder frot vidèo" (3 fois :o)
20/Nov/2007:00:58:05 "Des-photos-de-Pwasson-a-poil" "lisa ANN vidèo porno"
20/Nov/2007:01:26:59 "Medibuntu-devient-sex" "super sex 65 min sex prono"
20/Nov/2007:04:55:54 "fstab-exotique-dans-Ubuntu" "felicia darkstalker hentai"
20/Nov/2007:05:29:47 "fstab-exotique-dans-Ubuntu" "Meagan Good frre nude pics"
20/Nov/2007:05:41:24 "Debout-les-gars-reveillez-vous" "free Samantha slopes porn videos"
20/Nov/2007:06:39:35 "Medibuntu-devient-sex" "brazil adult nite life video"
20/Nov/2007:10:14:28 "etc/fstab-exotique-dans-Ubuntu" "dog and gairl sex"

Bon, j'en ai sauté pas mal, y'en a eu plein d'autres, et y'en aura d'autres (sauf que maintenant apu trackbacks, donc ça va bien baisser un jour).

« Ca ne marchera pas ...

Dark-Side — Mon, 05 Nov 2007 16:16:00 +0100

... Vous savez pourquoi ? Parce que ça nous amuse. Vous trouvez quelque chose pour m’emmerder, je trouve quelque chose pour vous emmerder. C’est un jeu et je vais gagner. J’ai un coup d’avance. Vous êtes déjà emmerdé. »
Edité le 25/12/07
Je crois que je vais faire comme ça désormais, toujours commencer mes articles par une citation sans rapport (ou du moins sans rapport logique apparent).
Bref, je suis là parce que j'avais dis que je vous montrerai une IA en prolog. Donc voilà je vais vous en montrer une.
Pour qu'on soit d'accord tout de suite :

oui le code est sale
oui je m'en fous
non je n'accepterai aucune remarque

Bien. Ceci mis au clair, voici le code :

est_vainqueur(papier, pierre).
est_vainqueur(pierre, ciseaux).
est_vainqueur(ciseaux, papier).

corres(pierre, 1).
corres(papier, 2).
corres(ciseaux, 3).

corresp(perdu, 0).
corresp(nul, 1).
corresp(gagne, 2).

same(X, X).

plus_joue([Papier,Pierre,Ciseaux], X) :- Pierre >= Papier, Pierre >= Ciseaux, same(X, pierre).
plus_joue([Papier,Pierre,Ciseaux], X):- Pierre =< Papier, Papier >= Ciseaux, same(X, papier).
plus_joue([Papier,Pierre,Ciseaux], X) :- Ciseaux >= Papier, Pierre =< Ciseaux, same(X, ciseaux).
 
traiter(perdu, pierre, [Papier, Pierre, Ciseaux], X) :- P is Papier + 1, same(X, [P,Pierre, Ciseaux]).
traiter(perdu, ciseaux, [Papier, Pierre, Ciseaux], X) :- P is Pierre + 1, same(X, [Papier,P, Ciseaux]).
traiter(perdu, papier, [Papier, Pierre, Ciseaux], X) :- C is Ciseaux + 1, same(X, [P,Pierre, C]).
 
traiter(nul, papier, [Papier, Pierre, Ciseaux], X) :- P is Papier + 1, same(X, [P,Pierre, Ciseaux]).
traiter(nul, pierre, [Papier, Pierre, Ciseaux], X) :- P is Pierre + 1, same(X, [Papier,P, Ciseaux]).
traiter(nul, ciseaux, [Papier, Pierre, Ciseaux], X) :- C is Ciseaux + 1, same(X, [P,Pierre, C]).
 
traiter(gagne, ciseaux, [Papier, Pierre, Ciseaux], X) :- P is Papier + 1, same(X, [P,Pierre, Ciseaux]).
traiter(gagne, papier, [Papier, Pierre, Ciseaux], X) :- P is Pierre + 1, same(X, [Papier,P, Ciseaux]).
traiter(gagne, pierre, [Papier, Pierre, Ciseaux], X) :- C is Ciseaux + 1, same(X, [P,Pierre, C]).
 
alea(X) :- random(1,4, X).

stat(Coups, Nb) :- 
	plus_joue(Coups, Adv),
	est_vainqueur(Coup, Adv),
        corres(Coup, Nb).

jouer(Coups, X) :- 
	random(1, 11, Al),
	(Al =:= 1 -> alea(Nb);
	stat(Coups, Nb)),
	write(Nb), nl,
	write('Gagné, nul ou perdu ?'), nl,
	read(Score),
	corresp(S, Score),
	traiter(S, Coup, Coups, X).

boucle(Coups) :-
	jouer(Coups, N_coups),
	write('1 pour rejouer, 0 pour arreter.'), nl,
	read(X),
	X =:= 1,
	boucle(N_coups).
	
init :- boucle([0,0,0]).

Naturellement je vais faire quelques remarque, alors il faut savoir que c'est mon premier code en prolog, c'est pour ça qu'il est sale. Ensuite : ce code est surement optimisable (surtout au niveau des fonctions traiter) mais ce n'est pas important, ce qu'il faut voir c'est que même si ce code est un peu plus long qu'un code OCaml bien optimisé il est quand même bien plus facile à comprendre par un non initié. Et c'est ça l'important !

Voilà, bonne journée !

Même les foetus mentent ...

Dark-Side — Sun, 04 Nov 2007 15:24:00 +0100

Bonjour, bonjour.
Bon avant de commencer : le titre n'a rien à voir avec l'article, mais depuis 3x17 je reve de sortir cette phrase, alors bon ... c'est fait ! :]

Le prolog

Présentation

Le Prolog est un langage de programmation. Sa particularité est d'être un langage de programmation logique, d'où son nom : PROgrammation LOGique. Ce type de programmation se démarque des autres par son absence de notions tels que les fonctions (qu'on retrouve bien entendu, mais c'est pas aussi explicite qu'en impératif ou même en fonctionnel) ou boucles, ...
Par contre on y trouve des idées intéressantes. En effet un programme développé en prolog repose sur un ensembles de clauses, des faits ou des règles.
Il faut savoir que le prolog est très utilisé pour établir des intelligences artificielles, en effet grâce on clauses on va très facilement définir le comportement de notre IA.

Un code en exemple : factoriel

Oui, je sais, j'ai dit que les fonctions n'éxistaient pas. Mais ça ne veut pas dire qu'on ne peut pas en créer, ça veut dire qu'elles sont moins apparentes que d'habitude.
Comment ça je suis tordu ?
Bref voici le code :

fact(0,1). % ceci est un fait
fact(X, Y) :- N is X-1, fact(N, M), Y is X * M. % et ça une règle

Comme vous pouvez le voir la première clause est un fait, c-a-d que pour tout X fact(0, X) renverra X = 1. Ce qui est marrant avec les faits c'est que leur réciproque marche de la même manière, ainsi fact(X, 1) renverra toujours X = 0. Donc avec un unique fait on a déclaré deux clauses.
Un autre truc marrant c'est que si jamais vous demandez à l'interpreteur si la relation fact(0,2) est vrai il va gentillement vous répondre : «No.»
L'autre truc fun c'est que si après on avait écrit fact(0, 2). lorsqu'on aurait demandé fact(0, X). l'interpreteur nous aurait fait la liste de toutes les réponses possibles.

Conclusion

Il est vrai que je n'ai pas fini de vous détailler le code précédent mais je suis pas là pour vour apprendre à coder, juste pour vous faire découvrir.
J'essayerai de vous montrer une belle IA un de ces jours histoire que vous vous rendiez bien compte de l'interet du prolog. En attendant j'espère vous avoir suffisament intéressé pour que vous vous documentiez un peu sur le prolog.
Au revoir.

Liens externes :

:: Le prolog sur wikipedia. (fr)
:: Une bonne introduction pour débuter en prolog. (fr)
:: Un bon tuto. (en)

Prologin

Dark-Side — Wed, 24 Oct 2007 19:23:00 +0200

Bonjour, bonjour !
Je fais juste un petit billet histoire de dire que je suis pas mort :]

Donc voilà pour ceux qui ne seraient pas encore au courant : prologin 2008 a officiellement débuté le 16 Octobre 2007
Bon ce qu'il faut faire maintenant c'est convaincre Pou de participer !!!
Donc voilà j'interpelle l'hypothétique visiteur de ce blog afin qu'il incite Pou à participer à prologin, de sorte que son commentaire (dont l'existance est encore moins probable) ne soit pas totalement inutile et naze et tout ce que vous voulez §§§

Au revoir ! o/

Un langage d'homme, un vrai ...

Dark-Side — Mon, 27 Aug 2007 21:55:00 +0000

Parce que y'en a marre de ces langages d'hérétiques ! (cf: billets précédents)
On va enfin pouvoir regarder un langage pur (et sayx) : l'ocaml ... Je ne vais pas passer trois heures à vous présenter le caml vous avez déjà tous du écouter bluestorm moi je vais vous donner des exemples (des vrais) de la supériorité du caml sur les langages impurs.
Celà va d'un simple "hello world ! " à un bot irc §§

Les différents exemples

"Hello, World !"
Code ocaml :

print_string "Hello, World !"

Code C:

#include 
#include 
int main(int argc, char *argv[])
{
printf("Bonjour");
return 0;
}

La lourdeur d'un langage impératif/impur n'est pas à démontrer plus avant sur cette exemple on va donc passer au suivant si vous le voulez bien !

Un algorithme de cryptage simple : le césar
Le code en ocaml :

let rec replace crypted initial cle i long=
    if i >= long then crypted
    else 
      let cc = Char.chr (cle + Char.code initial.[i]) in
      let sc = String.make 1 cc in replace (crypted ^ sc) initial cle (i+1) long
;;

let encrypt (mot: string) (cle: int) =
  let long = String.length mot in
  (replace "" mot cle 0 long)
;;

let string = read_line() in
let cle = read_int ()in
print_endline (encrypt string cle)

Le code en C :

#include 
#include 
#include 
#define MAX_BUF 50
void encrypt (char *chaine, int cle)
{
char *p;
for (p=chaine; *p != '\0'; ++p)
{
if(isalpha(*p+cle))
*p += cle;
}
printf ("%s\n", chaine);
}
void clear(char* s, FILE* buffer)
{
char *p = NULL;
if((p = strchr(s, '\n')) != NULL)
*p = '\0';
else
while(getc(buffer) != '\n');
}
int main(int argc, char *argv[])
{
char chaine[MAX_BUF];
int cle;
fgets (chaine, MAX_BUF - 1, stdin);
clear(chaine, stdin);
scanf("%i", &cle);
encrypt (chaine, cle);
return 0;
}

Une fois de plus le code C est plus long que le code en ocaml §§

Conway's game of life
Le code en ocaml : jeu_de_la_vie.ml
Le code en C : jeu_de_la_vie.c (merci à Cygal pour ce code gracieusement fournis, il ne se doutais pas de ce à quoi allait servir sinon je ne l'aurais surement jamais eu en fait :p)
Concernant le code de Cygal vous pouvez enlever si vous le souhaitez tous les beaux commentaires qui ne servent à rien dans le contexte de cet article il n'en demeurera pas moins plus long, après certains pourront dire qu'il est mieux, le rendu plus jolie, etc etc mais reconnaissez que tous ces commentaires seraient dénués de bonne fois :p (tous comme ce billet ? :-° )

Le bot IRC
Euh ... disons qu'on en parlera à l'occasion d'un autre article :D

Conclusion:

Bon vous direz que ce billet pue (mais bon on a vu pire hein :p ) et que y'a des langages surement mieux que le caml mais sans exemples concrets vous resterez sous sa domination (mouhahahaha ? :-° ) si jamais vous avez envie de rajouter des exemples en python, en ruby voir en Obj-C n'hésitez pas à ~~éditer ce billet~~ à me les passer afin que je les soumettent à la censure/dégradent/refuse.
Merci de votre attention.
Vous pouvez désormais fermer votre navigateur et reprendre une activité normale ... :p

PS: je promet de trouver une vrai idée pour les autres billets et de les rédiger un tant soit peu :p
PS 2: Et dire que j'ai emmerdé Poulet toute la journée pour ce billet, quand il va le voir il va être deg :D

Medibuntu devient sex

pmd — Tue, 12 Jun 2007 11:15:00 +0200

Oui, sex !

Bien, donc ~~j'utilisais~~ j'utilise les dépôts Medibuntu (ça mérite un majuscule ou pas ? ) et j'ai découvert il y a peu leur nouveau site !

Enfin nouveau site, il faut pas pousser hein : il est toujours couleur carotte. Par contre ils ont enfin un nouveau nom de domaine et celui-ci ne fait pas Croix-Rouge (oui oui, majuscules) : http://www.medibuntu.org/

Avoues que c'est tout de même beaucoup plus sexy que ~~Cygal~~ l'ancien nom de domaine : http://medibuntu.sos-sts.com/ . J't'e l'avais dit, ça faisait Croix-Rouge.

Bref, maintenant que tu sais cette ~~grande~~ nouvelle ~~qui a bouleversé ta vie~~ il faut modifier tes dépôts. Voici les nouveaux :

deb http://fr.packages.medibuntu.org/ dapper free non-free ## Pour dapper
deb http://fr.packages.medibuntu.org/ edgy   free non-free ## Pour edgy
deb http://fr.packages.medibuntu.org/ feisty free non-free ## T'auras deviner pour quoi c'est ;)

Il faut aussi la clé pour ne pas avoir d'erreurs (ou de je sais pas quoi). Et comme je suis un homme bon, très bon, je te donne une commande qui va le faire :

wget -q http://fr.packages.medibuntu.org/medibuntu-key.gpg -O- | sudo apt-key add - && sudo apt-get update

Voilà, c'était mon ~~dernier~~ premier billet ...