* Copyright (C) 2005 James Grant * Copyright (C) 2024 AlgoLibre Inc. * * This program is free software; you can redistribute it and/or * modify it under the terms of the GNU General Public * License as published by the Free Software Foundation, version 2. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; see the file COPYING. If not, write to * the Free Software Foundation, Inc., 59 Temple Place - Suite 330, * Boston, MA 02111-1307, USA. */ ?> prepare("SELECT `year` FROM users WHERE id='$users_id'"); $yearq->execute(); $yearr = $yearq->fetch(PDO::FETCH_OBJ); $ans = array(); $qs = questions_load_questions($section, $yearr->year); foreach ($qs as $id => $question) { $q = $pdo->prepare("SELECT * FROM question_answers WHERE users_id='$users_id' AND questions_id='$id'"); $q->execute(); $r = $q->fetch(PDO::FETCH_OBJ); $ans[$id] = get_value_or_default($r, 'answer', ''); } return $ans; } function questions_load_questions($section, $year) { global $pdo; $q = $pdo->prepare('SELECT * FROM questions ' . "WHERE year='$year' " . " AND section='$section' " . 'ORDER BY ord ASC'); $q->execute(); show_pdo_errors_if_any($pdo); $qs = array(); while ($r = $q->fetch(PDO::FETCH_OBJ)) { $qs[$r->id]['id'] = $r->id; $qs[$r->id]['ord'] = $r->ord; $qs[$r->id]['section'] = $r->section; $qs[$r->id]['db_heading'] = $r->db_heading; $qs[$r->id]['type'] = $r->type; $qs[$r->id]['required'] = $r->required; $qs[$r->id]['question'] = $r->question; } return $qs; } function questions_save_answers($section, $id, $answers) { global $config, $pdo; $qs = questions_load_questions($section, $config['FAIRYEAR']); $keys = array_keys($answers); $q = $pdo->prepare("SELECT * FROM questions WHERE year='{$config['FAIRYEAR']}'"); $q->execute(); while ($r = $q->fetch(PDO::FETCH_OBJ)) { $stmt = $pdo->prepare("DELETE FROM question_answers WHERE users_id='$id' AND questions_id='$r->id'"); $stmt->execute(); show_pdo_errors_if_any($pdo); } $keys = array_keys($answers); foreach ($keys as $qid) { /* Poll key */ $stmt = $pdo->prepare("INSERT INTO question_answers (users_id,questions_id,answer) VALUES( '$id','$qid', '" . $answers[$qid] . "')"); $stmt->execute(); } } function questions_find_question_id($section, $dbheading) { global $pdo; $q = $pdo->prepare('SELECT id FROM questions WHERE ' . " section='$section' " . " AND db_heading='$dbheading' "); $q->execute(); if ($q->rowCount() == 1) { $r = $q->fetch(PDO::FETCH_OBJ); return $r->id; } return 0; } function questions_print_answer_editor($section, &$u, $array_name) { $ans = questions_load_answers($section, $u['id']); $qs = questions_load_questions($section, $u['year']); $keys = array_keys($qs); foreach ($keys as $qid) { $required = $qs[$qid]['required'] == 'yes' ? ' *' : ''; print("\n"); print(" $required" . i18n($qs[$qid]['question']) . "\n"); print(' '); $iname = "{$array_name}[{$qid}]"; switch ($qs[$qid]['type']) { case 'yesno': if ($ans[$qid]->answer == 'yes') $ch = 'checked="checked"'; else $ch = ''; print("" . i18n('Yes')); print(' '); if ($ans[$qid]->answer == 'no') $ch = 'checked="checked"'; else $ch = ''; print("" . i18n('No')); break; case 'int': print('\n"); break; case 'check': if ($ans[$qid]->answer == 'yes') $ch = 'checked="checked"'; else $ch = ''; print("\n"); break; case 'text': print("answer}\">\n"); break; } print("\n"); print("\n"); } } function questions_print_answers($section, $id) { global $config; $ans = questions_load_answers($section, $id); $qs = questions_load_questions($section, $config['FAIRYEAR']); $keys = array_keys($qs); foreach ($keys as $qid) { echo "\n"; echo ' ' . i18n($qs[$qid]['question']) . "\n"; echo " {$ans[$qid]}"; echo "\n"; } } function questions_parse_from_http_headers($array_name) { $ans = array(); if (!is_array($_POST[$array_name])) return $ans; $keys = array_keys($_POST[$array_name]); foreach ($keys as $qid) { $ans[$qid] = stripslashes($_POST[$array_name][$qid]); } return $ans; } function questions_update_question($qs) { global $pdo; $qs['ord'] = $qs['ord'] ?? ''; $stmt = $pdo->prepare("UPDATE questions SET `question` = :question, `type` = :type, `db_heading` = :db_heading, `required` = :required, `ord` = :ord WHERE id = :id"); $stmt->bindValue(':question', $qs['question']); $stmt->bindValue(':type', $qs['type']); $stmt->bindValue(':db_heading', $qs['db_heading']); $stmt->bindValue(':required', $qs['required']); $stmt->bindValue(':ord', intval($qs['ord'])); $stmt->bindValue(':id', $qs['id']); $stmt->execute(); show_pdo_errors_if_any($pdo); } function questions_save_new_question($qs, $year) { global $pdo; $stmt = $pdo->prepare('INSERT INTO questions ' . '(question,type,section,db_heading,required,ord,year) VALUES (' . "'" . $qs['question'] . "'," . "'" . $qs['type'] . "'," . "'" . $qs['section'] . "'," . "'" . $qs['db_heading'] . "'," . "'" . $qs['required'] . "'," . "'" . $qs['ord'] . "'," . "'$year' )"); $stmt->execute(); show_pdo_errors_if_any($pdo); } /* * A complete question editor. Just call it with the * section you want to edit, a year, the array_name to use for * POSTing and GETting the questions (so you can put more than one * edtior on a single page), and give it $_SERVER['PHP_SELF'], because * php_self inside this function is this file. * FUTURE WORK: it would be nice to hide the order, and just implement * a bunch of up/down arrows, and dynamically compute the order for * all elements */ function questions_editor($section, $year, $array_name, $self) { global $config, $pdo; if (get_value_from_array($_POST, 'action') == 'save') { $qs = questions_parse_from_http_headers('question'); $qs['section'] = $section; if ($qs['question']) { $qs['id'] = intval($_POST['save']); questions_update_question($qs, $year); echo happy(i18n('Question successfully saved')); } else { echo error(i18n('Question is required')); } } if (get_value_from_array($_POST, 'action') == 'new') { $q = questions_load_questions($section, $year); $qs = questions_parse_from_http_headers('question'); $qs['section'] = $section; $qs['ord'] = count($q) + 1; if ($qs['question']) { questions_save_new_question($qs, $year); echo happy(i18n('Question successfully added')); } else { echo error(i18n('Question is required')); } } if (get_value_from_array($_GET, 'action') == 'remove' && get_value_from_array($_GET, 'remove')) { $qid = $_GET['remove']; $qs = questions_load_questions($section, $year); /* Delete this question */ $stmt = $pdo->prepare("DELETE FROM questions WHERE id='$qid'"); $stmt->execute(); /* Update the order of all questions after this one */ $keys = array_keys($qs); foreach ($keys as $q) { if ($q == $qid) continue; if ($qs[$q]['ord'] > $qs[$qid]['ord']) { $qs[$q]['ord']--; $stmt = $pdo->prepare("UPDATE questions SET ord='{$qs[$q]['ord']}' WHERE id='$q'"); $stmt->execute(); } } echo happy(i18n('Question successfully removed')); } if (get_value_from_array($_GET, 'action') == 'import' && get_value_from_array($_GET, 'impyear')) { $x = 0; $q = $pdo->prepare("SELECT * FROM questions WHERE year='{$_GET['impyear']}'"); $q->execute(); while ($r = $q->fetch(PDO::FETCH_OBJ)) { $x++; $stmt = $pdo->prepare("INSERT INTO questions (id, year, section, db_heading, question, type, required, ord) VALUES (NULL, :year, :section, :db_heading, :question, :type, :required, :ord)"); $stmt->bindParam(':year', $year); $stmt->bindParam(':section', $r->section); $stmt->bindParam(':db_heading', $r->db_heading); $stmt->bindParam(':question', $r->question); $stmt->bindParam(':type', $r->type); $stmt->bindParam(':required', $r->required); $stmt->bindParam(':ord', $r->ord); $stmt->execute(); } echo happy(i18n( '%1 question(s) successfully imported', array($x) )); } /* * Load questions, then handle up and down, because with up and down we * have to modify 2 questions to maintain the order */ $qs = questions_load_questions($section, $year); /* * Sanity check the order DG -- This is there to fix a bug in the .22 * database full import, anyone with a fresh install will see duplicate * order items, anyone who doesn't, won't see this bug. Anyone who has * already used the default question import will need this piece of * code to return their system to sane. I have added a db.update * script to fix the bug, but it won't fix any systems where the * questions have already been imported. This code will. */ $keys = array_keys($qs); $x = 1; foreach ($keys as $qid) { if ($qs[$qid]['ord'] != $x) { $qs[$qid]['ord'] = $x; questions_update_question($qs[$qid], $year); } $x++; } $qdir = 0; if (get_value_from_array($_GET, 'action') == 'up' && get_value_from_array($_GET, 'up')) { $qid = $_GET['up']; if ($qs[$qid]['ord'] != 1) { $qdir = -1; } } if (get_value_from_array($_GET, 'action') == 'down' && get_value_from_array($_GET, 'down')) { $qid = $_GET['down']; if ($qs[$qid]['ord'] != count($qs)) { $qdir = 1; } } if ($qdir != 0) { $qs[$qid]['ord'] += $qdir; /* Update the db */ $stmt = $pdo->prepare("UPDATE questions SET ord='{$qs[$qid]['ord']}' WHERE id='$qid'"); $stmt->execute(); $keys = array_keys($qs); $originalq = $qs[$qid]; foreach ($keys as $q) { if ($q == $qid) continue; if ($qs[$q]['ord'] != $qs[$qid]['ord']) continue; if ($qdir == 1) { $qs[$q]['ord']--; $stmt = $pdo->prepare("UPDATE questions SET ord='{$qs[$q]['ord']}' WHERE id='$q'"); $stmt->execute(); } else { $qs[$q]['ord']++; $stmt = $pdo->prepare("UPDATE questions SET ord='{$qs[$q]['ord']}' WHERE id='$q'"); $stmt->execute(); } /* * Swap them so we don' thave to reaload the questions */ // $qs[$qid] = $qs[$q]; // $qs[$q] = $originalq; break; } /* Reload the questions */ $qs = questions_load_questions($section, $year); } if ((get_value_from_array($_GET, 'action') == 'edit' && get_value_from_array($_GET, 'edit')) || get_value_from_array($_GET, 'action') == 'new') { $q = null; $showform = true; echo "

"; if ($_GET['action'] == 'new') { $buttontext = 'Add a question'; echo "\n"; } else if ($_GET['action'] == 'edit') { $buttontext = 'Save question'; echo "\n"; /* The question ID is passed on the URL */ $qid = $_GET['edit']; /* Load the question */ $q = $qs[$qid]; echo "\n"; if (!is_array($q)) { $showform = false; echo error(i18n('Invalid question')); } } if ($showform and headers_sent()) { echo ''; echo ''; echo ''; echo ''; echo ''; // echo ""; echo ''; echo '

' . i18n('Question') . '	'; echo "\n"; echo '
' . i18n('Table Heading') . '	'; echo "\n"; echo '
' . i18n('Type') . '	'; echo "'; echo '
' . i18n('Required?') . '	'; echo "'; echo '
".i18n("Display Order")."	"; // echo "\n"; // echo "
'; echo '\n"; echo '

'; echo '

'; echo '
'; echo '

'; } } else { } echo '
'; echo "" . i18n('Add a new question') . ''; echo ''; echo '' . '' . '' . '' . '' . ''; $keys = array_keys($qs); $types = array( 'check' => i18n('Check box'), 'yesno' => i18n('Yes/No'), 'text' => i18n('Text'), 'int' => i18n('Number') ); foreach ($keys as $qid) { echo ""; echo ""; echo ""; echo ""; echo ""; echo ''; echo ''; } echo '

	' . i18n('Question') . '	' . i18n('Table Heading') . '	' . i18n('Type') . '	' . i18n('Required') . '	' . i18n('Actions') . '
{$qs[$qid]['ord']}	{$qs[$qid]['question']}	{$qs[$qid]['db_heading']}	{$types[$qs[$qid]['type']]}	{$qs[$qid]['required']}	'; echo "'; echo ' '; echo "'; echo ' '; echo "'; echo ' '; echo ''; echo '

'; if (count($keys) == 0) { $default_qs = questions_load_questions($section, -1); if (count($default_qs) != 0) { print('
'); print(i18n('There are no questions for year %1, but there are %2 default questions. To import the default questions to year %1 click on the link below.', array($year, count($default_qs)))); print('
'); print("" . i18n('Import default questions') . '
'); } } } ?>