2 /***************************************************************************
3 * Copyright (C) 2003-2010 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
6 * This program is free software; you can redistribute it and/or modify *
7 * it under the terms of the GNU General Public License as published by *
8 * the Free Software Foundation; either version 2 of the License, or *
9 * (at your option) any later version. *
11 * This program is distributed in the hope that it will be useful, *
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
14 * GNU General Public License for more details. *
16 * You should have received a copy of the GNU General Public License *
17 * along with this program; if not, write to the Free Software *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 function get_poison_emails($seed, $count)
26 $fd = fopen($globals->poison
->file
, 'r');
28 $size = $size['size'];
29 $seed = crc32($seed . date('m-Y')) %
$size;
31 $seed = $size +
$seed;
38 while (!feof($fd) && $i < $count) {
39 $line = trim(fgets($fd));
40 if (strlen($line) > 0) {
50 function randomize_poison_file()
54 $fd = fopen($globals->poison
->file
, 'r');
57 $line = trim(fgets($fd));
58 if (strlen($line) > 0) {
59 $m1 = $line . '@' . $globals->mail
->domain
;
60 $entries[$m1] = md5($m1);
61 $m2 = $line . '@' . $globals->mail
->domain2
;
62 $entries[$m2] = md5($m2);
68 $fd = fopen($globals->poison
->file
. '.rand', 'w');
69 foreach ($entries as $key => $value) {
70 fwrite($fd, "$key\n");
75 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: