--- parser3/operators.ru.txt 2004/03/02 16:55:28 1.159 +++ parser3/operators.ru.txt 2007/02/28 19:09:40 1.190 @@ -50,11 +50,14 @@ Xне сделано, видимо, не будет сделано %left '-' '+' %left '*' '/' '%' '\\' %left NEG /* negation: unary - */ + !литералы + true + false !^if(условие){когда да}{когда нет} !^switch[значение]{^case[вариант1[;вариант2...]]{действие}^case[DEFAULT]{действие по умолчанию}} - !^while(условие){тело} + !^while(условие){тело}[[разделитель]|{разделитель который выполняется перед непустым очередным не первым телом}] !^for[i](0;4){тело}[[разделитель]|{разделитель который выполняется перед непустым очередным не первым телом}] !^use[модуль] !^try{ @@ -86,9 +89,9 @@ Xне сделано, видимо, не будет сделано удобно сделать после выставления 401 ошибки ^return[результат] + - отваливает из выполнения метода, выдавая нестандартный результат - X^break[] + - обрывает цикл - X^continue[] + - обрывает итерацию цикла - !^untaint[[as-is|file-spec|http-header|mail-header|uri|table|sql|js|xml|html|optimized-html]]{код} + !^break[] + - обрывает цикл + !^continue[] + - обрывает итерацию цикла + !^untaint[[as-is|file-spec|http-header|mail-header|uri|sql|js|xml|html|optimized-html]]{код} default as-is !^taint[[lang]][код] default "just tainted, language unknown" @@ -101,6 +104,7 @@ Xне сделано, видимо, не будет сделано по умолчанию, методы компилируются в $self [в случае оператора, $self=$MAIN:CLASS] !^connect[protocol://строка соединения]]{код с ^sql[...]-ями} !mysql://user:pass@{host[:port]|[/unix/socket]}/database? + ClientCharset=parser-charset << charset in which parser thinks client works charset=cp1251_koi8& timeout=3& compress=1& @@ -109,8 +113,9 @@ Xне сделано, видимо, не будет сделано autocommit если выставить в 0, будет делать commit/rollback !pgsql://user:pass@{host[:port]|[local]}/database? - client_encoding=win,[to-find-out]& - datestyle=ISO,SQL,Postgres,European,NonEuropean=US,German,DEFAULT=ISO + client_encoding=win,[to-find-out] + &datestyle=ISO,SQL,Postgres,European,NonEuropean=US,German,DEFAULT=ISO + &ClientCharset=parser-charset << charset in which parser thinks client works !oracle://user:pass@service? NLS_LANG=RUSSIAN_AMERICA.CL8MSWIN1251& @@ -125,16 +130,20 @@ Xне сделано, видимо, не будет сделано ORA_ENCRYPT_LOGIN=TRUE ClientCharset=parser-charset << charset in which parser thinks client works - !odbc://DSN=dsn^;UID=user^;PWD=password + !odbc://DSN=dsn^;UID=user^;PWD=password^;ClientCharset=parser-charset + ClientCharset << charset in which parser thinks client works + + !sqlite://database для работы connect нужно, чтобы заранее(рекомендуется в системном parser3) была определена таблица #sql drivers $SQL[ - $.drivers[^table::set{protocol driver client + $.drivers[^table::create{protocol driver client mysql /www/parser3/libparser3mysql.so /usr/local/lib/mysql/libmysqlclient.so pgsql /www/parser3/libparser3pgsql.so /usr/local/pgsql/lib/libpq.so oracle /www/parser3/libparser3oracle.so /u01/app/oracle/product/8.1.5/lib/libclntsh.so?ORACLE_HOME=/u01/app/oracle/product/8.1.5&ORA_NLS33=/u01/app/oracle/product/8.1.5/ocommon/nls/admin/data +sqlite /www/parser3/libparser3sqlite.so /usr/local/sqlite/lib/sqlite3.so odbc c:\drives\y\parser3project\odbc\debug\parser3odbc.dll }] ] @@ -168,9 +177,11 @@ odbc c:\drives\y\parser3project\odbc\ !^cache[expires date] !сигнализирует вышестоящему ^cache "уменьши до стольких-то 'секунд'/'expires'" !в пределе: ^cache(0) отменить кэширование + !^cache[] выдаёт текущую expires date X^cache[read] сигнализирует вышестоящему ^cache "взять скэшированное насильно, игнорируя expires",
выдаёт bool "получилось/нет" + !^sleep(seconds) Xесть глобальный флажок в свойствах/командной строке "не оптимизировать" @@ -187,7 +198,7 @@ odbc c:\drives\y\parser3project\odbc\ !есть глобальная строка/таблица $MAIN:CLASS_PATH с путём/путями к каталогу с классами. !корень путя/путей считается от корня веб пространства. !2. ...относительно строчки из table $MAIN:CLASS_PATH, снизу вверх - задавайте её в parser3.conf вашего сайта + задавайте её в конфигурационном auto.p вашего сайта !глобальная табличка $CHARSETS[$.название[имя файла]] !задаёт какие буквы считаются какими(whitespace, letter, etc), а также их unicode @@ -208,6 +219,7 @@ odbc c:\drives\y\parser3project\odbc\ !$имя whitespace или ${имя}неважно подстановка значения !^имя параметры вызов !$имя.CLASS класс значения + !$имя.CLASS_NAME имя класса !$имя[$.key[] () {}] конструктор элемента переменной-хэша $имя.key !^method[$.key[] () {}] конструктор элемента параметра-хеша $parameter.key $CLASS.имя обращение к переменной класса @@ -243,25 +255,27 @@ odbc c:\drives\y\parser3project\odbc\ ничего не выдаёт !^void.right(n) ничего не выдаёт - !^void.pos(p[;n]) + !^void.mid(p[;n]) ничего не выдаёт !^имя.int[] (default) 0 или default !^имя.double[] (default) 0 или default - !^void:sql{запрос без результата} + !^имя.bool[] + .bool(true|false) bool значение + !^void:sql{запрос без результата}{$.bind[см. table::sql]} !int,double !^имя.int[] целочисленное значение !^имя.double[]+ double значение + !^имя.bool[] + .bool(true|false) bool значение !^имя.inc(на сколько +) !^имя.dec(на сколько -) !^имя.mul(на сколько *) !^имя.div(на сколько /) !^имя.mod(на сколько %) !^имя.format[формат] - !^int/double:sql{query}[[$.limit(2) $.offset(4) $.default{0}]] + !^int/double:sql{query}[[$.limit(2) $.offset(4) $.default{0} $.bind[см. table::sql]]] запрос, результат которого должен быть один столбец/одна строка !string @@ -273,11 +287,12 @@ odbc c:\drives\y\parser3project\odbc\ пример: ^if(def $form:name) не пуста? ^if($user.isAlive) истина? [автопреобразование к числу, не ноль?] - !^string::sql{query}[[$.limit(1) $.offset(4) $.default{n/a}]] + !^string::sql{query}[[$.limit(1) $.offset(4) $.default{n/a} $.bind[см. table::sql]]] результат запроса должен быть один столбец/одна строка !^имя.int[] .int(default) целочисленное значение строки. если ломается преобразование, берётся default !^имя.double[]+ .double(default) double значение строки + !^имя.bool[] + .bool(default) bool значение строки если ломается преобразование, берётся default !^имя.format[формат] %d %.2f %02d... !^строка.match[шаблон][[опции поиска]] $prematch $match $postmatch $1 $2... @@ -314,6 +329,9 @@ odbc c:\drives\y\parser3project\odbc\ состоит из большого числа фрагментов !^string.trim[start|both|end[;chars]] выкидывает charset из начала/конца/и начала и конца default 'chars' -- whitespace chars + !^string.append[string] + !^string.base64[] encode + !^string:base64[encoded] decode !table в выражении @@ -328,7 +346,11 @@ odbc c:\drives\y\parser3project\odbc\ !пустые строки, и строки в первой колонке содержащие '#', игнорируются !$.separator[^#09] !$.encloser["] по-умолчанию, нет. - !^table::sql{query}[[$.limit(2) $.offset(4) todo:$.default{ ^table::create[...] }]] + !^table::sql{query}[[$.limit(2) $.offset(4) $.bind[hash] todo:$.default{ ^table::create[...] }]] + bind привязывает переменные в запросе к их значениям + пока реализован только для oracle + в запросе надо написать ":имя" + в параметре bind передать hash, из которого возьмётся(или куда запишется) значение !^таблица.save[[nameless|append;]путь[;опции, см. load]] !$таблица.поле !$таблица.fields из named таблицы выдаёт текущую запись как Hash @@ -405,11 +427,11 @@ odbc c:\drives\y\parser3project\odbc\ !^foreach[key|value]{тело}[[разделитель]|{разделитель который выполняется перед непустым очередным не первым телом}] пример: - $uids[^hashfile::open[/db/uids]] - - $random[23847387taduigh345XGHWElxjgdjg] - $uids.$random[$.value[$uid] $.expires(1)] - $uid[$persistent.logins.$random] + $sessions[^hashfile::open[/db/sessions]] + + $sid[^math:uuid[]] + $sessions.$sid[$.value[$uid] $.expires(1)] + $uid[$sessions.$sid] !form [берётся первый элемент из одноимённых из GET, потом первый из POST] @@ -423,13 +445,16 @@ odbc c:\drives\y\parser3project\odbc\ !env !$env:переменная + !$env:PARSER было то же самое, что показывается при запуске parser.cgi !cookie !$cookie:имя считать старое или свежезаданное !$cookie:имя[значение] на 90 дней - !$cookie:имя[$.value[значение] $.expires ЗНАЧЕНИЕ ] + !$cookie:имя[$.value[значение] $.expires[ЗНАЧЕНИЕ] $.secure(true)] !значение поля expires может быть 'session', date, или число дней(0дней=session) ! если дата, она будет преобразована к формату "Sun, 25-Aug-2002 12:03:45 GMT" + ! можно устанавливать bool свойства, например $.secure(true), $.httponly(true) + !request !$request:query @@ -455,6 +480,7 @@ odbc c:\drives\y\parser3project\odbc\ ! $attribute[zzz] field: abc; {attribute=zzz}<<часть !значение поля или атрибута может быть string или date ! если дата, она будет преобразована к формату "Sun, 25-Aug-2002 12:03:45 GMT" + !$response:headers накопленные поля !$response:body[DATA] замещает стандартный ответ !$response:download[DATA] замещает стандартный ответ, выставляет флаг, заставляющий browser предложить download @@ -544,8 +570,8 @@ odbc c:\drives\y\parser3project\odbc\ !если body указан hash, то это части, будут собраны текстовые блоки, затем вложения !это старый формат, поддерживается для обратной совместимости !если имя части начинается со слова text, то это текстовый блок. - !если имя части начинается со слова attach, то это вложение, формат задания:: - !$attach[$.format[!uue|Xbase64] $.value[DATA] $.file-name[user-file-name]] + !если имя части начинается со слова file, то это вложение, формат задания:: + !$file[$.format[!uue|!base64] $.value[DATA] $.name[user-file-name]] !важно: при multipart не указывать content-type ^mail:send[ # по-умолчанию, совпадает с source encoding. @@ -573,13 +599,14 @@ odbc c:\drives\y\parser3project\odbc\ $.body[слова] ] #для удобства скриптования можно указать только одну часть, при этом не будет multipart - $.attach[ + $.file[ $.value[^file::load[my beloved.doc]] - $.file-name[мой любимый.doc] + $.name[мой любимый.doc] + $.format[base64] ] - $.attach2[ + $.file2[ $.value[^file::load[my beloved.doc]] - $.file-name[мой любимый.doc] + $.name[мой любимый.doc] ] ] ] @@ -650,6 +677,7 @@ odbc c:\drives\y\parser3project\odbc\ !^file:find[имя файла][{когда не нашли}] !^file:list[путь[;шаблон]] = table с колонкой name !^file::load[text|binary;!big.zip[;!domain_press_release_2001_03_01.zip][;опции]] + !^file::create[text;имя;^untaint[xml]{data}] !$файл_который_был_loaded.size !^file::stat[имя файла] !$файл_который_был_stated.size !.adate !.mdate !.cdate @@ -664,6 +692,8 @@ odbc c:\drives\y\parser3project\odbc\ можно переименовывать и двигать каталоги[win32: но не через границу дисков] каталоги для dest создаются с правами 775 каталог старого файла стирается, если после move он остаётся пуст + !^file:copy[имя файла;имя копии файла] + можно копировать только файлы !^file:lock[имя файла]{код} файл при необходимости создаётся блокируется @@ -677,13 +707,27 @@ odbc c:\drives\y\parser3project\odbc\ !^file:justext[/a/some.tar.gz]=gz !/some/page.html: ^file:fullpath[a.gif] => /some/a.gif !^file.sql-string[] внутри ^connect даст правильно escaped строку, которую можно в запрос отдать - !^file::sql[[имя_файла_для_download]]{} + X^file::sql[[имя_файла_для_download]]{} + !^file::sql{}[[ + $.name[имя_файла_для_download] + $.content-type[пользовательский content-type] + ]] результат запроса должен быть "одна строка". колонки: первая колонка - данные если есть вторая - это имя файла если есть третья - это content-type - + !^file.base64[] encode + !^file:base64[имя файла] encode + !^file::base64[encoded string] decode + !^file:crc32[имя файла] + вычисляет crc32 файла с указанным именем + !^file.crc32[] + вычисляет crc32 объекта + !^file.md5[] + !^file:md5[имя файла] + выдает digest файла, длиной 16 байт в виде строки, + где байты digest выданы в hex виде, впритык, в нижнем регистре !math !$math:PI @@ -712,6 +756,8 @@ odbc c:\drives\y\parser3project\odbc\ если нет тела salt, оно создаётся случайным $1$ вызывает MD5 алгоритм функции OS 'crypt', если поддерживается [заведомо нет на solaris]. другие salt читайте документацию по функции OS 'crypt'. + !^math:crc32[string] + вычисляет crc32 строки !date !время типа time можно использовать в выражениях, подставляет @@ -743,6 +789,8 @@ odbc c:\drives\y\parser3project\odbc\ столбцы: year, month, day, weekday xdoc(xnode) + !$xdoc.search-namespaces hash, where keys=prefixes, values=urls + DOM1 attributes: !readonly attribute DocumentType doctype Xreadonly attribute DOMImplementation implementation @@ -772,6 +820,7 @@ xdoc(xnode) ::sql{...} !::create[[URI]]{} старое имя 'set' !::create[[URI]][qualifiedName] + !::create[file] can be usable: $f[^file::load[binary;http://;some http options here...]]$x[^xdoc::create[$f]] URI default = disk path to requested document для каталогов конечный / обязателен !::load[file.xml[;опции]] @@ -984,12 +1033,19 @@ console !$console:line read/write строку -!DATA::=string | file +DATA::=string | file | hash + +!hash вида +[ + $.file[имя файла на диске] + $.name[имя файла для пользователя] + $.mdate[date] +] !MAIN - это класс, загружаемый на автомате из parser3.conf, + это класс, загружаемый на автомате из конфигурационного auto.p, кучи auto.p и запрашиваемого документа: - !parser3.conf + !конфигурационный auto.p cgi: 1. или полный путь из переменной окружения CGI_PARSER_SITE_CONFIG или рядом с бинарником parser'а @@ -1001,7 +1057,7 @@ console имя последнего загруженного MAIN, имён у предыдущих нет !после загрузки MAIN класса вызывается его @main[] - !результат которого передаётся в его @post-process[data] if($data is string) ... + !результат которого передаётся в его @postprocess[data] if($data is string) ... !результат которого отдаётся пользователю !если встречается ошибка и try не задан, её можно красиво сообщить пользователю, @@ -1016,18 +1072,28 @@ console операторов/методов, приведших к ошибке. !при загрузке файла (file::load, table::load, xdoc::load) можно указать такое имя файла: - !http://domain/document?params + !http://domain/document[?params<> создает http.status ошибку, !это можно отключить, передав !$.any-status(1) !$.charset[кодировка удалённых докуметов по-умолчанию] << если сервер вернёт content-type:charset=ОНА_ПЕРЕБИВАЕТ + !$.user[пользователь] + !$.password[пароль] !file::load в дополнительные поля записывает !ПОЛЕ:значение (имена полей ответа заглавными буквами) !tables << хеш их ПОЛЕ->table с единственным столбцом "value". @@ -1063,5 +1129,12 @@ console !нужно выключить русский apache: CharsetDisable on -!если в MAIN будет определён флаг $ORIGINS(1) то вместо обычного вывода страницы будет +Xесли в MAIN будет определён флаг $ORIGINS(1) то вместо обычного вывода страницы будет выдан список фрагментов результата с указанием их происхождения + +!если описание метода содержит локальную переменную result в явном виде + (есть и неявная переменная) + то код вывода строковых литералов не попадает в конечный байт-код, + а непробельные символы считаются синтаксической ошибкой + для вывода чего бы то ни было надо пользоваться этой переменной +