expr "$Z" :Z '%<PSS%.'"$N"'%>' += "Reg.$N" && let ++n expr "$Z" :Z '%<PSS%.K%(%[[^][.]%{1,}]%.%)'"$N"'%>' + 'Reg.K%1'"$N" && expr "$n" :: '/NT/GWS.*' &| expr "$n" :: '/NT/T_ONLINE' &| expr "$n" :: '/NT/ZDBENCH' && expr "$n" :: '/NT/[A-Z0-9]%{1,%}%.[A-Z0-9]%{1,%}[+-]*$' &| expr "$zeile" :: '^Layer ' && continue proto [ expr : size ] expr " $W" :mail '[, ]mail=%([^, ]%{1,%}%)' ;; expr " $W" :name '[, ]cn=%([^,]%{1,%}%)' expr "${{nam}}" :$nam '%.%(%d%)$' '.0%1';; expr "$Hbuf" :: '^@%d' || continue expr "$Hbuf" :: '^@' || break 2 expr "$Tag" =:Tag % expr "$Url" :: '^[#?/\]' || expr "$Url" :: '^[a-zA-Z][a-zA-Z0-9]%{1,16%}:' || expr "$Z" :: "$cstr" && txt="$Z" expr "$grp" :: "$g" || continue expr "$inp" :: '[0-9]' && sel="$sel$inp " inp= expr "$Hbuf" :: '^AT' && MOinitapp=$Hbuf expr "$Hbuf" :Hbuf 'AT' += ' AT' expr "$obj" :: '/conn$' && expr "$obj" :Hbuf '/[0-9]*$' = '' expr "$obj" :Hbuf '[0-9]*$' = $Fali expr "$obj" :Hbuf '[0-9]*/[0-9]*$' = $Fali expr "$obj" :gid '%([0-9]*%)/[0-9]*$' expr "$obj" :id '%([0-9]*%)$' expr "$obj" :obj '^%.%./%(..*%)$' expr "$Hbuf" :: '^DELALL:' && { expr "$Hbuf" :Hbuf '[ %t]%{1,}$' = '' expr "$Hbuf" :Hbuf '^DEL:%(.*%)$' && { expr "$Such" :: '^#@D[0-9] ' || continue expr "$Z" :: '^.$' && { c=ende expr "$Z" :Size '[0-9]%{1,} *%([0-9]%{1,}%)' ;; expr "$Z" :Z '^ *[0-9]%{1,} *%([!-~]%{1,}%) *$' expr "$Z" =:: '^Content-Type: multipart/' && m=M expr "$Z" =:: '^Content-Type: multipart/' && m=M continue expr "$Z" =:: '^Content-Type: text/html' && m=H continue expr "$Z" =:: '^Content-Type: text/plain' && m=t continue expr "$Z" =:From '^From: %(..*%)$' expr "$Z" =:From '^From: %(..*%)$' && continue expr "$inp" :: '[^ 0-9]' || expr "$z" :z '^%(.%{22} %)%d%{8}' "%1$LNK" while expr "$Tag" =:Url % b) expr "${{v}}" :$v '^x%([0-9a-fA-F]%{1,}%)$' && goend expr "$Z" :: "^$Beg" || z=0 goend expr "$Z" :: "^$Beg%$" && [ "$z" == P ] && expr "$Z" :: "^$End" && z=I expr "$Z" :: "^$Pv$End" &| expr "$a" :a '^[ %t]*""%(.*%)$' && break expr "$a" :a '^[ %t]*".*[^\]"%(.*%)$' && break expr "$a" :a '^[ %t]*''.''%(.*%)$' && break expr "$a" :a '^[ %t]*''\.''%(.*%)$' && break expr "$a" :a '^[ %t]*[0-9][0-9a-zA-Z]*%(.*%)$' && break expr "$a" :a '^[ %t]*[^, %t]*%(.*%)$' && break expr "$w" :arr1 '%(%d%{1,}%)' expr "$w" :arr2 ',%(%d%{1,}%))$' expr "$w" :siz2 '^%d:%(%d%)$' && continue expr "$w" :w '^%d%{1,2}%(.*%)$' if expr "$Z" :: "^$Pv" z=P expr "$Z" :: "^$Pl$LANG%$" && z=p expr "$ddir" :: '^[a-zA-Z]:$' || RD $ddir 2> NUL expr "${{v}" :$v '..$' '.&' ;; expr $ddir :: '^[a-zA-Z]:$' RD $ddir 2 NUL dev2) expr "$zeile" :zeile '%(Package ''%)%([^'']%)' % expr " $sel " :: " $nf " && Fsel="$Fsel$nf:$nam " expr "$File" :rsec '%([^/]%{1,%}%)$' && expr "$Line" :: '[- %t%r%z]' && expr "$Line" :: '\istep%.dir' && continue expr "$Line" :: 'bsh_tmpf%.[0-9]%{1,3%}' &| expr "$N" :N '%%s' += ' ' expr "$Such" :: '.html%{0,1%}$' && expr "$Z" :: "%<$ind%>" && V=S expr "$Z" :: '^%%v%%\begin{verbatim}' || goend expr "$Z" :: '^%%v%%\end{verbatim}' && V=v expr "$Z" :: '^%%v%%\end{verbatim}' && { expr "$Z" :: '^\begin{verbatim}' &| expr "$Z" :: '^\end{verbatim}' &| expr "$Z" :Z "^$RAfcb" = '' expr "$Z" :Z "^$RAfcn" = '' expr "$Z" :l "$l2" || continue expr "$Z" :n "$d3" || continue expr "$ZO" :ZO '^@0%{8} ' = "@$ZI " || { catv ZO /%n; continue; } expr "$Zeile" :: '^#@D[0-9] ' || continue expr "$Zeile" :Zeile '<[a-zA-Z][^<>]%{8,%}>' '' expr "$darst" :: '^[123]$' && { expr "$inp" :: '[0-9]' && sel="$sel$inp " inp= expr "$inp" :yt '@%(..*%)$' expr "$txt" :txt "$cstr" expr "$zeile" : '^%([^<%r]*%)' | catv "/ " 0 =:,,Des expr "$zeile" : '^%([^<%r]*%)' | catv "/ ^ " 0 =:,,Des expr "$zeile" :inp '>%([^<>]*%)</[Hh]3>%r*$' expr "$zeile" :inp '>[^<>]*%(</[Aa]>%r*%)$' expr "$zeile" :mail '^%(..*>%)[^<>]*</[Aa]>%r*$' expr "$zeile" :name '>%([^<>]*%)</[Aa]>%r*$' expr "$zeile" :name 'NICKNAME="%([^"]%{1,76%}%)"' && expr $Line :: '[- %t%r%z]' expr $Line :: '\istep%.dir' continue expr $Line :: 'bsh_tmpf%.[0-9]%{1,3%}' if expr "$Z" :: '\input{' [1-4]) expr "$Qtyp" :: '^[iu]$' && expr "$Dir" :: '^-' && continue expr "$File" :File ' %*%(..*%)%*$' || continue expr "$Zeile" :: "^#@$a " || expr "$file" :: '/' || vors=de/ expr "$file" :: '^[^/]%{1,%}/[^/]%{1,%}$' && vors=../de/ expr "$file" :: '^de/[^/]%{1,%}$' && vors= expr "$file" :: '^de/[^/]%{1,%}/[^/]%{1,%}$' && vors=../ expr "$inp" :: '[ %t]' && echo Zu blank && continue expr "$ipw" :: '^...' || XmsgExit "iPassword wrong: »$ipw«" expr "$pw" :: '^...' || XmsgExit "Password wrong" expr "$r" :r '%([a-z]%)%(.*%.[^.]%{1,%}%)$' '%U%1%E%2' expr "$r" :r '[a-z]' '%U&' expr "$r" :r '^[a-z]' '%U&' expr "$telnu" :station '^%(.*[^ ]%) %{1,}[^ ]%{1,}$' || station=Station expr "$telnu" :telnu '%([^ ]%{1,}%)$' || telnu=0000000 expr "$w" :: '^%d$' && { siz=$w ; continue; } expr "$w" :: '^(%d%{1,2},%d%{1,2})$' && { expr "$w" :: '^+$' && continue expr "$w" :: '^[-.].' && Err "$w" expr "$w" :: '^[-.a-zA-Z_]%w*$' || Err "$w" expr "$w" :: '^[0-9][0-9a-fA-F]*$' && { expr "$w" :arr '^%(%d%{1,2}%)' && expr "$w" :arr1 '^(%(%d%{1,2}%))$' && continue expr "$w" :siz '^%(%d%):%d$' && expr "$zeile" :: 'cgi/icnt.pl?' || expr "$zeile" :zeile % expr "$zeile" :zeile 'P%*%([^*]%{1,%}%)%*P' expr "$zeile" =:: % expr "$zeile" =:: '^[ %t]*<body ' || continue expr "$zeile" =:zeile % expr $inp :: '^[a-zA-Z]:' || expr relop expr let z==0 && expr "$zeile" =:: '<table ..*130..*35' && let z==1 && expr "$zeile" =:: '</table>' && 0) expr "$Z" :Le "^$Pl"'%(..*%)$' && z=1 1) expr "$Z" :: "^$Pv$Beg" &| C) expr "$Z" :: "^$Pl$LANG%$" && continue 2 D) expr "$Z" :: "^$Pl$LANG%$" && z=d ;; I) if expr "$Z" :: "$Inp" d) expr "$Z" :: "$Inp" && z=D continue 2 expr " $* " :: "[ %t]${s}[ %t]" && r=0 catv id /%n expr " $W" :mail '[, ]mail=%([^, ]%{1,%}%)' expr " $W" :name '[, ]cn=%([^,]%{1,%}%)' expr "$3" :: "$t" && r=0 catv id /%n expr "$5" :: "$t" && let "$a" && r=0 catv id /%n expr "$Hbuf" :: '[ %t][0-9W,PT]%{1,}$' || continue expr "$Hbuf" :: '^[^ %t]' || continue expr "$Hbuf" :Hbuf '[ %t]%{1,}$' = '' expr "$Hbuf" :Hbuf '[ %t]%{1,}%([0-9W,PT]%{1,}%)$' ' %1' expr "$Hbuf" :Hbuf '^[ %t]%{1,}' = '' expr "$a" :: "[sShHrR][ %t][ %t]*[^ %t][^ %t]*"'$' expr "$path" :: '[!-~]' || continue expr "$path" :ddir '^%(.*%)\[^\][^\]*$' || { expr "$s" :: '[^0-9]' && continue expr "$zeile" / '^ %{7,%}' &| expr "$zeile" :: '^ %{7,%}' &| expr $path :: '[!-~]' continue expr $path :ddir '^%(.*%)\[^\][^\]*$' { >< ; expr "$1" :: '!' && cat $Plist > "$File" do expr "$Line" :Line '^[a-zA-Z]:%(..*%)$' do expr $Line :Line '^[a-zA-Z]:%(..*%)$' expr "$1" :: '^[0-9]%{1,3%}$' && { expr "$2" :: '^[TP]' || wr="$wr$TPwahl" expr "$Dir" :Dir '%*%(..*%)%*$' || continue expr "$Dir" :Dir '/$' '' && lsec="/$lsec" expr "$Dir" :Dir '^%(.*/%)[^/]%{1,%}$' || Dir= expr "$Dir" :lsec '%([^/]%{1,%}%)$' || continue expr "$File" :File '/$' '' && rsec="/$rsec" expr "$File" :File '^%(.*/%)[^/]%{1,%}$' || File= expr "$File" =:: "[^/]%.$e%$" || continue expr "$Gsel" :: $g || continue expr "$Hbuf" :: "$boundary" && break expr "$Hbuf" :Hbuf '[ %t%r%n]%{1,}$' = '' expr "$Hbuf" :Hbuf '[%r%n]%{1,}' += "$RN" expr "$Line" :: '[a-zA-Z]%{3,%}' && break expr "$Line" :zdir '^%(.*%)\[^\][^\]*$' || { expr "$Paare" :Paare " $c." += '' expr "$Url" :Url '%([a-z]%)%(.*%.[^.]%{1,%}%)$' '%U%1%E%2' expr "$Url" :Url '[a-z]' '%U&' expr "$Z" :: "$1" && z=0 let ++N ;; expr "$Z" :: "$boundary--" && break expr "$Z" :: "$kz@-$ch@$kz" && { expr "$Z" :: "%<$N%>" || continue expr "$Z" :: '\begin{verbatim}' || goend expr "$Z" :: '\end{verbatim}' && V=v expr "$Z" :: '^@:.' || { seek $sk 0; break; } expr "$Z" :: '^\index{[^}]%{1,}}' && continue expr "$Z" :CText "^$RAfcb" && { expr "$Z" :CText "^$RAfcn" && { expr "$Z" :Z "^$RApre" = '' expr "$Z" :Z ' 0$' = " $T" || print -u2 "%t!subst: $Z" expr "$Z" :Z ' %d%{6} ' = " $adr " || expr "$Z" :Z ' ' = '!' expr "$Z" :Z ' 000 ' = " $pbn " && let ++n expr "$Z" :Z '\index{[^}]%{1,}}' += '' expr "$Z" :c '^\include{%([^}]%{1,}%)}' || continue expr "$Z" :ch '%(..%)@+%('"$4"'_[a-z0-9]%{2}%)@%1' || continue expr "$Z" :nam 'name="%([^"]%{1,%}%)"' || return 2 expr "$ZI" :ZI '^D%d%d%(%d%{8}%)' || print -u2 "»$ZI«" expr "$Zeile" :: '^#@D[0-9] ' || continue expr "$Zeile" :Zeile % expr "$Zeile" :Zeile ' [0-9]%{1,%}%( *%*%)' " $lsec%1" expr "$Zeile" =:Zeile % expr "$a" :bis '%([0-9]%{1,}%)$' expr "$a" :von '^%([0-9]%{1,}%)' && expr "$alinam" :: '^[SNC]%.[a-z]%{3%}$' || { expr "$an" :an '^[ %t]*%(.*[^ %t]%)[ %t]*$' && expr "$ats" :ats '^[0-9]%{1,}' = '' expr "$ats" :sec '^%([0-9]%{1,}%)' || sec=1 expr "$buf" :: '^%[[A-Za-z]' && zv=' ' break expr "$buf" =:: '^[ %t]*'"$nam"'[ %t]*=' && break expr "$c" :c '%([^/}]%{1,}%)$' expr "$fdep" :fdep "$dep" = '' expr "$flags" :: '#' && goend expr "$grp" :: $g || continue expr "$grp" :: '-' && grp=- expr "$grp" :: '[0-9]=[-0-9]' || continue expr "$grp" :: '[^-0-9]' && continue expr "$hbuf" :hbuf '%r%n' += "\r\n" expr "$inp" :: '[^ 0-9]' || expr "$inp" :inp '%([0-9]%{1,%}%)' expr "$max" :max '^0x%([0-9a-fA-F]%{1,}%)' expr "$min" :min '^0x%([0-9a-fA-F]%{1,}%)' expr "$n" :: '-' || { let 'n==nm' && continue 2; continue; } expr "$n" :n '-' = ' to ' || continue expr "$name" :idname ']%..%{1,}$' = ']' expr "$name" :idname '^%(.*[^.]%)%.[^.]%{1,}$' expr "$oz" :oz '^%(.*%) [^ ]*$' expr "$pzeile" : ' %(-%{0,1%}[0-9]%{1,4%}%%%)' expr "$rz" :oz '^.%(.*%)$' expr "$von$bis" :: '[^0-9]' && continue expr "$x" :: "$znck" && lx=0 znum=$x expr "$x" :: "^$emck%$" || { expr "$x" :: "^$urlck%$" || { Err "URL1" -$y+; continue; } expr "$x" :: "^$urlck%$" || { Err "URL2" -$y+; continue; } expr "$x" :: "^$urlck%$" || { Err "URL3" -$y+; continue; } expr "$x" :: '[0-9]' || bem="Keine Hausnummer?" expr "$x" :: '[^0-9]' || let x+=0 expr "$x" :: '^[a-zA-Z.-]%{2,%}' || { expr "$x" :: '^[a-zA-Z]%{1,%}' || { expr "$x" :land_ '^%(.*[^0-9]%)[0-9]' || land_= expr "$x" :plz_ '%([0-9]%{3,%}%)$' || lx=1 expr "$x" :x ' *' += ' ' expr "$x" :x ' *$' = '' expr "$x" :x '^ *' = '' expr "$x" :zbis '[0-9]-%([0-9][0-9]*%)' expr "$x" :zvon '^%([0-9][0-9]*%)' expr "$z" :: '^%$' && { catv z /%n; break; } expr "$z" :: '^:..' && { expr "$z" :lnk ' %(%d%{8}%) ' expr "$z" :z '^%(.%{18} %)%d%d%d ' "%1$grp " || expr "$z" :z '^%([@x]%)%d%{8} ' "%1$id " && { expr "$zeile" : '<[Dd][Dd]>%([^<%r]*%)' | catv =:,,Des expr "$zeile" :: '^ *</[Dd][Ll]><[Pp]>' && expr "$zeile" :: '^ *<[Dd][Ll]><[Pp]>' && expr "$zeile" :: '^ *<[Dd][Tt]><[Aa]' && { expr "$zeile" :: '^#@D[0-9] ' || continue expr "$zeile" :W ': %(.*%)$' expr "$zeile" :W '^ %(.*%)$' || W='' expr "$zeile" :h3nam '>%([^<>]*%)</[Hh]3>%r*$' expr "$zeile" :mail '"mailto:%([^:"]*%)"' expr "$zeile" :mail '=%([^=%r%n]*%)$' || continue expr "$zeile" :mail '^%([^()]%{3,%}[^() ]%) *(' expr "$zeile" :name '>%([^<>]*%)</[Aa]>%r*$' expr "$zeile" :name '^%([^<>]%{1,%}[^<> ]%) *<' expr "$zeile" :s '^%([a-zA-Z0-9-]%{1,%}%):%{1,2%}' expr "$zvon$zbis" :: '[^0-9]' && expr "-$1" :: "$g" || continue expr $Line :: '[a-zA-Z]%{3,%}' break expr $Line :zdir '^%(.*%)\[^\][^\]*$' { expr $alinam :: '^[SNC]%.[a-z]%{3%}$' { ifdef UNIX && expr $datei : '/$' > $NUL && continue let chl && expr "$Zeile" :Zeile '<%*>%*<>?"' += '"' while expr "$Zeile" :Tag '%(<[a-zA-Z][^<>]%{8,%}>%)' .1) expr "${{v}" :$v '.$' '.&' ;; TOP% [0-9]*) c=topn m=- expr "$Z" :n '%([0-9]%{1,}%)' expr "$D" :D "'" += "''" expr "$E" :E "'" += "''" expr "$Hbuf" :: '^[0-9]%{1,}$' && expr "$Hbuf" :: '^®[^®]%{3,}®$' && { conv -d® Hbuf; goend; } expr "$Hbuf" :mudati ' %([0-9.]%{8,} *[0-9:]%{8,}%)' && a=. expr "$Hbuf" :muokfa 'State: *%(%w%{2,}%)' && c=. expr "$Hbuf" :mustat 'Station: *"%([^"]%{1,}%)"' && b=. expr "$R" :R "'" += "''" expr "$Z" :D "$RA"'de %{1,3}"%([^"]%{1,}%)"' || Err de expr "$Z" :E "$RA"'en %{1,3}"%([^"]%{1,}%)"' || continue expr "$Z" :R "$RA"'ru %{1,3}"%([^"]%{1,}%)"' || Err ru expr "$Zeile" :: "^#@$a $b" || continue expr "$file" :: '^..$' &| expr "$file" :: '^..[^\]' && expr "$file" :: '^..[^\]' && expr "$inp" :: '[^0-9]' && continue expr "$o" :: 'd' || { inp="$rest$inp"; break; } expr "$o" :: 'l' && conv -l r expr "$o" :: 'u' && expr "$o" :: '[x1]' || conv -u r expr "$o" :: 'u1' && expr "$o" :: 'x' || expr "$o" :: 'xu1' && expr "$r" :: '[^.]%.[^.]%{1,%}$' && expr "$o" :: 'xu1' && expr "$r" :: '[^.]%.[^.]%{1,%}$' || expr "$pw" :: '^%t%t%t' || { expr "$rest" :rest '/$' '' && r="/$r" expr "$rest" :rest '^%(.*/%)[^/]%{1,%}$' || rest= expr "${{nam}}" :$nam ' ' += '\, ' expr "${{nam}}" :$nam '%([ &$#{}_%]%)' + '\%1' expr "${{nam}}" :$nam '0X%([0-9A-F]%{1,}%)' && $nam="${{nam}}\Sub{H}" expr "${{nam}}" :$nam '[\ ]%{1,}$' = '\textvisiblespace{}' expr "${{nam}}" :$nam '^-%([^-]%)' '--%1' expr "${{nam}}" :$nam '°C' += '\textcelsius{}' expr "${{nam}}" :$nam '±' += '\textpm{}' expr $file :: '^..$' expr $file :: '^..[^\]' expr $file :: '^..[^\]' expr '' x: '' '${*top*3}' expr 'abcdecfhc' x: 'c' += '++' expr DATEIx3 xv:: '^(.+)\1\1$' expr abcdecfhc x: 'c' '$IxYYG,hg,lKJ,jHHJ' expr abcdecfhc x: 'c' + '${*${*top*10}$n*2}' expr abcdecfhc x: 'c(fh)' '+C$1.$1-' expr abcdecfhc x:ABC 'c' + '${*${*top*10}$n*1000000}' list) expr "$Z" :: '^ *[0-9]%{1,} *[0-9]%{1,} *$' && list) expr "$Z" :n '^ *%([0-9]%{1,}%) *[0-9]%{1,} *$' || objectclass) expr "$W" :: 'group[Oo]f[Nn]ames' && gon=1 ;; stat) expr "$Z" :Nmax '%([0-9]%{1,}%) *[0-9]%{1,}' stat) expr "$Z" :Stat '%([0-9]%{1,} *[0-9]%{1,}%)' ;; topn) expr "$Z" =:Subj '^Subject: %(.*%)$' topn) expr "$Z" =:Subj '^Subject: %(.*%)$' && continue uidl) expr "$Z" :: '^ *[0-9]%{1,} *[!-~]%{1,} *$' && uidl) expr "$Z" :n '^ *%([0-9]%{1,}%) *[!-~]%{1,} *$' || MOinit) expr "$Hbuf" :Hbuf '[^!-~]%{1,}' += ' ' T[1-9]) expr "$Hbuf" :Hbuf '[^0-9]' += '' [ "$1" == h ] && expr "$lz" :lz "[$2]" += '' [ "$1" == h ] && expr "$lz" :lz "[$3]" += '' b="`- expr "$a" : '^[1-9][0-9]*:%(..*%)$'`" b="`- expr "$a" : '^[1-9][0-9]*:%(..*/[Ee]:%)[1-9]'`" c="`- expr "$a" : '^[1-9][0-9]*:..*/[Ee]:[1-9][0-9]*%(.*%)$'`" expr "$HTTP_REFERER" =:: 'b-sh%.de/' &| expr "$HTTP_REFERER" =:: 'localhost/' || err=1 expr "$HTTP_REFERER" =:: 'schellong%.biz/' &| expr "$HTTP_REFERER" =:: 'schellong%.de/' &| expr "$Hbuf" :Hbuf '%([0-9]%{1,} %)[^%n]*%n' + '%1' expr "$Z" :OFILE "$Vim"'@+%(%w%{4,}%)@'"$Vim" && break expr "${{2}" :$2 '..$' '.&' ;; t=2 expr "$a" :Arg$i '^[ %t]*%(""%)' && t=3 expr "$a" :Arg$i '^[ %t]*%(''.''%)' && t=4 expr "$a" :Arg$i '^[ %t]*%(''\.''%)' && t=5 expr "$a" :Arg$i '^[ %t]*%([0-9][0-9a-zA-Z]*%)' && t=6 expr "$a" :Arg$i '^[ %t]*%([^, %t]*%)' && [ "$bf" != . ] && expr "$BitF" :: "%<$bf%>" && { BitFc='' ; return 1; } [ "$e" != ')*(' ] && expr "$o" :: 'a' || continue [ "x$sc" != 'x<' ] && expr "$an" :an '%([^<> %t]%{1,%}%)' && [ $6 == m ] && expr "${{2}" :$2 ' %{1,}$' = '' elif expr "$oz" :rw ' %([^ ]*%)$' expr " $Z " :W ' %([a-zA-ZäöüßÄÖÜ][a-zA-Z0-9äöüßÄÖÜ]%{1,}%)[ ,.!:]' || brea expr " $Z " :Z ' [a-zA-ZäöüßÄÖÜ][a-zA-Z0-9äöüßÄÖÜ]%{1,}[ ,.!:]' = '' expr " $pids " :: " $ppid " || continue expr "$Arg" :: '-[^0-9]' && continue expr "$Arg" :: '[^0-9 -]' && continue expr "$Arg" :: '[^0-9]-' && continue expr "$Arg" :: '^[0-9]%{1,2}$' && { Hosts $Arg; Arg="$Host"; } expr "$Arg" :: '^[jJyY]$' || continue expr "$Arg" :: '^[jJyY]$' || return 0 expr "$CText" :CText '^ %{1,}' = '' expr "$CText" :CText '^[^ ]%{1,}' = '' expr "$Dir" :Dir '^%.%{0,1%}/' '' expr "$F" =:: "$VF" && continue expr "$F" =:: "^$VF%$" && continue expr "$File" :Dir '^%(.*/%)[^/]%{1,%}$' || continue expr "$File" :File '%([a-z]%)%(.*%.[^.]%{1,%}%)$' '%U%1%E%2' expr "$File" :File '[a-z]' '%U&' expr "$File" :File '^[a-z]' '%U&' expr "$File" :Url '/%([^/]%{1,%}%)$' || continue expr "$File" :rsec '%([^/]%{1,%}%)$' && expr "$Gsel" :: '[0-9]' || return expr "$HTTP_REFERER" =:: % expr "$HTTP_REFERER" =:: 'schellong%.com/' &| expr "$Hbuf" :: '^@%d%{3} %{1,}L %{1,}2 ' || continue expr "$Hbuf" :: '^@' || break expr "$Hbuf" :Hbuf '%([^ %t]%{1,}%)$' || continue expr "$Hbuf" :Hbuf '&' += ' ' expr "$Hbuf" :boundary '%(-%{2,}[^-]%{1,}%)"%{0,1}$' && break expr "$Hbuf" :dati 's%t-%t%a%{2,},`*%([0-9.]%{8,}``*[0-9:]%{8,}%)' && b= expr "$Line" :: "^%[$3]" && break expr "$Line" :: '[!-~]' || continue expr "$Line" :: '[^0-9]' || expr "$Line" :: '[- %t%r%z]' && expr "$Line" :: '^%[[a-zA-Z]%{1,%}]' && break expr "$Line" :: '^[ %t]*;' && continue expr "$Line" :: '^[0-9a-z]%{2,3%}$' && { expr "$Line" :Line '[Hh][Rr][Ee][Ff]="%([^"]%{1,%}%)"' expr "$Line" :Line '[Hh][Rr][Ee][Ff]="[^:]*:%([^"]%{1,%}%)"' expr "$Line" :Line '[Ss][Rr][Cc]="%([^"]%{1,%}%)"' expr "$Oflags" :: '%<'"$qual"'%>' || continue expr "$QUERY_STRING" :Adir '&anl=%([^&=]*%)$' || Adir=AX expr "$QUERY_STRING" :Gdir '&group=%([^&=]*%)' || Gdir=GX expr "$QUERY_STRING" :Gdir '^req=callsys&%(..*%)$' || Gdir= expr "$QUERY_STRING" :Gdir 'req=ctlfset&' = 'req=ctl&' || Gdir=GX expr "$QUERY_STRING" :Gdir 'req=infofset&' = 'req=info&' || Gdir=GX expr "$QUERY_STRING" :Hbuf '^[^=]%{1,}=%(..*%)$' || Hbuf=SGX expr "$QUERY_STRING" :Hbuf '^req=admact&%(..*%)$' expr "$QUERY_STRING" :Hbuf '^req=ctlact&%(..*%)$' expr "$Url" :: '[*[\%]' && { expr "$Url" :Url '^[a-z]' '%U&' expr "$W" :: '^T_[0-9a-z_]%{2,}$' || continue expr "$W" :: '^T_e_' && continue expr "$Z" :: " $RA_D"'[a-z][a-z] 0$' && { expr "$Z" :: "$KZ@-$OFILE@$KZ" && break expr "$Z" :: "$KZ@-$OFILE@$KZ" &| expr "$Z" :: "$Vim@-$OFILE@$Vim" && break expr "$Z" :: "$boundary" && { expr "$Z" :: '-%{60,%}' && let "++bar>=3" && break expr "$Z" :: '[a-zA-Z0-9.-]%{4,}' || continue expr "$Z" :: '[a-zA-Z0-9_.-]%{4,}' || continue expr "$Z" :: '\begin{verbatim}' || goend expr "$Z" :: '\end{verbatim}' && V=v expr "$Z" :: '^%[11;[234][0-9]H[0-9. ]%{1,}' || continue expr "$Z" :: '^.'"$id " && { expr "$Z" :: '^@:.' || { seek $sk 0; break; } expr "$Z" :D ' %('"$RA_D$LL"'%) "[^"]*"$' || { catv Z /%n; continue; } expr "$Z" :HexC "^$RAfcc" && { expr "$Z" :Host '%([^ %t]%{4,}%)' || break expr "$Z" :IP '^addr: %([0-9.]%{7,15}%)' && break expr "$Z" :Pass '[ %t]"%(.%{1,}%)"[ %t]*$' expr "$Z" :T " ${RA_D}en"' %("[^"]*"%)$' && { expr "$Z" :Tb '%[]= %(".%{1,}%);$' || echo $i:$Ta expr "$Z" :Text "^$RApre" && { expr "$Z" :User '[^ %t]%{4,}[ %t]%{1,}%([^ %t]%{1,}%)' || break expr "$Z" :Z "%<$old%>" + "$new" expr "$Z" :Z "^$RAbgc" = '' expr "$Z" :Z "^$RAfcc" = '' expr "$Z" :Z "^$RAfcc" = ''; a=f expr "$Z" :Z "^$RAlez" = '' expr "$Z" :Z "^$RAtxt" = '' expr "$Z" :Z '"[^"]*"$' = "$T" || print -u2 "%t!subst: $D" expr "$Z" :Z '%<%w%{3,}(' = '' expr "$Z" :Z 'Batt%.%(%w%{1,}%)%(%[[^]]%{1,}]%)' + 'Batt.B%2.%1' && m=1 expr "$Z" :Z 'Batt%.i1%[' += 'Batt.i[' && m=1 expr "$Z" :Z 'LANGX_%u%u' = "LANGX_$LL" expr "$Z" :Z 'LANGi_%u%u.*$' = "LANGi_$LLs '$C'" expr "$Z" :Z '^ *# *define *D%d%{10}%w%{3,7}%(.*%)$' || continue expr "$Z" :Z '^%d%{1,} ' = '' expr "$Z" :Z '^%w%{1,} ' = '' expr "$Z" :Z '^[0-9.]%{1,} ' = '' expr "$Z" :Z '^[^"]%{1,} %(".*%)"[ %t]*$' && len=${#Z} expr "$Z" :col '^....%(..%)H' || continue expr "$Z" :dfstr ' S%d%{10}..= *"%([^"]*%)";' && { s=1 continue; } expr "$Z" :dfstr ' S%d%{10}..= *%(%w%w*%);' && { s=2 continue; } expr "$Z" :einh ' E%d%{10}..= *"%([^"]*%)";' && { e=1 continue; } expr "$Z" :email 'E%*%([^*][^*]*%)%*E' expr "$Z" :id '%(%d%{8,}%)' expr "$Z" :id '^%([0-9.]%{1,}%) ' expr "$Z" :id '_id %(%d%{4}%)$' expr "$Z" :info ' I%d%{10}..= *"%([^"]*%)";' && { i=1 continue; } expr "$Z" :ip 'H%([0-9. ]%{1,}%)' expr "$Z" :land_ 'L%*%([^*]*%)%*L' expr "$Z" :mu '^%(%w%{1,}%) ' expr "$Z" :n '%([0-9]%{1,}%)' || { catv Z /%n; continue; } expr "$Z" :name 'N%*%([^*][^*]*%)%*N' expr "$Z" :ort 'O%*%([^*][^*]*%)%*O' expr "$Z" :pbn '^%(%d%{1,}%) ' expr "$Z" :plz_ 'P%*%([^*][^*]*%)%*P' expr "$Z" :qual '^%(%w%{1,}%) ' expr "$Z" :strasse 'S%*%([^*][^*]*%)%*S' expr "$Z" :val "^$f*%%($d%%)$t%%($d%%).*%$" '%1 %2' || expr "$Z" :val "^$f*%%($d%%)-%%($d%%)$t%%($d%%).*%$" % expr "$Z" :ztyp '^ *# *define *D%d%{10}%(%w%{3,7}%) ' || continue expr "$Z" =:: '^LIST$' && c=list expr "$Z" =:: '^QUIT$' && c=quit expr "$Z" =:: '^STAT$' && c=stat expr "$Z" =:: '^UIDL$' && c=uidl expr "$Z" =:n '^TOP %([0-9]%{1,}%)' && c=topn m=- expr "$Z2" :T '%("[^"]%{1,}"%)$' || { catv Z /%n; continue; } expr "$Z2" :c2 '"\...%(.%)' || continue expr "$Z2" :n2 '/*%(..%)*/' || continue expr "$ZR" :S5 ' %("[^"]%{16%}"%)' expr "$ZR" :ZR ' "[^"]%{16%}"' = ' ' expr "$ZS" :: ' "[^"]%{16%}",' || continue expr "$ZS" :: '^ *//' && continue expr "$ZS" :: '^ *}; *$' && break expr "$ZS" :S1 ' %("[^"]%{16%}"%)' expr "$ZS" :S2 ' %("[^"]%{16%}"%)' expr "$ZS" :S3 ' %("[^"]%{16%}"%)' expr "$ZS" :S4 ' %("[^"]%{16%}"%)' expr "$ZS" :Tnam ' %(T_%w%{1,}%) *= *{' || continue expr "$ZS" :ZS ' "[^"]%{16%}"' = ' ' expr "$Zeile" :: "^#@D$g " || continue expr "$Zeile" :: '%*/[ %t]*$' && continue expr "$Zeile" :: '[^a-zA-Z_0-9]'"$funam"'([^;]%{1,%});' || break expr "$Zeile" :: '^[ %t]*/[*/]' && break expr "$Zeile" :Dir '^%(.%{1,%}%):$' || isz=1 || continue expr "$Zeile" :File % expr "$Zeile" :File ' %*%([^*][^*]*%)%*' || continue expr "$Zeile" :File '%([^/]%{1,%}%)$' || continue expr "$Zeile" :Zeile ' [0-9]%{1,10%} ' = " $File " expr "$Zeile" :Zeile '%*%(..*%)%*$' || continue expr "$Zeile" :Zeile '%t' + ' ' expr "$Zeile" :Zeile '<%*>%*<>?"' += '"' expr "$Zeile" :Zeile '?%(..*%)/$' || continue expr "$Zeile" :Zeile '^ *%(..*%)$' expr "$Zeile" :Zeile '^%(.*[ %t*][a-zA-Z_][a-zA-Z_0-9]*(.*)%)[ %t]*/[*/].*$ expr "$Zeile" :Zeile '^%(..*)%) *$' expr "$Zeile" :Zeile '^.*[^a-zA-Z_0-9]%('"$funam"'(.*%)$' '%1' expr "$Zeile" :liste "^$funam("'%(..*%)$' expr "$Zeile" :lsec ' %([0-9]%{1,%}%) *%*' && { expr "$Zeile" :nam ' %([^ %t]%{1,%}%)$' || { print -r "$Zeile"; continue; } expr "$Zeile" :size ' %([0-9]%{1,10%}%) %*[^*]%{1,%}%*' || { expr "$Zeile" :vorne '^%(.*[^a-zA-Z_0-9]%)'"$funam(" || break expr "$Zq" :: '_%d%d%d_no "' && f=1 break expr "$a" :: '^[0-9]%{1,}%.[0-9]%{1,}$' && t="${t}sz" && expr "$a" :: '^[tHM-]%{1,4}$' && t="${t}mt" expr "$a" :bis '^%.%([0-9]%{1,}%)$' && t="${t}sz" von=0 expr "$a" :von '^%([0-9]%{1,}%)%.$' && t="${t}sz" bis=100000000 expr "$buf" :$inh '=[ %t]*%(..*%)[ %t]*$' && zv=0 expr "$buf" :: '^%[[A-Za-z]' && continue 2 expr "$buf" :: "^$gid $aid " || { catv buf /%n; continue; } expr "$buf" :: "^$nam=" || { catv buf /%n; continue; } expr "$buf" :: '[&<>"|᎙.·]' || expr "$buf" =:: '^%['"$rub"']' && continue expr "$buf" =:: '^%['"$rub"']' || continue expr "$buf" =:: '^[ %t]*'"$nam"'[ %t]*=' || continue expr "$cmd" :: '^[0-9][0-9]*$' || continue expr "$cmd" :: '^[a-zA-Z_0-9]%{2,15}$' || continue expr "$cmd" :cmd '%([^ ]%{1,}%) :[0-9]' || continue expr "$cmd" :dpy '/[^ ]%{1,} %(:[0-9]%)' || continue expr "$darst" :darst '%.%([0-9]%)' expr "$f" :: 'A' && { Enum=$n; Flags="$f"; Titel="$Line"; } expr "$f" :: '[^Avn]' &| expr "$f" :: '.A' &| expr "$f" :: 'n.' &| let "${#f}>3||${#Line}>48" && expr "$f" :f '^A%(.*%)$' && [ "$f0" == n ] && f=A${f}n expr "$f0" :: 'D' && let "n>n0" && continue expr "$f0" :: '[AD]' && let "n==n0" && f=A$f expr "$file" :dir '^%([^*?]*\%)[^\]%{1,%}$' || expr "$flags" :: '#' && goend expr "$flags" :: '&' && ptr= expr "$flags" :: '1%.' && let "flg|=1<<7" expr "$flags" :: ':' && let "flg|=1<<14" expr "$flags" :: 'A' && let "flg|=1<<22" expr "$flags" :: 'B' && let "flg|=1<<8" expr "$flags" :: 'B[AS][0-9]' && let "flg|=256" expr "$flags" :: 'D' && let "flg|=1<<16" expr "$flags" :: 'E' && let "flg|=1<<21" expr "$flags" :: 'F' && let "flg|=1<<18" expr "$flags" :: 'I' && let "flg|=1<<13" expr "$flags" :: 'K' && let "flg|=1<<5" expr "$flags" :: 'K[AS][0-9]' && let "flg|=32" expr "$flags" :: 'N' && let "flg|=1<<19" expr "$flags" :: 'S' && let "flg|=1<<23" expr "$flags" :: 'Z' && let "flg|=1<<24" expr "$flags" :: '[sz]' && let autopad && pad=0 expr "$flags" :: '[sz]' && pad=0 expr "$flags" :: 'a' && let "flg|=1<<30" expr "$flags" :: 'b' && let "flg|=2" expr "$flags" :: 'c' && let "flg|=1<<14" expr "$flags" :: 'd' && let "flg|=1<<15" expr "$flags" :: 'h' && let "flg|=1<<20" expr "$flags" :: 'l' && let "flg|=1<<11" expr "$flags" :: 'm' && let "flg|=1<<17" expr "$flags" :: 'n' && let "flg|=4" expr "$flags" :: 'q' && let "flg|=1<<6" expr "$flags" :: 'r' && let "flg|=1" expr "$flags" :: 's' && let "flg|=1<<3" expr "$flags" :: 't1' && let "flg|=1<<12" expr "$flags" :: 't2' && let "flg|=1<<10" expr "$flags" :: 'u1' && let "flg|=1<<16" expr "$flags" :: 'u2' && let "flg|=1<<17" expr "$flags" :: 'u3' && let "flg|=1<<18" expr "$flags" :: 'u4' && let "flg|=1<<19" expr "$flags" :: 'v' && ds=v name=0 expr "$flags" :: 'z' && let "flg|=32" expr "$flags" :ele 'A%(%d%{1,}%)' expr "$flags" :info2 '=%([1-9][0-9]%{0,2}%)' expr "$flags" :nelem 'A%([0-9]%{1,}%)' && { expr "$flags" :pad 'p%(%d%{1,}%)' expr "$flags" :parbn '=%([1-9][0-9]%{0,2}%)' expr "$flags" :txtgrp 'G%(%d%{1,3}%)' expr "$flags" :txtnum 'T%(%d%{1,3}%)' expr "$grp" :: '[^0-9]' && return expr "$host" =:host 'Name: *%([^ %t%r%n]%{1,%}%)' || expr "$html3" :html3 "~$x~" += "$y" expr "$htmlF2" :htmlF2 "~$x~" += "$y" expr "$htmlRO" :htmlRO "~$xy~" += "${{xy}" expr "$idname" :: '^[A-Za-z_]' || idname="$text" expr "$idname" :idname '[^A-Za-z_0-9]' += '_' expr "$idname" :idname '^%([^\]%{1,}%)\000' expr "$inp" :: '/' && { expr "$liste" :liste ' *$' '' expr "$liste" :liste '^ *' '' expr "$liste" :liste '^%([^;]%{1,%}%));.*$' expr "$liste" :reste '^[^;]%{1,%}%();.*%)$' expr "$lnam" :lnam '^:%(.*%)$' && dnam="$Line" expr "$n" :: '-' || { echo "$n"; continue; } expr "$n" :: '[.-]' && continue expr "$n" :: '[^0-9]' &| let 'n<1||n>999' &| expr "$n" :n '-' = ' to ' || continue expr "$n" :n '[^0-9]' += ' ' expr "$n" :n '^eelf.%(..*%)$' expr "$n" :n '^eemain.%(..*%)$' expr "$n" :n '^eerf.%(..*%)$' expr "$n2" :: '^0.' && conv -D0 n2 expr "$nam" :nb ':%([0-9][0-9]*%)' expr "$name" :idname '^%(.*[^.]%)%.[^.]%{1,}$' expr "$nsoll" :: '[^0-9]' && continue expr "$o" :: '!' && move "$File" "$Dir$Url" expr "$o" :: '[lu]' || continue expr "$o" :: 'l' && conv -l Url expr "$o" :: 'u' && expr "$o" :: '[x1]' || conv -u Url expr "$o" :: 'u1' && expr "$o" :: 'x' || expr "$o" :: 'xu1' && expr "$Url" :: '[^.]%.[^.]%{1,%}$' && expr "$oz" :oz '^%(.*%) [^ ]*$' expr "$textEMAIL" :textEMAIL "~$x~" += "$y" expr "$txt" :$2 "$cstr" expr "$txt" :txt "$cstr" expr "$url" :url '^[^/]%{1,%}/%(..*%)$' || break expr "$val" :val '%(%d%)%.%(%d%{1,2}%)' '(%1<<8)+%2' expr "$vonbis" :: '^[0-9a-fA-F]%{8%}-[0-9a-fA-F.]%{8%}' || continue expr "$word" :: "^$msg" && let "mnu|=nr" expr "$wr" :: '+++$' || wr="$wr$RN" expr "$z" :: '^%$' && { catv z /%n; break; } expr "$z" :: '^:..' && { expr "$z" :: '^[@x]%d%{8} ' && { expr "$z" :ido '^[@x]%(%d%{8}%) ' && { expr "$z" :nam '^[ %t]%{1,}%([^ %t]%{1,}%)' || continue expr "$z" :z '^%([@x]%)%d%{8} ' "%1$id " && { expr "$zeile" / '^[ ]*[^.]..*[0-9]:[0-9]' && { expr "$zeile" / '^[^.]..*[0-9]:[0-9]' && { expr "$zeile" :: '[a-zA-Z]%{3,%}' || continue expr "$zeile" :: '^ *<' || { expr "$zeile" :: '^ *<[Dd][Tt]><[Hh]3' && Des="$zeile" && expr "$zeile" :: '^%[' && break expr "$zeile" :: '^%[adressen]$' && break expr "$zeile" :: '^[ ]*[^.]..*[0-9]:[0-9]' && { expr "$zeile" :: '^[^.]..*[0-9]:[0-9]' && { expr "$zeile" :: '^[^=%t]*[=%t][^=%t]%{3,%}$' || continue expr "$zeile" :: '^[^=,]%{1,%}=[^=]%{1,%}$' || continue expr "$zeile" :b '^%([a-zA-Z][^: ]*%):' || b=unknown expr "$zeile" :ip '[ %t]%([0-9W,PT]%{1,}%)[ %t]*$' || continue expr "$zeile" :mail '"mailto:%([^:"]*%)"' expr "$zeile" :mail '<%([^<>]%{3,%}%)>' && expr "$zeile" :mail '[=%t]%([^=%t]*%)$' || continue expr "$zeile" :mail '^%([^ ]%{3,%}%) *' || continue expr "$zeile" :name '(%([^()]%{1,%}%))' && expr "$zeile" :name '>%([^<>]*%)</[Aa]>%r*$' expr "$zeile" :name '^%([^=%t]*%)[=%t]' || name='' expr "$zeile" :name '^%([^=]*%)=' expr "$zeile" :num '^Layer *%([0-9]%{1,%}%)' && expr "$zeile" :st '^%(..*%)[ %t][0-9W,PT]%{1,}[ %t]*$' || st=-- expr "$zeile" :zeile "%%($nowd%%)$old%%($nowd%%)" + "%%1$new%%2" && is= expr "$zeile" :zeile "%%<$old%%>" + "$new" && is= expr "$zeile" :zeile '^%(.%{32}%)' expr "$zeile" =:: '%.00"*$' || expr "$zeile" =:: '%.gif"*$' || expr "${{nam}" :$nam '##-%{0,1}[0-9]%{1,}' = "$sd" expr "${{nam}}" :$nam '#-%{0,1}[0-9]%{1,}' = "$sd" expr "${{v}" :: '^%.' && $v="0${{v}" expr $Datei : "$TCPPATT" > $NUL && continue expr $inp :: '^[a-zA-Z]:' || expr $Line :: ^%[$3] break expr $Line :: '[!-~]' continue expr $Line :: '[- %t%r%z]' expr $Line :: '[^0-9]' expr $Line :: '^%[[a-zA-Z]%{1,%}]' break expr $Line :: '^[ %t]*;' continue expr $Line :Line '[Ss][Rr][Cc]=%([^]%{1,%}%)' expr $f :: 'A' { Enum=$n; Flags=$f; Titel=$Line; } expr $f :: '[^Avn]' expr $f :: '.A' expr $f :: 'n.' let ${#f}3¦${#Line}48 expr $f :f '^A%(.*%)$' [ $f0 == n ] f=A${f}n expr $f0 :: 'D' let nn0 continue expr $f0 :: '[AD]' let n==n0 f=A$f expr $file :dir '^%([^*?]*\%)[^\]%{1,%}$' expr $n :: '[^0-9]' let 'n1¦n999' expr $nsoll :: '[^0-9]' continue if expr "$CONTENT_TYPE" =:: 'boundary=.' if expr "$rz" :: '^ ' if expr "$zeile" :: '^[a-zA-Z0-9-]%{1,%}:%{1,2%}' if expr "${{nam}}" :: '^[0-9-]' ifset is && expr "$zeile" :zeile "%%($nowd%%)$old%$" "%%1$new" && is= ifset is && expr "$zeile" :zeile "^$old%%($nowd%%)" "$new%%1" && is= let hi==0 && expr "$zeile" :: '^ *<[Dd][Dd]>' && Des='' && txt=OTP$1 expr "${{txt}}" :: " $3_$4 " && goend while expr "$Dir" :lsec '%([^/]%{1,%}%)$' && { expr "$f" :: 'A' && let Enum; } &| { expr "$file" :: '^[a-zA-Z]:'; inv; } &| ") expr "`catv $o,,W`" :an '^"%([^"]*%)' ;; # expr "$d" :d '%d' += ' ' # expr "$zeile" :zeile ' %d%{1,} ' = % #while expr "$rest" :rest '/%*/' '/'; do done () expr "`catv $o,,W`" :an '^(%([^)]*%)' ;; 0) expr "$Z" :: '^<h3.%{20,}>%d%{4}<' && z=1 ;; 0) expr "$Z" :: '^\mainmatter' && z=1 ;; 1) expr "$Z" :: '^\backmatter' && break 2) expr "$Z" :: '^</p' && z=0 goend <) expr "`catv $o,,W`" :an '^<%([^>]*%)' ;; B) expr "$Z" :Z '^</span>' = '' && k=$sw ;; F) expr "$Z" :Z '^</font>' = '' && k=$sw ;; Station) expr "$Hbuf" :Hbuf '^[ %t]%{1,}' = '' [ `ver s` != unix ] && expr "$ed" =:: 'vim$' || edo= b) expr "$Z" :Z '^</b>' = '' && k=R ;; bit) expr "$w" :: '^[-.a-zA-Z_]%w*$' || Err "$w" bit) expr "$w" :: '^[a-zA-Z_]%w*(%d%{1,2},%d%{1,2})$' && { expr "$1" :: '^-%{0,1%}[0-9]%{1,3%}$' || return expr "$1" :f '^f%([1-9]%)$' || return expr "$FtpCmd" :FtpCmd '{}' "$FtpInp" || expr "$Hbuf" =:: 'Connection %{1,3}aborted' || AnrufMsg="NO ABORT" break expr "$Hbuf" =:: 'PASSWORD %{1,3}OK' || AnrufMsg="PASSWORD NOT OK" break expr "$Hbuf" =:: 'PASSWORD:' || AnrufMsg="NO PASSWORD:" break expr "$Hbuf" =:: 'PASSWORD:' || break expr "$Host" :Host ' *;;* *' + ';' expr "$Host" :Host '%%n' + ';' expr "$Host" :Host ';' += '%n' expr "$Zeile" :Zeile ' ?%(..*%)/$' || continue expr "$ed" :: 'vim%{0,1%}$' || edo= expr "$file" :: ' ' &| expr "$file" :: '\%.%.$' && continue expr "$file" :: '\%.$' && expr "$file" :file '^%(..*%)\%.$' expr "$fsel" :: '^[0-9]$' || return 1 expr "$rest" :: '%*' && return 1 expr "$rest" :: '%./' || expr "$rest" :: '/%.' || return 0 expr "$rest" :Tag '%([#?].*%)$' expr "$rest" :rest '%(.%)/%.$' '%1' expr "$rest" :rest '%(.%)/[^/*]%{1,%}/%*$' '%1' expr "$rest" :rest '/%.%.$' '/*' expr "$rest" :rest '^%([^#?]%{1,%}%)' || return expr "$rest" :rest '^%.%./' '*/' expr "$rest" :rest '^%./' '.' expr "$rest" :rest '^/%.$' '/' expr "$rest" :rest '^/[^/*]%{1,%}/%*$' '/' expr $RCHAR : '[a-z]' >/dev/null && f) expr "$Z" :Z '^</font>' = '' && k=r ;; file) obj="$Hbuf" expr "$obj" :adir '/[^/]%{1,}$' = '' ;; if expr "$a" :: '/[Ee]:[1-9][0-9]*' if expr match $PPP_DEVICE 'tty[0-9][0-9]*[A-Za-z]' ; then n=` expr "$a" : '^%([1-9][0-9]*%):.' ` nam) expr "$w" :: '^[a-zA-Z_]%w*$' || Err "$w" sym|pac|dev) expr "$zeile" :zeile "$nam" "$pre&" until arch_lines_kv3 || expr "$wva" :: '[qQ]uerty *..*pure%r%n$' while expr "$rest" :r '%([^/]%{1,%}%)$' while expr "$rest" :rest '/%.%./' '/*/'; do done while expr "$rest" :rest '/%./' '/'; do done while expr "$rest" :rest '/[^/*]%{1,%}/%*/' '/'; do done while expr "$rest" :rest '^%*/%(.%)' '%1'; do done # expr "$zeile" :zeile "%%($nowd%%)$old%%($nowd%%)" + "%%1$new%%2" && is= # ifset is && expr "$zeile" :zeile "%%($nowd%%)$old%$" "%%1$new" && is= # ifset is && expr "$zeile" :zeile "^$old%$" "$new" && is= # expr "$Z" :Z "^$RAlez" = '' #expr "$lsec" :: '^/' || expr "$rsec" :rsec '^/' '' >< ; expr "$1" :: '!' && cat $Plist > "$File" [ "$ask" == 00000 ] && expr "$Hbuf" :: '^0%t0%t-%t-%t-$' && ask=$sk [ "$st" == + ] && expr "$File" :: '/' && { [ $skip == 1 ] && expr "$Zeile" :: '%*/[ %t]*$' && { skip=0; continue; } [ $skip == 2 ] && expr "$Zeile" :: '^#endif' && { skip=0; continue; } [ -f $ziel ] && expr "$ziel" :: 'liste%.' && attrib +r $ziel >NUL [ -f $ziel ] expr $ziel :: 'liste%.' attrib +r $ziel NUL do expr "$Z" :OFILE "$KZ"'@+%(%w%{4,}%)@'"$KZ" && break do expr "$Z" :OFILE "$KZ"'@+%(%w%{4,}%)@'"$KZ" &| do t=1 expr "$a" :Arg$i '^[ %t]*%(".*[^\]"%)' && elif expr "$Z" :z ' "%(.*%)"$' elif expr "$oz" :rw ' %([^ ]*%)$' else id=0 expr "$Z" :Z ' %(".*%)"[ %t]*$' && let "Nchar+=${#Z}" end=`grep -nm '^%$$' $FO` && expr "$end" :end '^%(%d%{1,}%):' expr (intern bsh(K)) expr $NAME : '.*' expr $NAME : '[^%r%n]*' expr $PFAD : '.*\%(.*%)\.*' expr $PFAD : '.*\%([A-Z]%{1,8%}%.[A-Z]%{1,3%}%)\[A-Z.]%{1,12%}$' expr $PFAD : '.*\%([^\]%{1,12%}%)\[^\]%{1,12%}$' expr " $* " :: " $n " && echo $id expr " $* " :: "[ %t]${dnam}[ %t]" || continue expr " $* " :: "[ %t]${n}[ %t]" && catv id /%n expr " $* $Dnam " :: "[ %t]${dnam}[ %t]" || continue expr " $langs " :: " $l " && { catv Z$l /%n; continue; } expr " jan feb mar apr may jun jul aug sep oct nov dec" % expr "$1" :: 'T' || continue expr "$1" :: 'd' && expr "$1" :: 'd' || expr "$1" :: 'l' && conv -l File expr "$1" :: 't' && let "lsec>rsec" && { expr "$1" :: 'u' && expr "$1" :: '[x1]' || conv -u File expr "$1" :: 'u1' && expr "$1" :: 'x' || expr "$1" :: 'xu1' && expr "$File" :: '[^.]%.[^.]%{1,%}$' && expr "$1" :: D && { expr "$1" :: V && continue expr "$CText" :Text '^%( %{1,}%)' && { expr "$CText" :Text '^%([^ ]%{1,}%)' && { expr "$DAT" :: '^cfg' && SECT="Konfiguration" expr "$DAT" :: '^mes' && SECT="Meßwerte" expr "$Dir" :: '^[/\]' || { expr "$Dir" :: '^[ONI][LDEWN ]%{2%}: ' || continue expr "$Dir" :Dir '/$' '' && lsec="/$lsec" expr "$Dir" :Dir '^%(.*/%)[^/]%{1,%}$' || Dir= expr "$Dir" :File 'P%*%([^*]%{1,%}%)%*P' expr "$Dir" :Path '^IN : %(..*%)%[[0-9]%{1,%}]$' || continue expr "$Dir" :Url '^OLD: "%(..*%)"$' && continue expr "$Dir" :n '%([0-9]%{1,%}%)]$' expr "$Dir" :rsec '^[0-9]%{1,%} *%([0-9]%{1,%}%)' || continue expr "$Dir" :rsiz '^%([0-9]%{1,%}%)' || continue expr "$Dir" :url '^NEW: "%(..*%)"$' && continue expr "$F" :: '%.cgi$' && { chmod 710 $F; continue; } expr "$F" :: '%.gif$' && { chmod 400 $F; continue; } expr "$F" :: '/DB/' && continue expr "$F" :: '/DB[^/]*/' && continue expr "$F" :: '/db/' && continue expr "$F" :: 'bsh_' && { chmod 100 $F; continue; } expr "$F" :: 'perm.bsh$' && { chmod 710 $F; continue; } expr "$File" :: '[^-a-zA-Z0-9_.+/=]' && Onl=up && expr "$File" :: '^%.%{1,2%}$' && continue expr "$File" :File '/$' '' && rsec="/$rsec" expr "$File" :File '^ *[^ ]%{1,%} *[^ ]%{1,%} *%(..*%)$' expr "$File" :File '^%(.*/%)[^/]%{1,%}$' || File= expr "$File" :File '^%(.*[^/]%)/[^/][^/]*$' || continue expr "$File" :Zeile '^%(.*[^/]%)/[^/]%{1,%}$' && expr "$File" =:: 'bsh_tmpf%.[0-9]%{1,3%}$' && continue expr "$File" =:: 'hpm_tmpf%....$' && continue expr "$Flags" :: 'n' && { expr "$Gsel" :: $g || continue expr "$HTM2" :Hbuf '999.888.777.666' += "$ip" expr "$Hbuf" :: '^%r%n</EEDATA>%r%n$' || { expr "$Hbuf" :Hbuf "~$a~" = "$b" expr "$Hbuf" :Hbuf '^[^=]%{1,}=%(.*%)$' || continue expr "$Hbuf" :L_c '^:%(.%)' || continue expr "$Hbuf" :boundary '%(-%{2,}[^-]%{1,}%)"%{0,1}$' && break expr "$Hbuf" :e '^@%(.%)' || break expr "$Hbuf" :nam '^%([^=]%{1,}%)=' || continue expr "$Hbuf1" :Hbuf1 "~znum~" += "$znum_mk" expr "$I" :i 'id %([0-9]%{4}%)' || { print -u2 "'$I'"; break; } expr "$InpAnruf" :: '^[0-9W,PT]%{1,}$' && expr "$Ip" :ip % expr "$KatOffs" :: "%t$a " || continue expr "$Leer" :Leer '' += ' ' expr "$N" :n '^/[ 0-9*]%{10,12}/ %{1,3}%(%d%d%d%d%)' || { print -u2 "'$N'"; expr "$O" :: '^-' && s=- expr "$Path" :Dir '^%(.*%)/[^/]%{1,%}$' expr "$T" :t '"%([^"]*%)"' || { print -u2 "'$T'"; break; } expr "$TageBez" :: '[^0-9-]' || expr "$Text" :Text '%{1,}' = "\verb:$Leer:" expr "$Url" :: '^%^' &| expr "$Url" :: '%$$' &| expr "$Url" :Dir '%([#?].*%)$' && url="$url$Dir" expr "$Url" :Url '%.' += '%.' expr "$Url" :url '^%([^#?]%{1,%}%)' expr "$WD" :IND '^%([^ ]%{1,}%)' expr "$WD" :WD '^[^ ]%{1,}' = '' expr "$Z" :: '^[%t ]*$' && { len=$len0; continue; } expr "$Z" :: "$muster" || { catv Z /%j; continue; } expr "$Z" :: ' "\[0-9]%{3}[a-z?A-Z]' || { catv Z /%r%n; continue; } expr "$Z" :: ' 0%{1,}[ %t]*$' || expr "$Z" :: ' <td[> ].%{1,}</td>$' || continue expr "$Z" :: ' LANGX_%u%u%>' && { expr "$Z" :: '/bsh_tmpf%.[0-9][0-9][0-9]' || continue expr "$Z" :: '</pre>' && break expr "$Z" :: '</tr>' && break expr "$Z" :: '<h%d>Eventlist</h%d>' && break expr "$Z" :: 'D_%w%{1,}_%d%d%d_%l%l' || continue expr "$Z" :: '^ *$' && Len=$LEN expr "$Z" :: '^#define D%d%{10}grp ' && { expr "$Z" :: '^#define D_%w%{2,24}_%d%d%d_%l%l ".*"$' || { expr "$Z" :: '^%$' && break expr "$Z" :: '^%%++FLG--%%$' || continue expr "$Z" :: '^<body[ >]' && z=1 expr "$Z" :: '^@%d' || continue expr "$Z" :: '^@[0-9]' || { catv Z /%n; continue; } expr "$Z" :: '^[@a-z;.,][0-9]' || continue expr "$Z" :: '^[@a-z;.,][0-9]' || { catv Z /%n; continue; } expr "$Z" :: '^[@x][0-9]' || { catv Z /%n; continue; } expr "$Z" :: '_%d%d%d_no "' || { catv Z /%n; continue; } expr "$Z" :: 'const struct cfgdata_t FAR '"$2"'data%[]= {' && { expr "$Z" :D ' %('"$RA_D$LL"'%) ' || continue expr "$Z" :HexC "^$RAfcc" && { expr "$Z" :IP '^addr: %([0-9.]%{7,15}%)' && break expr "$Z" :LEN '^//|%(%d%d%)|' && Len=$LEN expr "$Z" :LLs ' LANGi_%(%u%u%)%>' && { expr "$Z" :Len '^//%(%d%d%)' expr "$Z" :N "$RE" || continue expr "$Z" :T '%("[^"]%{1,}"%)$' || continue expr "$Z" :Ta ' %(const BYTE FAR T[0-9]%{10}%[]%)= ' && { expr "$Z" :Ta '^ %{1,}{ D.%{1,}%( D%d%{10}Text %)' && { expr "$Z" :Ta '^%(#define D%d%{10}Text %{1,}%)' && { expr "$Z" :Text "^$RAtxt" && { expr "$Z" :Z " $ip4 " = " $host " expr "$Z" :Z "$muster" = "$subst" && let "start+=inc" expr "$Z" :Z ' %d%{6} ' = " $Adr " expr "$Z" :Z '"' += '"' expr "$Z" :Z '%*K%(N%*..*%*P%)L%*' expr "$Z" :Z '%.d5' += '.d6' && ow=1 expr "$Z" :Z '&' += '&' expr "$Z" :Z '&[a-zA-Z0-9#]%{1,};' = '' expr "$Z" :Z ', ..,' = ", $nn," expr "$Z" :Z ':%(%d%{1,}%)$' || continue expr "$Z" :Z '<' += '<' expr "$Z" :Z '=$' = '' && { catv Z; continue; } expr "$Z" :Z '>' += '>' expr "$Z" :Z '^%(@:English,Deutsch,%).*$' '%1'"$Lang" expr "$Z" :Z '^[^"]%{1,} %(".*%)"[ %t]*$'; len=${#Z} expr "$Z" :adr '^[@x-]%d%{8,10} %d %(%d%{6}%) ' || continue expr "$Z" :c '"\...%(.%)' expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *"' || continue expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *%d%{1,5}, *"' || { expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *["0-9]' || continue expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *["0]' || continue expr "$Z" :ddd ' D_%w%{1,}_%(%d%d%d%)_%l%l *%d%{1,5}, *"' expr "$Z" :flags ' %(p%d%{1,}A%d%{1,}%)st2T' && { expr "$Z" :id ' D_%w%{1,}_%d%d%d_%l%l *%(%d%{1,5}%), *"' expr "$Z" :id ' D_%w%{1,}_%d%d%d_id *%(%d%{1,6}%)' || continue expr "$Z" :id '^#define D_%w%{2,24}_%d%d%d_id %(%d%{4}%)$' && continue expr "$Z" :id '^@%(%d%{8,10}%) %d' || continue expr "$Z" :ip " %%($ip4%%) " || print -r "$Z" && continue expr "$Z" :kenn 'K%*%(..*%)%*KN%*' expr "$Z" :lc '^%(.%{1,}/%)%([A-Z_0-9]%{1,}%.[A-Z_0-9]%{1,}%)$' + '%1%L%2' expr "$Z" :lc '^%(.%{1,}\%)%([.A-Za-z_0-9-]%{1,}%.%)%([A-Z_0-9]%{1,}%)$' + expr "$Z" :len '^//%(%d%{1,}%)' && continue expr "$Z" :len0 '^//|%(%d%{1,}%)|' && { len=$len0; continue; } expr "$Z" :ll ' D_%w%{1,}_%d%d%d_%(%l%l%) *%d%{1,5}, *"' expr "$Z" :n '/*%(..%)*/' expr "$Z" :nam '^#define D_%(%w%{2,24}%)_%d%d%d_id %d%{4}$' &| expr "$Z" :num '^ *%(%d%{1,2}%) *& *%w%{2,} *& *[^ ]' || continue expr "$Z" :sym '^[^&]%{1,}& *%(%w%{2,}%)' || continue expr "$Z" :text '^[^"]%{1,} %(".*"%)[ %t]*$' expr "$Z" :time ' %([0-9]*%) ' expr "$Z" :tm ' %([0-9][0-9]*%) ' expr "$Z" :txt '^[^&]%{1,}&[^&]%{1,}& *%(.*[^\ ]%)[\ ]*$' || continue expr "$Z" :z '^#define D_%w%{2,24}_%d%d%d_'"$Lang"' %(".*"%)$' && { expr "$Z" :zn '^%([0-9][0-9]*%) ' || { ><< expr "$Z" :znum '^%([0-9]*%) ' expr "$Z" =:: '</table>' && break expr "$Z" =:: '<table [^>]*WIDTH="150" *HEIGHT="35"[^>]*>' || continue expr "$Z" =:Z 'width=60' = 'width=72' && ow=1 expr "$Z0" :lm '^//%([^ %t]%{1,}%)' && let "len-=${#lm}" expr "$Z2" :T2 '%("[^"]%{1,}"%)$' || continue expr "$Zeile" :: "^-[-a-zA-Z]%{9%} " || continue expr "$Zeile" :: 'Print[a-zA-Z_0-9]%{1,%}(' || continue expr "$Zeile" :: 'Print[a-zA-Z_0-9]%{1,%}(..*);' || expr "$Zeile" :: '[ %t*][a-zA-Z_][a-zA-Z_0-9]*(.*)[ %t]*/[*/].*$' && { expr "$Zeile" :: '^#@f' && { catv 4,,Zeile /%n; continue; } expr "$Zeile" :: '^-.' || continue expr "$Zeile" :: '^[ %t]*/%*' && { expr "$Zeile" :: '^[ %t]*//' && continue expr "$Zeile" :: '^[-<].' || continue expr "$Zeile" :: '^[:.>+].' || continue expr "$Zeile" :: 'defined(OLDPRN)' && { skip=2; continue; } expr "$Zeile" :Dir '^%(.*/%)[^/]%{1,%}$' || Dir= expr "$Zeile" :File ' %*%(..*%)%*$' || File= expr "$Zeile" :File ' %*%(..*%)%*$' || continue expr "$Zeile" :File '%([^/]%{1,%}%)$' || continue expr "$Zeile" :File '%*%(..*%)%*$' || continue expr "$Zeile" :File '^.%{10%} *[^ ]%{1,%} *%(..*%)$' expr "$Zeile" :File '^[0-9]%{1,%}: %(..*%)$' || n=${n}b expr "$Zeile" :Path 'P%*%([^*]%{1,%}%)%*P' expr "$Zeile" :Url 'U%*%([^*]%{1,%}%)%*U' expr "$Zeile" :Zeile "%"!)#@<$n>{(}%"" = "%"$url<*>*<>?%"" || e=${e}2 expr "$Zeile" :Zeile % expr "$Zeile" :Zeile '"' += '"' expr "$Zeile" :Zeile '%([ %t]%)[ISEL]' + '%1' expr "$Zeile" :Zeile '%* ' ' *' expr "$Zeile" :Zeile '%*%* ' '**' expr "$Zeile" :Zeile '%r%{1,%}$' '' expr "$Zeile" :Zeile '&' += '&' expr "$Zeile" :Zeile '([rR])' += '®' expr "$Zeile" :Zeile '<' += '<' expr "$Zeile" :Zeile '>' += '>' expr "$Zeile" :Zeile '[§]' += '§' expr "$Zeile" :Zeile '[··]' += '·' expr "$Zeile" :Zeile '^%(.*[ *][a-zA-Z_][a-zA-Z_0-9]*%)(.*)$' || continue expr "$Zeile" :Zeile '^[ISEL]' '' expr "$Zeile" :Zeile 'yright *([cC])' = 'yright ©' expr "$Zeile" :Zeile '|' += '¦' expr "$Zeile" :Zeile 'Ä' += '' expr "$Zeile" :Zeile 'Ö' += '' expr "$Zeile" :Zeile 'Ü' += '' expr "$Zeile" :Zeile 'ß' += '' expr "$Zeile" :Zeile '' += 'ß' expr "$Zeile" :Zeile 'ä' += '' expr "$Zeile" :Zeile 'ö' += '' expr "$Zeile" :Zeile '.' += '·' expr "$Zeile" :Zeile 'ü' += '' expr "$Zeile" :funam '[ *]%([a-zA-Z_][a-zA-Z_0-9]*%)$' || continue expr "$Zeile" :liste '[ *][a-zA-Z_][a-zA-Z_0-9]*(%(.*%))$' || continue expr "$Zeile" :lsec '^[0-9]%{1,%} *%([0-9]%{1,%}%)' || continue expr "$Zeile" :lsiz '^%([0-9]%{1,%}%)' || continue expr "$Zeile" :n '^%([0-9]%{1,%}%): .' || n=a expr "$Zeile" :n '^%([0-9][0-9]*%)' expr "$Zeile" :rsec '^[0-9]%{1,%} *%([0-9]%{1,%}%)' || continue expr "$Zeile" :rsiz '^%([0-9]%{1,%}%)' || continue expr "$Zeile" :vorne '^%(.*[ *]%)[a-zA-Z_][a-zA-Z_0-9]*$' || continue expr "$Zeile" :zeile 'FOO(%([^)]%{1,}%))' || continue expr "$a" :a '^[ %t]*,%(.*%)$' expr "$adr" :: '^@%d' || { expr "$adr" :: '^%$' || continue; break; } expr "$asm2" :asm2 '~extend~' = "$extend" expr "$bf" :bfc '^%(..*%)%d$' && expr "$bf" :d '%(%d%)$' && { expr "$buf" :: "^$nam=" || { catv buf =:,,obuf:; continue; } expr "$buf" =:: '^%['"$rub"']' || continue expr "$byte" :byte '%([0-9][0-9.,]*%)' || byte=0 expr "$c" :: '[ %%]' || wr="$wr$c" continue expr "$c" :: '[%%dpt0COT]' || wr="$wr$c" continue expr "$cc" :: "$c" || cc="$cc$c" fst="$fst $c=$n" expr "$cmd" :: "$1" && { expr "$ctv0" :ctv0 '^[0-9]%{1,} %([0-9]%{1,}%)' || ctv0=0 expr "$danam" :dnam '^%(D_%w%{1,}%)_%d%d%d_%l%l$' expr "$darst" :darst '%.%([0-9]%)' expr "$date" :sek ':%([0-9][0-9]%) ' expr "$day" :day '^[0-9]%{1,} %([0-9]%{1,}%)' || day=0 expr "$displ" :: ":$dpy " || sargs="$sargs :$dpy" break expr "$eriEMAIL" :Hbuf1 "~datetime~" = "$time" expr "$esl" :esl '^%(.%)' expr "$esl" :esl '^%([ESILesil]%)' || continue expr "$fil" :fil '01GET' = '' expr "$file" :: "%.$wc%$" || continue expr "$file" :: "cgi/" && continue expr "$file" :: c || [ ! -e "$arch" ] && expr "$file" :fil '%([^/]%{1,%}%)$' expr "$flags" :: '1.' && let "flg|=128" expr "$flags" :: ':L:' && let "flg|=1024" expr "$flags" :: ':SP:' && let "flg|=512" expr "$flags" :: 'B[AS][0-9]' && let "flg|=256" expr "$flags" :: '[sz]' && pad=0 expr "$flags" :: 'a' && let "flg|=2" expr "$flags" :: 'i' && let "flg|=16" expr "$flags" :arr '[AS]%(%d%{1,4}%)' || arr=1 expr "$flags" :nelem 'A%([0-9]%{1,}%)' && { expr "$flags" :nelem 'S%([0-9]%{1,}%)' expr "$flags" :pad 'p%([0-9]%{1,}%)' || { expr "$flags" :padd 'p%(%d%{1,5}%)' || padd=0 expr "$fsn" :: '^[A-Za-z_][A-Za-z_0-9. ]%{7}$' || fsn="" expr "$headEMAIL" :Hbuf2 "~loeschenerinnern~" = Erinnerung expr "$headEMAIL" :Hbuf2 "~loeschenerinnern~" = Löschung expr "$headEMAIL" :headEMAIL "~email~" = "$email" expr "$htmlF" :htmlF "~$x~" = "$y" expr "$htmlU" :html '~dati~' = "$date" expr "$id" :: '^%$' && break expr "$id" :: '^%...*' && { expr "$id" :: '^%...*' && { continue; } expr "$id" :: '^:..*' && { echo; continue; } expr "$id" :: '^[:.]..*' && continue; expr "$id" :: '^[@x-]%d%{8,10}$' || continue expr "$id" :: '^{#$' && { expr "$id" :: '^}$' && { expr "$id" :id '^@%([0-9]%{1,}%)' && { expr "$idname" :: '^[A-Za-z_]' || idname="$text" expr "$idname" :idname '[^A-Za-z_0-9]' += '_' expr "$idname" :idname '^%([^\]%{1,}%)\000' expr "$inh" :inh '<' += '<' expr "$inp" :: '^-.*$' && inp="$prev\`-expr "$inp" : '^-%(.*%)$'`" expr "$ip" :: "^$REip%$" || return 1 expr "$ja" :: '^[1-9][0-9][0-9][0-9]$' || err "Jahr: '$ja'" expr "$lbl" :: '^[A-Za-z_0-9. ]%{11}$' || lbl="jmp=$((16#,jmp))" expr "$lc" :name '[\/]%([^\/]%{1,}%)$' || break expr "$liste" :: '[^ %t]' || liste=void expr "$liste" :liste ' %{2,%}' + ' ' expr "$liste" :liste ' ,' + ',' expr "$liste" :liste '%*[][a-zA-Z_0-9]%{1,%},' + '*,' expr "$liste" :liste ', ' + ',' expr "$liste" :liste ',%([^ %t]%)' + ', %1' expr "$liste" :liste '^ *%(.*%)$' expr "$liste" :liste '^%(.*%) *$' expr "$loeEMAIL" :Hbuf1 "~datetime~" = "$time" expr "$n" :: '[.-]' && continue expr "$n" :: '[^0-9]' && { >< expr "$n" :: '^[1-9]' || n=${n}e expr "$n" :n '^4/%(..*%)' && n="/scratch/TEMP/$n" expr "$n" :n '^5/%(..*%)' && n="/scratch/RECYCLED/$n" expr "$nam" :: '^[IWP][0-9]%{1,3}$' || continue expr "$nam" :erw '%.%([^.]*%)$' || erw='' expr "$nam" :l '^%([\/]%)' expr "$nam" :l '^%([a-zA-Z]:%)' && { expr "$nam" :nam '%d%{1,}$' = "$num" expr "$nam" :nam '://%(.*%)' expr "$nam" :nam '<' += '<' expr "$nam" :nam '^%([^ ]*%)' expr "$name" :: '[^ %t]' && expr "$name" :: '^ */[/*]' && continue expr "$name" :name ' %([a-zA-Z_][a-zA-Z_0-9]*%) *[,;] *$' && is=1 expr "$namen" :: " $name " || namen="$namen$name " expr "$nb" :: '^->' && { expr "$nb" :nb '^%([0-9]%{1,%}%)' && print "$nb +$esl$nam+" expr "$nb" :nb '^%([0-9]%{1,%}%)' && { expr "$num" :: '^%d%{1,20}$' && { expr "$num" :m '^%d%{1,12}%([bmgBMG]%)$' || { expr "$num" :num '^%(%d%{1,}%)' expr "$o" :: '=' && url="$Url" expr "$o" :: '[lu]' && Fmain UrlUcLc "$o" url expr "$o" :: a || Fmain CorrPP Dir && expr "$o" :e 't%([+-]%{0,1%}[0-9]%{1,%}%)' && let "url+= $e*60" expr "$oem" :: '^[A-Za-z_][A-Za-z_0-9. ]%{7}$' || oem="" expr "$oz" :oz '^%(.%{44%}%)' expr "$oz" :rz '^.%{44%}%(.*%)$' expr "$pid" :: '^[0-9]%{1,}$' || return expr "$pzeile" : ' %(-%{0,1%}[0-9]%{1,4%}%%%)' && ((lz=lz+1)) expr "$rek" :k '%(.%)$' || k=. expr "$rek" :rek '^.%(.*%)$' expr "$s" :: E && { echo directory checksum error; >< ; goend; } expr "$s" :: E && { echo directory checksum error; break; } expr "$sz" :: '^-' && continue expr "$sz$ta" :: '[^0-9]' && err "GreTag: '$sz'$ta'" expr "$t" :t '&' += '&' expr "$t" :t '<' += '<' expr "$t" :t '>' += '>' expr "$tanam" :tnam '^%(T_%w%{1,}%)_%d%d%d_%l%l$' expr "$teltxt" :: '%w' || teltxt= expr "$teltxt" :teltxt 'Station____max16[^%r%n]*[%r%n]*' = '' expr "$textEMAIL" :textEMAIL "~datetime~" = $(systime -t) expr "$txt" :$2 "$cstr" expr "$typ" :: 'N' && catv /%n expr "$typ" :: 'T' && catv '/</ul>%n' expr "$typ" :: '^#' && continue expr "$typ" :: 'n' && catv /%n expr "$tz" :: '^-%{0,1%}[0-9]%{1,2%}$' && tz $tz expr "$uj" :mi '^[0-9]%{1,2%}:%([0-9]%{1,2%}%)$' || ja=$uj expr "$uj" :st '^%([0-9]%{1,2%}%):[0-9]%{1,2%}$' || ja=$uj expr "$v" :v '%([0-9]%{1,}%)' expr "$val" :val '[^0-9-]' += '' expr "$vonbis" :: '^[0-9a-fA-F]%{8%}-[0-9a-fA-F.]%{8%}' || continue expr "$vorne" :: '[^* %t_a-zA-Z0-9]' && continue expr "$vorne" :: '__interrupt' && continue expr "$vorne" :vorne ' *$' '' expr "$vorne" :vorne ' %(%*%{1,%}%)$' '%1' expr "$vorne" :vorne ' %{2,%}' + ' ' expr "$vorne" :vorne '^ *' '' expr "$wd" :: '%w$' || let "ww|=2" expr "$wd" :: '^%w' || let "ww|=1" expr "$wd" :wd '%%s' += ' ' expr "$z" :: '^%$' && break expr "$z" :: '^:..' && break expr "$z" :: '^[@x]%d%{8} ' && let ++NGE expr "$z" :: '^[@x]%d' || continue expr "$z" :z ' %(%d%{8}%) ' || continue expr "$z" :z '%(.%)%(%.[^.]%{1,}%)$' "%1$a%2" || z="$z$a" expr "$zeile" :: "$from" && { expr "$zeile" :: "$msg" && { expr "$zeile" :: "%.$wc%$" && { file="$zeile"; break; } expr "$zeile" :: '%.long %.L' || break expr "$zeile" :: '%w' || continue expr "$zeile" :: '^ *</[Dd][Ll]><[Pp]>' && let --h3 expr "$zeile" :: '^ *<[Dd][Tt]><[Aa]' || continue expr "$zeile" :: '^CO ' && { expr "$zeile" :: '^[!-~]%{60,}$' || expr "$zeile" :: '^[+0-9]' || continue expr "$zeile" :: 'tmp/' && continue expr "$zeile" :mail '"mailto:%([^:"]*%)"' || continue expr "$zeile" :nam '^Edit %([^ .]%{1,%}%)%.dev' && { expr "$zeile" :name '>%([^<>]*%)</[Aa]>%r*$' expr "$zeile" :nv ' %([0-9]%{1,2%}%)00 ' && let "nv!=nv0" && num=00 nv0=$nv expr "$zeile" :zeile "$alt" += "$neu" expr "$zeile" :zeile "$asubst" = "$ema" expr "$zeile" :zeile ' %([0-9]%{1,2%}%)00 ' " %%1$num " && let ++num expr "$zeile" :zeile ' %(filename=..*%)$' && expr "$zeile" :zeile ' [0-9]%{1,3%} ' = " $num " && let ++num expr "$zeile" :zeile '%<cie%.pl%>' += cie.cgi expr "$zeile" :zeile '%<cntadm%.pl%>' += cntadm.cgi expr "$zeile" :zeile '%<coltaB%.pl%>' += coltaB.cgi expr "$zeile" :zeile '%<gcnt%.pl%>' += gcnt.cgi expr "$zeile" :zeile '%<get%.pl%>' += get.cgi expr "$zeile" :zeile '%<icnt%.pl%>' += icnt.cgi expr "$zeile" :zeile '%<icntget%.pl%>' += icntget.cgi expr "$zeile" :zeile '%<icntvw%.pl%>' += icntvw.cgi expr "$zeile" :zeile '^/%*[0-9]%{3%}' = "/*$num" && let ++num expr "$zeile" =:extend '^EXT:%(....%)$' && continue expr "${{1}" :$1 "$c" += '%'$h expr "${{1}" :$1 '%%'$h += "$z" expr "${{a}}" :: "$RA" || continue expr "${{a}}" :: '[^0-9]' && n= expr "${{f}" :$f '/[0-9][0-9]*_' = "/${zn}_" expr "${{nam}}" :$nam '^MAKRO()' = '' && $nam="${{nam}}\Sup{M}" expr "${{ot}}" :$o '+%(%d%{1,3}%)$' expr "${{ot}}" :$ot '^T%(%w%{1,}%)' expr "000${{o}}" :$o '%(%d%{3}%)$' expr "00000${{nam}}" :$nam '^0*%(%d%{1,}%)%(%d%{'"$d"'}%)$' '%1.%2' expr "`catv $o,,W`" :an '^%([^"(,<]*%)' || an='' expr "`grep -inm '^%[adressen]' $Ziel`" :hi '^%([^:]*%)' expr "`grep -inm '^%[verteiler]' $Ziel`" :hi '^%([^:]*%)' expr $1 :: '.*%.' || { let "x=$1*$2"; echo $x%c; return; } expr $datei :: '.Z$' &| [ $p -gt 12 ] && PAC=unpacked expr $Flags :: 'n' { expr $byte :byte '%([0-9][0-9.,]*%)' byte=0 expr $grp :: $g continue expr $nam :l '^%([\/]%)' expr $nam :l '^%([a-zA-Z]:%)' { expr -$1 :: $g continue if expr "$Z" :a '[AS]%(%d%{1,}%)' if expr "$Z" :id ' D_%w%{1,}_%d%d%d_id *%(%d%{1,6}%)' if expr "$Z" :id '_id %(%d%{4}%)$' if expr "$file" :: '[*?]' if expr "$flags" :padf 'p%([0-9]%{1,}%)' if expr "$rz" :: '^ ' if expr "$yt" :yt ':' ' ' if expr $file :: '[*?]' ifdef DOS && expr $dir :: '^[a-zA-Z]:' || ifdef DOS && expr $dir :: '^[abAB]:' && Mount $MNTDIR $MRO || r=2 ifdef UNIX && expr $dir :: '^'$MNTDIR && Mount $MNTDIR $MRO || r=2 ifset a && expr "$Hbuf" :sern 's%tSN:%t%(.*%)$' && a= ifset a && expr "$Hbuf" :sern 's%tSernum%t%(.*%)$' && a= ifset b && expr "$Hbuf" :dati ' %([0-9.]%{8,} *[0-9:]%{8,}%)' && b= ifset base && expr "$a1" :: '^@[^:]' || continue ifset c && expr "$Hbuf" :stat 'Station: *"%([^"]%{1,}%)"' && c= ifset c && expr "$Hbuf" :stat 's%tStation%t%(.*%)$' && c= ifset d && expr "$Hbuf" :okfa 'State: *%(%w%{2,}%)' && d= ifset erw && expr "$nam" :nam '^%(.[^~''.]*%)' ifset is || expr "$name" :name ' %([a-zA-Z_][a-zA-Z_0-9]*%) *%[' && is=1 let "${#edit}>72" &| expr "$edit" :: '[^a-zA-Z0-9_ /:.+-]' && let ${#edit}72 expr $edit :: '[^a-zA-Z0-9_ /:.+-]' let c && expr "$an" :: '[^ %t]%{1,%}' && { let chl && expr "$Zeile" :Zeile '<%*>%*<>?"' += '"' let na==1 && tmp=$dir$sub && expr "$tmp" :: '[?*[]' && continue readl Z && expr "$Z" :e '%([0-9]%{1,6}%):' && z=0 readl Z && expr "$Z" :s '%([0-9]%{1,6}%):' && z=1 s='' expr "${{nam}}" :$nam '^-' = '' && s=- while expr "$Dir" :Dir '^[^/]%{1,%}/' '' while expr "$Z" :f '%(%<%w%{3,}(%)' while expr "$zeile" :zeile '^%(..*%)[ %t]*+%{1,}$' while expr "${{nam}" :sd '##%(-%{0,1}[0-9]%{1,}%)' .1) let "++len"; expr "${{2}" :$2 '.$' '.&' ;; [1-4]) expr "xxxxx.yyyyy" :Odstg '%(x%{'"$((5-Odstg))"'}%.y%{'"$Odstg"'}%) b) expr "$val" :val '[^01]' += '' b) if expr "$scs" :: '-nobank' expr "$Z" :: '^-- ====' && continue expr "$Z" :: '^Status' && expr "$Z" :C '^-- *%(.*%w%) *%.%.%.' && expr "$Z" :U '%(USERNAME.*%)$' || U expr "$Z" :Z '"[^"?]*/%([^/"?]%{1,%}?[^?"]%{1,%}"%)' + '"%1' expr "$Z" :Z '%(-[a-z]%{3,5%}%)'"-$d13-$d13-$d13" + % expr "$Z" :Z '^ %{1,}%(.*%)$' expr "$Z" =:Z '%( bgcolor *= *"#%)......' "%%1$col" && expr "$inp" :: '^[><]$' || { echo '%a%c'; continue; } expr $RCHAR : '[a-z]' >/dev/null && i) expr "$val" :val '[^0-9-]' += '' ;; ifset INN || { expr "$Z" :INN '^INSTANCE_NAME *: *%(%w%{1,}%)'; continue; } l) expr "$opt" :: '^[1-9][0-9]*$' || continue o) expr "$opt" :: '^[a-zA-Z_0-9/\]%{1,}$' || continue u) expr "$val" :val '[^0-9]' += '' ;; until arch_lines_kv3 || expr "$wva" :: '[qQ]uerty *..*pure%r%n$' x) expr "$val" :val '[^0-9a-fA-F]' += '' bb) expr "$val" :val '%(%d%.%d%{1,2}%)' #expr "$o" :: '[lu]' || expr "$o" :o '=' + '' #expr "$o" :: 'l' && expr "$o" :: 'u' && return 1 [ "$ok" == d ] && expr "$a" :a '%.[0-9]%{1,3}$' = '.---' [ $. -ge 0 ] && expr "${{1}" :$1 '%%' += '%25' [ $6 == i ] && expr "${{2}" :: '^[-+]' || let "++len" [ $admin == 1 ] && expr "$znum" :: "$znck" && o=$znum [ $} -lt 1 ] && expr "$o" :: 'a' || return [ -z "$1" ] &| expr "$ifile" :: '^%.%.%.' && { [ Vscan -eq 1 ] && expr "$Z" :: '^%%v%%' && return 1 [ l -lt 2 ] && expr "$Z" :ll '_%d%d%d_%(%l%l%)%>' && { [ n -eq 6 ] && expr "${{v}" :: '[^0-9a-fA-F]' && continue [ n -eq 9 ] && expr "${{v}" :: '[^0-9]' && continue do expr "$Zeile" :: '^#@[a-zA-Z]%{1,8%} ' && break; done do expr "$Z" :: '^ *</body%>' && break; catv Z /%n; done do expr "$Z" :: '^ *<body%>' && break; done expr "$*" :: '[^0-9 ]' && return 2 expr "$*" :: '[^0-9%t ]' && { print -u2 "wrong arg '$*'"; return 3; } expr "$*" :: '^[lh] *[1-9][0-9 -]*$' && t=vb expr "$1" :: "$znck" || return 1 expr "$1" :: '!' && print -r "<!undo>" > url_tmpf.inf expr "$1" :: '[0-9]' expr "$1" :: '[?/]' &| expr "$1" :: '[Rlu]' || return 0 expr "$1" :: '[^!-~]' && return 1 expr "$1" :: '[^0-9WPT,]' && return 1 expr "$1" :: '[^a-zA-Z0-9_]' && PutErrHtm "User name contains wrong chars." expr "$1" :: '[lu]' || return 0 expr "$1" :: '^-[hH]' && { expr "$1" :: '^[0-9]%{1,4}$' || PutErrHtm "Length value: »$1«" expr "$1" :: '^[a-zA-Z]' || PutErrHtm "User name must begin with [a-zA-Z]." expr "$1" :: 't' && expr "$1" :: 'T' && return 1 expr "$1" :: D && print -ru3 "lcd $Dir" && let ++dt expr "$1" :: D && { Fmain CkDDir . || return ; ddir="$inp"; } expr "$1" :: L && mktemp rdir expr "$1" :: V && [ -s hpm_tmpf.inf ] || echo LV > hpm_tmpf.inf expr "$1" :: V || grep -qm '^[-<].' hpm_tmpf.inf || return expr "$1" :PfName 'Print%([a-zA-Z_0-9]%{1,%}%)(..*);' expr "$1" :a 'Print[a-zA-Z_0-9]%{1,%}(%(..*%));' expr "$1" :aid '[0-9]*/%([0-9]*%)$' expr "$1" :dali0 '/%([0-9]%{1,4}%)$' expr "$1" :email 'E%*%([^*][^*]*%)%*E' expr "$1" :gid '%([0-9]*%)/[0-9]*$' expr "$1" :kw 'K%*%(..*%)%*KN%*' expr "$1" :land_ 'L%*%([^*]*%)%*L' expr "$1" :name 'N%*%([^*][^*]*%)%*N' expr "$1" :ort 'O%*%([^*][^*]*%)%*O' expr "$1" :plz_ 'P%*%([^*][^*]*%)%*P' expr "$1" :strasse 'S%*%([^*][^*]*%)%*S' expr "$1" :tm ' %([0-9][0-9]*%) ' expr "$1.$2.$3.$4" :: "^$REip%$" || return 1 expr "$2" :var '^%([^:]%{1,}%):' expr "$3" :aid '%([0-9]%{1,}%)$' expr "$3" :gid '%([0-9]%{1,}%)/[0-9]%{1,}$' expr "$CONTENT_TYPE" =:boundary 'boundary=%(..*%)' expr "$Cmd" :nam '%${%([a-zA-Z][a-zA-Z0-9]*%)}' || nam='' expr "$F" :: 'ELF .*executable' || continue expr "$F" :: '[lL][iI][bB]9..[slmcSLMC]%....$' && { expr "$F" :F '^%(..*%): ' || continue expr "$F" =:: '^mb.*%.h$' && continue expr "$F" =:: '^t' && continue expr "$FF" :F '%([^/*?]%{1,}%)$' || continue expr "$FILE" :: '%<cfgbase.txt%>' && typ=base expr "$FILE" :: '%<mesbase.txt%>' && typ=base expr "$FILE" :: '%<txtbase.h%>' && typ=text expr "$FILE" :NAME '%([^/]%{1,}%)%.tex$' || continue expr "$File" :Man '%(.%)$' || continue expr "$File" :Name '^%(..*%)%.mn.$' || continue expr "$Gsel" :: '[0-9]' || return expr "$HTM" :HTM '~kbist___~' = "$ka" expr "$HTM" :HTM '~kp5ma___~' = "$kp5ma" expr "$HTMcfg3" :Hbuf '~moinitapp~' = "$moinit" expr "$HTMkont3" :Hbuf '999.888.777.666' += "$VBMip" expr "$HTMtelhf" :Hbuf '~TextTelhf~' = "$AnrufMsg" expr "$HTTP_HOST" :: '%.schellong%.' || expr "$Hbuf" :: '^!' && r=e conv -D! Hbuf expr "$Hbuf" :Hbuf '~MOwahl ~' = "$mow" expr "$Hbuf" :Hbuf '~Station~' += "$VBMstation" expr "$Hbuf" :Hbuf '~TPwahl~' = "$tpw" expr "$Hbuf" :Hbuf '~telnu~' = "$2" expr "$Hbuf" :MOinitapp 'MOINIT:%(..*%)$' && MOinitapp=$MOinitapp expr "$Hbuf" :MOwahl '^.%([01]%)' expr "$Hbuf" :TPwahl '^%([TP]%)' expr "$Hbuf" :TblFolge '^..%([0-9 ]%{1,}%)' expr "$HexC" :B '^....%(..%)' expr "$HexC" :G '^..%(..%)..' expr "$HexC" :R '^%(..%)....' expr "$IND" :: '^#' && continue expr "$IP" :: '^[0-9.]%{7,15}$' || return 3 expr "$Jahr" :Jahr '%([0-9]%{2,4%}%)$' || expr "$KatOffs" :o '%t'"$3"' %(%d%{1,5}%)' || return expr "$KatOffs" :o '%tc %(%d%{1,5}%)' || return 1 expr "$LES" :: "%%<$le%%>" || { expr "$N" :: ' EventNo%[[^][]%{1,}]=' && break expr "$N" :n '^%(.%)%(.*%)$' '%1%L%2' expr "$N" :n '^/[ 0-9*]/ %{1,3}%(%d%d%d%d%)' && print -u2 "'$n' unerwartet" expr "$Oacc" :Oacc '%([0-9A-Fa-f]%{4}%)' expr "$Oid" :Grp '^%d%d%(%d%{3}%)%d%{5}$' expr "$Oid" :Oid '^%(%d%)%(%d%)%(%d%{3}%)%(%d%{5}%)$' '%1.%2.%3.%4' expr "$Oname" :Oname '%([A-Za-z_].*%)$' expr "$Oxflg" :Oxflg '%(%d%{8}%)' expr "$P" :: "[rs]_$p" || P="$P r_$p s_$p" expr "$QS" :: '^+' && { let "Nn+=QS-SelfN"; SetVar Nn; } expr "$QS" :: '^[0-9]' && SelfN=$QS SetVar SelfN expr "$QS" :Nn '^=' = '' && SetVar Nn expr "$REQUEST_URI" :: '/eepr%.cgi$' || PutErrHtm "Sorry!" expr "$RxTxMsg" :: '^FAIL:' && { expr "$Script" :: '^.:\.' || Script="`-pwd`\$Script" expr "$Script" :: '^[^/]' && Script="`-pwd`/$Script" expr "$Script" :: '^\.' && pwd | catv 0,2,0 Script =Script: expr "$Stat" :Nmax '%([0-9]%{1,}%) *[0-9]%{1,}' expr "$TDIR$BN/$1" :d '^%(.%{1,}%)/[^/]%{1,}$' || d=/ expr "$Text" :Text "$kl" += '\{' expr "$Text" :Text "$kr" += '\}' expr "$Text" :Text "$l" += ' ' expr "$Text" :Text "$l" += '\ ' expr "$Text" :Text ' ' += "$l" expr "$Text" :Text ' ' += '' expr "$Text" :Text '"' += '\symbol{34}' expr "$Text" :Text '"' += '\textquotedblright ' expr "$Text" :Text '#' += '\#' expr "$Text" :Text '%$' += '\$' expr "$Text" :Text '%%' += '\%' expr "$Text" :Text '%('"$l"'%{1,}%)' + '\verb:%1:' expr "$Text" :Text '%[' += '\symbol{91}' expr "$Text" :Text '%^' += '\symbol{94}' expr "$Text" :Text '%^' += '\textasciicircum ' expr "$Text" :Text '&' += '\&' expr "$Text" :Text '&' += '&' expr "$Text" :Text '>' += '>' expr "$Text" :Text '<' += '<' expr "$Text" :Text '"' += '"' expr "$Text" :Text '''' += '\symbol{39}' expr "$Text" :Text '''' += '\textquoteright ' expr "$Text" :Text '\' += '\symbol{92}' expr "$Text" :Text '\' += '\textbackslash ' expr "$Text" :Text '`' += '\textquoteleft ' expr "$Text" :Text '{' += "$kl" expr "$Text" :Text '{' += '\{' expr "$Text" :Text '}' += '\}' expr "$Text" :Text '~' += '\symbol{126}' expr "$Text" :Text '~' += '\textasciitilde ' expr "$V" =:version 'Productversion:%(%d*%)' expr "$Z" :: " $ip " || continue expr "$Z" :: "$exp" || return 1 expr "$Z" :: "[mp]-$d%%{1,2%%}-[a-z]%%{3,5%%}-$d13-$d13-$d13" && expr "$Z" :: '%$[^$]%{1,}' &| expr "$Z" :: '%<D_%w%{1,}_%d%d%d_%l%l%>' || { expr "$Z" :: '& *= *&' &| expr "$Z" :: '\[a-z]%{0,9}section%*[{[]' &| expr "$Z" :: '\[a-z]*section%*[{[]' &| expr "$Z" :: '\chapter[{[]' && return 0 expr "$Z" :: '\frac%>' &| expr "$Z" :: '\multicolumn%>' &| expr "$Z" :: '\pageref{' &| expr "$Z" :: '\wedge%>' &| expr "$Z" :: '^"Aktien";"' || continue expr "$Z" :: '^:..*' && { expr "$Z" :: '^[ %t]%{0,}%%' &| expr "$Z" :: '^[@a-z][0-9]%{3,16}' && { expr "$Z" :: '^\begin{itemize}' &| expr "$Z" :: '^\label{' &| expr "$Z" :: '_%d%d%d_'"$LL"'%>' && catv Z /%n expr "$Z" :: '_%d%d%d_[ed][ne]%>' && { expr "$Z" :DZ '^%( *# *define *[Dd]_%w%{1,}_%d%d%d_%l%l *%)["0-9]' || { expr "$Z" :Z " $ip " = " $name " expr "$Z" :Z "$a$N$b" += "\textsc{$n}" expr "$Z" :Z "$d13,$d13,$d13;%%(..*%%)#[0-9a-fA-F]%%{6%%}" % expr "$Z" :Z "%<$N%>" + "$a&$b" expr "$Z" :Z "\index{$a$N$b" += "\index{$N" expr "$Z" :Z "\label{%([^}]*%)$a$N$b" + "\label{%1$N" expr "$Z" :Z "\pageref{%([^}]*%)$a$N$b" + "\pageref{%1$N" expr "$Z" :Z "\ref{%([^}]*%)$a$N$b" + "\ref{%1$N" expr "$Z" :Z "\textbf{%([^}]*%)$a$N$b" + "\textbf{%1$N" expr "$Z" :Z "\textsc{$a$N$b" += "\textsc{$N" expr "$Z" :Z "\verb%(.%)$a$N$b" + "\verb%1$N" expr "$Z" :Z ' %(D_[0-9a-z_]%{2,}%)_%d%d%d_en ' || continue expr "$Z" :Z '%([ \]*%)$' "\index{$_ind}%1" expr "$Z" :Z '%([^0-9_]%)[0-9_]%{8%}%([^0-9_]%)' "%%1$n%%2" expr "$Z" :Z '[0-9] %(.%{1,}%)$' expr "$Z" :a '%*rA%*%(.*%)%*aB%*' expr "$Z" :a 'A%*%(.*%)%*a' expr "$Z" :addr " %($ip%) " || continue expr "$Z" :b '%*aB%*%(.*%)%*b' expr "$Z" :b 'B%*%(.*%)%*b' expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *"[^"]*" *$' || { expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *["0]' || { expr "$Z" :dir '^%(.*/%)[^/]*$' || dir= expr "$Z" :hex '^RD=%([ 0-9A-Fa-f]%{3,}%)::%d%{1,10} ms.%{0,2}$' || { expr "$Z" :n '%*tN%*%(.*%)%*nR%*' expr "$Z" :n 'N%*%(.*%)%*n' expr "$Z" :nam '%([^/]*%.htm%)$' || continue expr "$Z" :p '%([^ ].*[^ ]%) ' || continue expr "$Z" :p '%<proto=%([^ ]%{1,}%)' || continue expr "$Z" :r '%*nR%*%(.*%)%*rA%*' expr "$Z" :r '%<rcvd=%([0-9]%{1,}%)' || continue expr "$Z" :r 'R%*%(.*%)%*r' expr "$Z" :t 'T%*%(..*%)%*t' || continue expr "$Z" :t 'T%*%([0-9]%{12%}%.[0-5][0-9]%)%*t' || continue expr "$Z" :t 'T%*%([0-9][0-9.]*%)%*tN%*' || continue expr "$Z" :t1 ' D_%(%w%{1,}%)_%d%d%d_en ' || continue expr "$Z" :text '%( *"[^"]*"%) *$' || text=0 expr "$Z" :txt ' %(%w%{1,}%) *: *%d' || continue expr "$Z" :z ' %([0-9][ 0-9]*%)' || continue expr "$Z" :z '[1-9]%([^/\1-9]*%)$' '%1' || continue expr "$Z" :z '[^/\]%{1,}$' "%%$lu&" expr "$Z" :zn1 '["/]tcnt.pl?%([0-9]%{1,10%}%.[0-9]%{1,10%}%)' || expr "$Z" =:: '%.abs$' && continue expr "$Z" =:: '<table .* bgcolor *= *"#[0-9a-fA-F]%{6%}"' && expr "$Z16" :: '[89abcdef][0-9a-f]' || { catv Z /%n; continue; } expr "$ZNAM" :title '^_%(upc3_.%{1,}%)$' || continue expr "$Zeile" :: '[^ %t%z]' || continue expr "$Zeile" :: '^#@[a-zA-Z]%{1,8%} ' && continue expr "$Zeile" :: '^<!undo>$' || { >< ; return 0; } expr "$Zeile" :: '^[ %t]*#' && continue expr "$Zg" :Zg 'icnt.pl?%(0%.[1-9][0-9]*%)' expr "$Ziel" :name '^%(..*%)'$T'[^'$T']*$' expr "$__e" :__e '^%([^ ]%{1,%}%)' || __e='' expr "$_ind" :_ind '_' += '\_' expr "$a" :: '^[ %t]*[^, %t]%{1,%}[ %t]%{1,%}[^, %t]' && return 1 expr "$a2" :a2 '^ *%([0-9]%{1,%}%) *$' '%1' && let ++an expr "$arg" :Ref '^[0-9]%{1,2%}%.%(..*%)$' expr "$arg" :nam ':%(..*%)$' nam= expr "$ats" :ats '[^!-~]%{1,}' += ' ' expr "$b" =:b '%[%([a-zA-Z]%{2%}%)]' + '%L%1' expr "$b" =:b 'MSIE' += 'IE' expr "$b" =:b 'Netscape' += 'NS' expr "$b" =:b 'compatible;' = '' expr "$boundary" =:boundary 'boundary=%(..*%)' || return 1 expr "$buf" :buf "^$gid $aid "'%(.*%)$' || return expr "$buf" :buf ' %([^ ].*%)$' || buf= expr "$danam" :dnanu '^%(D_%w%{1,}_%d%d%d_%)%l%l$' expr "$danam" :lang '^D_%w%{1,}_%d%d%d_%(%l%l%)$' expr "$dir" :dir '^%(.*%)'"$name"'$' || return expr "$dir" :name '%([^/\]%{1,%}%)$' || return expr "$errval" :: '-kenn[123]+' || expr "$fil" :fil '01GET' = '' expr "$file" :: c || [ ! -e "$arch" ] && expr "$file" :fil '%([^/]%{1,%}%)$' expr "$file" =:: '[Mm][Bb][0-9]%{2,%}%.[Hh]$' && continue expr "$file" =:: '^tmp_..*' && continue expr "$file" =:: 'mb[0-9]%{2,%}%.h$' && continue expr "$file" =:: 'sl%d%{2,%}%.h$' && continue expr "$fmt" :: '^%%?K' && { expr "$fnams" :fnams '/?????_' = "/${1}_" || r=4$r expr "$g" :x '=%([^=]*%)$' || x= expr "$g" :y '^%([^=]%{1,%}%)' || { ErrExit "$g"; break; } expr "$gew" :gb '^%([a-z]%)' || exit 1 expr "$gew" :gn '^.%([0-9]%{1,}%)' || exit 1 expr "$gf" :: 'tar archive' && { expr "$gf" :: 'x86 boot sector' && { expr "$grp" :: '^[!* ]' && { remove $tmp; PutErrHtm "!* not allowed: »$grp« expr "$headEMAIL" :Hbuf '~email~' = "$z" expr "$hostname" :hostname '^%([^:]%{4,}%)' expr "$hostname" :port ':%([0-9]%{1,5}%)$' || port='' expr "$html" :HTML '~url~' = "$url" expr "$htmlF" :htmlF "~$x~" = "$y" expr "$id" :: '^%$' && break expr "$id" :: '^:..*' && { expr "$id" :id '^@%([0-9]%{1,}%)' && { expr "$id" :id '^[@a-z;,.]%(%d%{8}%)$' || continue expr "$if" :dir 'I' = D expr "$ind" :ind '%%s' += ' ' expr "$inp" :: '[?*[]' && { expr "$le" :: '^[a-z]%{1,4}$' || return expr "$lkn" :time '^%([0-9]%{8,10}%)_[0-9]%{1,}_' continue expr "$lst" :: '[^ ]' || return 0 expr "$mtr" :mtr '^%([0-9]%{1,}%)' expr "$n" :N '^%(.%{1,}%)%.Z$' expr "$n" :n ' %([a-z]%)' + ' %U%1' expr "$n" :name $nu "/mnt/${D[nu]}" expr "$n" :nu '^%([1-9]%{1,3%}%)/..*' || { echo $n; break; } expr "$n1" :name1 $nu "/scratch/${D[nu]}" expr "$n1" :nu '^%([1-9]%{1,3%}%)/..*' || { echo $n1; break; } expr "$nam" :dir '^%(.*/%)[^/]*$' dir= expr "$nam" :dir '^%(.*/%)[^/]*$' || dir= expr "$nam" :erw '%.%([^/.]%{1,%}%)$' erw= expr "$nam" :nam '%([^/]*%)$' nam= expr "$nam" :nam '%([^/][^/]*%)$' || nam= expr "$nam" :num '%(%d%{1,}%)$' && { expr "$nam" =:nam '%%2f' += '/' expr "$name" :name '^%(%.*[^.]*%)' || return expr "$name1" :: '..*-$' && { expr "$o" :: '[^ !adlxut0-9+-]' && return 1 expr "$o" :: '[^=adlxu1 ]' && return 1 expr "$o" :: '[lut]' || return expr "$o" :: 'a' && erw= expr "$o" :: 'd' && fd=d expr "$o" :: 't' && { expr "$ok" :: '^@[0-9]:OK'"$RN" || return 1 expr "$ok" :: '^@[0-9]:READY'"$RN" || return 1 expr "$okfa" :: '^[Ff][Aa]' && { expr "$okfa" :: '^[Oo][Kk]' && : > $adir/okay expr "$p" :Z '^%(.%{1,}%)%.Z$' expr "$path" :dir '^%(..*%)\[^\][^\]*%.[ch]$' || continue expr "$r" :r '://%(.*%)' expr "$rd" :: '^[1-9][0-9]*$' && n=$rd expr "$reftxt" :reftxt '/?????_' = "/${1}_" || r=3$r expr "$rek" :k '.' += '}' || k= expr "$rek" :k '[BFb]' += '}' || k= expr "$s" :: E && { echo directory checksum error; >< ; goend; } expr "$sn" :: '[^JY0-9.-]' && sn=YY000000-000.000 expr "$t2" :t2 '^0%{1,2}' = '' expr "$ta$mo$ja$st$mi$se" :: '^[0-9]%{7,14}$' && { expr "$title0" :: '^%.%.%.' || { expr "$try" :try ' %([0-9]%{1,}%)[^0-9]*$' || return expr "$tz" :: '^-%{0,1%}[0-9]%{1,2%}$' && tz $tz expr "$url" :: ' ' && continue expr "$url" :url '^%([^%n]*%)' expr "$urltxt" :urltxt '/%d%d*_url.txt' = "/${zn}_url.txt" expr "$urltxt" :urltxt '/?????_' = "/${1}_" || r=2$r expr "$v" :$1 "^$2 "'%(.*%)$' || return expr "$val" :val '^[^:]%{1,}:' = '' expr "$w" :a '(%(%d%{1,}%),%d%{1,})$' expr "$w" :w '^%([^(]%{1,}%)(' expr "$wd" :: '%w$' || let "ww|=2" expr "$z" :: "^%r%n--$boundary--%r%n%$" || { remove -s $arch; return 4; } expr "$z" :Stxt ' "%([^"]%{1,50}%)"' || { print -u2 "Stxt"; exit 5; } expr "$z" :l '^%(%d%{1,5}%):' || { print -u2 "line:"; exit 4; } expr "$z" :tid ' { %d%{4}, %(%d%{4}%), %d }' || { print -u2 tid; exit 3; } expr "$z" :z '[| ]' += '' expr "$zeile" :$1 '^%([0-9]%{1,%}%)' expr "$zeile" :: '[ %t]call .' || { catv zeile /%j; continue; } expr "$zeile" :: '^From - ' && { expr "$zeile" :: '^[ %t]%.data' || continue expr "$zeile" :: '^[ %t]%{1,%}%.align' && expr "$zeile" :: '^[ %t]%{1,%}jmp %*%.L' || continue expr "$zeile" :a '^ *%([0-9]%{1,%}%)' || { expr "$zeile" :ema '|%([^|]%{3,}%)|' expr "$zeile" :zeile '<[^>]%{1,%}>' + '' expr "$zeile" :zeile '^/%*000' = "/*$num" && { expr "$zn1" :zn1 '^%([0-9]%{1,%}%)' expr "$zn1" :zn2 '%([0-9]%{1,%}%)$' expr "$znum" :: "$znck" || return 1 expr "$znum" :: '^[0-9]%{1,4}$' && expr "${{1}" :$1 '%%00' += "?" expr "${{1}" :spez '[a-zA-Z_0-9&=.-]' += '' expr "${{2}" :: '^%.' && $2="0${{2}" #let "++len" expr ".$zn1" :: '%.0[0-9]' && end=1 expr "000$n" :n '%(%d%{3}%)$' expr "000000000$Oid" :Oid '%(%d%{10}%)$' expr $1 :: '.*%.' || { let "x=$1*$2"; echo $x%c; return; } expr $Dir : "^$A_" > $NUL &| expr "$L" : '^[abAB]:' > $NUL && { expr $Dir :: "^$A_" &| expr "$L" :: '^[abAB]:' && { expr $F : '..*\.mn[a-z]' >/dev/null && { expr $FN :: '..*mn[a-zA-Z]$' && { expr $FN :: '..*mn[a-zA-Z]$' { expr $o : '^0*%([1-7][0-7]*%)$' expr $dir :dir '^%(.*%)'"$name'$' return expr $dir :name '%([^/\]%{1,%}%)$' return expr $name :name '^%(%.*[^.]*%)' return expr $url :: ' ' continue expr $url :url '^%([^%n]*%)' if [ -s "$rdir" ] && expr "$1" :: L && [ "$1" != LV ] if expr "$1" :: 'AT&F' if expr "$1" :: 'R' if expr "$Hbuf" :: '[ %t%r%n]' if expr "$Z" :comment '[^\]%(%%.*%)$' if expr "$dp" :: '^:$' if expr "$sargs" :: '/[^ ]%{1,} :[0-9]' if { expr "$Z" :: '\verb%>'; inv; } && expr "$Z" :comment '[^\]%(%%.*%)$' then expr "$Z" :Z '%([^\]%)%%.*$' '%1' while expr "$dir" :C '^.%{'$N'%}%(.%)' while expr "$Dir" :lsec '%([^/]%{1,%}%)$' && while expr "$Text" :Leer '%(%{1,}%)' while expr "$Z" :U '&%([a-zA-Z0-9#]%{2,}%);' while expr "$zeile" :zeile '<[Bb][Rr]>%(.%)' "$zv%1" while expr "${{1}" :h '%%%([a-fA-F0-9]%{2%}%)' while shift; expr "$1" :v '%([0-9]%{1,}%)' expr "$Z" :: '^//' || break expr "$Z" :: '^//-%{50,}' && { expr "$Z" :Z '&' += '&' expr "$Z" :Z '^//%(.*%)$' expr "$Z" :b '^//--> %{1,}%([0-9, ]%{1,}%)' && { B$n="$b"; continue; } expr "$Z" :v '^//--> %{1,}V[^0-9]%{2,}%([0-9.]%{1,}%)' && { V$n="$v"; conti if expr "$Z" :: '^[^ ]' # expr "$Z" :: '%<T_%w%{1,}_%d%d%d_%l%l%>' || { # expr "$Z" :: '_[ed][ne]%>' && { # expr "$Z" :ll '_%d%d%d_%(%l%l%>%)' && { # expr "$Z" :n '%([0-9]%{1,}%)' || { catv Z /%n; continue; } # expr "$buf" :: "^$nam=" || { catv buf /%n; continue; } # expr "${{1}" :$1 '%(.%)/%*$' '%1' # expr "${{1}" :$1 '%(.%)/[^/*]%{1,%}/%*$' '%1' # expr "${{1}" :$1 '/%.%.$' '/*' # expr "${{1}" :$1 '^%.%./' '*/' # expr "${{1}" :$1 '^/[^/*]%{1,%}/%*$' '/' # while expr "${{1}" :$1 '/%*/' '/'; do done # while expr "${{1}" :$1 '/%.%./' '/*/'; do done # while expr "${{1}" :$1 '/%./' '/'; do done # while expr "${{1}" :$1 '/[^/*]%{1,%}/%*/' '/'; do done # expr "$Gdir" :VBMip '%([0-9.]%{7,15}%)' && { # expr "$Z" :lc '^%(.%{1,}\[^\/]%{1,}%.%)%([A-Z_0-9]%{1,}%)$' + '%1%L%2' || # expr "$lc" :name '[\/]%([^\/]%{1,}%)$' || break # expr "$x" :x '%%'$h += "$z" # expr "$zeile" =:: 'AT' && ext -ocot30od4o4 ok # expr "$zeile" =:: 'ATA' && continue # expr "$html0" :html0 'www%.schellong%.com' += 'localhost' # grep -cvh -e expr file ... # while expr "$x" :h '%%%([a-fA-F0-9]%{2%}%)' expr "$Z" :: "^$Beg" || z=0 goend expr "$Z" :: "^$Beg%$" && [ "$z" == P ] && expr "$Z" :: "^$End" && z=I expr "$Z" :: "^$Pv$End" &| if expr "$Z" :: "^$Pv" z=P expr "$Z" :: "^$Pl$LANG%$" && z=p 0) expr "$Z" :Le "^$Pl"'%(..*%)$' && z=1 1) expr "$Z" :: "^$Pv$Beg" &| C) expr "$Z" :: "^$Pl$LANG%$" && continue 2 D) expr "$Z" :: "^$Pl$LANG%$" && z=d ;; I) if expr "$Z" :: "$Inp" d) expr "$Z" :: "$Inp" && z=D continue 2 expr "$Z" :: "%<$N%>" || continue expr "$Z" :: '\begin{verbatim}' || goend expr "$Z" :: '\end{verbatim}' && V=v expr "$Z" :: "$KZ@-$OFILE@$KZ" && break expr "$Z" :Z "%<$old%>" + "$new" expr "$Z" :Z "^$RAtxt" = '' B) expr "$Z" :Z '^</span>' = '' && k=R ;; do expr "$Z" :OFILE "$KZ"'@+%(%w%{4,}%)@'"$KZ" && break expr "$Z" :HexC "^$RAbgc" && { expr "$Z" :Text "^$RAtxt" && { expr "$Z" :Z "$muster" = "$subst" && { expr "$rek" :k '%(.%)$' || k=. expr "$rek" :rek '^.%(.*%)$' expr "$FILE" :NAME '%([^/]%{1,}%)%.tex$' || continue expr "$HexC" :B '^....%(..%)' expr "$LES" :: "%%<$le%%>" || { expr "$N" :n '^%(.%)%(.*%)$' '%1%L%2' expr "$Text" :Text "$l" += ' ' expr "$Text" :Text '~' += '\textasciitilde ' expr "$V" =:version 'Productversion:%(%d*%)' expr "$Z" :: '\[a-z]*section%*[{[]' &| expr "$Z" :: '\chapter[{[]' && { expr "$Z" :: '^[ %t]%{0,}%%' &| expr "$Z" :Z "$a$N$b" += "\textsc{$n}" expr "$Z" :Z "%<$N%>" + "$a&$b" expr "$Z" :Z "\index{$a$N$b" += "\index{$N" expr "$Z" :Z "\label{%([^}]*%)$a$N$b" + "\label{%1$N" expr "$Z" :Z "\pageref{%([^}]*%)$a$N$b" + "\pageref{%1$N" expr "$Z" :Z "\ref{%([^}]*%)$a$N$b" + "\ref{%1$N" expr "$Z" :Z "\textbf{%([^}]*%)$a$N$b" + "\textbf{%1$N" expr "$Z" :Z "\textsc{$a$N$b" += "\textsc{$N" expr "$Z" :Z "\verb%(.%)$a$N$b" + "\verb%1$N" expr "$file" =:: 'sl%d%{2,%}%.h$' && continue expr "$id" :: '^%$' && break expr "$id" :: '^{#$' && { expr "$id" :: '^}$' && { expr "$le" :: '^[a-z]%{1,4}$' || return expr "$n" :n ' %([a-z]%)' + ' %U%1' expr "$rek" :k '.' += '}' || k= if expr "$Z" :comment '[^\]%(%%.*%)$' then expr "$Z" :Z '%([^\]%)%%.*$' '%1' [ -t 0 ] &| expr "$1" :: '[^0-9-]' && { ifset CMD && expr "$C" :: "%<$CMD%>" || exit 3 ifset LANG && expr "$L" :: "%<$LANG%>" || exit 4 [ $# -eq 1 ] && expr "$1" :: '%.djffiodj' && arg="$1" [ $# == 1 ] && expr "$1" :: '^[0-9]%{1,4%}%.[0-9]%{1,3%}' && arg="$1" [ -t 0 ] &| expr "$1" :: '[^0-9-]' && { bgrep2 -c -lc -f datei -e expr do expr "$Zeile" :: '^#@D[0-9] ' && break; done do expr "$Zeile" :: '^#@G ' && { let ++inp; continue; } do expr "$Zeile" :: '^#@[a-zA-Z]%{1,8%} ' && inp=1 && break; done do expr "$Zeile" :: '^#@g ' && break; done do expr $Zeile :: '^#@G ' { let ++inp; continue; } do expr $Zeile :: '^#@g ' break; done do expr "$Z" :: 'BUILDs' && break; done ifset LANG && expr "$L" :: "%<$LANG%>" || exit 4 ifset TageBez && expr "$TageBez" :: ' ' || { expr "$1" :: '[^0-9WPT,]' && return 1 expr "$Z" :Z '%<PSS%.'"$N"'%>' += "Reg.$N" && let ++n expr "$Z" :Z '%<PSS%.K%(%[[^][.]%{1,}]%.%)'"$N"'%>' + 'Reg.K%1'"$N" && expr "$z" :z '^%(.%{22} %)%d%{8}' "%1$LNK" b) expr "${{v}}" :$v '^x%([0-9a-fA-F]%{1,}%)$' && goend expr "$ZO" :ZO '^@0%{8} ' = "@$ZI " || { catv ZO /%n; continue; } expr "$darst" :: '^[123]$' && { expr "$Z" :: "$1" && z=0 let ++N ;; expr "$Z" :: '^@:.' || { seek $sk 0; break; } expr "$Z" :Z ' 0$' = " $T" || print -u2 "%t!subst: $Z" expr "$Z" :Z ' %d%{6} ' = " $adr " || expr "$Z" :Z ' ' = '!' expr "$Z" :Z ' 000 ' = " $pbn " && let ++n expr "$ZI" :ZI '^D%d%d%(%d%{8}%)' || print -u2 "»$ZI«" expr "$flags" :: '#' && goend expr "$max" :max '^0x%([0-9a-fA-F]%{1,}%)' expr "$min" :min '^0x%([0-9a-fA-F]%{1,}%)' expr "$name" :idname ']%..%{1,}$' = ']' expr "$name" :idname '^%(.*[^.]%)%.[^.]%{1,}$' expr "$z" :: '^%$' && { catv z /%n; break; } expr "$z" :: '^:..' && { expr "$z" :lnk ' %(%d%{8}%) ' expr "$z" :z '^%(.%{18} %)%d%d%d ' "%1$grp " || expr "$z" :z '^%([@x]%)%d%{8} ' "%1$id " && { expr "$D" :D "'" += "''" expr "$Z" :D "$RA"'de %{1,3}"%([^"]%{1,}%)"' || Err de expr "$Z" :E "$RA"'en %{1,3}"%([^"]%{1,}%)"' || continue expr "$Z" :R "$RA"'ru %{1,3}"%([^"]%{1,}%)"' || Err ru expr "$W" :: '^T_[0-9a-z_]%{2,}$' || continue expr "$W" :: '^T_e_' && continue expr "$Z" :: " $RA_D"'[a-z][a-z] 0$' && { expr "$Z" :: '^.'"$id " && { expr "$Z" :: '^@:.' || { seek $sk 0; break; } expr "$Z" :D ' %('"$RA_D$LL"'%) "[^"]*"$' || { catv Z /%n; continue; } expr "$Z" :T " ${RA_D}en"' %("[^"]*"%)$' && { expr "$Z" :Tb '%[]= %(".%{1,}%);$' || echo $i:$Ta expr "$Z" :Z '"[^"]*"$' = "$T" || print -u2 "%t!subst: $D" expr "$Z" :Z 'Batt%.%(%w%{1,}%)%(%[[^]]%{1,}]%)' + 'Batt.B%2.%1' && m=1 expr "$Z" :Z 'Batt%.i1%[' += 'Batt.i[' && m=1 expr "$Z" :Z 'LANGX_%u%u' = "LANGX_$LL" expr "$Z" :Z 'LANGi_%u%u.*$' = "LANGi_$LLs '$C'" expr "$Z" :Z '^[^"]%{1,} %(".*%)"[ %t]*$' && len=${#Z} expr "$Z" :id '%(%d%{8,}%)' expr "$Z" :id '_id %(%d%{4}%)$' expr "$Z2" :T '%("[^"]%{1,}"%)$' || { catv Z /%n; continue; } expr "$Z2" :c2 '"\...%(.%)' || continue expr "$ZR" :S5 ' %("[^"]%{16%}"%)' expr "$ZR" :ZR ' "[^"]%{16%}"' = ' ' expr "$ZS" :: ' "[^"]%{16%}",' || continue expr "$ZS" :: '^ *//' && continue expr "$ZS" :: '^ *}; *$' && break expr "$ZS" :S4 ' %("[^"]%{16%}"%)' expr "$ZS" :Tnam ' %(T_%w%{1,}%) *= *{' || continue expr "$ZS" :ZS ' "[^"]%{16%}"' = ' ' expr "$Zq" :: '_%d%d%d_no "' && f=1 break expr "$cmd" :: '^[0-9][0-9]*$' || continue expr "$cmd" :: '^[a-zA-Z_0-9]%{2,15}$' || continue expr "$darst" :darst '%.%([0-9]%)' expr "$flags" :: '#' && goend expr "$flags" :: '&' && ptr= expr "$flags" :: '&' && ptr= expr "$flags" :: '1%.' && let "flg|=128" expr "$flags" :: 'Z' && let "flg|=1<<24" expr "$flags" :: '[sz]' && let autopad && pad=0 expr "$flags" :: '[sz]' && pad=0 expr "$flags" :: 'u4' && let "flg|=1<<19" expr "$flags" :: 'v' && ds=v name=0 expr "$flags" :: 'z' && let "flg|=32" expr "$flags" :ele 'A%(%d%{1,}%)' expr "$flags" :info2 '=%([1-9][0-9]%{0,2}%)' expr "$flags" :nelem 'S%([0-9]%{1,}%)' && { expr "$flags" :pad 'p%(%d%{1,}%)' expr "$flags" :pad 'p%([0-9]%{1,}%)' || { expr "$flags" :parbn '=%([1-9][0-9]%{0,2}%)' expr "$flags" :txtnum 'T%(%d%{1,3}%)' expr "$idname" :: '^[A-Za-z_]' || idname="$text" expr "$idname" :idname '[^A-Za-z_0-9]' += '_' expr "$idname" :idname '^%([^\]%{1,}%)\000' expr "$n2" :: '^0.' && conv -D0 n2 expr "$name" :idname '^%(.*[^.]%)%.[^.]%{1,}$' expr "$z" :: '^%$' && { catv z /%n; break; } expr "$z" :: '^:..' && { expr "$z" :: '^[@x]%d%{8} ' && { expr "$z" :ido '^[@x]%(%d%{8}%) ' && { expr "$z" :z '^%([@x]%)%d%{8} ' "%1$id " && { expr "$zeile" :zeile "$Wl$old$Wr" + "$new" expr "$zeile" :zeile "%%<$old%%>" + "$new" && is= expr "${{nam}" :$nam '##-%{0,1}[0-9]%{1,}' = "$sd" expr "${{nam}}" :$nam '#-%{0,1}[0-9]%{1,}' = "$sd" 0) expr "$Z" :: '^<h3.%{20,}>%d%{4}<' && z=1 ;; 1) expr "$Z" :: '^<p' && z=2 ;; 2) expr "$Z" :: '^</p' && z=0 goend expr "$Hbuf" =:: 'Connection %{1,3}aborted' || break expr "$Hbuf" =:: 'PASSWORD %{1,3}OK' || break expr "$Hbuf" =:: 'PASSWORD:' || break # expr "$zeile" :zeile "%%($nowd%%)$old%%($nowd%%)" + "%%1$new%%2" && is= # ifset is && expr "$zeile" :zeile "%%($nowd%%)$old%$" "%%1$new" && is= # ifset is && expr "$zeile" :zeile "^$old%%($nowd%%)" "$new%%1" && is= elif expr "$Z" :z ' "%(.*%)"$' else id=0 expr "$Z" :Z ' %(".*%)"[ %t]*$' && let "Nchar+=${#Z}" end=`grep -nm '^%$$' $FO` && expr "$end" :end '^%(%d%{1,}%):' expr " $* " :: "[ %t]${dnam}[ %t]" || continue expr " $* $Dnam " :: "[ %t]${dnam}[ %t]" || continue expr " $langs " :: " $l " && { catv Z$l /%n; continue; } expr "$I" :i 'id %([0-9]%{4}%)' || { print -u2 "'$I'"; break; } expr "$N" :n '^/[ 0-9*]%{10,12}/ %{1,3}%(%d%d%d%d%)' || { print -u2 "'$N'"; expr "$O" :: '^-' && s=- expr "$T" :t '"%([^"]*%)"' || { print -u2 "'$T'"; break; } expr "$Z" :: '^[%t ]*$' && { len=$len0; continue; } expr "$Z" :: "$muster" || { catv Z /%j; continue; } expr "$Z" :: ' "\[0-9]%{3}[a-z?A-Z]' || { catv Z /%r%n; continue; } expr "$Z" :: ' 0%{1,}[ %t]*$' || expr "$Z" :: ' <td[> ].%{1,}</td>$' || continue expr "$Z" :: ' LANGX_%u%u%>' && { expr "$Z" :: '</tr>' && break expr "$Z" :: '<h%d>Eventlist</h%d>' && break expr "$Z" :: 'D_%w%{1,}_%d%d%d_%l%l' || continue expr "$Z" :: '^ *$' && Len=$LEN expr "$Z" :: '^#define D%d%{10}grp ' && { expr "$Z" :: '^#define D_%w%{2,24}_%d%d%d_%l%l ".*"$' || { expr "$Z" :: '^%$' && break expr "$Z" :: '^@%d' || continue expr "$Z" :: '^@[0-9]' || { catv Z /%n; continue; } expr "$Z" :: '^[@a-z;.,][0-9]' || continue expr "$Z" :: '^[@a-z;.,][0-9]' || { catv Z /%n; continue; } expr "$Z" :: '^[@x][0-9]' || { catv Z /%n; continue; } expr "$Z" :: '_%d%d%d_no "' || { catv Z /%n; continue; } expr "$Z" :: 'const struct cfgdata_t FAR '"$2"'data%[]= {' && { expr "$Z" :D ' %('"$RA_D"'en%) ' || continue expr "$Z" :D ' %('"$RA_D$LL"'%) ' || continue expr "$Z" :LEN '^//|%(%d%d%)|' && Len=$LEN expr "$Z" :LLs ' LANGi_%(%u%u%)%>' && { expr "$Z" :Len '^//%(%d%d%)' expr "$Z" :T '%("[^"]%{1,}"%)$' || continue expr "$Z" :Ta ' %(const BYTE FAR T[0-9]%{10}%[]%)= ' && { expr "$Z" :Ta '^ %{1,}{ D.%{1,}%( D%d%{10}Text %)' && { expr "$Z" :Ta '^%(#define D%d%{10}Text %{1,}%)' && { expr "$Z" :Z "$muster" = "$subst" && let "start+=inc" expr "$Z" :Z ' %d%{6} ' = " $Adr " expr "$Z" :Z '"' += '"' expr "$Z" :Z ', ..,' = ", $nn," expr "$Z" :Z '<' += '<' expr "$Z" :Z '^%(@:English,Deutsch,%).*$' '%1'"$Lang" expr "$Z" :Z '^[^"]%{1,} %(".*%)"[ %t]*$'; len=${#Z} expr "$Z" :adr '^[@x-]%d%{8,10} %d %(%d%{6}%) ' || continue expr "$Z" :c '"\...%(.%)' expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *%d%{1,5}, *"' || { expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *["0-9]' || continue expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *["0]' || continue expr "$Z" :ddd ' D_%w%{1,}_%(%d%d%d%)_%l%l *%d%{1,5}, *"' expr "$Z" :flags ' %(p%d%{1,}A%d%{1,}%)st2T' && { expr "$Z" :id ' D_%w%{1,}_%d%d%d_%l%l *%(%d%{1,5}%), *"' expr "$Z" :id ' D_%w%{1,}_%d%d%d_id *%(%d%{1,6}%)' || continue expr "$Z" :id '^#define D_%w%{2,24}_%d%d%d_id %(%d%{4}%)$' && continue expr "$Z" :id '^@%(%d%{8,10}%) %d' || continue expr "$Z" :lc '^%(.%{1,}\%)%([.A-Za-z_0-9-]%{1,}%.%)%([A-Z_0-9]%{1,}%)$' + expr "$Z" :len '^//%(%d%{1,}%)' && continue expr "$Z" :len0 '^//|%(%d%{1,}%)|' && { len=$len0; continue; } expr "$Z" :ll ' D_%w%{1,}_%d%d%d_%(%l%l%) *%d%{1,5}, *"' expr "$Z" :n '/*%(..%)*/' expr "$Z" :nam '^#define D_%(%w%{2,24}%)_%d%d%d_id %d%{4}$' &| expr "$Z" :text '^[^"]%{1,} %(".*"%)[ %t]*$' expr "$Z" :z '^#define D_%w%{2,24}_%d%d%d_'"$Lang"' %(".*"%)$' && { expr "$Z0" :lm '^//%([^ %t]%{1,}%)' && let "len-=${#lm}" expr "$Z2" :T2 '%("[^"]%{1,}"%)$' || continue expr "$cc" :: "$c" || cc="$cc$c" fst="$fst $c=$n" expr "$danam" :dnam '^%(D_%w%{1,}%)_%d%d%d_%l%l$' expr "$darst" :darst '%.%([0-9]%)' expr "$flags" :: '1.' && let "flg|=128" expr "$flags" :: 'B[AS][0-9]' && let "flg|=256" expr "$flags" :: '[sz]' && pad=0 expr "$flags" :: 'a' && let "flg|=2" expr "$flags" :arr '[AS]%(%d%{1,4}%)' || arr=1 expr "$flags" :nelem 'S%([0-9]%{1,}%)' expr "$flags" :nelem 'S%([0-9]%{1,}%)' && { expr "$flags" :pad 'p%([0-9]%{1,}%)' || { expr "$flags" :padd 'p%(%d%{1,5}%)' || padd=0 expr "$id" :: '^%$' && break expr "$id" :: '^%...*' && { expr "$id" :: '^%...*' && { continue; } expr "$id" :: '^[:.]..*' && continue; expr "$id" :: '^[@x-]%d%{8,10}$' || continue expr "$id" :: '^{#$' && { expr "$id" :: '^}$' && { expr "$id" :id '^@%([0-9]%{1,}%)' && { expr "$idname" :: '^[A-Za-z_]' || idname="$text" expr "$idname" :idname '[^A-Za-z_0-9]' += '_' expr "$idname" :idname '^%([^\]%{1,}%)\000' expr "$lc" :name '[\/]%([^\/]%{1,}%)$' || break expr "$sz" :: '^-' && continue expr "$tanam" :tnam '^%(T_%w%{1,}%)_%d%d%d_%l%l$' expr "$z" :: '^%$' && break expr "$z" :: '^:..' && break expr "$z" :: '^[@x]%d%{8} ' && let ++NGE expr "$z" :: '^[@x]%d' || continue expr "$z" :z ' %(%d%{8}%) ' || continue expr "${{a}}" :: "$RA" || continue expr "${{a}}" :: '[^0-9]' && n= if expr "$Z" :a '[AS]%(%d%{1,}%)' if expr "$Z" :id ' D_%w%{1,}_%d%d%d_id *%(%d%{1,6}%)' if expr "$Z" :id '_id %(%d%{4}%)$' if expr "$flags" :padf 'p%([0-9]%{1,}%)' ifset base && expr "$a1" :: '^@[^:]' || continue readl Z && expr "$Z" :e '%([0-9]%{1,6}%):' && z=0 while expr "${{nam}" :sd '##%(-%{0,1}[0-9]%{1,}%)' expr "$Z" :Z '^ %{1,}%(.*%)$' l) expr "$opt" :: '^[1-9][0-9]*$' || continue o) expr "$opt" :: '^[a-zA-Z_0-9/\]%{1,}$' || continue [ l -lt 2 ] && expr "$Z" :ll '_%d%d%d_%(%l%l%)%>' && { do expr "$Z" :: '^ *</body%>' && break; catv Z /%n; done do expr "$Z" :: '^ *<body%>' && break; done expr "$F" =:: '^mb.*%.h$' && continue expr "$F" =:: '^t' && continue expr "$FILE" :: '%<cfgbase.txt%>' && typ=base expr "$FILE" :: '%<mesbase.txt%>' && typ=base expr "$FILE" :: '%<txtbase.h%>' && typ=text expr "$N" :: ' EventNo%[[^][]%{1,}]=' && break expr "$N" :n '^/[ 0-9*]/ %{1,3}%(%d%d%d%d%)' && print -u2 "'$n' unerwartet" expr "$Z" :: '%<D_%w%{1,}_%d%d%d_%l%l%>' || { expr "$Z" :: '^:..*' && { expr "$Z" :: '^[@a-z][0-9]%{3,16}' && { expr "$Z" :: '_%d%d%d_'"$LL"'%>' && catv Z /%n expr "$Z" :: '_%d%d%d_[ed][ne]%>' && { expr "$Z" :DZ '^%( *# *define *[Dd]_%w%{1,}_%d%d%d_%l%l *%)["0-9]' || { expr "$Z" :Z ' %(D_[0-9a-z_]%{2,}%)_%d%d%d_en ' || continue expr "$Z" :danam ' %(D_%w%{1,}_%d%d%d_%l%l%) *"[^"]*" *$' || { expr "$Z" :hex '^RD=%([ 0-9A-Fa-f]%{3,}%)::%d%{1,10} ms.%{0,2}$' || { expr "$Z" :ms '^RD=[ 0-9A-Fa-f]%{3,}::%(%d%{1,10}%) ms.%{0,2}$' expr "$Z" :t1 ' D_%(%w%{1,}%)_%d%d%d_en ' || continue expr "$Z" :t2 ' D_%w%{1,}_%(%d%d%d%)_en ' expr "$Z" :text '%( *"[^"]*"%) *$' || text=0 expr "$Z" :txt ' %(%w%{1,}%) *: *%d' || continue expr "$Z16" :: '[89abcdef][0-9a-f]' || { catv Z /%n; continue; } expr "$ZNAM" :title '^_%(upc3_.%{1,}%)$' || continue expr "$danam" :dnanu '^%(D_%w%{1,}_%d%d%d_%)%l%l$' expr "$danam" :lang '^D_%w%{1,}_%d%d%d_%(%l%l%)$' expr "$file" =:: '[Mm][Bb][0-9]%{2,%}%.[Hh]$' && continue expr "$id" :: '^%$' && break expr "$id" :: '^:..*' && { expr "$id" :: '^{#$' && { expr "$id" :: '^}$' && { expr "$id" :id '^@%([0-9]%{1,}%)' && { expr "$id" :id '^[@a-z;,.]%(%d%{8}%)$' || continue expr "$ok" :: '^@[0-9]:OK'"$RN" || return 1 expr "$ok" :: '^@[0-9]:READY'"$RN" || return 1 expr "$t2" :t2 '^0%{1,2}' = '' expr "$title0" :: '^%.%.%.' || { expr "$z" :Stxt ' "%([^"]%{1,50}%)"' || { print -u2 "Stxt"; exit 5; } expr "$z" :l '^%(%d%{1,5}%):' || { print -u2 "line:"; exit 4; } expr "$z" :tid ' { %d%{4}, %(%d%{4}%), %d }' || { print -u2 tid; exit 3; } if expr "$dp" :: '^:$' expr "$Z" :: '^//' || break expr "$Z" :: '^//-%{50,}' && { expr "$Z" :Z '^//%(.*%)$' expr "$Z" :b '^//--> %{1,}%([0-9, ]%{1,}%)' && { B$n="$b"; continue; } expr "$Z" :v '^//--> %{1,}V[^0-9]%{2,}%([0-9.]%{1,}%)' && { V$n="$v"; conti if expr "$Z" :: '^[^ ]' # expr "$Z" :: '%<T_%w%{1,}_%d%d%d_%l%l%>' || { # expr "$Z" :: '_[ed][ne]%>' && { # expr "$Z" :ll '_%d%d%d_%(%l%l%>%)' && { # expr "$Z" :lc '^%(.%{1,}\[^\/]%{1,}%.%)%([A-Z_0-9]%{1,}%)$' + '%1%L%2' || # expr "$lc" :name '[\/]%([^\/]%{1,}%)$' || break expr "$Z" :Z 'LANGX_%u%u' = "LANGX_$LL" expr "$Z" :Z 'LANGi_%u%u.*$' = "LANGi_$LLs '$C'" expr "$Z" :: ' LANGX_%u%u%>' && { expr "$Z" :LLs ' LANGi_%(%u%u%)%>' && { expr "$Z" :Z '^%(@:English,Deutsch,%).*$' '%1'"$Lang" [ l -lt 2 ] && expr "$Z" :ll '_%d%d%d_%(%l%l%)%>' && { expr "$Z" :: '%<D_%w%{1,}_%d%d%d_%l%l%>' || { expr "$Z" :: '_%d%d%d_'"$LL"'%>' && catv Z /%n expr "$Z" :: '_%d%d%d_[ed][ne]%>' && { expr "$LL" :: '^%l%l$' || { print -u2 "LL='$LL'"; exit 2; } expr "$Lang" :Lang 'LANG_%u%u *, *"%([^"]%{3,}%)"' expr "$PWD" :PD '/%([^/]%{1,}%)$' [ -t 0 ] &| expr "$1" :: '[^0-9-]' && { do expr "$Z" :: 'BUILDs' && break; done catv 140,Z /%j catv Such /%n catv Z /%j catv c,1,$s [ n -ge nf ] && { catv feld /%n; continue; } catv Z /%r%n catv f '/)%n' catv sps catv zeile /%r%n >> sym.scr ifset Z || { catv /%n; continue; } let ++i; catv /%n =4; catv Z /%n =3; continue then [ fst -eq 0 ] && { fst=1; catv 140,z0 /%j; } ) catv '/' =$o,,Line ; let o+=6 ; continue ;; bsh -p -c '...; catv Z' ... bsh -p -c '...; catv Z' | ... catv =48,,V catv /%0 =49,,1 >datei catv 0,0 =50,,V catv 0,isda =50,,V catv isnichda =50,,V catv =F <bsh.c #7700 Zeilen ifset Des || catv W =:,,Des ;; catv Z /%r%n =o,,Ziel catv hr /%n >> from.txt ifset Des || catv W =:,,Des ;; catv "/#@D$g " zeile /%n >> $Script catv $len,Hbuf =$adr,,3 catv Z /%n >> "$Tmp" catv Z =$((n*[20+75+2+520+520+2]+20+75)),,3 catv $o,,Z /%n =$OFFS,,KODE catv '.%l%' LANG /%n datei ; catv 8,0 ; 1&0 ; echo AAAAA ; datei ; catv 8,0 ; print -u0 AAAAA ; catv 1,2,nam =nam: catv Hbuf =$(([nam-1]*3)),3,TblFolge let "flg&&!(flg&4)" && catv "/Comments: %j" let flg && catv "/Field-Text: %j%j" catv "/ " 4,,Zeile $j catv "/#@D$g " Such /%n >> $Script catv "/xmozillanickname: " name /%j >> $Ziel catv $offs,5,BasePos =offs: catv /%t 4,,Zeile $j catv 3,1,Such =g: catv 5,,Such =Such: catv Z /%r%n =$(([n-1]*[20+75+2+520+520+2])),,3 catv Z =$(([n-1]*[20+75+2+520+520+2]+20)),,3 catv Zeile /%n catv name /= mail /%j >> aaaa_bsh.tmp catv "/ " 4,,Zeile $j catv Zeile /%j >> $Script && continue catv hr /%n >> from.txt catv station /%t telnu "/%t %t %j" >> $1 catv station /%t telnu "/%t$okfa%t$dati%j" else catv '.\input{' INAME '/}%n' else o=0 catv '.%v%' then catv 3,,Z =Z: catv /$bvp.$((36#, anu))%t path /%j $ali catv /$bvp.$((36#, anu))%t path /%j >> $ali # do cmpv Zeile zeile && { catv Such /%n; break; } #let "na&8" || catv / =$offs,,3: Lock; catv $((znum*4000)),4000,3 =Data: 3<$dat V=V; catv Z /%n; continue catv "/$hm" mail "/ (" name "/)%j" >> $Ziel catv "/Name: " inp "/%jAddresses: " >> $Ziel; } catv "/Name: " name "/%jAddresses: " mail /%j >> $Ziel catv "/cn: " name /%j >> $Ziel catv "/dn: cn=" inp "/%jcn: " inp /%j >> $Ziel catv "/dn: cn=" name "/,mail=" mail /%j >> $Ziel catv "/mail: " mail /%j >> $Ziel catv "/member: cn=" name "/,mail=" mail /%j >> $Ziel catv "/objectclass: top%jobjectclass: groupOfNames%j" % catv "/objectclass: top%jobjectclass: person%j" >> $Ziel catv $((n*20)),20,CN =$((Gpos+g*260+n*26+4)),,0 catv $.,inp =File: catv '/%n%n' catv /$hm name >> vvvv_bsh.tmp ; hm=, catv /%j zeile =:,,Des && continue catv /. =$((i-1)),1,out catv /000%t000%t path /%j >> $isDir\savemiss.$2 catv 5,,Zeile =Zeile: catv Such /%n catv Z /%n; continue ;; catv inp /= >> vvvv_bsh.tmp; } catv mail h3nam /. name inp /%j catv name /= mail /%j >> aaaa_bsh.tmp else catv "/\index{$_ind}%n"; catv Z /%n expr "$ZO" :ZO '^@0%{8} ' = "@$ZI " || { catv ZO /%n; continue; } expr "$zeile" : '^%([^<%r]*%)' | catv "/ ^ " 0 =:,,Des ifset Z || { catv /\\%n; continue 2; } ifset b && catv A /%n =3 ifset c && catv A /%n B /%n =3 && continue ifset d && catv A /%n B /%n C /%n =3 && continue ifset d catv A /%n B /%n C /%n =3 continue ifset lnot &| catv Des /%j zeile /%j && Des='' ifset txt && { let ++nz; catv txt /%n =:,,$2; } let ++no; catv ZO /%n; continue 2 then catv Z /%n; catv "/\index{$_ind}%n" ") catv '/' =$o,,Line ; let o+=6 ; continue ;; &) catv '/' =$o,,Line ; let o+=5 ; continue ;; [ a -eq 0 ] && catv "/$3%t0000000%t$4%t$5%j" [!&<>"%|᎙.·]) catv 1,C =$o,,Line ; let o+=1 catv ".<input name=%"$name%" type=%"PASSWORD%" value=%"$Hbuf%"" % catv ".<textarea name=%"$name%" cols=%"$len%" rows=%"$max%"" % catv "/#@" a ". $2" /%j >> $Script catv $.,Ibuf =Hbuf: catv '/[' Hbuf '/]' catv ipw | extern ./mailcode -dns -c "$MC64" | catv 0 =ipw: catv station /%t telnu "/%t %t %j" expr Z xv:W '^T_([0-9a-z_]{4})' && catv W /%n ·) catv '/' =$o,,Line ; let o+=8 ; continue ;; %|) catv '/' =$o,,Line ; let o+=8 ; continue ;; catv $ilen,Ibuf /%j catv Hbuf /%j expr " $* " :: "[ %t]${s}[ %t]" && r=0 catv id /%n expr "$3" :: "$t" && r=0 catv id /%n expr "$5" :: "$t" && let "$a" && r=0 catv id /%n let "$a" && r=0 catv id /%n 60) catv /0p RAND | mailcode -en -c "$MC64" | catv 0 =inh: ;; Name) let "flg&&!(flg&2)" && catv "/Addresses: %j" V=V catv Z /%n; continue [ nchar -gt len ] && catv ".$nl »" z .« /len=$nchar%j catv "/$kz $ch.$2%n" catv "/Comments: " 68,Des /%j >> $Ziel catv "/description: " 65,Des /%j >> $Ziel catv $((Gpos+g*260+n*26+4)),20,0 =$((n*20)),,CN catv $.,File =Zeile: catv $.,Ibuf =Hbuf: catv $Cols,Z /%j catv $Dpos,,0 < $Script | { catv $len,val =val: catv '/(' hbuf '/)%j' catv /"$((n+1)) " $((Gpos+g*260+n*26+4)),20,0 % catv 1,inp =c catv 2,,Z =0:,,liste catv 3,1,zeile =g: catv 5,,zeile =zeile: catv 95,null /%n catv HTMtelvf2 >> $Fmueehtm catv Hbuf /%j catv Z /%n; continue catv alinam /%t path /%j $alinew ; continue; } catv buf /%r%n catv buf =$o,,Line && let "o+=${#buf}" && continue catv c /%n =:,,CHAP: catv g =$g,1,Gsel catv liste =null catv sp oz /%j catv z /%n cmpv $1 zeile && catv g =$g,1,grp do catv path /%j $chdel do catv path /%j >> $chdel do let "inp+=76"; catv "/ " name /%j >> $Ziel; done echo $th | base -10 +b | catv =$((i-1)),1,out expr "$z" :: '^%$' && { catv z /%n; break; } ifset Z || { catv /\\%n; continue 2; } let chl && catv Zeile /%j >> $Plist let chl && catv Zeile /%j >> url_tmpf.inf let o==1 && catv /J =0,,Ln ;; while catv $inp,76,Des =name: while readl -u4 Zeile; do catv Zeile /%j >> $Plist; done z=3 t=1; catv 2,ch =kz:; catv 2,,ch =ch: [ $# -eq 0 ] && catv 0 =4 `mtime $file | base -10 +8`" " " " | catv =inp: catv $((l+3)),,Zeile =$3: catv $.,Ibuf =Hbuf: catv $offs,32,0 =Hbuf catv '/[' Hbuf '/]' catv /%t =tab: catv 1,Ibuf catv Buf datei catv Buf >datei catv Hbuf | extern ./mailcode -en -c "$MC64" | catv 0 =Hbuf: catv htmlE catv 5000,0 =Hbuf: < $Ddb/$Fali catv Line /%j $changed catv Line /%j >> $changed MkRgb && a=F catv ".\textcolor[rgb]{$R,$G,$B}{" Z2="$(-grep -m1 " $D "'"[^"]%{1,}"$' "$Src")" || { catv Z /%n; continue; } [ "$1" == '?' ] && { catv /%t n '.: ' Z /%j; continue; } [ "$zv" == ' ' ] && catv buf /%r%n [ $. -gt 0 ] && catv '/((' $.,Ibuf '/))%j' [ $r != 000 ] && catv f =$((20*[n-1])),20,CN [ $r != 000 ] && catv fnam =f [ ${#oz} -eq 44 ] && { catv sp oz /%j; oz=''; continue 2; } [ -f $ziel ] && catv /S.$((36#, anu))%t Line /%j >> $ali [ -f $ziel ] catv /S.$((36#, anu))%t Line /%j $ali [ Q -eq 0 ] && catv $Cols,Z /%j [ Q -eq 0 ] && catv Z /%j [ SW -eq 0 ] && MkRgb && a=F catv ".\textcolor[rgb]{$R,$G,$B}{" [ SW -eq 0 ] && { MkRgb; catv ".\colorbox[rgb]{$R,$G,$B}{"; } [ dali -gt dali0 -a w -eq 0 ] && w=1 catv dali0 ". $3" /%n [ id -ne 50 ] && { catv id '. ' inh /%r%n; continue; } base -W +w < C:\MUEE | catv 2048,0 =5000,2048,3 3<> C:\DATA.MUC catv ".$nl »" Z .« '/defektes Format%j'; continue catv ".${st}$ip" /%n catv ".\colorbox[rgb]{$R,$G,$B}{" catv ".\textbf{" catv ".\textcolor[rgb]{$R,$G,$B}{" catv "/+new " Zeile /%j >> hpm_tmpf.inf catv "/-lign " Zeile /%j >> hpm_tmpf.inf catv "/-remote_only " Zeile /%j >> hpm_tmpf.inf catv "/.size=$((lsiz-rsiz)) " Zeile /%j >> hpm_tmpf.inf catv "/:size=$((lsiz-rsiz)),time=$((lsec-rsec)) " Zeile /%j % catv "/<rem_newer:size=$((rsiz-lsiz)),time=$((rsec-lsec)) " % catv "/>time=$((lsec-rsec)) " Zeile /%j >> hpm_tmpf.inf catv "/\verb: :" catv "/quote MDTM " File /%j =3 catv $((n*20)),20,CN =$((Gpos+g*260+n*26+4)),,0 catv $Dpos,,0 < $Script | { catv $L_c /%s Hbuf /%s ; L_c='/,%n' catv $len,$fd | base -$typ +10; continue; } catv $len,$fd | tr '[\0-\31] ' '[\254*32]\250' catv $o,2,Zeile | base -31 +b catv '. extern ' Ta '.; //' Tb /%n =3 catv '/ {' Ta '/},%n' =4 catv '/%n%n%nconst struct cfgdataT_t FAR '"$2"'dataT[]= {%n' =4 catv '/\ \ \ ' #"/\verb: :" catv '/}' catv ."\item [\B{$num}] \texttt{" Z /'}%n' catv .'\item[\B{' pbn .'}]\makebox[\wofmu][r]{\Pl{' mu .'}}' % catv .'\item[\Pl{' qual .'}]\makebox[\wofid][r]{' id .'}\hspace{1em}' Z /'% catv .'\texttt{' Z /'}\\%n' catv /"0 0 ?" Dir //%j =3 catv /%j $isDir\istep.gol catv /%j >> $isDir\istep.gol catv /%t a$aa catv /\\%n catv 0 =ip: < /tmp/wanip catv 0,1,C >> texts.h catv 0,2,Zeile /" " 2,2,Zeile /" " % catv 1,typ 1,darst catv 16,,Zeile =Zeile: catv 19,null /%n catv 4,0 =newcnt: < $datf catv 44,,oz =:rz catv 5,,Zeile /%n ; let ++n ++nn catv 8,,Zeile =Zeile: catv 80,Z /%j catv Gsel =$GWpos,10,0 <> $Script catv HTMtelvf1 > $Ftelvfhtm catv Hbuf '/: FAIL message%n' >> $adir/fail catv Line /%j $OutFile catv Line /%j >> $OutFile catv RGB =$((6*[n-1])),6,Hex catv Ta "/&$2dataT[$i]%n" =3 catv W /%n catv Z ". $3" /%n catv Z "/ $3" /%n catv Z /%n catv Z /%n =4 catv ai '/ ' inh /%r%n >> $D/$g/$a/i catv buf /%r%n catv ctim '. ' cttim > $dir/conn catv dali ". " bez /%n catv einheit =null catv gid '. ' aid '. ' $tnam '. ' day '. ' try /%n catv id '/ ' Hbuf /%r%n catv id '/ 0%r%n' catv id /%t z /%j catv ip =$col,,Ip catv nam "/='" $nam "/'%n" catv nam /= inh /%r%n $zv catv name /%t mail /%j catv newcnt > $cntf catv qual .' ' Oid .' ' OText /%n =:,,BUFqual catv sps oz /%n catv zeile /%j catv zeile /%n catv zeile /%n >> from_tmp chl=0; catv Zeile /%j >> $Plist do catv 4,val =$((o<<2)),4,Data; done do catv Line /%n; done do catv Line /%r%n; done expr "$Z" :D ' %('"$RA_D$LL"'%) "[^"]*"$' || { catv Z /%n; continue; } expr "$Z" :n '%([0-9]%{1,}%)' || { catv Z /%n; continue; } expr "$Z2" :T '%("[^"]%{1,}"%)$' || { catv Z /%n; continue; } expr "$buf" :: "^$gid $aid " || { catv buf /%n; continue; } expr "$buf" :: "^$nam=" || { catv buf /%n; continue; } expr "$z" :: '^%$' && { catv z /%n; break; } from=2 catv zeile /%n >> from_fn grep -Fmq -e "$Line" $alt || catv Line /%j >> $deleted grep -Fmq -e $Line $alt catv Line /%j $deleted ifset Des || catv zeile /%j ifset Hbuf && { catv Hbuf /%j ; continue; } ifset aline && catv '/;' 1,,aline >> $changed ifset aline catv '/;' 1,,aline $changed ifset oz && { catv sp oz /%j; oz=''; } ifset txt && { let ++nz; catv txt /%n =:,,$2; } let "n!=$2" && { catv Z /%n; continue; } let "nz>8" && catv ." $3_$4 " =:,,OTP$1 let "o>=512" && catv $o,Line && print -u2 .%c && o=0 let wrn && catv Zeile =$Pos,,0. while catv $((++ci)),1,buf =C: "$h13 $h14 $h15 $h16" | base -16 +b | catv =out: #base -W +w < $MUdir/eepr | catv 2048,0 =5000,2048,3 3<> C:\DATA.MUC ((y=[newzn+1]*4000-1, x<=y)) && catv /%0 =$y,1,3 3<>$dat B) catv ".\colorbox[rgb]{$1,$2,$3}{"; shift 3 ;; F) catv ".\textcolor[rgb]{$1,$2,$3}{"; shift 3 ;; J) catv /J =$o,,Ln N) catv /N =$o,,Ln ;; [ $f == 0 ] && catv "/#@" a ". $2" /%j >> $Script [ -d $file ] && catv /5 =156,1,inp `mtime $file | base -10 +8`" " " " | catv =inp: b) catv '.\textbf{' ;; base -10 +b | catv =$((446+o+1)),3,3 base -W +w < C:\MUEE | catv 2048,0 =5000,2048,3 3<> C:\DATA.MUC bi) catv 1,1,d =d: ; catv 1,1,p =p: catv "/rmdir " 1,,Zeile /%j >> $FtpInp; let ++dt catv $(( 960<<1)),2,0 =ring: < C:\MUEE catv $.,Ibuf catv $.,Ibuf =Hbuf: catv $Cpos,,0 < $Script | { catv ."$newzn $time K*$kenn1*KN*$name*NS*$strasse*S" % catv /INSTANCE_NAME: INN '. ' C '. ' U /%n Z /%n%n catv 0,2,Ibuf =ring: catv 1,Ibuf /%j catv 1500,Ibuf catv 2,cksum =cksum: catv 2,ring =ring: catv 2048,0 =Hbuf < $MUdir/eepr catv 2048,2,Ibuf =ring: catv 2048,Ibuf > ../tmp/eeprin catv 4,2,dt =mon: catv 548,2,Hbuf =ring: catv 548,Hbuf catv 6,2,dt /. $(([mon-1]*3)),3,Mon /. 0,4,dt "/, " % catv Hbuf catv inp =3 catv url1 /%n url2 /%n url3 /%n > $urltxt f) catv ".\textcolor[rgb]{$1,$2,$3}{"; shift 3 ;; prints s6sF0002- $((8#, s)) " " | catv =148,8,inp t) catv $((++ato)),,ats =ats: then catv File /%n | read ed - *) catv Thtml html1 htmlF htmlE ;; #600 catv 103,3,inp =s: #base -W +w < $Fmueebin | catv 2048,0 =5000,2048,3 3<> $Fmueemuc DIR $df grep -L '[0-9]' catv =byte: DIR $df | grep -L '[0-9]' | catv =byte: catv Hbuf Sbuf Kesa1 [ "$k" == R ] && { catv '.}'; return 0; } [ "$zv" == 000 ] && catv '/[' rub '/]%r%n' nam /= inh /%r%n [ $z == I ] && { catv '.\input{' INAME '/}%n'; PutKode; } [ ${#oz} -eq 44 ] && { catv sps oz /%n;oz=''; continue 2; } [ ${#s} -le 1 ] && { catv $2,C /%n; break; } [ -s $cntf ] && catv 10,0 =oldcnt: < $cntf [ -s $dir/conn ] && catv 10,3 =btim: 3< $dir/conn [ -s $secf ] && catv 3,0 =sec: < $secf [ ow -eq 1 ] && catv Z =$sk,,0. [ size -gt offs ] && catv $offs,$((size-offs)),0 < /tmp/wanout [ w -eq 0 ] && catv dali0 ". $3" /%n [ z0 -eq 1 ] && catv Z0 /%n base -W +w < $Fmueebin | catv 2048,0 =5000,2048,3 3<> $Fmueemuc base -W +w < C:\MUEE | catv 2048,0 =5000,2048,3 3<> C:\DATA.MUC catv ".$3" nam inh ".$4" /%n catv ".${MUstation}------" catv ".FOR: $File" /%j % catv "/Content-type: text/html%n%n" HTM catv "/\verb: :" catv "/d${d}_$n=%"" catv $((!!(s&8#400)*1)),1,S $((!!(s&8#200)*2)),1,S % catv $((++ato)),1,ats =c: catv $((8+[J0-2000]*13*4+M0*4)),4,0 =iv: || catv / 4,,iv: catv $((m<<2)),4,Mon =M: catv $((o*4000)),4,3 =4,cnt: || continue catv $((o-510)),4,$1 =jmp3 catv $((zn1*10)),10,0 =o: catv $(({Start+[cl-2]*64}*512)),$sz,3 > "$n" || break catv $.,File =url: catv $.,Ibuf =Hbuf: catv $.,Ibuf | base -b +10 catv $O,Obuf | base -b +10 catv $adr,$len,3 =Nn: 3<> $feepr catv $blen,Hbuf =$adr,,3 catv $f,,Path =Dir: catv $hex,6,Hex =hex: catv $mdsk,2061,0 =Ibuf < $1 catv $nrw,Ibuf catv $o,$n,ibuf =buf: catv $o,${#boundary},0 =Hbuf: catv $o,,0 catv $o,4,0 =iv catv $o,99,0 =nam: catv $o0,$((o-o0)),0 catv $s,0 > $file catv './/' lm $len,Lz '.|' $Len,Lz '.|' =Z0: catv '.<a class="elf" href="/cgi/muee.cgi?eerf.' n "..$1" % catv '.<table height="9%" align="CENTER" border="0"' % catv '/ 4 E ' /_ zeile /%n catv '/#define ' dnanu0 l text /%n catv '/);%n' catv '/<<%n' catv '/>>' catv '/[' Hbuf '/]' catv '/\begin{flushleft}%n\begin{ttfamily}%n' catv '/\end{ttfamily}%n\end{flushleft}%n' catv '/var SigSrc= Array(%n' catv ,. catv ,.; len=$.; catv ."$znum $tm K*$kenn1*KN*$name*NS*$strasse*S" % catv .'\Pl{Auswahlwerte}&\multicolumn{5}{|c|}{' Oinfo .'}\\' /%n catv .'\Pl{Bit\,Info}&\multicolumn{5}{|c|}{\T{' OTbit .'}}\\' /%n catv .'\Pl{Default}&\Pl{Min}&\Pl{Max}&\Pl{Einheit}&\Pl{Bits}&\Pl{Bit\,Pos}\ catv .'\Pl{Info\,Text}&\multicolumn{5}{|c|}{\T{' OTinfo .'}}\\' /%n catv .'\Pl{Subgruppe}&\multicolumn{5}{|c|}{' OTsgrp .'}\\' /%n catv .'\cline{1-1}' /%n catv .'\hline' /%n catv .'\multicolumn{3}{|c|}{' Odfstr .'}&' Oeinh .'&' Onbit .'&' Obitpos /' catv .'\multicolumn{3}{|c|}{\Pl{Default}}&\Pl{Einheit}&\Pl{Bits}&\Pl{Bit\,P catv .FAIL =msg catv / =-1:,,Z: catv /%n catv />> $Line %j $isDir\istep.log catv /' |' url1 /'|%n' =:,,SATZ catv /++ $.,Ibuf /--%n catv /,%%$xpos%0%%$rahm%0%1%0%%$height%0%0 =:,,Z catv /- =$sk,1,0. catv /r =$r,,0 <>$D/$f catv 0 =n: < $Fmuee catv 0 > $arch catv 0,2,Ibuf =ask: catv 0,2048,Ibuf > $adir/eepr catv 0,3072,DAT catv 0,4,C >> texts.h catv 1,3,nam "/ " Hbuf RN catv 1,Zeile =fst: catv 1,Zeile =st: catv 1,dp $Ilen,Ibuf =Ibuf catv 1,rek =k: catv 1,spez =c catv 100,inp | tr -d \0 catv 103,3,inp =s: catv 2048,13,Ibuf =Hbuf: catv 32,32,buf =buf && catv 4,,Zeile =Zeile: catv 4,iv =$((8+[J0-2000]*13*4+M0*4)),4,0 catv 44,,oz =:rz catv 44,oz =:oz catv 47,,0 =Z: < $d/$n.gif catv 48,2,Hbuf =c: catv 48,Hbuf /%r%n catv =url: catv BUF >> ../../tmp/$1 catv HTM > $deroot/self.htm catv HTM1 Hbuf catv Hbuf3 Hbuf1 SATZ endEMAIL | catv L_offs =$L_n,6,BasePos catv Odf .'&' Omi .'&' Oma .'&' Oeinh .'&' Onbit .'&' Obitpos '/\\%n' catv TXT3 0 <$CO | { catv Z /%n =3 catv Z /%n =:,,HTMLa: catv Z /%n >>$kunloe catv Z /%n; return 0 catv Z /%r%n catv Z =$sk,,0. catv Zeile /%j >> $Plist catv Zeile /%n | read - - - - size mon day yt - catv asm2 >> $Tmpf1 catv b =$((a*3-3)),3,iv catv data =$O,,Obuf catv g =$g,1,Gsel catv gid '. ' aid '. ' ctim '. ' day '. 0' /%n catv headEMAIL textEMAIL | catv html catv htmlF html3 htmlE catv htmlRO catv id /%n =ADR,,RIDLNK catv id bl =$O,,Obuf catv id bl data =$O,,Obuf catv iv =$o,4,0 catv l$n '/ ' =2 catv nam "/='" $nam "/'%n" =:,,obuf: catv o,1,s =N,1,C catv o,2,$1 =magic2 || break catv p d '. ' nk,k ok,,b "$e" catv pid /%n | read - pid - catv size /" " sec "/$ign*" File "/*" /%j =3 catv t =$i,1,ArgTyp catv teltxt /%j >> "$Fteltxt" catv url1 /%n url2 /%n url3 /%n > $urltxt catv v =4,3 catv z "/ " mod /%n catv z =:,,Z catv zeile /%j && readl zeile || break catv zeile /%j >> tbl_$1 catv zeile /%r%n >> $of cmpv kw kenn2 || { catv Z /%n =3; continue; } do catv Z /%n =3; done do catv z /%n; done else catv ".$nl »" Z .« '/Text fehlt%j' expr " $* " :: "[ %t]${n}[ %t]" && catv id /%n expr " $langs " :: " $l " && { catv Z$l /%n; continue; } expr "$Z" :: "$muster" || { catv Z /%j; continue; } expr "$Z" :: ' "\[0-9]%{3}[a-z?A-Z]' || { catv Z /%r%n; continue; } expr "$Z" :: '^@[0-9]' || { catv Z /%n; continue; } expr "$Z" :: '^[@a-z;.,][0-9]' || { catv Z /%n; continue; } expr "$Z" :: '^[@x][0-9]' || { catv Z /%n; continue; } expr "$Z" :Z '=$' = '' && { catv Z; continue; } expr "$Zeile" :: '^#@f' && { catv 4,,Zeile /%n; continue; } expr "$buf" :: "^$nam=" || { catv buf =:,,obuf:; continue; } expr "$typ" :: 'N' && catv /%n ifset zeile || { catv /%n ; continue; } let !chl && catv n '/: ' File /%j Zeile /%j >> url_tmpf.inf let "--nnotd>0" && { catv Z /%j; continue; } let "flg&&!(flg&2)" && catv "/Addresses: %j" let "o+=c, o<l" && catv $o,1,W =sc let "o-=3072, o>0" && catv 3072,$o,DAT =DAT let "o>0" && catv $o,Line && print -u2 ";%c" let "tim0-tim<=1*3600" && catv '/put ' file /%n let "zn!=$1" && { catv Z /%n =3 ; continue; } let chl && catv Zeile /%j >> url_tmpf.inf let flg && catv "/Field-Text: %j%j" let zn!=znum && { catv Z /%n =3; continue; } while catv 24,0 =buf: while let "i-=16, i>0"; do catv out; done while readl -u4 Zeile; do catv Zeile /%j >> $Plist; done "$h13 $h14 $h15 $h16" | base -16 +b | catv =out: [ -d $file ] && catv /5 =156,1,inp catv inp >> $arch lst) catv Thtml html1 htmlF prints s6sF0002- $((8#, s)) " " | catv =148,8,inp #600 catv 103,3,inp =s: #ifset comment && catv comment =:,,Z: $3=$( catv 11,1,$1 | base -b +10 ) ((o<100)) && catv /%0 =99,1,0 ((o=[znum+1]*4000-1, sz<=o)) && catv /%0 =$o,1,3 3<>$dat *) catv htmlE ;; 1) catv sec > $secf; catv htmlL ;; Lock; catv Data =$((znum*4000)),4000,3 3<>$dat [ ! -e "$dir$nam" ] && catv HTML > $dir$nam [ "$dflt" == 1 ] && catv TPwahl MOwahl TblFolge /MOINIT: MOinitapp > "$Fcfg [ "$t1" != "$t0" ] && catv /T_ t1 /%n >> __1__ ; t0=$t1 [ $# -ge 9 ] && catv '.<td align=center valign=top width="20%" ' % [ $1 == text -a t -eq 1 ] && { catv '/%n%n%n'; } [ -e "$links/$nam" ] && catv dir pre nam /%n >> $links/lpnames [ -s $ali ] || { catv dali0 ". $3" /%n > $ali; return 0; } [ -s $deroot/tmp/tz.dat ] && catv 0 =tz: < $deroot/tmp/tz.dat && [ O -eq 0 ] && O=1 catv /: =0,1,Obuf [ z0 -eq 1 ] && catv Z0 /%n c1) catv js1 ;; catv Oid .'&' Otyp .'&' Odstg .'&' Olen .'&' p1 Oparbn p2 .'&' Onelem '/\\ catv "/ " ta /. mo /. ja '/ ' st /: mi "/ " catv "/%t.align 4%j" catv $((!!(s&8#400)*1)),1,S $((!!(s&8#200)*2)),1,S % catv $((446+o+1)),3,3 | base -b +10 | read sh ss sc catv $((8+[J-2000]*13*4)),4,0 =iv: || catv / 4,,iv: catv $((962<<1)),2,0 =ft: catv $(([rub-1]*6)),5,BasePos =offs: catv $((n+n)),$n,$v =${f}b: catv $((zn1*4*1000+zn2*4)),4,3 =n: 3<$dat catv $((zn>>1)),2,FNAMO =o: || oo=0 o=' ' catv $.,,a2 /%j catv $.,Ibuf =20,ok: catv $.,a =a: catv $.,b /%j catv $1,0 =Hbuf: catv $1,3 =$2: && let `catv ,`==$1 catv $len,cmd catv $n,$n,$v =${f}g: catv $n,1,cnt =v: catv $num,256,3 | tr '\0[\1-\31][\128-\255]' '\10[ *]' | catv $o,4,0 =iv catv $offs1,4,3 =v: catv $offs1,4000,3 =$offs1,4000,4 3<$dat 4<>$datb catv $pos,$((64*512)),3 > /scratch/VALUE/$cl catv $s,0 > $file catv $zn,1,0 =o: catv $zn,4,DAT =v: catv $zn1,1,0 =v: <$kunflg || err=1 catv '.#' line '/ -1000%n' catv '.<table width="90%" align="CENTER" border="0" cellspacing="5"' % catv '/ { 0 }%n};%n%n%n%n' =4 catv '/\begin{ttfamily}%n' catv '/\end{ttfamily}%n' catv '/noch nicht implementiert%j' catv '/quit%n' catv '/user root pfaubeem' /%n catv '/verbose%nbinary%nhash%ncd /usr/home/cie%nls%n' catv +0,,0 =0,,3: 3<> $log catv -$bp6:,,0 =z: < $arch catv .$KZ@+ NAME ._ TN .@$KZ /%n $OFFS,KODE % catv .'\Pl{Param\,Text}&\multicolumn{5}{|c|}{' OText .'}\\' /%n catv .'\Pl{Symbol}&\Pl{Zgrf}&\multicolumn{3}{|c|}{\Pl{Flags}}&\Pl{Adresse}\ catv .'\begin{tabular}{|c|c|c|c|c|c|}' /%n catv .'\end{tabular}' '/%n%n\bigskip%n' catv .'\hline' /%n catv .'{\footnotesize ' Oname .'}&' Oacc .'&\multicolumn{3}{|c|}{\small ' O catv .'{\small\pid}&\Pl{Typ}&\Pl{Dstg}&\Pl{Länge}&{\small\pbn}&\Pl{Elemente catv / 4000,,Data catv / =4000,,DAT: catv /"d1218_$n=%"" >> gdat catv /%%$((16#2c))%%$((n*12+0))%0%0%0%12%0%18%0%0 =1 catv /%%$flg =$o,1,0 catv /%n t1 /+ t2 catv /%r%n =zv: catv /%r%n boundary /--%r%n =boundary: catv /' --' catv /'|' name /'|%n' /'|' strasse /'|%n' =:,,SATZ catv /'|' plz /'|' /' |' ort /'|%n' /'|' email /'|%n' =:,,SATZ catv /,%%$xpos%0%%$rahm%0%%$width%0%%$height%0%0 =:,,Z catv /0000000000 =$((zn*10)),10,0 <>$kunbez catv /: 1,len 4,id 1,cksum =id: catv /: l dat =Out: catv /@DK40: =6,Ibuf catv /T_ t1 /' ' t2 /%n >> __2__ catv 0 =1000,Hbuf: < $3 catv 0 =BasePos: < "A:\DATA\BASEPOS" catv 0 =Hbuf: < "$1" catv 0 =fdep: < dep/1 catv 0,$n,$v =${f}r: catv 0,10,Z =Tim: catv 0,8,$1 | tr '\0\5' '\1\229' | catv =__n: catv 1,len 4,id | sum -b cksum catv 1,o =$zn,1,0 catv 10,Ibuf catv 100,inp | tr -d \0 catv 1000,0 =Hbuf: < $1 catv 1000,0 =ibuf: < uvars.bsh catv 1000,0 | { catv 103,3,inp =s: catv 11,10,Z =N: catv 2,n =$((zn2<<1)),2,3 3<>$fnamo catv 24,,Z =Z: catv 3,nam =pre: catv 4,0 =Time: catv 4,0 =Zn catv 4,0 =Zn: catv 4,iv =$((8+[J-2000]*13*4+M*4)),4,0 catv 4000,0 =DAT: <$kunflg catv 4000,DAT =$((zn*4000)),4000,3 3<>$dat catv 47,$s,3 =1 catv 47,$s,3 | base -b +16 >> gdat catv 48,1,3 | base -b +10 | catv =s: catv 5,BasePos =offs: catv 7,Ibuf catv 8,3,$1 | tr '\0' '\1' | catv =__e: catv =F <bsh.c catv BUFpbn | sortl -f1n,2 | { catv BUFqual | sortl -f1,2 | { catv BasePos > "A:\DATA\BASEPOS" catv Buf >$D/$f #Wie cat, nur Buf ist keine Datei catv FNAMO =$o,,DAT catv Gsel =$GWpos,10,0 $Script catv HDR =3 catv HTM1 HTM2 > $Fc2 catv HTMcfg1 Hbuf catv Hbuf Mtxt | /etc/mail/sendmail "$z" catv INCL HDR =4 catv Thtml html1 htmlK htmlE catv TimRef '/ ' Set '/ ' =$Sk,24,0 <>$Frfr catv Time =0,4,0 catv Z =$sz,,0. catv Z =Z$lang: catv Zn =4,4,0 catv addr /%n >> addresses catv cks =0:,1,Out: catv ctim '. ' cttim > $dir/conn catv gmt > $deroot/tmp/tz.dat catv hr /%n catv iv =$o,4,0 catv k /\verb: Text /: catv msg '.Connect test failed:' MUdir /: AnrufZ /%n >> $MUdir/fail catv new /%0 =$num,,3 catv ta /. mo /. ja '/ ' st /: mi catv v =$((zn*10)),10,3 3<>$kunbez catv v =$offs1,4,3 catv v =$offs12,4,3 catv zn /' ' tm2 /'%n|' kw /'|%n' =SATZ: com -p && { com -it700id20i1000 Ibuf; catv $.,Ibuf; } do catv zeile /%j ; done expr "$Script" :: '^\.' && pwd | catv 0,2,0 Script =Script: expr "$Z" :: '_%d%d%d_'"$LL"'%>' && catv Z /%n expr "$Z16" :: '[89abcdef][0-9a-f]' || { catv Z /%n; continue; } expr "$zeile" :: '[ %t]call .' || { catv zeile /%j; continue; } for byte in $( catv $3,$4,$2 | base -b +10 ) for word in $( catv $3,$4,$2 | base -w +10 ) grep -Fq -e "$zeile" call || { catv zeile /%j; continue; } ifset InpAnruf || { catv HTMtelhf > $1; return 0; } ifset Z || { catv /%n; return 0; } ifset comment && catv comment =:,,Z: ifset oz && { catv sp oz /%j; } l) catv htmlL ;; let "(sz>>1)<=zn2" && catv /%0%0 =$((zn2<<1)),,3 3<>$fnamo let "sz<=zn1" && catv /%0 =$zn1,,3 3<>$kunflg let "zn>=o" && catv /%0 =$zn,1,0 start) catv html0 ;; then catv Oparbn .' ' MU .' ' Oid .' ' OText /%n =:,,BUFpbn while catv $((++ato)),1,ats =c: while catv $((++o)),1,DAT =1,v: while catv $o,4,0 =iv while catv $o,4,0 =iv: while catv +0,50,0 =Hbuf: while catv 1,0 =o: while catv 512,3 =278,inp: while catv O,$LEN,3 =BUF while seek + 0 o; catv +0,1000,0 =Hbuf: #do catv sml | grep -Fq "$sm" || catv sm /%j =:,,sml; done 1bs) catv htmlF htmlH html2 htmlE ;; catv Buf >datei # catv Z /%n # catv Z ". $3" /%n # catv nam "/='" $nam "/'%n" # expr "$Z" :n '%([0-9]%{1,}%)' || { catv Z /%n; continue; } # expr "$buf" :: "^$nam=" || { catv buf /%n; continue; } # let "n!=$2" && { catv Z /%n; continue; } # catv 1,Ibuf /%j # catv /%0$(()) =$((cl*2)),2,3 # catv 0 =file < "$1" # catv 0,40,file =pw: # catv 40,40,file =st: # catv 80,40,file =ip: # catv Z /%n # catv $.,Ibuf =Hbuf: # catv '/[' Hbuf '/]' # catv $.,Ibuf =Hbuf: # catv /OK%r%n =ok: # for word in $( catv $3,$4,$2 | base -w +10 ) #((sz>v)) && catv / =$((v-v/10)),,3: 3<>$reftxt catv $o,,Z /%n =$OFFS,,KODE catv '.%l%' LANG /%n else catv '.\input{' INAME '/}%n' else o=0 catv '.%v%' then catv 3,,Z =Z: V=V catv Z /%n; continue catv Z /%n catv Z /%n; continue catv ".\colorbox[rgb]{$R,$G,$B}{" catv ".\textbf{" catv ".\textcolor[rgb]{$R,$G,$B}{" catv "/\verb: :" B) catv ".\colorbox[rgb]{$1,$2,$3}{"; shift 3 ;; [ "$k" == R ] && { catv '.}'; return 0; } [ $z == I ] && { catv '.\input{' INAME '/}%n'; PutKode; } catv '/\end{ttfamily}%n\end{flushleft}%n' catv 1,rek =k: catv .$KZ@+ NAME ._ TN .@$KZ /%n $OFFS,KODE % catv k /\verb: Text /: for word in $( catv $3,$4,$2 | base -w +10 ) ifset Z || { catv /%n; return 0; } ifset comment && catv comment =:,,Z: catv ."$1" =$l,1 catv ."$3" e /%j ((v=[zn1+1]*4000-1, sz<=v)) && catv /%0 =$v,1,3 3<>$dat ((zn2!=0)) && catv /%0%0%255 =13,3,Z 2# catv $((1000*1000*1000*3)),20,0 /home2/large 3# /home2/large; catv $((1000*1000*1000*3)),20,0; seek + 0; > expr "$Z" :: '_%d%d%d_'"$LL"'%>' && catv Z /%n catv $offs,$((size-offs)),0 =Data: $file [ -s $deroot/tmp/tz.dat ] && catv 0 =tz: < $deroot/tmp/tz.dat && [ Nz -ge 200 ] && cat $Frfr | { >$Frfr; catv $MinSk,0; readl Z; cat; ><; } [ z0 -eq 1 ] && catv Z0 /%n _bsh:_ catv 1,0 =key: cat from.txt | { catv hr /%n > from.txt catv $((zn1*4000)),4000,0 =DAT <$dat || catv / =4000,,DAT catv 0,2000,0 =FNAMO <$fnamo || catv / =2000,,FNAMO catv name | tr '[a-z]' '[A-Z]' | catv =name: expr " $* " :: "[ %t]${n}[ %t]" && catv id /%n expr " $* " :: "[ %t]${s}[ %t]" && r=0 catv id /%n expr " $langs " :: " $l " && { catv Z$l /%n; continue; } expr "$3" :: "$t" && r=0 catv id /%n expr "$5" :: "$t" && let "$a" && r=0 catv id /%n expr "$Script" :: '^\.' && pwd | catv 0,2,0 Script =Script: expr "$Z" :: "$muster" || { catv Z /%j; continue; } expr "$Z" :: ' "\[0-9]%{3}[a-z?A-Z]' || { catv Z /%r%n; continue; } expr "$Z" :: '^@[0-9]' || { catv Z /%n; continue; } expr "$Z" :: '^[@a-z;.,][0-9]' || { catv Z /%n; continue; } expr "$Z" :: '^[@x][0-9]' || { catv Z /%n; continue; } expr "$Z" :: '_%d%d%d_'"$LL"'%>' && catv Z /%n expr "$Z" :: '_%d%d%d_no "' || { catv Z /%n; continue; } expr "$Z" :D ' %('"$RA_D$LL"'%) "[^"]*"$' || { catv Z /%n; continue; } expr "$Z" :Z '=$' = '' && { catv Z; continue; } expr "$Z" :n '%([0-9]%{1,}%)' || { catv Z /%n; continue; } expr "$Z16" :: '[89abcdef][0-9a-f]' || { catv Z /%n; continue; } expr "$Z2" :T '%("[^"]%{1,}"%)$' || { catv Z /%n; continue; } expr "$ZO" :ZO '^@0%{8} ' = "@$ZI " || { catv ZO /%n; continue; } expr "$Zeile" :: '^#@f' && { catv 4,,Zeile /%n; continue; } expr "$buf" :: "^$gid $aid " || { catv buf /%n; continue; } expr "$buf" :: "^$nam=" || { catv buf =:,,obuf:; continue; } expr "$typ" :: 'N' && catv /%n expr "$typ" :: 'n' && catv /%n expr "$z" :: '^%$' && { catv z /%n; break; } expr "$zeile" : '^%([^<%r]*%)' | catv "/ " 0 =:,,Des expr "$zeile" : '^%([^<%r]*%)' | catv "/ ^ " 0 =:,,Des expr "$zeile" :: '[ %t]call .' || { catv zeile /%j; continue; } ifset HTTP_REFERER && catv 99,z /%n =$v,100,3 3<>$fnams let "o>0" && catv 0,$o,DAT print -u2 abc |2 catv =2 s2=$( catv ".$1" $((11-l)),sp | base -b +10 ) while catv $offs,4,0 =num: while catv 512,3 =278,inp: |