echo HTML::start('form', array('method' => 'post', 'action' => $_SERVER['PHP_SELF'] . '?confirm=yes'));
echo HTML::para(Form::button("continue", _("Continue")) . Form::generateToken());
echo HTML::end('form');
echo HTML::para(HTML::link(_("Cancel"), './index.php'));
include_once "../layout/footer.php";
exit;
}
}
$setQ->close();
unset($setQ);
unset($set);
/**
* Creating each table listed in the $tables array
*/
$tables = getTables();
foreach ($tables as $tableName) {
$result = parseSqlFile("./sql/" . $tableName . ".sql", $tableName, true);
if ($result) {
$text = sprintf(_("Table %s dropped."), $tableName) . PHP_EOL;
$text .= sprintf(_("Table %s created."), $tableName) . PHP_EOL;
$text .= str_repeat(".", 50);
echo HTML::para(nl2br($text));
} else {
echo Msg::error(_("Last instruction failed"));
include_once "../layout/footer.php";
exit;
}
}
echo Msg::info(_("OpenClinic tables have been created successfully!"));
echo HTML::section(1, HTML::link(_("Start using OpenClinic"), '../home/index.php'));
require_once "../layout/footer.php";
}
/**
* Retrieving get var
*/
$idPatient = intval($_GET["id_patient"]);
/**
* Search database for patient
*/
$patQ = new Query_Page_Patient();
if (!$patQ->select($idPatient)) {
$patQ->close();
include_once "../layout/xhtml_start.php";
echo $style;
echo HTML::end('head');
echo HTML::start('body');
echo Msg::error(_("That patient does not exist."));
echo HTML::para(HTML::link(_("Close Window"), '#', null, array('onclick' => 'window.close(); return false;')));
echo HTML::end('body');
echo HTML::end('html');
exit;
}
$pat = $patQ->fetch();
if (!$pat) {
$patQ->close();
Error::fetch($patQ);
}
$patQ->freeResult();
$patQ->close();
unset($patQ);
$patName = $pat->getFirstName() . " " . $pat->getSurname1() . " " . $pat->getSurname2();
/**
$body = array();
$body[] = Form::textArea("sql_query", $sqlQuery, array('rows' => 15, 'cols' => 75, 'readonly' => true));
$foot = array(Form::button("install_file", _("Install file")) . Form::generateToken());
echo Form::fieldset(_("Install file"), $body, $foot);
echo HTML::end('form');
echo HTML::para(HTML::link(_("Cancel"), './index.php'));
include_once "../layout/footer.php";
exit;
}
// end if
require_once "../model/Query.php";
$installQ = new Query();
$installQ->captureError(true);
if ($installQ->isError()) {
echo HTML::para(_("The connection to the database failed with the following error:"));
echo Msg::error($installQ->getDbError());
echo HTML::rule();
echo HTML::para(_("Please make sure the following has been done before running this install script."));
$array = array(sprintf(_("Create OpenClinic database (%s of the install instructions)"), HTML::link(sprintf(_("step %d"), 4), '../install.html#step4')), sprintf(_("Create OpenClinic database user (%s of the install instructions)"), HTML::link(sprintf(_("step %d"), 5), '../install.html#step5')), sprintf(_("Update %s with your new database username and password (%s of the install instructions)"), HTML::tag('strong', 'openclinic/config/database_constants.php'), HTML::link(sprintf(_("step %d"), 8), '../install.html#step8')));
echo HTML::itemList($array, null, true);
echo HTML::para(sprintf(_("See %s for more details."), HTML::link(_("Install Instructions"), '../install.html')));
include_once "../layout/footer.php";
exit;
}
// end if
$installQ->close();
echo Msg::info(_("Database connection is good."));
echo HTML::start('form', array('method' => 'post', 'action' => $_SERVER['PHP_SELF'], 'enctype' => 'multipart/form-data'));
$body = array();
$body[] = Form::file("sql_file", null, array('size' => 50));
$foot = array(Form::button("view_file", _("View file")));
}
$tbody[] = $row;
$row = Form::label("birth_place", _("Natural de") . ":");
$row .= Form::text("birth_place", isset($formVar["birth_place"]) ? $formVar["birth_place"] : null, array('size' => 40, 'error' => isset($formError["birth_place"]) ? $formError["birth_place"] : null));
$tbody[] = $row;
$row = Form::label("dyear", _("Data de entrada na Pestalozzi") . ":");
$aux = explode("-", !empty($formVar["decease_date"]) ? $formVar["decease_date"] : '0000-00-00');
$row .= Form::text("dday", intval($aux[2]) != 0 ? intval($aux[2]) : null, array('size' => 2));
$row .= " - ";
$row .= Form::text("dmonth", intval($aux[1]) != 0 ? intval($aux[1]) : null, array('size' => 2));
$row .= " - ";
$row .= Form::text("dyear", intval($aux[0]) != 0 ? intval($aux[0]) : null, array('size' => 4));
$row .= " " . _("(dd-mm-aaaa)");
unset($aux);
if ($formError["decease_date"] != "") {
$row .= Msg::error($formError["decease_date"]);
}
$tbody[] = $row;
$row = Form::label("nts", _("RG") . ":");
$row .= Form::text("nts", isset($formVar["nts"]) ? $formVar["nts"] : null, array('size' => 30, 'error' => isset($formError["nts"]) ? $formError["nts"] : null));
$tbody[] = $row;
$row = Form::label("nss", _("CPF") . ":");
$row .= Form::text("nss", isset($formVar["nss"]) ? $formVar["nss"] : null, array('size' => 30, 'error' => isset($formError["nss"]) ? $formError["nss"] : null));
$tbody[] = $row;
$row = Form::label("family_situation", _("Informações complementares") . ":");
$row .= Form::textArea("family_situation", $formVar["family_situation"], array('rows' => 3, 'cols' => 30));
$tbody[] = $row;
$row = Form::label("labour_situation", _("Trabalho dos familiares") . ":");
$row .= Form::textArea("labour_situation", $formVar["labour_situation"], array('rows' => 3, 'cols' => 30));
$tbody[] = $row;
$row = Form::label("education", _("Procedência do encaminhamento") . ":");
* Breadcrumb
*/
$links = array(_("Home") => "../home/index.php", $title => "");
echo HTML::breadcrumb($links, "icon icon_user");
unset($links);
/**
* Error message if not session exists
*/
if (!is_dir(ini_get('session.save_path')) && ini_get('session.save_handler') == 'files') {
echo Msg::error(_("No session support. Authentication process will fail. Check your PHP configuration."));
}
/**
* Cookies disabled?
*/
if (!isset($_COOKIE[session_name()])) {
echo Msg::error(_("You must have cookies enabled to access your account."));
}
/**
* Warning message if loginAttempts == (OPEN_MAX_LOGIN_ATTEMPTS - 1)
*/
if (OPEN_MAX_LOGIN_ATTEMPTS && isset($_SESSION['auth']['login_attempts']) && $_SESSION['auth']['login_attempts'] == OPEN_MAX_LOGIN_ATTEMPTS - 1) {
echo Msg::warning(_("Last attempt to type correct password before suspend this user account."));
}
/**
* Login form
*/
echo HTML::start('form', array('id' => 'loginForm', 'method' => 'post', 'action' => '../auth/login.php'));
$tbody = array();
$row = Form::hidden("md5_session");
$tbody[] = $row;
$row = Form::label("login_session", _("Login") . ":");
echo HTML::start('body', array('id' => 'top'));
echo HTML::start('div', array('id' => 'wrap'));
echo HTML::start('div', array('id' => 'header'));
echo appLogo();
$array = array(HTML::link(_("Close Window"), '#', null, array('onclick' => 'window.close(); return false;')));
echo HTML::itemList($array, array('id' => 'shortcuts'));
echo menuBar($tab);
echo HTML::end('div');
// #header
echo HTML::start('div', array('id' => 'main'));
echo HTML::start('div', array('id' => 'content'));
echo HTML::section(1, sprintf(_("This is a preview of the %s theme."), $_POST["theme_name"]));
echo HTML::para(HTML::link(_("Sample Link"), '#top'));
echo HTML::rule();
echo HTML::section(2, _("Subtitle Sample:"));
$thead = array(_("Table Heading") => array('colspan' => 2));
$tbody = array();
$tbody[] = array(sprintf(_("Sample data row %d"), 1));
$tbody[] = array(sprintf(_("Sample data row %d"), 2));
$row = Form::label("sample_text", _("Required Field") . ":", array('class' => 'required'));
$row .= OPEN_SEPARATOR;
$row .= Form::text("sample_text", _("Sample Input Text"), array('size' => 50, 'readonly' => true));
$tbody[] = explode(OPEN_SEPARATOR, $row);
$options = array('tfoot' => array('align' => 'center'), 'r0' => array('colspan' => 2), 'r1' => array('colspan' => 2));
$tfoot = array(Form::button("sample_button", _("Sample Button"), array('type' => 'button')));
echo HTML::table($thead, $tbody, $tfoot, $options);
echo Msg::error(_("Sample Error"));
echo Msg::warning(_("Sample Warning"));
echo Msg::info(_("Sample Info"));
echo Msg::hint(_("Sample Hint"));
require_once "../layout/footer.php";
/**
* Show page
*/
$title = _("Optimize Database");
require_once "../layout/header.php";
/**
* Breadcrumb
*/
$links = array(_("Admin") => "../admin/index.php", _("Dumps") => "../admin/dump_view_form.php", $title => "");
echo HTML::breadcrumb($links, "icon icon_dump");
unset($links);
echo HTML::section(2, sprintf(_("Optimizing Database: %s"), OPEN_DATABASE));
$numTables = $auxConn->numRows();
if (!$numTables) {
$auxConn->close();
echo Msg::error(_("Database is empty."));
include_once "../layout/footer.php";
exit;
}
$thead = array(_("Table Name"), _("Size"), _("Status"), _("Space Saved"));
$options = array(1 => array('align' => 'right'), 3 => array('align' => 'right'));
$totalData = 0;
$totalIndex = 0;
$totalAll = 0;
$totalGain = 0;
$rows = null;
while ($row = $auxConn->fetchRow()) {
$rows[] = $row;
}
$auxConn->freeResult();
$tbody = array();
/**
* bool _validateSettings(void)
*
* Validates settings of install wizard
*
* @return boolean true if all settings are ok, false otherwise
* @access private
*
*/
function _validateSettings()
{
$error = "";
if (empty($_POST['dbHost'])) {
$error .= _("Database Host is empty.") . PHP_EOL;
}
if (empty($_POST['dbUser'])) {
$error .= _("Database User is empty.") . PHP_EOL;
}
if (empty($_POST['dbName'])) {
$error .= _("Database Name is empty.") . PHP_EOL;
}
if ($_POST['timeout'] <= 0) {
$error .= _("Session Timeout must be great than zero.") . PHP_EOL;
}
if ($_POST['itemsPage'] <= 0) {
$error .= _("Items per page must be great than zero.") . PHP_EOL;
}
if (strlen($_POST['passwd']) < 4) {
$error .= _("Admin password must be at least 4 characters.") . PHP_EOL;
}
if (!empty($error)) {
echo HTML::section(3, _("There were some errors"), array('class' => 'error'));
echo Msg::error($error);
}
return empty($error);
}
require_once "../lib/Msg.php";
// include HTML.php
/**
* Retrieving get var
*/
$_file = $_GET['file'];
/**
* XHTML Start (XML prolog, DOCTYPE, title page and meta data)
*/
$title = sprintf(_("Source file: %s"), $_file);
require_once "../layout/xhtml_start.php";
echo HTML::start('link', array('rel' => 'stylesheet', 'type' => 'text/css', 'href' => '../css/style.css'), true);
echo HTML::end('head');
$array['id'] = 'viewSource';
if (count($_GET) == 0 || empty($_file)) {
$array['onload'] = 'window.close();';
}
echo HTML::start('body', $array);
if (isset($_SESSION['auth']['is_admin'])) {
if (is_file($_file)) {
highlight_file($_file);
} else {
echo Msg::error(_("No file found."));
echo HTML::para(HTML::link(_("Close Window"), '#', null, array('onclick' => 'window.close(); return false;')));
}
} else {
echo Msg::warning(sprintf(_("You are not authorized to use %s tab."), _("Admin")));
// maybe change
}
echo HTML::end('body');
echo HTML::end('html');
echo HTML::section(1, $title);
echo HTML::para(sprintf(_("Finded version: %s"), $version));
foreach ($upgrades as $value) {
$file = $value;
// upgrade<initial_version>-<final_version>.sql
$value = substr($value, strlen('upgrade'));
// <initial_version>-<final_version>.sql
$array = explode("-", $value);
// 0 => <initial_version>, 1 => <final_version>.sql
$initialVersion = $array[0];
// <number>.<number>
if (version_compare($version, $initialVersion, '<=')) {
echo HTML::para(sprintf(_("Aplying %s file..."), HTML::tag('strong', $file)));
if (!parseSqlFile('./upgrades/' . $file)) {
//Error::debug($file); // debug
echo Msg::error(sprintf(_("Error processing file: %s"), $file));
include_once "../layout/footer.php";
exit;
}
}
}
$setQ->captureError(false);
$setQ->select();
$set = $setQ->fetch();
echo HTML::para(sprintf(_("Upgraded to version: %s"), $set->getVersion()));
$setQ->close();
unset($setQ);
unset($set);
echo Msg::info(_("Database upgrade finished correctly!"));
echo HTML::para(HTML::link(_("Go to OpenClinic"), '../home/index.php'));
require_once "../layout/footer.php";
/**
* bool parseSql(string $text)
*
* Parses a SQL text
*
* @param string $text sentences to parse
* @return bool false if an error occurs
* @access public
* @since 0.8
*/
function parseSql($text)
{
$controlledErrors = array(1060, 1091);
$installQ = new Query();
$installQ->captureError(true);
/**
* reading through SQL text executing SQL only when ";" is encountered and if is out of brackets
*/
$count = strlen($text);
$sqlSentence = "";
$outBracket = true;
for ($i = 0; $i < $count; $i++) {
$char = $text[$i];
if ($char == "(") {
$outBracket = false;
}
if ($char == ")") {
$outBracket = true;
}
if ($char == ";" && $outBracket) {
$result = $installQ->exec($sqlSentence);
if ($installQ->isError() && !in_array($installQ->getDbErrno(), $controlledErrors)) {
echo HTML::para(sprintf(_("Process sql [%s]"), $sqlSentence));
$installQ->close();
Error::query($installQ, false);
echo Msg::error(sprintf(_("Error: %s"), $installQ->getDbError()));
return false;
}
$sqlSentence = "";
} else {
$sqlSentence .= $char;
}
}
$installQ->close();
return true;
}
