function work(Request $request)
{
$user = Auth::get_user();
if ($user->is_exists()) {
if (!$user->confirm->is_draft()) {
//новый и еще неактивный
$this->_result = 5;
} else {
//Есть такой активный пользователь
$this->_result = 4;
}
//пользователя еще нет
} else {
if ($request['REQUEST']['form']) {
//Присвоим email новому пользователю и проверим уникальность
$user->email->value($request['REQUEST']['email']);
if ($request['REQUEST']['call'] == 'check') {
if (!$user->check()) {
if ($user->errors()->email->value->duplicate) {
$this->_result = 2;
} else {
//Другая ошибка
$this->_result = 3;
}
} else {
//все корректно
$this->_result = 1;
}
$session['result'] = $this->_result;
Session::set('form', array($this->uri() . $this->getToken() => $session));
setcookie('token', $this->getToken(), 0, '/');
return $session;
} else {
if (isset($request['COOKIE']['token']) && Session::is_exist('form')) {
$form = Session::get('form');
if (isset($form[$this->uri() . $request['COOKIE']['token']])) {
$form = $form[$this->uri() . $request['COOKIE']['token']];
Session::remove('form');
}
if (isset($form['result'])) {
$this->_result = $form['result'];
}
}
if ($this->_result == 1 && isset($user)) {
$user->password->value($request['REQUEST']['password']);
$user->title->value($request['REQUEST']['email']);
$user->confirm->proto("/vendor/boolive/basic/string");
$user->confirm->value(uniqid('', true));
Data::write($user);
//Теперь у нас есть такой пользователь
$this->_result = 5;
$this->mailSender->sendMail($to = $user->email->value(), $subject = 'Подтвержление регистрации на ' . $this->mailSender->domain->value(), $message = 'Здравствйте, вы зарегистрировались на ' . $this->mailSender->domain->value() . ' , для подтверждения актуальности электронного адреса, перейдите, пожалуйста по <a href="' . $this->mailSender->domain->value() . '/profile?confirm=' . $user->confirm->value() . '">ссылке</a>');
$request->redirect('profile?confirm=0');
}
}
}
}
return parent::work($request);
}
/**
* Функция, подтверждения корректрости электронного адреса пользователя
* Находит его по уникальной последовательности в поле confirm и удаляет поле тем самым активируя пользователя
* @param $confirm
* @return integer результат операции, обработка результата в функции work
*/
private function confirmUser($confirm)
{
/** @var user $user */
$user = $this->searchUser($confirm);
if ($user && !$user->confirm->is_draft()) {
$user->confirm->is_draft(true);
Data::write($user->confirm);
//Успешное подтверждение
$result = 1;
} else {
//Пользователь уже существует
if ($user && $user->confirm->is_draft()) {
$result = 4;
} else {
//Нет пользователя с таким значением - неизвестно почему
$result = 3;
}
}
return $result;
}
/**
* Сохранение сущности
* @param Entity $entity
* @throws Error
*/
function write($entity)
{
// Если объект свойство, то сохранять родительский объект??
if ($entity->is_property()) {
if ($parent = $entity->parent(null, true)) {
$parent->__set($entity->name(), $entity);
Data::write($parent);
}
} else {
// Текущие сведения об объекте
$info = [];
if ($entity->is_exists()) {
// Текущие сведения об объекта
$uri = $entity->is_changed('uri') ? $entity->changes('uri') : $entity->uri();
if ($uri === '') {
$file = DIR . 'project.info';
} else {
$file = DIR . trim($uri, '/') . '/' . File::fileName($uri) . '.info';
}
if (is_file($file)) {
$info = file_get_contents($file);
$info = json_decode($info, true);
}
}
// Подбор уникального имени
// @todo Перенос php файлов влечет за собой фатальные ошибки!!!! так как меняется namespace и class name
if ($entity->is_changed('uri') || !$entity->is_exists()) {
// Проверка уникальности нового имени путём создания папки
// Если подбор уникального имени, то создавать пока не создаться (попробовать постфикс)
$path = dirname($entity->dir(true)) . '/';
$name = $entity->name();
if ($new_path = File::makeUniqueDir($path, $name, 1, $entity->is_auto_namig())) {
$entity->name(basename($new_path));
$info['name'] = $entity->name();
} else {
$entity->errors()->_attributes->name->add(new Error('Не уникальное', 'unique'));
throw $entity->errors();
}
// Перемещение старой папки в новую
if ($entity->is_exists()) {
File::rename($entity->dir(true, true), $entity->dir(true, false));
}
if ($entity->is_changed('name') && $entity->is_exists()) {
// @todo Переименовать .info, .php и, возможно, привязанный файл.
}
// Обновить URI подчиненных объектов не фиксируя изменения
$entity->updateChildrenUri();
}
// Новые сведения об объекте
$info_new = $this->export($entity, isset($info['properties']) ? $info['properties'] : [], function (Entity $entity, $file) {
return Data::save_file($entity, $file);
});
// Порядковый номер
// 1. Подбор максимального среди существующих
// 2. Смещение порядка у последующих объектов
// Сохранить объект с свлйствами JSON
$uri = $entity->uri();
if ($uri === '') {
$file = DIR . 'project.info';
} else {
$file = DIR . trim($uri, '/') . '/' . File::fileName($uri) . '.info';
}
File::create(F::toJSON($info_new, true), $file);
}
// Сохранить подчиненные
foreach ($entity->children() as $child) {
/** @var Entity $child */
if (!$child->is_property()) {
Data::write($child);
}
}
}
/**
* Сохранение сущности
* @param Entity $entity
* @throws Error
*/
function write($entity)
{
// @todo
// Смена родителя/прототипа требует соответсвующие сдвиги в таблице отношений
// При смене uri нужно обновить uri подчиненных
$attr = $entity->attributes();
// Локальные id
$attr['parent'] = isset($attr['parent']) ? $this->localId($attr['parent']) : 0;
$attr['proto'] = isset($attr['proto']) ? $this->localId($attr['proto']) : 0;
$attr['author'] = isset($attr['author']) ? $this->localId($attr['author']) : 0;
//$this->localId(Auth::get_user()->uri());
// Подбор уникального имени, если указана необходимость в этом
if ($entity->is_changed('uri') || !$entity->is_exists()) {
$q = $this->db->prepare('SELECT 1 FROM {objects} WHERE parent=? AND `name`=? LIMIT 0,1');
$q->execute(array($attr['parent'], $attr['name']));
if ($q->fetch()) {
//Выбор записи по шаблону имени с самым большим префиксом
$q = $this->db->prepare('SELECT `name` FROM {objects} WHERE parent=? AND `name` REGEXP ? ORDER BY CAST((SUBSTRING_INDEX(`name`, "_", -1)+1) AS SIGNED) DESC LIMIT 0,1');
$q->execute(array($attr['parent'], '^' . $attr['name'] . '(_[0-9]+)?$'));
if ($row = $q->fetch(DB::FETCH_ASSOC)) {
preg_match('|^' . preg_quote($attr['name']) . '(?:_([0-9]+))?$|u', $row['name'], $match);
$attr['name'] .= '_' . (isset($match[1]) ? $match[1] + 1 : 1);
}
}
$entity->name($attr['name']);
$attr['uri'] = $entity->uri();
}
Buffer::set_entity($entity);
// Локальный идентификатор объекта
$attr['id'] = $this->localId($entity->uri($entity->is_exists()), true, $new_id);
// Если смена файла, то удалить текущий файл
if ($entity->is_changed('file')) {
$current_file = $entity->changes('file');
if (is_string($current_file)) {
File::delete($entity->dir(true) . $current_file);
}
}
// Если привязан файл
if (!$entity->is_default_file()) {
if ($entity->is_file()) {
$file_attache = $entity->file();
if (is_array($file_attache)) {
// Загрузка файла
if (!($attr['file'] = Data::save_file($entity, $file_attache))) {
$attr['file'] = '';
}
} else {
$attr['file'] = basename($file_attache);
}
} else {
// файла нет, но нужно отменить наследование файла
$attr['file'] = '';
}
} else {
$attr['file'] = '';
}
// Уникальность order
// Если изменено на конкретное значение (не максимальное)
if ($attr['order'] != Entity::MAX_ORDER && (!$entity->is_exists() || $entity->is_changed('order'))) {
// Проверка, занят или нет новый order
$q = $this->db->prepare('SELECT 1 FROM {objects} WHERE `parent`=? AND `order`=?');
$q->execute(array($attr['parent'], $attr['order']));
if ($q->fetch()) {
// Сдвиг order существующих записей, чтоб освободить значение для новой
$q = $this->db->prepare('
UPDATE {objects} SET `order` = `order`+1
WHERE `parent`=? AND `order`>=?');
$q->execute(array($attr['parent'], $attr['order']));
}
unset($q);
} else {
// Новое максимальное значение для order, если объект новый или явно указано order=null
if (!$entity->is_exists() || $attr['order'] == Entity::MAX_ORDER) {
// Порядковое значение вычисляется от максимального существующего
$q = $this->db->prepare('SELECT MAX(`order`) m FROM {objects} WHERE parent=?');
$q->execute(array($attr['parent']));
if ($row = $q->fetch(DB::FETCH_ASSOC)) {
$attr['order'] = $row['m'] + 1;
}
unset($q);
}
}
$this->db->beginTransaction();
// Если новое имя или родитель, то обновить свой URI и URI подчиненных
if ($entity->is_changed('name') || $entity->is_changed('parent')) {
if ($entity->is_exists()) {
$current_uri = $entity->uri(true);
$current_name = $entity->is_changed('name') ? $entity->changes('name') : $attr['name'];
// Текущий URI
$names = F::splitRight('/', $current_uri, true);
$uri = (isset($names[0]) ? $names[0] . '/' : '') . $current_name;
// Новый URI
$names = F::splitRight('/', $attr['uri'], true);
$uri_new = (isset($names[0]) ? $names[0] . '/' : '') . $attr['name'];
$entity->change('uri', $uri_new);
// @todo Обновление URI подчиенных в базе
// нужно знать текущий уковень вложенности и локальный id
//
// $q = $this->db->prepare('UPDATE {ids}, {parents} SET {ids}.uri = CONCAT(?, SUBSTRING(uri, ?)) WHERE {parents}.parent_id = ? AND {parents}.object_id = {ids}.id AND {parents}.is_delete=0');
// $v = array($uri_new, mb_strlen($uri)+1, $attr['id']);
// $q->execute($v);
// // Обновление уровней вложенностей в objects
// if (!empty($current) && $current['parent']!=$attr['parent']){
// $dl = $attr['parent_cnt'] - $current['parent_cnt'];
// $q = $this->db->prepare('UPDATE {objects}, {parents} SET parent_cnt = parent_cnt + ? WHERE {parents}.parent_id = ? AND {parents}.object_id = {objects}.id AND {parents}.is_delete=0');
// $q->execute(array($dl, $attr['id']));
// // Обновление отношений
// $this->makeParents($attr['id'], $attr['parent'], $dl, true);
// }
if (!empty($uri) && is_dir(DIR . $uri)) {
// Переименование/перемещение папки объекта
$dir = DIR . $uri_new;
File::rename(DIR . $uri, $dir);
if ($entity->is_changed('name')) {
// Переименование файла класса
File::rename($dir . '/' . $current_name . '.php', $dir . '/' . $attr['name'] . '.php');
// Переименование .info файла
File::rename($dir . '/' . $current_name . '.info', $dir . '/' . $attr['name'] . '.info');
}
}
unset($q);
}
// Обновить URI подчиненных объектов не фиксируя изменения
$entity->updateChildrenUri();
}
// Если значение больше 255
if (mb_strlen($attr['value']) > 255) {
$q = $this->db->prepare('
INSERT INTO {text} (`id`, `value`)
VALUES (:id, :value)
ON DUPLICATE KEY UPDATE `value` = :value
');
$q->execute(array(':id' => $attr['id'], ':value' => $attr['value']));
$attr['value'] = mb_substr($attr['value'], 0, 255);
$attr['is_text'] = 1;
} else {
$attr['is_text'] = 0;
}
// Запись
$attr_names = array('id', 'parent', 'proto', 'author', 'order', 'name', 'value', 'file', 'is_text', 'is_draft', 'is_hidden', 'is_link', 'is_mandatory', 'is_property', 'is_relative', 'is_default_value', 'is_default_logic', 'created', 'updated');
$cnt = sizeof($attr_names);
// Запись объекта (создание или обновление при наличии)
// Объект идентифицируется по id
if (!$entity->is_exists()) {
$q = $this->db->prepare('
INSERT INTO {objects} (`' . implode('`, `', $attr_names) . '`)
VALUES (' . str_repeat('?,', $cnt - 1) . '?)
ON DUPLICATE KEY UPDATE `' . implode('`=?, `', $attr_names) . '`=?
');
$i = 0;
foreach ($attr_names as $name) {
$value = $attr[$name];
$i++;
$type = is_int($value) ? DB::PARAM_INT : (is_bool($value) ? DB::PARAM_BOOL : (is_null($value) ? DB::PARAM_NULL : DB::PARAM_STR));
$q->bindValue($i, $value, $type);
$q->bindValue($i + $cnt, $value, $type);
}
$q->execute();
} else {
$q = $this->db->prepare('
UPDATE {objects} SET `' . implode('`=?, `', $attr_names) . '`=? WHERE id = ?
');
$i = 0;
foreach ($attr_names as $name) {
$value = $attr[$name];
$i++;
$type = is_int($value) ? DB::PARAM_INT : (is_bool($value) ? DB::PARAM_BOOL : (is_null($value) ? DB::PARAM_NULL : DB::PARAM_STR));
$q->bindValue($i, $value, $type);
}
$q->bindValue(++$i, $attr['id']);
$q->execute();
}
$this->db->commit();
foreach ($entity->children() as $child) {
Data::write($child);
}
return true;
}
function process(Request $request)
{
Data::write($request['REQUEST']['object']);
return true;
}
function work(Request $request)
{
$uri = '';
// $s = C::read();
// C::writeln(mb_detect_encoding($s,['utf-8','cp866']));
do {
try {
C::write(C::style($uri, [C::COLOR_GRAY_DARK]) . '> ');
$commands = preg_split('/\\s/ui', trim(C::read()));
$cmd_count = count($commands);
if ($commands[0] == 'show') {
$new_uri = !empty($commands[1]) ? $uri . '/' . trim($commands[1], ' \\/') : $uri;
$obj = Data::read($new_uri);
C::writeln(C::style(Trace::format($obj, false)));
} else {
if (mb_strlen($commands[0]) > 1 && ($commands[0][0] == '/' || mb_substr($commands[0], 0, 2) == '..')) {
$new_uri = !empty($commands[0]) ? $uri . '/' . trim($commands[0], ' \\/') : $uri;
$obj = Data::read($new_uri, false, true);
if ($obj && $obj->is_exists()) {
$uri = $obj->uri();
} else {
C::writeln(C::style('Object does not exist', C::COLOR_RED));
}
} else {
if ($commands[0] == 'ls' || $commands[0] == 'children') {
$list = Data::find(['from' => $uri, 'select' => empty($commands[1]) || $commands[1] != '-p' ? 'children' : 'properties', 'struct' => 'list', 'limit' => [0, 50]]);
foreach ($list as $obj) {
C::writeln(C::style($obj->name(), C::COLOR_BLUE));
}
} else {
if (preg_match('/^\\s*select(\\(|=)/ui', $commands[0])) {
$cond = Data::normalizeCond($commands[0], false);
if (!isset($cond['from'])) {
$cond['from'] = $uri;
}
$result = Data::find($cond);
C::writeln(C::style(Trace::format($result, false)));
} else {
if ($commands[0] == 'color') {
if (!empty($commands[1])) {
C::use_style($commands[1] == 'off' ? false : null);
} else {
C::use_style(true);
}
} else {
if ($cmd_count > 1 && $commands[0] == 'attr') {
$obj = Data::read($uri);
$attr = $commands[1];
if ($obj instanceof Entity && $obj->is_exists() && $obj->is_attr($attr)) {
if ($cmd_count > 2) {
if ($commands[2] === "null") {
$commands[2] = null;
} else {
if ($commands[2] === "false") {
$commands[2] = false;
} else {
$commands[2] = trim(trim($commands[2], '"'));
}
}
$obj->{$attr}($commands[2]);
Data::write($obj);
C::writeln(Trace::format($obj, false));
} else {
C::writeln(C::style($obj->attr($attr)), C::COLOR_PURPLE);
}
}
} else {
if ($cmd_count > 2 && $commands[0] == 'new') {
$new_uri = !empty($commands[1]) ? $uri . '/' . trim($commands[1], ' \\/') : $uri;
list($parent, $name) = F::splitRight('/', $new_uri);
if (!$parent) {
$parent = '';
}
$proto = $commands[2];
$obj = Data::create($proto, $parent, ['name' => $name]);
$signs = array_flip($commands);
if (isset($signs['-m'])) {
$obj->is_mandatory(true);
}
if (isset($signs['-p'])) {
$obj->is_property(true);
}
if (isset($signs['-d'])) {
$obj->is_draft(true);
}
if (isset($signs['-h'])) {
$obj->is_hidden(true);
}
if (isset($signs['-l'])) {
$obj->is_link(true);
}
if (isset($signs['-r'])) {
$obj->is_relative(true);
}
$obj->complete();
Data::write($obj);
C::writeln(Trace::format($obj, false));
} else {
if ($commands[0] == 'complete') {
$obj = Data::read($uri);
$signs = array_flip($commands);
$only_mandatory = !isset($signs['-all']) && !isset($signs['-not-mandatory']);
$only_property = !isset($signs['-all']) && !isset($signs['-not-property']);
$obj->complete($only_mandatory, $only_property);
Data::write($obj);
C::writeln(Trace::format($obj, false));
} else {
C::writeln(C::style('Unknown command', C::COLOR_RED));
}
}
}
}
}
}
}
}
} catch (Error $e) {
C::writeln(C::style($e->getMessage(), C::COLOR_RED));
} catch (\Exception $e) {
C::writeln(C::style((string) $e, C::COLOR_RED));
}
Buffer::clear();
} while ($commands[0] !== 'exit');
C::writeln("\nby!");
// if (!empty($request['ARG'][2])) {
// if ($request['ARG'][2] == 'read') {
// $uri = empty($request['ARG'][3]) ? '' : '/' . trim($request['ARG'][3], '/');
// $obj = Data::read($uri);
// C::writeln(C::style(Trace::style($obj, false)));
// } else
// if ($request['ARG'][2] == 'find') {
// $cond = empty($request['ARG'][3]) ? '' : trim($request['ARG'][3], '/');
// $result = Data::find($cond);
// C::write(C::style(Trace::style($result, false)));
// } else
// if ($request['ARG'][2] == 'edit') {
// $object = Data::read(empty($request['ARG'][3]) ? '' : '/'.trim($request['ARG'][3], '/'));
// $attr = empty($request['ARG'][4]) ? null : $request['ARG'][4];
// $value = empty($request['ARG'][5]) ? null : $request['ARG'][5];
// if ($object instanceof Entity && $object->is_exists() && $attr){
// $object->{$attr}($value);
// Data::write($object);
// C::write(C::style(Trace::style($object, false)));
// }
// }else
// {
//// phpinfo();
//// C::writeln(Trace::style($_ENV, false));
//// C::writeln(getenv('ANSICON'));
// C::writeln(
// C::style(json_encode($request['ARG']), [C::STYLE_BOLD, C::STYLE_UNDERLINE, C::COLOR_BLUE]));
// //$a = C::read();
// //C::writeln($a);
//
//// fwrite(STDOUT, $colors->getColoredString("Testing Colors class, this is purple string on yellow background.", "purple", "yellow") . "\n");
//// $line = fgets(STDIN);
//// if(trim($line) != 'yes'){
//// echo "ABORTING!\n";
//// exit;
//// }
//// echo "\n";
//// echo "Thank you, continuing...\n";
//// return true;
// }
// }
}
