--- parser3/operators.ru.txt 2008/07/18 08:31:17 1.212 +++ parser3/operators.ru.txt 2012/06/05 10:33:13 1.242 @@ -56,6 +56,7 @@ Xне сделано, видимо, не будет сделано !^if(условие){когда да}{когда нет} + !^if(условие1){да}[(условие2){да}[(условие2){да}[...]]]{нет} -- количество доп. условий не ограничено (в общем elseif это :) !^switch[значение]{^case[вариант1[;вариант2...]]{действие}^case[DEFAULT]{действие по умолчанию}} !^while(условие){тело}[[разделитель]|{разделитель который выполняется перед непустым очередным не первым телом}] !^for[i](0;4){тело}[[разделитель]|{разделитель который выполняется перед непустым очередным не первым телом}] @@ -80,7 +81,7 @@ Xне сделано, видимо, не будет сделано $exception.handled(1) код, обрабатывающий sql ошибку $exception.type = sql.connect - $exception.file $exception.lineno [если не запрещены при компиляции] + $exception.file $exception.lineno $exception.colno [если не запрещены при компиляции] $exception.source = вася $exception.comment = болван } @@ -96,7 +97,7 @@ Xне сделано, видимо, не будет сделано выдавая нестандартный результат !^break[] + - обрывает цикл !^continue[] + - обрывает итерацию цикла - !^untaint[[as-is|file-spec|http-header|mail-header|uri|sql|js|xml|html|optimized-html|regex]]{код} + !^untaint[[as-is|file-spec|http-header|mail-header|uri|sql|js|xml|html|optimized-html|regex|parser-code]]{код} default as-is !^taint[[lang]][код] default "just tainted, language unknown" @@ -140,8 +141,8 @@ Xне сделано, видимо, не будет сделано ClientCharset << charset in which parser thinks client works !sqlite://DBfile? - ClientCharset=parser-charset& << charset in which parser thinks client works - autocommit=1 + ClientCharset=parser-charset& << charset in which parser thinks client works + autocommit=1 для работы connect нужно, чтобы заранее(рекомендуется в системном конфигурационном auto.p) была определена таблица @@ -180,7 +181,7 @@ odbc c:\drives\y\parser3project\odbc\deb !в catch коде $exception.handled[cache] ^rem{флаг, что exception обработан} !^cache[файл][expires date]{код}[{catch код}] !абсолютное задание времени - X^cache[файл] удалить файл [не ругает, если его нет] // такое было, больше не будет, делать ^cache(0) + !^cache[файл] удалить файл [не ругает, если его нет] !^cache(секунд) !^cache[expires date] !сигнализирует вышестоящему ^cache "уменьши до стольких-то 'секунд'/'expires'" @@ -296,7 +297,7 @@ odbc c:\drives\y\parser3project\odbc\deb пример: ^if(def $form:name) не пуста? ^if($user.isAlive) истина? [автопреобразование к числу, не ноль?] - !^string::sql{query}[[$.limit(1) $.offset(4) $.default{n/a} $.bind[см. table::sql]]] + !^string:sql{query}[[$.limit(1) $.offset(4) $.default{n/a} $.bind[см. table::sql]]] результат запроса должен быть один столбец/одна строка !^строка.int[] .int(default) целочисленное значение строки. если ломается преобразование, берётся default @@ -304,7 +305,7 @@ odbc c:\drives\y\parser3project\odbc\deb !^строка.bool[] + .bool(default) bool значение строки если ломается преобразование, берётся default !^строка.format[формат] %d %.2f %02d... - !^строка.match[шаблон][[опции поиска]] $prematch $match $postmatch $1 $2... + !^строка.match[шаблон-строка|шаблон-regex][[опции поиска]] $prematch $match $postmatch $1 $2... опции поиска= i CASELESS x whitespace in regex ignored @@ -313,7 +314,8 @@ odbc c:\drives\y\parser3project\odbc\deb g найти все вхождения, а не одно ' создавать столбцы prematch, match, postmatch n вернуть цисло с количеством найденных совпадений, а не таблицу с результатами - !^строка.match[шаблон][опции поиска]{замена} + U инвертировать смысл модификатора '?' + !^строка.match[шаблон-строка|шаблон-regex][опции поиска]{замена} опции поиска+= g заменить все вхождения, а не одно !^строка.split[разделитель][[lrhv]][[название столбца для вертикального разбиения]] @@ -334,7 +336,9 @@ odbc c:\drives\y\parser3project\odbc\deb !^строка.pos[подстрока](позиция, с которой ищем) <0 = не найдено !^строка.replace[$таблица_подстановок_строка_на_строку] + !^строка.replace[$что;$на-что] !^строка.save[[append;]путь] + !^строка.save[путь[;$.charset[в какой кодировке сохраняем] $.append(true)]] !^строка.normalize[] выдает другую строку, в которой фрагменты на одном языке объединены полезно делать перед сложными match операциями, если вы знаете, что входная строка состоит из большого числа фрагментов @@ -342,7 +346,7 @@ odbc c:\drives\y\parser3project\odbc\deb default 'chars' -- whitespace chars !^строка.append[string] !^строка.base64[] encode - !^string:base64[encoded] decode + !^string:base64[encoded[;$.strict(true)]] decode !table в выражении @@ -358,10 +362,10 @@ odbc c:\drives\y\parser3project\odbc\deb !$.separator[^#09] !$.encloser["] по-умолчанию, нет. !^table::sql{query}[[$.limit(2) $.offset(4) $.bind[hash] todo:$.default{ ^table::create[...] }]] - bind привязывает переменные в запросе к их значениям - пока реализован только для oracle - в запросе надо написать ":имя" - в параметре bind передать hash, из которого возьмётся(или куда запишется) значение + bind привязывает переменные в запросе к их значениям + пока реализован только для oracle + в запросе надо написать ":имя" + в параметре bind передать hash, из которого возьмётся(или куда запишется) значение !^таблица.save[[nameless|append;]путь[;опции, см. load]] !$таблица.поле !$таблица.fields из named таблицы выдаёт текущую запись как Hash @@ -370,7 +374,9 @@ odbc c:\drives\y\parser3project\odbc\deb !^таблица.offset[[whence]](5) сдвигает !whence=cur|set !без whence - это cur - !^таблица.count[] + !^таблица.count[], ^таблица.count[rows] - количество строк в таблице + !^таблица.count[columns] - для named таблицы количество столбцов (сокращение от $c[^таблица.columns[]]^c.count[]) + !^таблица.count[cells] - количество ячеек в текущей строке таблицы !^таблица.line[] 1-based offset !^таблица.sort{{ключеделатель строка}|(ключеделатель число)}[{desc|asc}] default=asc !^таблица.append{данные} @@ -423,6 +429,9 @@ odbc c:\drives\y\parser3project\odbc\deb !^хеш.foreach[key;value]{тело}[[разделитель]|{разделитель который выполняется перед непустым очередным не первым телом}] !^хеш.delete[ключ] удалить ключ !^хеш.contain[ключ] - существует ли в хеше ключ (bool) + !^хэш._at[first|last] + !^хэш._at([-]N) + доступ к заданным элементам упорядоченного хеша !hashfile !^hashfile::open[filename] @@ -450,6 +459,7 @@ odbc c:\drives\y\parser3project\odbc\deb $sessions.$sid[$.value[$uid] $.expires(1)] $uid[$sessions.$sid] + !form [берётся первый элемент из одноимённых из GET, потом первый из POST] !$form:поле = string/file @@ -461,10 +471,12 @@ odbc c:\drives\y\parser3project\odbc\deb !$form:imap = хэш с ключами 'x' и 'y' со значением ?1,2 приписки при использовании server-site image map + !env !$env:переменная !$env:PARSER то же самое, что показывается при запуске parser.cgi + !cookie !$cookie:имя считать старое или свежезаданное !$cookie:имя[значение] на 90 дней @@ -493,6 +505,7 @@ odbc c:\drives\y\parser3project\odbc\deb ПРЕДУПРЕЖДЕНИЕ: класс form получает свои поля после обработки всех auto класса MAIN поэтому необходимо задать $request/response:charset в одном из них. не после. + !response !$response:поле[значение] и можно считать старое -- $response:поле !значение может быть string а может быть hash: @@ -503,7 +516,7 @@ odbc c:\drives\y\parser3project\odbc\deb !$response:headers накопленные поля !$response:body[DATA] замещает стандартный ответ !$response:download[DATA] замещает стандартный ответ, - выставляет флаг, заставляющий browser предложить download + выставляет флаг, заставляющий browser предложить download !$response:status !^response:clear[] забыть все заданные response поля !$response:charset @@ -515,6 +528,46 @@ odbc c:\drives\y\parser3project\odbc\deb ПРЕДУПРЕЖДЕНИЕ: класс form получает свои поля после обработки всех auto класса MAIN поэтому необходимо задать $request/response:charset в одном из них. не после. + +!regex + !в выражении + !логическое значение всегда равно true + !числовое значение равно количеству байт скомпилированного шаблона. + !^regex::create[шаблон-строка][[опции поиска]] + !^шаблон.size[] количество байт скомпилированного шаблона + если значение очень большое -- стоит почитать документацию по pcre и, возможно, переписать шаблон. + !^шаблон.study_size[] размер study-структуры. если==0 -- шаблон не может быть "изучен" + ^шаблон.save[filespec] + ^шаблон.load[filespec] + + +!reflection + !^reflection:create[класс;конструктор[;пара;[мет[;ры]]]] вызывает указанный конструктор класса (не более 100 параметров) + !^reflection:classes[] хеш со всеми классами. ключ -- имя класса, значение бывает methoded (класс с методами) или void + !^reflection:class[объект] класс переданного объекта + !^reflection:class_name[объект] имя класса переданного объекта + !^reflection:base[объект] родительский класс переданного объекта + !^reflection:base_name[объект] имя родительского класса переданного объекта + !^reflection:methods[класс] хеш со списком методов указанного класса, значения -- строки 'native' или 'parser' + !^reflection:method[класс или объект;имя метода] возвращает junction-method класса или объекта + !^reflection:fields[класс или объект] хеш со списком статических полей указанного класса или динамических полей указанного объекта + !^reflection:field[класс или объект;имя поля] возвращает значение указанного поля класса или объекта. getter-ы игнорируются. + !^reflection:uid[класс или объект] возвращает идентификатор объекта или класса + !^reflection:method_info[класс;метод] хеш с параметрами указанного метода класса + $.inherited[класс] имя класса, где метод был определён (возвращается только если метод был определён в предке) + $.overridden[класс] имя класса, где метод был определён (возвращается только если метод был определён в предке) + для native классов возвращается хеш: + .min_params(минимально необходимое число параметров) + .max_params(максимально возможное число параметров) + .call_type[dynamic|static|any] + для parser классов возвращается хеш: + ключ -- номер параметра (0, 1, ...), значение - имя параметра + !^reflection:dynamical[[object or class, caller if absent]] возвращает true, если метод был вызван из динамического контекста + при передаче параметра возвращает true, если передан динамический объект, + false если класс + !^reflection:delete[класс или объект;имя переменной] удаляет переменную с указанным именем в указанном классе или объекте + + !mail !$mail.received=MESSAGE: .from @@ -543,10 +596,10 @@ odbc c:\drives\y\parser3project\odbc\deb $.message#[MESSAGE] (message, message2, ...) !^mail:send[ - $.options[-odd] - unix: строка, которая будет добавлена к команде запуска sendmail - -odd означает "быстро поставь в очередь без проверки email" - win32: игнорируется + $.options[-odd] + unix: строка, которая будет добавлена к команде запуска sendmail + -odd означает "быстро поставь в очередь без проверки email" + win32: игнорируется $.charset[кодировка заголовка и текстовых блоков] $.any-header-field $.text[string] @@ -665,9 +718,14 @@ odbc c:\drives\y\parser3project\odbc\deb !^картинка.polyline+(цвет)[table x:y точки] !^картинка.polygon(цвет)[table x:y вершины_многоугольника] !^картинка.polybar(цвет)[table x;y вершины_многоугольника] - !^картинка.font[набор_букв;имя_файла_шрифта.gif](ширина_пробела[;ширина_символа]) + !^картинка.font[набор_букв;имя_файла_шрифта.gif][(ширина_пробела[;ширина_символа])] высота символа = высота картинки/количество букв в наборе если указана ширина_символа, то monospaced, если 0, то ширина_символа = ширине gif + !^картинка.font[набор_букв;имя_файла_шрифта.gif; + $.space(ширина_пробела) // по умолчанию = ширине gif + $.width(ширина_символа) // см. выше, по умолчанию proportional + $.spacing(расстояние между буквами) // по умолчанию = 1 + ] !^картинка.text(x;y)[текст_надписи] AS_IS !^картинка.length[текст_надписи] AS_IS !^картинка.gif[возможно, имя файла] -- кодирует в FILE с content-type=image/gif @@ -688,24 +746,28 @@ odbc c:\drives\y\parser3project\odbc\deb !^картинка.pixel(x;y)[(color)] узнать или задать цвет пиксела + !file !$файл_из_post.name !$файл_из_post.size !$файлtиз_post.text - !^файл.save[text|binary;имя файла] + !^файл.save[text|binary;имя файла[;$.charset[в какой кодировке сохраняем]]] !^file:delete[имя файла] !^file:find[имя файла][{когда не нашли}] - !^file:list[путь[;шаблон]] = table с колонкой name + !^file:list[путь[;шаблон-строка|шаблон-regex]] = table с колонкой name !^file::load[text|binary;!big.zip[;!domain_press_release_2001_03_01.zip][;опции]] - !^file::create[text;имя;^untaint[xml]{data}] + !^file::create[text|binary;имя;data] + !^file::create[text|binary;имя;data[;$.charset[кодировка букв в создаваемом файле] $.content-type[...]]] + !^file::create[string-or-file-content[;$.name[имя] $.mode[text|binary] $.content-type[...] $.charset[...]]] !$файл_который_был_loaded.size + !$файл_который_был_loaded_или_created.mode = text/binary !^file::stat[имя файла] - !$файл_который_был_stated.size !.adate !.mdate !.cdate + !$файл_который_был_stated_или_loaded.size !.adate !.mdate !.cdate !^file::cgi[[text|binary;]имя файла[;env hash +options[;1cmd[;2line[;3ar[;4g[;5s]]]]]]] возвращённый заголовок рассыпается на $поля $status $stderr - !^file::exec[[text|binary;]имя файла[;env hash[;1cmd[;2line[;3ar[;4g[;5s;...under win32 max 10 args]]]]]]] + !^file::exec[[text|binary;]имя файла[;env hash[;1cmd[;2line[;3ar[;4g[;5s;...under unix max 50 args]]]]]]] options: $.stdin[текст] если текст пуст, отключается автоматическое пересовывание данных HTTP-POST !^file:move[старое имя файла;новое имя файла] @@ -720,35 +782,40 @@ odbc c:\drives\y\parser3project\odbc\deb выполняется код разблокируется Xchmod[...] НЕТ И НЕ БУДЕТ, ЧТОБЫ НЕ МОГЛИ СДЕЛАТЬ executable и запустить, даже если ftp запрещает chmod. - !^file:dirname[/a/some.tar.gz]=/a - !^file:dirname[/a/b/]=/a - !^file:basename[/a/some.tar.gz]=some.tar.gz + !^file:dirname[/a/some.tar.gz]=/a (работает аналогично комманде *nix) + !^file:dirname[/a/b/]=/a (работает аналогично комманде *nix) + !^file:basename[/a/some.tar.gz]=some.tar.gz (работает аналогично комманде *nix) + !^file:basename[/a/b/]=b (работает аналогично комманде *nix) !^file:justname[/a/some.tar.gz]=some.tar !^file:justext[/a/some.tar.gz]=gz !/some/page.html: ^file:fullpath[a.gif] => /some/a.gif !^файл.sql-string[] внутри ^connect даст правильно escaped строку, которую можно в запрос отдать - X^file::sql[[имя_файла_для_download]]{} - !^file::sql{}[[ - $.name[имя_файла_для_download] - $.content-type[пользовательский content-type] + X^file::sql[[имя_файла_для_download]]{query} + !^file::sql{query}[[ + $.name[имя_файла_для_download] + $.content-type[пользовательский content-type] ]] - результат запроса должен быть "одна строка". - колонки: - первая колонка - данные - если есть вторая - это имя файла - если есть третья - это content-type + результат запроса должен быть "одна строка". + колонки: + первая колонка - данные + если есть вторая - это имя файла + если есть третья - это content-type !^файл.base64[] encode - !^file:base64[имя файла] encode - !^file::base64[encoded string] decode + !^file:base64[имя файла] + encode + !^file::base64[encoded string] + !^file::base64[mode;имя файла;encoded string[;$.content-type[...]]] + decode !^file:crc32[имя файла] - вычисляет crc32 файла с указанным именем + вычисляет crc32 файла с указанным именем !^файл.crc32[] - вычисляет crc32 объекта - !^файл.md5[] - !^file:md5[имя файла] + вычисляет crc32 объекта + !^файл.md5[] + !^file:md5[имя файла] выдает digest файла, длиной 16 байт в виде строки, где байты digest выданы в hex виде, впритык, в нижнем регистре + !math !$math:PI !^math:round floor ceiling @@ -779,11 +846,48 @@ odbc c:\drives\y\parser3project\odbc\deb !^math:crc32[string] вычисляет crc32 строки !^math:sha1[string] + !^math:convert[number](base-from;base-to) преобразует строку с числом из одной системы исчисления в другую + !inet !^inet:ntoa(long) !^inet:aton[IP] +!json + !^json:parse[-json-строка-[; + $.depth(максимальная глубина, default == 19) + $.double(false) отключить встроенный парсинг чисел с плавающей точкой (по умолчанию включен) + в этом случае они попадут в результирующий объект как строки + $.distinct[first|last|all] как будет происходить разбор дублирующихся ключей у объектов + first -- будет оставлен первый встретившийся элемент + last -- будет оставлен последний встретившийся элемент + all -- будут оставлены все элементы. при этом элементы, начиная со 2 + получат числовые суффиксы (key_2 итд) + по умолчанию дублирующиеся ключи приведут к exception + $.object[method-junction] пользовательский метод[ключ;объект], которому будут передаваться все разобранные + объекты и ключи объекта, метод возвращает новый объект + $.array[method-junction] пользовательский метод, которому будут передаваться массивы + ]] + парсит json-строку в хэш + !^json:string[system or user object[; + $.skip-unknown(false) отключить exception и выдавать 'null' при сериализации объектов с типами + отличных от void, bool, string, int, double, date, table, hash и file + $.indent(true) форматировать результирующую строку табуляциями по глубине вложенности + $.date[sql-string|gmt-string|unix-timestamp] формат вывода даты, по умолчанию -- sql-string + $.table[object|array|compact] формат вывода таблицы, по умолчанию -- object + object: [{"c1":"v11","c2":"v12",...},{"c1":"v21","c2":"v22",...},...] + array: [["c1","c2",...] || null (for nameless),["v11","v12",...],...] + compact: ["v11" || ["v11","v12",...],...] + $.file[text|base64|stat] вывести тело файла в указанном виде (по умолчание тело файла + не попадает в output) + $.xdoc[hash] параметры преобразования xdoc в строку (как в ^xdoc.string[]) + $.тип[method-junction] любой тип можно вывести с помощью пользовательского метода, который + должен принимать 3 параметра: ключ, объект данного типа и опции + вызова ^json:string[] + ]] + сериализует системный или пользовательский объект в json-строку + + !date !время типа time можно использовать в выражениях, подставляет количество дней с epoch [1 января 1970 (UTC)], дробное @@ -793,6 +897,7 @@ odbc c:\drives\y\parser3project\odbc\deb $date:TZ наш часовой пояс, дробное, в часах (где-то есть с точностью до получаса) !^date::now[] !^date::now(смещение в днях) выдаёт сейчас+смещение + !^date::today[] дата на 00:00:00 текущего дня !^date::create(дней с epoch) // старое имя set !^date::create(year;month[;day[;hour[;minute[;second]]]]) // старое имя set !^date::create[дата в формате %Y-%m-%d %H:%M:%S] @@ -806,7 +911,10 @@ odbc c:\drives\y\parser3project\odbc\deb TZ="" << локальная зона !^дата.roll[year|month|day](+-смещение) сдвигает дату !^дата.roll[TZ;Новая зона] говорит, что дата в таком-то часовом поясе: влияет на .hour & Co - !^дата.sql-string[] %Y-%m-%d %H:%M:%S + !^дата.sql-string[[datetime|date|time]] + datetime или без параметра -- %Y-%m-%d %H:%M:%S + date -- %Y-%m-%d + time -- %H:%M:%S where published='^дата.sql-string[]' !^date:calendar[rus|eng](год;месяц) выдаёт неименованную таблицу столбцы: 0..6, week, year @@ -1048,7 +1156,7 @@ xdoc(xnode) !$status:memory hash !used - Includes some pages that were allocated but never written. + Includes some pages that were allocated but never written. !free @@ -1056,8 +1164,8 @@ xdoc(xnode) Return the number of bytes allocated since the last collection. !ever_allocated_since_start - Return the total number of bytes [EVER(c)PAF] allocated in this process. - Never decreases. + Return the total number of bytes [EVER(c)PAF] allocated in this process. + Never decreases. !$status:pid process id !$status:tid thread id @@ -1098,7 +1206,7 @@ DATA::=string | file | hash !определив !@unhandled_exception[exception;stack] !$exception.type строка "тип проблемы" - !$exception.file $exception.lineno файл и строка где случилась проблема [если не запрещены при компиляции] + !$exception.file $exception.lineno $exception.colno файл, строка и позиция, где случилась проблема [если не запрещены при компиляции] !$exception.source строка, из-за которой случилась проблема !$exception.comment комментарий english !stack табличка из колонок file line name, @@ -1145,7 +1253,9 @@ DATA::=string | file | hash !file.lock shared/exclusive lock error !file.missing ^file:delete[delme] not found !file.access ^table::load[.] no rights + !file.read ^file::load[...] error while reading file !file.seek seek failed + !file.execute ^file::cgi[...] incorrect cgi header/can't execute !image.format ^image::measure[index.html] not gif/jpg !sql.connect ^connect[mysql://baduser:pass@host/db]{} not found/timeout !sql.execute ^void:sql{select bad} syntax error @@ -1163,7 +1273,8 @@ DATA::=string | file | hash !http.timeout ^file::load[http://host/doc] whole load operation failed to complete in # seconds !http.response ^file::load[http://ok/there] host found, connection accepted, bad answer !http.status ^file::load[http://ok/there] host found, connection accepted, status!=200 - + !date.range ^date::create(1950;1;1) date out of valid range + !нужно выключить русский apache: CharsetDisable on Xесли в MAIN будет определён флаг $ORIGINS(1) то вместо обычного вывода страницы будет