$tokens = datetokens($_REQUEST["repeat"]);
print "<table>";
print "<tr><td>Tokens:</td><td>[";
for ($i = 1; $tokens[$i]; $i++) {
print ($i == 1 ? "" : ", ") . tokenstr($tokens[$i]);
}
print "]</td></tr>";
$tokens = datealso($tokens);
print "<tr><td>Tweaked tokens:</td><td>[";
for ($i = 1; $tokens[$i]; $i++) {
print ($i == 1 ? "" : ", ") . tokenstr($tokens[$i]);
}
print "]</td></tr>";
$rules = daterules($tokens);
print "<tr><td valign=top>Rules:</td><td>";
dumprules($rules);
print "</td><tr>";
print "<tr><td>String:</td><td>";
print daterulestr($rules);
print "</td><tr>";
print "<tr><td>Canonical:</td><td>";
print repeatcanonical($rules);
print "</td><tr>";
print "<tr><td valign=top>Actual Dates:</td><td>";
$dates = repeatdates($_REQUEST["repeat"]);
for ($i = 1; $dates[$i]; $i++) {
print $dates[$i]["sqldate"] . " ";
print date("l, F d, Y", $dates[$i]["timestamp"]) . "<br>\n";
}
print "</td><tr>";
print "</table>";
function dumprules($rules)
{
dumphelp($rules, "week", 6);
dumphelp($rules, "weekday", 7);
dumphelp($rules, "month", 12);
dumphelp($rules, "monthday", 31);
if ($rules["also"]) {
print "<strong>also</strong><br>";
dumprules($rules["also"]);
}
if ($rules["except"]) {
print "<strong>except</strong><br>";
dumprules($rules["except"]);
}
}
