/[informatika.old]/html/obavijest.php
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Annotation of /html/obavijest.php

Parent Directory Parent Directory | Revision Log Revision Log

Revision 1.15.2.1 - (hide annotations)
Mon Jul 31 18:30:49 2000 UTC (23 years, 8 months ago) by dpavlin
Branch: dbi
Changes since 1.15: +28 -26 lines 
DBI-ficiranje
1 dpavlin 1.1 <?
2    
3     include("inc/head.inc");
4 dpavlin 1.4 include("inc/prava.inc");
5 dpavlin 1.14 include("inc/print_bool2.inc");
6 dpavlin 1.7 include("inc/bgcolor.inc");
7 dpavlin 1.1
8 dpavlin 1.4 if (isset($kontakt_osoba_id) && $what!="relogin") {
9 dpavlin 1.15.2.1 $sth = $dbh->prepare("select ime,prezime,passwd,prava from kontakt_osobe where aktivna=true and id=$kontakt_osoba_id");
10     $sth->execute();
11     $korow=$sth->fetchrow_hash();
12 dpavlin 1.7 # print "--$korow[passwd] | $md5_passwd | $passwd ";
13     $prava=$korow[prava];
14     print "<small>Trenutno ste prijavljeni kao $korow[ime] $korow[prezime], ako je to krivo odaberite <a href=\"$PHP_SELF?what=relogin\">ovaj link</a>.</small>";
15 dpavlin 1.15 $curr_md5_passwd=md5($korow[passwd]);
16 dpavlin 1.7 if ( (!isset($md5_passwd) && $korow[passwd] != $passwd) ||
17 dpavlin 1.4 (isset($md5_passwd) && $curr_md5_passwd != $md5_passwd) ) {
18     include("inc/auth.inc");
19     $what="auth";
20     echo "<big>Upisana je neispravna loznika!</big>";
21     session_destroy();
22     print '<p><a href="index.php">Povratak na poèetnu stranicu</a>';
23     } else {
24     session_register("md5_passwd");
25 dpavlin 1.15 $md5_passwd=md5($korow[passwd]);
26 dpavlin 1.4 }
27     }
28    
29 dpavlin 1.7 #print "--$pr_ko--";
30 dpavlin 1.4
31     if (! isset($kontakt_osoba_id)) {
32     include("inc/auth.inc");
33     $what="auth";
34    
35     } elseif (! isset($id)) {
36 dpavlin 1.2 include("inc/obavjest-forma.inc");
37 dpavlin 1.7 } elseif (isset($id) && $what!="auth") {
38 dpavlin 1.2
39 dpavlin 1.15.2.1 $sth = $dbh->prepare("
40 dpavlin 1.1 select osobe.id as id,ime,prezime,tel,lokacije.naziv as lok,sifra,
41     org_jed.naziv as orgjed,org_pod_jed.pod_naziv as orgpodjed,
42 dpavlin 1.7 lok_racunala as lokrac,objekt,kat,soba,z_rac,podesavanje,
43     umrezavanje,shell
44 dpavlin 1.1 from osobe
45     where osobe.id=$id
46     and lokacija_id=lokacije.id and org_jed_id=org_jed.id
47     and org_pod_jed_id=org_pod_jed.pod_id
48     order by lokacije.naziv,org_jed.naziv
49     ");
50    
51 dpavlin 1.15.2.1 $sth->execute();
52    
53     if ($row=$sth->fetchrow_hash()) {
54 dpavlin 1.1
55     print "
56     <h1>Podaci o osobi</h1>
57    
58     <table>
59     <tr><td><small>Ime i prezime:</small></td>
60     <td>$row[ime] $row[prezime]</td>
61     <td><small>Tel:</small> $row[tel]</td></tr>
62     <tr><td><small>Org. jedinica:</small></td>
63     <td>$row[orgjed]</td>
64     <td><small>©ifra radnika:</small> $row[sifra]</td></tr>
65     <tr><td><small>Podjedinica:</small></td>
66     <td>$row[orgpodjed]</td>
67     <td><small>Lokacija raèunala:</small></td></tr>
68     <tr><td><small>Lokacija:</small></td>
69     <td>$row[lok]</td>
70     <td>$row[lokrac]</td></tr>
71     <tr><td><small>Objekt/soba/kat:</small></td>
72     <td>$row[objekt] / $row[soba] / $row[kat]</td>
73     <td><small>® raèunala:</small> $row[z_rac]</td></tr>
74 dpavlin 1.14 <tr><td>Shell: ".print_bool($row[shell])."</td>
75     <td>Umre¾avanje: ".print_bool($row[umrezavanje])."</td>
76     <td>Pode¹avanje: ".print_bool($row[podesavanje])."</td>
77 dpavlin 1.1 </table>
78     ";
79    
80 dpavlin 1.13
81     if ($prava & $pr_promjena) {
82     print "<small><a href=\"osoba.php?what=select-osoba&id=$id\">[promjeni podatke o osobi]</a></small>";
83     }
84    
85 dpavlin 1.4 // kreiraj statuse, zapamti da li je instaliran
86    
87     $instaliran=0;
88    
89 dpavlin 1.15.2.1 $sth = $dbh->prepare("select status.id as status_id,datum,opis,ime,prezime,status_tip_id as st
90 dpavlin 1.4 from status,kontakt_osobe,status_tip
91     where kontakt_osoba_id=kontakt_osobe.id and status_tip_id=status_tip.id
92 dpavlin 1.6 and osoba_id=$id order by datum");
93 dpavlin 1.15.2.1 $sth->execute();
94 dpavlin 1.4
95     $statusi="";
96    
97 dpavlin 1.15.2.1 $nr=0;
98     while($row=$sth->fetchrow_hash()) {
99     if ($row[st] != 2) {
100     $statusi.="<tr ".bgcolor()."><td><small>$row[datum]</small></td><td>$row[opis]</td><td>$row[ime] $row[prezime]</td></tr>";
101     } else {
102     $statusi.="<tr ".bgcolor()."><td><small>$row[datum]</small></td><td><a href=\"promjene.php?osoba_id=$id&status_id=$row[status_id]\">$row[opis]</a></td><td>$row[ime] $row[prezime]</td></tr>";
103 dpavlin 1.4 }
104 dpavlin 1.15.2.1 if ($row[st] == 6) { $instaliran = 1; };
105     $nr++;
106     }
107    
108     if ($nr == 0) {
109 dpavlin 1.4 $statusi.="<p><big>Nema podataka o korisnièkom raèunu</big>";
110     }
111    
112    
113 dpavlin 1.15.2.1 $sth = $dbh->prepare("select racuni.login as login,
114 dpavlin 1.1 racuni.passwd as passwd,e_mail.alias as email
115     where racuni.osoba_id=$id and e_mail.osoba_id=$id");
116 dpavlin 1.15.2.1 $sth->execute();
117 dpavlin 1.1
118 dpavlin 1.15.2.1 if ($row=$sth->fetchrow_hash()) {
119 dpavlin 1.1
120     print "
121     <h1>Podaci o korisnièkom raèunu</h1>
122    
123     <table>
124     <tr><td>Korisnièka oznaka:</td><td><tt>$row[login]</tt></td></tr>
125 dpavlin 1.4 ";
126 dpavlin 1.7 if ($prava & $pr_instalacija) {
127 dpavlin 1.4 print "<tr><td>Lozinka:</td><td><tt>$row[passwd]</tt></td></tr>";
128     } else {
129     print "<tr><td colspan=2><i>Nemate ovla¹tenja vidjeti lozinku ovog korisnika!</i></td></tr>";
130     }
131     print "
132 dpavlin 1.1 <tr><td>E-mail adresa:</td><td><tt>$row[email]@pliva.hr</tt></td></tr>
133     </table>
134     ";
135    
136     } else {
137     print "<p><big>Nema podataka o korisnièkom raèunu</big>";
138     }
139 dpavlin 1.2
140 dpavlin 1.3
141     print "
142 dpavlin 1.5 <h1>Podaci o statusima korisnièkog raèuna</h1>
143 dpavlin 1.3
144 dpavlin 1.7 <form action=oznaci.php>
145     <input type=hidden name=kontakt_osoba_id value=$kontakt_osoba_id>
146     <input type=hidden name=osoba_id value=$id>
147    
148     <table border=0>
149 dpavlin 1.4 <tr><th>datum</th><th>status</th><th>status postavio/la</th></tr>
150 dpavlin 1.10 $statusi";
151 dpavlin 1.7
152 dpavlin 1.10 $statusi="<tr>";
153    
154     if ($prava == $pr_admin) {
155     $statusi.="<td><select name=date_offset>
156     <option value=>danas</option>
157     <option value=1>sutra</option>";
158     $dani=array("nedjelju","ponedjeljak","utorak","srijedu",
159     "èetvrtak","petak","subotu");
160     for ($d=2; $d<10; $d++) {
161     $statusi.="<option value=$d>u ".$dani[(date("w")+$d) % 7].", ". date("d.m.Y",time()+$d*24*60*60)."</option>";
162     }
163     $statusi.="</select></td>";
164     } else {
165     $statusi.="<td align=right><b>Dodati status:</b></td>";
166     }
167    
168     $statusi.="<td><select name=status_tip_id>";
169 dpavlin 1.7
170 dpavlin 1.15.2.1 $sth = $dbh->prepare("select id,opis
171 dpavlin 1.7 from status_tip
172     where id >= 5
173     ");
174 dpavlin 1.15.2.1 $sth->execute();
175 dpavlin 1.7
176 dpavlin 1.10 $num_prava=0;
177    
178 dpavlin 1.15.2.1 while ($row=$sth->fetchrow_hash()) {
179 dpavlin 1.9 if ($prava & pow(2,$row[id])) {
180 dpavlin 1.10 $statusi.="<option value=$row[id]>$row[opis]</option>\n";
181     $num_prava++;
182 dpavlin 1.9 }
183 dpavlin 1.7 }
184    
185 dpavlin 1.10 $statusi.="</select></td>
186     <td>$korow[ime] $korow[prezime]</td>
187     <td><input type=submit value=\"Dodaj\"></td></tr>";
188 dpavlin 1.7
189 dpavlin 1.10 if ($num_prava>0) {
190     print "$statusi";
191     }
192    
193     print "
194 dpavlin 1.7 </table>
195     </form>
196    
197 dpavlin 1.8 <small>Broj trenutnog zahtjeva: $id</small>
198     <hr>
199 dpavlin 1.7 ";
200 dpavlin 1.8
201 dpavlin 1.15.2.1 } else { // nema rezultata
202 dpavlin 1.8 print "<p><big>Nema podataka o osobi sa id-jem $id</big>";
203 dpavlin 1.15.2.1 }
204 dpavlin 1.8
205     include("inc/obavjest-forma.inc");
206 dpavlin 1.2
207     } // isset($id)
208 dpavlin 1.7
209 dpavlin 1.11 print "<p>Povratak na ";
210     if (isset($HTTP_REFERER)) {
211     print "<a href=\"$HTTP_REFERER\">stranicu sa koje ste do¹li</a> ili ";
212     }
213     print "<a href=\"/\">poèetnu stranicu</a>.";
214    
215 dpavlin 1.7
216     include("inc/footer.inc");
217 dpavlin 1.2
218     ?>
219 dpavlin 1.1
  ViewVC Help
Powered by ViewVC 1.1.26