= '0' && substr($insms, $qas, 1) <= '9') {
$outsms.=substr($insms, $qas, 1);
}
}
return $outsms;
}
function oururlencode($inw) {
return $inw;
}
function ourgetenv($ine) {
return getenv($ine);
}
function maybelinkvia($ih, $plnk) {
if (strpos(strtolower($plnk), "https:") !== false || strpos(strtolower($plnk), "http:") !== false) {
return '' . $ih . '';
} else if (strpos(strtolower($plnk), "@") !== false) {
return '' . $ih . '';
} else if (isset($_POST['htimestamp']) && trim(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))]) != explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))] && trim($plnk) != '') { // && trim(str_replace("0","",str_replace("1","",str_replace("2","",str_replace("3","",str_replace("4","",str_replace("5","",str_replace("6","",str_replace("7","",str_replace("8","",str_replace("9","",$plnk))))))))))) != ''
return '' . $ih . '';
} else if (strlen($plnk) == 11 && str_replace(' ','',$plnk) == $plnk) {
return '' . $ih . '';
} else if ((strlen(str_replace('-','',$plnk)) == 10 || strlen(str_replace('-','',$plnk)) == 13) && str_replace(' ','',str_replace('-','',$plnk)) == str_replace('-','',$plnk) && trim(str_replace("-","",str_replace("0","",str_replace("1","",str_replace("2","",str_replace("3","",str_replace("4","",str_replace("5","",str_replace("6","",str_replace("7","",str_replace("8","",str_replace("9","",$plnk)))))))))))) == '') {
return '' . $ih . '';
}
return $ih;
}
function maybelink($plnk) {
if (strpos(strtolower($plnk), "https:") !== false || strpos(strtolower($plnk), "http:") !== false) {
return '' . $plnk . '';
} else if (strpos(strtolower($plnk), "@") !== false) {
return '' . $plnk . '';
} else if (isset($_POST['htimestamp']) && trim(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))]) != explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))] && trim($plnk) != '') { // && trim(str_replace("0","",str_replace("1","",str_replace("2","",str_replace("3","",str_replace("4","",str_replace("5","",str_replace("6","",str_replace("7","",str_replace("8","",str_replace("9","",$plnk))))))))))) != ''
return '' . $plnk . '';
} else if (strlen($plnk) == 11 && str_replace(' ','',$plnk) == $plnk) { // https://www.youtube.com/watch?v=GuJQSAiODqI
return '' . $plnk . '';
} else if ((strlen(str_replace('-','',$plnk)) == 10 || strlen(str_replace('-','',$plnk)) == 13) && str_replace(' ','',str_replace('-','',$plnk)) == str_replace('-','',$plnk) && trim(str_replace("-","",str_replace("0","",str_replace("1","",str_replace("2","",str_replace("3","",str_replace("4","",str_replace("5","",str_replace("6","",str_replace("7","",str_replace("8","",str_replace("9","",$plnk)))))))))))) == '') {
return '' . $plnk . '';
}
return $plnk; // reDGraTP3qU
}
function maybemailto($lto, $psubj) {
if (strpos($lto, "@") !== false) {
return '' . $lto . '';
} else if (jn(trim($lto)) != "" && trim(str_replace("0","",str_replace("1","",str_replace("2","",str_replace("3","",str_replace("4","",str_replace("5","",str_replace("6","",str_replace("7","",str_replace("8","",str_replace("9","",jn(trim($lto))))))))))))) == '') {
return '' . $lto . '';
}
return $lto;
}
if (isset($_POST['favouritename']) && isset($_POST['favouritetype']) && isset($_POST['favouritetimestamp']) && isset($_POST['favouritevalue']) && isset($_POST['favouriteemail']) && isset($_POST['favouriteshare'])) {
$rval="";
$titlebit.=" post";
if (isset($_POST['htimestamp'])) {
//$titlebit.=" 2";
if (jn(trim(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))])) != trim(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))])) {
$umytype=explode(jn(trim(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))])), trim(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))]))[1];
if (strpos(($ourlistc . $anyextras), $umytype) === false) {
$anyextras.='';
}
$mytype=$umytype;
$rval="|" . jn(trim(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))])) . "|";
$sval=str_replace("|","",$rval . $umytype) . "|";
} else {
$rval="|" . trim(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp'])))[-1 + sizeof(explode(".",str_replace("+"," ",urldecode($_POST['htimestamp']))))]) . "|";
$sval=str_replace("|","",$rval) . "|";
}
$smval=str_replace("|","",$rval) . "|";
$sval.=str_replace("+"," ",urldecode($_POST['favouritetimestamp'])) . "|";
$sval.=str_replace("+"," ",urldecode($_POST['favouritetype'])) . "|";
$sval.=str_replace("+"," ",urldecode($_POST['favouritename'])) . "|";
$sval.=str_replace("+"," ",urldecode($_POST['favouritevalue'])) . "|";
$sval.=str_replace("+"," ",urldecode($_POST['favouriteemail'])) . "|";
$sval.=str_replace("\r"," ... ",str_replace("\n"," ... ",str_replace("\r\n"," ... ",str_replace("+"," ",urldecode($_POST['favouriteshare'])))));
$smval.=str_replace("+"," ",urldecode($_POST['favouritetimestamp'])) . "|";
$smval.=str_replace(">" . str_replace("+"," ",urldecode($_POST['favouritetype'])) . "<", " selected>" . str_replace("+"," ",urldecode($_POST['favouritetype'])) . "<", "") . "|";
$smval.=maybelinkvia(str_replace("+"," ",urldecode($_POST['favouritename'])),str_replace("+"," ",urldecode($_POST['favouritevalue']))) . "|";
$smval.=maybelink(str_replace("+"," ",urldecode($_POST['favouritevalue']))) . "|";
$smval.=maybemailto(str_replace("+"," ",urldecode($_POST['favouriteemail'])),str_replace("+"," ",urldecode($_POST['favouritename']))) . "|";
$smval.=str_replace("+"," ",urldecode($_POST['favouriteshare']));
//$titlebit.=" " . $sval;
$ssval="Favourites
";
$ssval.="Timestamp: " . str_replace("+"," ",urldecode($_POST['favouritetimestamp'])) . "
";
$ssval.="Type: " . str_replace(">" . str_replace("+"," ",urldecode($_POST['favouritetype'])) . "<", " selected>" . str_replace("+"," ",urldecode($_POST['favouritetype'])) . "<", "") . "
";
$ssval.="Title (by Creator): " . maybelinkvia(str_replace("+"," ",urldecode($_POST['favouritename'])),str_replace("+"," ",urldecode($_POST['favouritevalue']))) . "
";
$ssval.="Link: " . maybelink(str_replace("+"," ",urldecode($_POST['favouritevalue']))) . "
";
$ssval.="Email: " . maybemailto(str_replace("+"," ",urldecode($_POST['favouriteemail'])),str_replace("+"," ",urldecode($_POST['favouritename']))) . "
";
$qssval=$ssval;
$ssval.="Comments: " . str_replace("\n","
",str_replace("+"," ",urldecode($_POST['favouriteshare']))) . "
";
$qssval.="Comments:
";
$qssval=str_replace("\r","",str_replace("\n","",str_replace("\r\n","",$qssval)));
$sssval=str_replace("+"," ",urldecode($_POST['favouritetimestamp'])) . "|";
$sssval.=str_replace("+"," ",urldecode($_POST['favouritetype'])) . "|";
$sssval.=str_replace("+"," ",urldecode($_POST['favouritename'])) . "|";
$sssval.=str_replace("+"," ",urldecode($_POST['favouritevalue'])) . "|";
$sssval.=str_replace("+"," ",urldecode($_POST['favouriteemail'])) . "|";
$sssval.=str_replace("\n","
",str_replace("+"," ",urldecode($_POST['favouriteshare'])));
$ssxval="Favourites
";
$ssxval.="Timestamp: " . str_replace("+"," ",urldecode($_POST['favouritetimestamp'])) . "
";
$ssxval.="Type: " . str_replace("+"," ",urldecode($_POST['favouritetype'])) . "
";
$ssxval.="Title (by Creator): " . str_replace("+"," ",urldecode($_POST['favouritename'])) . "
";
$ssxval.="Link: " . str_replace("+"," ",urldecode($_POST['favouritevalue'])) . "
";
$ssxval.="Email: " . str_replace("+"," ",urldecode($_POST['favouriteemail'])) . "
";
$ssxval.="Comments: " . str_replace("\n","
",str_replace("+"," ",urldecode($_POST['favouriteshare']))) . "
";
$proposedemail=" if (document.URL.toLowerCase().indexOf('rjmprogramming.com.au') != -1) { \n
zhr = new XMLHttpRequest(); \n
zform=new FormData(); \n
zform.append('inline', 'y'); \n
zform.append('to', 'rmetcalfe15@gmail.com'); /" . "/ 'rmetcalfe@rjmprogramming.com.au'); \n
zform.append('cc', 'rmetcalfe@rjmprogramming.com.au'); \n
zform.append('subj', 'Please moderate Favourite ...'); \n
zform.append('body', '" . $qssval . "');
zhr.open('post', 'http://www.rjmprogramming.com.au/HTMLCSS/emailhtml.php', true); \n
zhr.onreadystatechange = showStuff;
zhr.send(zform); \n
} else if (document.URL.toLowerCase().indexOf('/localhost') != -1) { \n
var moreu='" . urlencode(str_replace(""," ... ",str_replace(""," ... ",str_replace("","",str_replace("
","",$ssxval))))) . "';
var morev='';
document.getElementById('aemail').href+=moreu + '&body=' + encodeURIComponent(morev + document.URL.split('#')[0].split('?')[0] + '?okyes=' + encodeURIComponent('" . $sval . "')); \n
document.getElementById('aemail').click(); \n
} \n
\n";
}
} else if (isset($_GET['okyes'])) {
$rval="";
$newrow=" | | | | | |
";
//echo "here";
//exit;
if ($_GET['okyes'] != '') {
$oks=explode("|", str_replace("+"," ",urldecode($_GET['okyes'])));
//echo '' . sizeof($oks);
//exit;
if (sizeof($oks) >= 7 && file_exists(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html")) {
$lastone=str_replace($oks[0] . "|" . $oks[1] . "|" . $oks[2] . "|" . $oks[3] . "|" . $oks[4] . "|" . $oks[5] . "|", "", str_replace("+"," ",urldecode($_GET['okyes'])));
if ($oks[0] != jn($oks[0])) {
$mytype=explode(jn($oks[0]), $oks[0])[1];
$oks[0]=jn($oks[0]);
if (strlen($mytype) <= 1) {
$umytype=strtoupper($mytype);
} else {
$umytype=strtoupper(substr($mytype,0,1)) . substr($mytype,1);
}
if (strpos(($ourlistc . $anyextras), $umytype) === false) {
$anyextras.='';
}
}
$bigsofar=file_get_contents(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html");
if (strpos($bigsofar, "|" . $oks[0] . "|") !== false) {
$bigsofar=str_replace("|" . $oks[0] . "|", "", $bigsofar);
$newrow="| " . $oks[1] . " | " . $oks[2] . " | " . maybelinkvia($oks[3],$oks[4]) . " | " . maybelink($oks[4]) . " | " . maybemailto($oks[5],$oks[3]) . " | " . str_replace(" ... ","
",$lastone) . " |
";
if (strpos($bigsofar, "") !== false) {
$coks=explode("", $bigsofar);
$bigsofar=str_replace($coks[0], $coks[0] . $newrow, $bigsofar);
file_put_contents(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html", $bigsofar);
}
}
}
}
}
if (!file_exists(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html")) {
file_put_contents(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html", "
Favourites - RJM Programming - November, 2020
Favourites
" . $rval . "
Past Favourites (as moderated) |
|---|
| Datetime | Type | Title (by Creator) | Link | Email | Comments |
|---|
");
} else if ($rval != "") {
$bigsofar=file_get_contents(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html");
if (strpos($bigsofar, "") !== false) {
$bigsofar=str_replace("", $rval . "", $bigsofar);
file_put_contents(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html", $bigsofar);
}
}
if (file_exists(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html")) {
//echo "1 \n";
$bigsofar=file_get_contents(ourgetenv("HOME") . DIRECTORY_SEPARATOR . "favourites_midair.html");
//echo "11 \n";
if (strpos($bigsofar, "") !== false) {
//echo "111 \n";
$sofar="", $bigsofar)[0])[1] . "";
// | 2020-11-12 19:56:24 | Book |
$sofaropts=explode("
| ", $sofar);
//echo "" . (-1 + sizeof($sofaropts)) . " \n";
//echo " " . str_replace("<","<",str_replace(">",">",$sofar));
for ($itr=1; $itr<(0 + sizeof($sofaropts)); $itr++) {
$tone=explode(" | ", explode("", $sofaropts[$itr])[1])[0];
//echo $tone . "\n";
//if ($tone == "Colour") {
// echo "Found Colour";
// exit;
//}
if (trim($tone) != '') {
if (strpos(("," . $ourlistc . ","), ("," . $tone . ",")) === false && strpos(("," . $anyextras . ","), (">" . $tone . "<")) === false) {
$anyextras.='';
}
}
}
}
}
echo "
Favourites - RJM Programming - November, 2020" . $titlebit . "
Favourites Poll
Email
" . $sofar . "
";
?> |