/** * Montras por unu deziro A->B la detalojn * de A kaj B, kaj la statuson. */ function montru_kunlogxdezirdetalojn($deziro) { $dezirant_eno = new Partopreno($deziro->datoj['partoprenoID']); $deziranto = new Partoprenanto($dezirant_eno->datoj['partoprenantoID']); $dezirat_eno = new Partopreno($deziro->datoj['kunKiuID']); $dezirato = new Partoprenanto($dezirat_eno->datoj['partoprenantoID']); eoecho("<h2>Kunlog^deziraj detaloj</h2>"); eoecho("<table>\n" . "<tr><th /><th>deziranto</th><th>dezirato</th></tr>\n"); kampoj("ID", array(donu_ligon("partrezultoj.php?partoprenidento=" . $dezirant_eno->datoj['ID'], $dezirant_eno->datoj['ID']), donu_ligon("partrezultoj.php?partoprenidento=" . $dezirat_eno->datoj['ID'], $dezirat_eno->datoj['ID']))); kampoj("nomo", array($deziranto->tuta_nomo(), $dezirato->tuta_nomo())); kampoj("domotipo", array($dezirant_eno->domotipo(), $dezirat_eno->domotipo())); kampoj("ag^o", array($dezirant_eno->datoj['agxo'], $dezirat_eno->datoj['agxo'])); // testas, cxu seksoj kaj deziritaj cxambrotipoj harmonias. if ($deziranto->sekso != $dezirato->sekso and $dezirant_eno->datoj['cxambrotipo'] == 'u' and $dezirat_eno->datoj['cxambrotipo'] == 'u') { kampoj("sekso", array($deziranto->sekso => "averto", $dezirato->sekso => "averto")); kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo() => "averto", $dezirat_eno->cxambrotipo() => "averto")); } else { if ($deziranto->sekso != $dezirato->sekso and $dezirant_eno->datoj['cxambrotipo'] == 'u') { kampoj("sekso", array($deziranto->sekso, $dezirato->sekso => "averto")); kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo() => "averto", $dezirat_eno->cxambrotipo())); } else { if ($deziranto->sekso != $dezirato->sekso and $dezirat_eno->datoj['cxambrotipo'] == 'u') { kampoj("sekso", array($deziranto->sekso => "averto", $dezirato->sekso)); kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo(), $dezirat_eno->cxambrotipo() => "averto")); } else { kampoj("sekso", array($deziranto->sekso, $dezirato->sekso)); kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo(), $dezirat_eno->cxambrotipo())); } } } // se unu volas dulitan cxambron, tiam la alia ankaux volu. if ($dezirant_eno->datoj['dulita'] != $dezirat_eno->datoj['dulita']) { kampoj("dulita", array(jes_ne($dezirant_eno->datoj['dulita']) => "averto", jes_ne($dezirat_eno->datoj['dulita']) => "averto")); } else { kampoj("dulita c^.?", array(jes_ne($dezirant_eno->datoj['dulita']), jes_ne($dezirat_eno->datoj['dulita']))); } eoecho("</table>\n"); $sql = datumbazdemando(array("ID"), "kunlogxdeziroj", array("partoprenoID = '" . $deziro->datoj['kunKiuID'] . "'", "kunKiuID = '" . $deziro->datoj['partoprenoID'] . "'")); $rez = sql_faru($sql); if ($linio = mysql_fetch_assoc($rez)) { $alia_deziro = new Kunlogxdeziro($linio['ID']); eoecho("<p>Estas ankau^ "); ligu("kunlogxado.php?kunlogxID=" . $linio['ID'], "kunlog^deziro en la inversa direkto"); eoecho(", kies stato nun estas <em>" . $alia_deziro->stato() . "</em>"); } else { eoecho("<p>Sed " . $dezirato->tuta_nomo() . " ne indikis, ke " . $dezirato->personapronomo . " volas log^i kun " . $deziranto->tuta_nomo() . ".</p>\n"); } eoecho("<p>Aktuala stato de la kunlog^deziro: <em>" . $deziro->stato() . "</em>.</p>\n"); echo "<form action='kunlogxado.php' method='POST'>\n"; tenukasxe("kunlogxID", $deziro->datoj['ID']); butono("forvisxhu", "Forvis^u", "ago"); butono("ne_eblas", "Ne eblas", "ago"); butono("eblas", "Eblas", "ago"); echo "</form>\n"; eoecho("<p>C^iuj kunlog^deziroj de " . $deziranto->tuta_nomo() . ":</p>"); montru_kunlogxdezirojn($dezirant_eno); }
$_SESSION['partoprenanto'] = new Partoprenanto($_SESSION['partopreno']->datoj['partoprenantoID']); } if ($_SESSION['partopreno']) { switch ($_REQUEST['ago']) { case 'kunigu': aldonu_al_datumbazo("kunlogxdeziroj", array("partoprenoID" => $_REQUEST['partoprenoID'], "kunKiuID" => $_REQUEST['kunkiuID'], "stato" => '?')); eoecho("<p>Aldonis la kunlog^deziron de #" . $_REQUEST['partoprenoID'] . " kun #" . $_REQUEST['kunkiuID'] . " al la datumbazo."); break; case 'sercxu': $ri = $_SESSION['partoprenanto']->personapronomo; $Ri = ucfirst($ri); eoecho("<h2>Kunlog^deziroj de " . $_SESSION['partoprenanto']->tuta_nomo() . " (#" . $_SESSION['partopreno']->datoj['ID'] . ")</h2>"); eoecho("<p>{$Ri} volas log^i kun:</p>"); $nemontru = montru_kunlogxdezirojn($_SESSION['partopreno']); eoecho("<p>La jenaj aliaj personoj volas log^i kun {$ri}:</p>"); montru_kunlogxdezirojn_inversajn($_SESSION['partopreno']); if ($_SESSION['partopreno']->datoj['kunkiu']) { eoecho("<p>{$Ri} indikis en la alig^ilo, ke {$ri} volas log^i kun <em>" . $_SESSION['partopreno']->datoj['kunkiu'] . "</em>. Tio povus" . " esti unu el la sekvaj personoj:</p>"); sercxu_eblajn_kunlogxantojn($_SESSION['partopreno'], $_SESSION['partoprenanto']->tuta_nomo(), $nemontru); } else { eoecho("<p>{$Ri} ne indikis en {$ri}a alig^ilo iujn kunlog^dezirojn.</p>"); } // montru_kunlogxdezirojn_ambauxdirekte($_SESSION['partopreno']); break; case 'montru': eoecho("<p>Kunlog^deziroj de " . $_SESSION['partoprenanto']->tuta_nomo() . " (#" . $_SESSION['partopreno']->datoj['ID'] . "):</p>"); montru_kunlogxdezirojn($_SESSION['partopreno']); break; } } HtmlFino();