1
|
<?
|
2
|
|
3
|
function chyba()
|
4
|
{
|
5
|
global $radek;
|
6
|
|
7
|
printf("\n<BR>Pri zpracovani radku %s se vyskytla chyba!!!!!\n<BR>",$radek);
|
8
|
echo "</body></html>";
|
9
|
exit();
|
10
|
}
|
11
|
|
12
|
|
13
|
function zpracuj_heslo()
|
14
|
{
|
15
|
global $heslo;
|
16
|
global $vysledek;
|
17
|
|
18
|
$vysledek.=" ";
|
19
|
$vysledek.=$heslo;
|
20
|
// echo "<BR>".$vysledek;
|
21
|
$heslo="";
|
22
|
return;
|
23
|
}
|
24
|
|
25
|
function zpracuj_radek()
|
26
|
{
|
27
|
global $radek;
|
28
|
global $heslo;
|
29
|
|
30
|
$i=0;
|
31
|
$d=strlen($radek);
|
32
|
$stav=0;
|
33
|
echo "<BR>Cely radek".$radek;
|
34
|
while ($i<$d)
|
35
|
{
|
36
|
$c=$radek[$i];
|
37
|
$i++;
|
38
|
switch($stav)
|
39
|
{
|
40
|
case 0: if($c=='<') {$stav=1;break;}
|
41
|
if($c==' ') break;
|
42
|
else {$stav=9;$heslo.=$c;$j=1;break;}
|
43
|
|
44
|
case 1: if(($c=='a')||($c=='A')) {$stav=2;}
|
45
|
else chyba();
|
46
|
break;
|
47
|
|
48
|
case 2: if($c=='>') {$stav=3;}
|
49
|
break;
|
50
|
|
51
|
case 3: if($c=='<') {$stav=4;}
|
52
|
else {$heslo.=$c;}
|
53
|
break;
|
54
|
|
55
|
case 4: if (($c=='b')||($c=='B')) {$stav=5;break;}
|
56
|
if ($c=='/'){$stav=7;zpracuj_heslo();}
|
57
|
else chyba();
|
58
|
break;
|
59
|
|
60
|
case 5: if((($c=='a')||($c=='A'))&&($radek[$i-2]=='/')) $stav=6;
|
61
|
break;
|
62
|
|
63
|
case 6: if ($c=='>') {$stav=0;}
|
64
|
else chyba();
|
65
|
break;
|
66
|
|
67
|
case 7: if(($c=='a')||($c=='A')) $stav=8;
|
68
|
else chyba();
|
69
|
break;
|
70
|
|
71
|
case 8: if($c=='>') {$stav=0;}
|
72
|
else chyba();
|
73
|
break;
|
74
|
|
75
|
case 9: if ($c==' ') {zpracuj_heslo(); $stav=0;}
|
76
|
else {$heslo.=$c;}
|
77
|
break;
|
78
|
|
79
|
default: break;
|
80
|
}
|
81
|
}
|
82
|
|
83
|
if ($stav==9) {zpracuj_heslo();}
|
84
|
if (($stav==9)||($stav==0)) printf("\n<BR>Probehlo to OK!");
|
85
|
else chyba();
|
86
|
|
87
|
return;
|
88
|
}
|
89
|
|
90
|
$vysledek="";
|
91
|
$heslo="";
|
92
|
zpracuj_radek();
|
93
|
echo "<BR>".$vysledek;
|
94
|
|
95
|
?>
|