--- parser3/src/www/htdocs/Attic/auto.p 2001/04/10 07:40:52 1.13
+++ parser3/src/www/htdocs/Attic/auto.p 2001/09/12 10:07:37 1.35.4.1
@@ -1,60 +1,169 @@
@auto[]
-$LIMITS[
- $post_max_size(10*0x400*0x400)
-]
-$DEFAULTS[
- $content-type0[text/html]
- $content-type[
- $value[text/html]
- $charset[windows-1251]
- ]
-]
-$LOCALE[
-#for ^match{}[i]
- $ctype[Russian_Russia.1251]
-]
-$SQL[
- $connect-string[mysql://test:test@localhost/test/cp1251_koi8]
- $drivers[^table:set{protocol library
-mysql Y:\parser3\src\sql\mysql\Debug\parser3mysql.dll
-}]
-]
-$MAIL[
- $SMTP[mail.office.design.ru]
-# $prog1[/usr/sbin/sendmail -t]
-# $prog2[/usr/lib/sendmail -t]
-]
-#for ^file:load[name;user-name;mime-type << autodetection]
-$MIME-TYPES[^table:set{ext mime-type
-zip application/zip
-doc application/msword
-xls application/vnd.ms-excel
-pdf application/pdf
-ppt application/powerpoint
-rtf application/rtf
-gif image/gif
-jpg image/jpeg
-png image/png
-tif image/tiff
-html text/html
-htm text/html
-txt text/plain
-mts application/metastream
-mid audio/midi
-midi audio/midi
-mp3 audio/mpeg
-ram audio/x-pn-realaudio
-rpm audio/x-pn-realaudio-plugin
-ra audio/x-realaudio
-wav audio/x-wav
-au audio/basic
-mpg video/mpeg
-avi video/x-msvideo
-mov video/quicktime
-swf application/x-shockwave-flash
-}]
-
-@auto_test[]
-^BASE.auto_test[]
-
DR
+^use[common/lib.p]
+^use[common/layout.p]
+^use[common/implode.p]
+^use[date/dtf.p]
+^use[hosting.p]
+^detectBrowser[]
+#end
+
+@ifhref[flag;address;content;params]
+^if($flag){$content}{$content}
+
+@img[filename;params]
+^if(-f $filename){$thisImage[^image::measure[$filename]]^thisImage.html[$params]}
+
+@nafigator[]
+
+
+ ^branches.menu{
+ ^ifhref(!in "/$branches.folder/" || ^splitURI.count[] != 1)[/$branches.folder/][ ][^if(!in "/$branches.folder/"){onMouseOver="iconOver('$branches.folder',1)" onMouseOut="iconOver('$branches.folder',0)"}] |
+ |
+ }
+ ^ifhref(^splitURI.count[] != 1)[/$branch/][^img[^if(^splitURI.count[]){/$branch/i/}{/i/home/}p.gif][$.name[p]]] |
+
+
+
+@subnafigator[]
+^if(def $subbranches){^subbranches.menu{$thisImage[^image::measure[/$branch/i/b-${subbranches.folder}^if(in "/$branch/$subbranches.folder/"){-a}.gif]]^ifhref(!in "/$branch/$subbranches.folder/" || ^splitURI.count[] != 2)[/$branch/$subbranches.folder/][^thisImage.html[$.name[b-$subbranches.folder]]][onMouseOver="rollOver('b-$subbranches.folder', 1, '^if(in "/$branch/$subbranches.folder/"){-a}')" onMouseOut="rollOver('b-$subbranches.folder', 0, '^if(in "/$branch/$subbranches.folder/"){-a}')"]}}
+
+@header[]
+
+
+@insertia[]
+
+
+@content[]
+
+
+@btm[]
+
+
+@localmenu[]
+$localSpacer(0)
+$foundOne(0)
+^subbranches.menu{
+ ^if(in "/$branch/$subbranches.folder/"){$foundOne(1)}
+ ^if(!$foundOne){
+ $localimage[^image::measure[/$branch/i/b-${subbranches.folder}.gif]]
+ ^localSpacer.inc($localimage.width)
+ }
+}
+^splitURI.offset(1)
+$result[^if($localSpacer){
}^local.menu{$thisImage[^image::measure[/$branch/i/b2-${local.folder}^if(in "/$branch/$splitURI.piece/$local.folder/"){-a}.gif]]^ifhref(!in "/$branch/$splitURI.piece/$local.folder/")[/$branch/$splitURI.piece/$local.folder/][^thisImage.html[$.name[b2-$local.folder]]][onMouseOver="rollOver('b2-$local.folder', 1, '')" onMouseOut="rollOver('b2-$local.folder', 0, '')"]}]
+
+@contentTable[]
+
+
+
+ | ^img[/$branch/i/photo-left-btm.jpg] |
+ ^insertia[]
+ |
+ |
+ ^if(def $local){^localmenu[] }{^if(-f "/$branch/i/b-btm-line.gif"){^img[/$branch/i/b-btm-line.gif]}{^img[/i/b-btm-line.gif]}}
+ ^content[]
+ |
+ ^if(-f "/$branch/i/dec-btm-right.gif"){^img[/$branch/i/dec-btm-right.gif]}{} |
+ ^img[/i/dec-top-right.gif] |
+
+ ^btm[]
+
+
+@main[]
+$branches[^table::load[/branches.cfg]]
+$shortURI[^request:uri.mid(1;^request:uri.length[]-1)]
+$splitURI[^shortURI.lsplit[/]]
+^if(-f ^file:find[section.cfg]){
+ $subbranches[^table::load[^file:find[section.cfg]]]
+ $branch[^request:uri.mid(1;^request:uri.length[]-1)]
+ $branch[^branch.mid(0;^branch.pos[/])]
+ ^if(-f ^file:find[local.cfg]){
+ $local[^table::load[^file:find[local.cfg]]]
+ }
+}
+
+
+
+
+ Lord of the Dance
+ ^if(def $branch){
+ ^if(^branches.locate[folder][$branch]){| $branches.name}
+ ^if(^splitURI.count[] > 1){
+ ^if(^subbranches.locate[folder][^splitURI.offset(1)$splitURI.piece^splitURI.offset(-1)]){| $subbranches.name}
+ ^if(^splitURI.count[] > 2){
+ ^if(def $local){^if(^local.locate[folder][^splitURI.offset(2)$splitURI.piece^splitURI.offset(-2)]){| $local.name}}
+ }
+ }
+ }
+
+# ^if(def $prepare){^prepare[]}
+
+
+
+
+
+
+  |
+  |
+  |
+
+
+ ^img[/i/logo.gif]
+^img[/$branch/i/photo-left-top.jpg]^img[/$branch/i/photo-right-top.jpg] |
+
+ |
+
+
+ |
+ ^nafigator[]
+ |
+
+
+ | ^img[/$branch/i/photo-left.jpg] |
+
+ ^header[]
+ |
+
+
+
+
+
+
+
+
+
\ No newline at end of file