Parser 3.x test page

Если вы видите эту страницу, значит вы установили парсер и пытаетесь его протестировать :)

Чтобы увидеть полные пути к конфигурационным файлам и DOCUMENT_ROOT - закоментируйте метод postprocess[]

Если что-либо выделено красным цветом, значит или что-то настроено неверно или автоматическое определение невозможно (это относится к поиску файлов библиотек и кодовых таблиц при заданных относительных путях).


Глобальные переменные, заданые в конфигурационном auto.p

$CHARSETS:

windows-1257 $charsetsdir/windows-1257.cfg (4532 байт)
iso-8859-1 $charsetsdir/windows-1250.cfg (4488 байт)
windows-1250 $charsetsdir/windows-1250.cfg (4488 байт)
windows-1251 $charsetsdir/windows-1251.cfg (5229 байт)
koi8-r $charsetsdir/koi8-r.cfg (4370 байт)

$SQL:

protocol parser driver sql client library
mysql $sqldriversdir/parser3mysql.dll (17920 байт) $sqldriversdir/libmySQL.dll (139264 байт)
odbc $sqldriversdir/parser3odbc.dll (159744 байт)

DOCUMENT_ROOT: не определен
Путь к скрипту: закоментируйте postprocess чтобы увидеть
$response:charset: WINDOWS-1251
$request:charset: WINDOWS-1251
$request:uri: /_test.html?
$request:query:
$SQL.connect-string: определена
$MAIL.SMTP: определена
$CLASS_PATH: не определен

Демонстрация работы парсера

Демонстрация работы с cookie (класс $cookie)

Чтение $cookie:test: не определена
Запись в cookie значения ABC $cookie:test[ABC] (нажмите Reload для проверки)

Демонстрация работы математических операторов (класс $math)

^eval(2+2): 4
^math:random(1000): 274
^math:uuid[]: 701C58B6-697D-4F3C-9EFF-B35607F3C31D
^math:uid64[]: 23EA9901D44FF9DF
^math:md5[строка]: 4A418B1973F47583CB45652A6F48DF45
^math:crypt[строка;$apr1$]: $apr1$V.M0NmLj$NnARoSxyTfO1IZmMegoFF1

Работа со строками (класс $string)

Задание $str[АбвГде]
Длина строки ^str.length[]: 6
Строка в верхнем регистре ^str.upper[]: АБВГДЕ
Строка в нижнем регистре ^str.lower[]: абвгде
Первые 2 символа строки ^str.left(2): Аб
Последние 3 символа строки ^str.right(3): Где
2-4 символы строки ^str.mid(1;3): бвГ
Позиция символа 'Г' в строке ^str.pos[Г]: 3
Позиция символа 'X' в строке ^str.pos[X]: -1
Замена комбинации символов 'вГ' на XX с помощью ^str.match[вГ][]{XX}: АбXXде
Замена комбинации символов 'в' на 'Y', 'Г' на 'Z' с помощью ^str.replace[$repl]: АбYZде
^str.trim[both;е]: АбвГд

Чтение значений из формы (класс $form)

$form:a: не определено
Safe преобразование $form:a в целое число: ^form:a.int(1): 1
$form:b не определено
$form:qtail: не определено
идем сюда чтобы проверить чтение значений формы

Задание и вывод значений у объекта-хэша (класс $hash)

$hash1[
   $.a[1]
   $.b[2]
   $.c[3]
]
^hash1.foreach[key;value]{
  $key=$value
}[<br />]
a=1
b=2
c=3

Задание и вывод значений у объекта-таблицы (класс $table)

$tbl1[^table::create{name	col1	col2
Вася	3	5
Дима	4	14}]
Количество строк таблицы $tbl1: 2
Количество столбцов таблицы $tbl1: 3
Вывод названий столбцов таблицы:
строка column
1 name
2 col1
3 col2

Вывод значений таблицы $tbl1:
строка namecol1col2
1 Вася35
2 Дима414

$tbl2[^table::create{name	col1	col2
Вова	3	44}]
Количество строк таблицы $tbl2: 1

join таблицы $tbl1 к таблице $tbl2 [^tbl2.join[$tbl1]]
Количество строк таблицы $tbl2 ^tbl2.count[]: 3
Вывод полученой таблицы:
строка namecol1col2
1 Вова344
2 Вася35
3 Дима414

select и вывод строк таблицы у которых значения в столбце $col1 равны 3: $out_table[^tbl2.select($tbl2.col1 == 3)]
строка namecol1col2
1 Вова344
2 Вася35

Получение из таблицы - хеша таблиц, где в качестве ключа выступает значение $col1: $tables_hash[^tbl2.hash[col1][$.distinct[tables]]]

Вывод полученного хеша таблиц:
Ключ Значение
3
строка namecol1col2
1 Вова344
2 Вася35
4
строка namecol1col2
1 Дима414

Работа с датами (класс $date)

$now[^date::now[]]
Получение сегодняшнего времени/даты $now.day/$now.month/$now.year: 24/4/2024 3:9:26
Вывод сегодняшней даты в sql формате ^now.sql-string[]: 2024-04-24 03:09:26
Вывод сегодняшней даты в виде UNIX timestamp: 1713917366
Сдвиг даты на 5 дней назад ^now.roll[day](-5): 19/4/2024
Сдвиг полученой даты на 30 дней вперед ^now.roll[day](30): 19/5/2024

Работа с файлами (класс $file)

Запись таблицы $tbl1 в файл /_test.cfg [^tbl1.save[/_test.cfg]]: файл успешно создан
^file:dirname[/_test.cfg]: /
^file:basename[/_test.cfg]: _test.cfg
^file:justname[/_test.cfg]: _test
^file:justext[/_test.cfg]: cfg

Получение параметров сохраненного файла $fstat[^file::stat[/_test.cfg]]:
Размер файла, байт [$fstat.size]: 37
cdate: 24/2/2005
adate: 14/8/2008
mdate: 24/4/2024

Загрузка данных в таблицу $tbl3 из файла /_test.cfg и вывод [$tbl3[^table::load[/_test.cfg]]]:
строка namecol1col2
1 Вася35
2 Дима414

Работа с классом $hashfile

Создаем объект: $hf [$hf[^hashfile::open[hf]]]: объект успешно создан

Количество записей: 1
Добавление новой записи (0947BA9D-C2CD-4766-9CA8-58AFBA907610) на 3 дня:
$hf.[0947BA9D-C2CD-4766-9CA8-58AFBA907610][
   $.value[304058508]
   $.expires(3)
]
Вывод содержимого (максимум 5 записей):
0947BA9D-C2CD-4766-9CA8-58AFBA907610=304058508
05E927BF-D78E-42A2-BC62-2C3050397DF9=363564990

Работа с переменными окружения (класс $env)

Переменная Значение Комментарий
SERVER_NAME parser-test.1gb.ru DNS имя сервера
QUERY_STRING
Для получения параметров используйте класс $form
HTTP_REFERER

HTTP_USER_AGENT Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko; compatible; ClaudeBot/1.0; +claudebot@anthropic.com) Строка USER_AGENT броузера посетителя
HTTP_X_FORWARDED_FOR
Обычно заполнена если пришли через прокси
REMOTE_HOST 18.221.85.33
REMOTE_ADDR 18.221.85.33 IP адрес посетителя

Работа с SQL

^int:sql{SELECT 2+2}: 4

Работа с XML

Создание объекта типа xdoc:

$document[^xdoc::create{<?xml version="1.0" encoding="WINDOWS-1251" ?>
<document>
	<t attr="привет" n="123"/>
	<t attr="пока" n="234" n2="xxx"/>
	<text>текст</text>
</document>}]
Объект xdoc успешно создан.
Достаем все элементы <t /> $elements[^document.select[//t]] :
Количество найденых элементов: 2
Вывод найденых элементов с помощью foreach (порядок произвольный):
nodeName: 't', nodeType: '1', кол-во аттрибутов: '2', аттрибуты: n='123', attr='привет'
nodeName: 't', nodeType: '1', кол-во аттрибутов: '3', аттрибуты: n2='xxx', n='234', attr='пока'

Работа с классами Status и Memory

Поле Описание Значения
на начало работы на текущий момент после ^memory:compact[]
$status:rusage.utime (сек) чистое время, затраченное текущим процессом 0 0.03125 0.03125
$status:rusage.stime (сек) время, сколько система читала ваши файлы 0.046875 0.078125 0.078125
$status:rusage.maxrss (блоков) память, занимаемая процессом 4744 6544 6584
$status:memory.used (КБ) занято 556 1064 804
$status:memory.free (КБ) свободно (скорее всего фрагментирована) 120 144 404
$status:memory.ever_allocated_since_compact (КБ) выделено с момента последней сборки мусора 523.766 1014.43 1.26953
$status:memory.ever_allocated_since_start (КБ) выделено за все время обработки запроса 523.766 1014.43 1017.29