taint/untaint - интересный пример

Bobych v.3 02.02.2004 04:14 / 02.02.2004 04:18

Может кто скажет, что это тупо, но другого примера на это нужное каждому действие, ИМХО, просто не было.
Текстом: вводим в textarea текст, можно на нескольких строках. Переводы строк затем при выводе "видно", т.е. в одну строку они не съезжаются. А если юзверь додумается всунуть ХТМЛ - то он и выскочит в виде текста

$text[$form:body]
^if(def $text){$text[^text.match[\n][g]{<br />}]
^connect[$connect_string]{
^void:sql{insert into abcdef (body) values ('^untaint[html]{$text}')}
…сообщение добавлено. }

и получаем:
^connect[$connect_string]{ 
$news[^table::sql{select body from abcdef }] 
^if($news){ 
^news.menu{ ^untaint[as-is]{$news.body} }
          }
}

вроде не ошибся: я тут немного упростил для поста, но у меня работает ;)
Кстати, если кто знает, как упросить это (а то слишком как-то) - плиз напишите!

---