summary refs log tree commit diff stats
path: root/pages/addresses.php
diff options
context:
space:
mode:
authorStarla Insigna <hatkirby@fourisland.com>2008-11-19 17:27:03 -0500
committerStarla Insigna <hatkirby@fourisland.com>2008-11-19 17:27:03 -0500
commit24503e3abe705acde2df159aeae61be0d009f92e (patch)
tree8debbd53dcd0db2f5934c5e2af4e697e3787781d /pages/addresses.php
downloadfourisland-24503e3abe705acde2df159aeae61be0d009f92e.tar.gz
fourisland-24503e3abe705acde2df159aeae61be0d009f92e.tar.bz2
fourisland-24503e3abe705acde2df159aeae61be0d009f92e.zip
Imported sources
Diffstat (limited to 'pages/addresses.php')
-rw-r--r--pages/addresses.php74
1 files changed, 74 insertions, 0 deletions
diff --git a/pages/addresses.php b/pages/addresses.php new file mode 100644 index 0000000..c97dfad --- /dev/null +++ b/pages/addresses.php
@@ -0,0 +1,74 @@
1<?php
2/*
3 444444444
4 4::::::::4
5 4:::::::::4
6 4::::44::::4
7 4::::4 4::::4 Four Island
8 4::::4 4::::4
9 4::::4 4::::4 Written and maintained by Starla Insigna
104::::444444::::444
114::::::::::::::::4 includes/addresses.php
124444444444:::::444
13 4::::4 Please do not use, reproduce or steal the
14 4::::4 contents of this file without explicit
15 4::::4 permission from Hatkirby.
16 44::::::44
17 4::::::::4
18 4444444444
19*/
20
21if (!defined('S_INCLUDE_FILE')) {define('S_INCLUDE_FILE',1);}
22
23require('headerproc.php');
24
25$title = 'A Gift for our Robot Friends';
26
27$template = new FITemplate('addresses');
28
29$acceptable = array( 'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm',
30 'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z');
31$numAcceptable = count($acceptable) - 1;
32
33$longerTopDomains = array( 'com', 'net', 'gov', 'org', 'info', 'biz',
34 'edu', 'pro', 'name','co');
35$numTops = count($longerTopDomains) - 1;
36
37$maxLettersBefore = 20;
38$maxDomainLength = 20;
39
40for ($i = 0; $i < 1000; $i++)
41{
42 $addy = '';
43
44 $numLetters = mt_rand(1, $maxLettersBefore);
45
46 for ($b = 0; $b < $numLetters; $b++)
47 {
48 $addy .= $acceptable[mt_rand(0, $numAcceptable)];
49 }
50
51 $addy .= '@';
52
53 $numLetters = mt_rand(1, $maxDomainLength);
54
55 for ($b = 0; $b < $numLetters; $b++)
56 {
57 $addy .= $acceptable[mt_rand(0, $numAcceptable)];
58 }
59
60 $addy .= '.';
61
62 if (mt_rand(1, 2) == 1)
63 {
64 $addy .= $longerTopDomains[mt_rand(0, $numTops)] . '.' . $acceptable[mt_rand(0, $numAcceptable)] . $acceptable[mt_rand(0, $numAcceptable)];
65 } else {
66 $addy .= $longerTopDomains[mt_rand(0, $numTops)];
67 }
68
69 $template->adds_block('ADDRESS', array('ADDY' => $addy));
70}
71
72$template->display();
73
74?>