--- parser3/www/htdocs/Attic/index.html	2002/08/07 13:44:00	1.93
+++ parser3/www/htdocs/Attic/index.html	2002/08/28 10:53:59	1.124
@@ -1,11 +1,13 @@
-#@USE
-#t.p
+@USE
+/derived.p
 
 @auto[filespec]
 $selffilespec[$filespec]
 #$form:here
 #$request:charset[UTF-8]
 #$response:charset[windows-1251]
+#$request:charset[windows-1251]
+#$response:charset[UTF-8]
 #$response:content-type[$.value[text/html]$.charset[$response:charset]]
 
 #@postprocess[body]
@@ -21,7 +23,14 @@ $selffilespec[$filespec]
 #	^int:sql{select news_id from news where news_id=-1}[
 ##	$.default{2}
 #	]<br>
+#    ^hash::sql{bad}
 #    ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
+#	^file::load[text;^string:sql{select 'from sql server' }]
+#	^string:sql{select '^^hello[]' }] $ORIGINS(1)
+#	^process{	^^h[]}
+#	^process{^string:sql{select '1
+#	^^hello[]' }]	}
+#	^double:sql{select '2*' ; }
 #}
 #^eval(2)
 #^tcrashlocaljunctionsv2[]
@@ -72,7 +81,6 @@ $selffilespec[$filespec]
 #^precisionProblem[]
 #^xpath[]
 #^ttablesetlang[]
-#^mail3[]
 #^ttime[]
 #^tupper[]
 #^treplace[]
@@ -136,7 +144,6 @@ $selffilespec[$filespec]
 #^tif[]
 #^image[]
 #^mail2[]
-#^cookie[]
 #^response[]
 #^regexp2[]
 #^ttablerem[]
@@ -188,7 +195,6 @@ $selffilespec[$filespec]
 #^sergestrandef[]
 #^tstdin[]
 #^tfind[]
-#^calendar[]
 #^mimet[]
 #^cgit[]
 #^joinlimit[]
@@ -196,14 +202,145 @@ $selffilespec[$filespec]
 #^transparams[]
 #^sendtests[]
 #^wwrapperpass[]
-^badpos[]
+#^badpos[]
+#^processtest[]
+#^mail3[]
+#^mail4[]
+#^datesaving[]
+#^badconstructor[]
+#^calendar[]
+#^monthdays(8)
+#^xdoctypetest[]
+#^xtabletest[]
+#^staticstest[]
+#^staticstest2[]
+#^rbodytest[]
+#^cookie[]
+#^cookieexpirestest[]
+#^postest[]
+#^voidpostest[]
+#^virtualtest[]
+#^badcolumntest[]
+#^delimiters[]
+^новый-split[]
+#^грязные-cookie[]
 <hr>
 OK
+                 
+@грязные-cookie[]
+#$a[
+
+@новый-split[]
+$abc[a.b.c]
+#$table[^abc.split[.]]
+#$table[^abc.split[.;l]]
+#$table[^abc.split[.;v]]
+$table[^abc.split[.;lv]]
+^table.menu{$table.piece}[,]
+<hr>
+#$table[^abc.split[.;h]]
+$table[^abc.split[.;hr]]
+$table.0,$table.1,$table.2<br>
+
+@delimiters[]
+$a#1[1]<br>
+$a#1=<br>
+
+
+@badcolumntest[]
+$table[^table::load[ext.cfg]]
+$table.b
+
+
+@virtualtest[]
+$derived[^derived::create[derived create actual param]]
+^derived.test[]
+
+
+@voidpostest[]
+$s[]
+^s.pos[$nothing]
+
+@postest[]
+$s[$nothing]
+^s.pos[$nothing]
+
+@cookieexpirestest[]
+#$cookie:exptest[1]
+#$cookie:exptest[$.value[2] $.expires(+1)]
+$response:xxxx[^date::now(+10)]
+$response:yyy[$.value[^date::now(+20)]]
+$response:yyy[$.value[vvv] $.aaaa[^date::now(+20)]]
+
+@rbodytest[]
+$request:body=
+<form method=post>
+<input type=submit name=paf value=123>
+</form>
+
+@staticstest2[]
+^$derived:derived_var=$derived:derived_var<br>
+^$derived:a=$derived:a<br>
+$derived:a[changed] ^$derived:a=$derived:a<br>
+$derived:derived_var[changed] 
+^$derived:derived_var=$derived:derived_var<br>
+
+@staticstest[]
+$derived[^derived::create[]]
+^derived.test[]
+<hr>
+^$derived.a=$derived.a<br>
+^$derived.x=$derived.x<br>
+<hr>
+^if($derived is derived){derived is derived}{error: derived is not derived}<br>
+^if($derived is table){derived is table}{error:derived is not table}<br>
+<hr>
+^^eval(^$derived)=^eval($derived)<br>
+^^if(^$derived)=^if($derived){y}{n}<br>
+
+
+@xdoctypetest[]
+$xdoc[^xdoc::create[x]]
+^if($xdoc is xdoc){y}{n}
+
+@xtabletest[]
+$xtableo[^xtable::create[]]
+^if($xtableo is table){y}{n}
+#^xtableo.columns[]
+
+@monthdays[month]
+$from[^date::create(2000;$month;1)]
+$to[^date::create($from)] ^to.roll[month](+1)
+$result($to-$from)
+
+@badconstructor[]
+^date::now[]
+
+@datesaving[]
+$now[^date::now[]]
+$now.daylightsaving<br>
+$now.yearday<br>
+#
+$date[^date::create(2002;1;3)]
+$date.daylightsaving<br>
+$date.yearday
+
+@mail4[]
+^mail:send[
+	$.from[paf@mail.design.ru]
+	$.to[paf@mail.design.ru]
+	$.subject[^taint[uri][москва]=2]
+	$.text[^taint[uri][москва]=]
+	$.html{<a href=http://there.ru/?city=^taint[uri][Москва]>link</a>}
+]
+@processtest[]
+    $f[^file::load[text;piece.p]]	^process{$f.text}
+	$ORIGINS(1)
 
 
 @badpos[]
 $s[123]
-^s.mid(1;23)
+^s.mid(0;2)
 
 @wwrapperpass[]
 $h[^hash::create[]]
@@ -1200,13 +1337,13 @@ $t[^table::set{^untaint{^taint[$a-tab-b]
 
 @mail3[]
 ^mail:send[
-	$.from[Александр Петросян <paf@design.ru>]
-	$.to[Александр Петросян <paf@design.ru>]
-	$.subject[проверка4]
+	$.from[Александр Петросян <paf@mail.design.ru>]
+	$.to[Александр Петросян <paf@mail.design.ru>]
+	$.subject[проверка2]
 	$.body[
 		$.text[
 			$.content-type[$.value[text/plain] $.charset[windows-1251]]
-			$.body[проверка]
+			$.body[проверка^taint[uri][москва]=]
 		]
 		$.attachment[
 			$.value[^file::load[text;index.html]]
@@ -1666,11 +1803,11 @@ $abc[abc]
 
 @calendar[]
 $year(2002)
-$month(8)
+$month(12)
 ${year}-${month}:<br>
 $week_days[^date:calendar[rus]($year;$month)]
 <pre>
-^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }=$week_days.week=<br>}
+^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }=$week_days.week,$week_days.year=<br>}
 </pre>
 
 @thash[]
@@ -1715,7 +1852,7 @@ $response:body[^pict.gif[]]
 ]
 
 @cookie[]
-$env:HTTP_COOKIE<br>
+#$env:HTTP_COOKIE<br>
 
 #$cookie:переменная[test тест ТЕСТ2]
 =$cookie:переменная=<br>