de3e674843edb0a6c410752939dd8eb57a9f19e1
bernd webinterface => /webinterface

bernd authored 17 years ago

1) <?php
2) 
bernd Logging aktiviert

bernd authored 17 years ago

3) require_once('inc/db_connect.php');
4) 
bernd sql-abfragen abstrahiert

bernd authored 17 years ago

5) 
6) function db_query($query)
7) {
8)   DEBUG($query);
9)   $result = @mysql_query($query);
10)   if (mysql_error())
11)   {
12)     $error = mysql_error();
13)     logger("inc/base.php", "dberror", "mysql error: {$error}");
bernd Datenbankfehler besser lesbar

bernd authored 17 years ago

14)     system_failure('Interner Datenbankfehler: »'.$error.'«.');
bernd sql-abfragen abstrahiert

bernd authored 17 years ago

15)   }
16)   return $result; 
17) }
18) 
19) 
bernd Neues Modul für "Kunde werden"

bernd authored 17 years ago

20) 
21) function maybe_null($value)
22) {
23)   if (strlen( (string) $value ) > 0)
bernd Strings für mysql esapen (z...

bernd authored 17 years ago

24)     return "'".mysql_real_escape_string($value)."'";
bernd Neues Modul für "Kunde werden"

bernd authored 17 years ago

25)   else
26)     return 'NULL';
27) }
28) 
29) 
30) 
bernd Logging aktiviert

bernd authored 17 years ago

31) function logger($scriptname, $scope, $message)
32) {
33)   $user = 'NULL';
bernd Bugfix: Logger zeigt wieder...

bernd authored 17 years ago

34)   if ($_SESSION['role'] & ROLE_SYSTEMUSER)
bernd Logging aktiviert

bernd authored 17 years ago

35)     $user = "'{$_SESSION['userinfo']['username']}'";
bernd Bugfix: Logger zeigt wieder...

bernd authored 17 years ago

36)   elseif ($_SESSION['role'] & ROLE_CUSTOMER)
bernd Logging aktiviert

bernd authored 17 years ago

37)     $user = "'{$_SESSION['customerinfo']['customerno']}'";
38)   
39)   $remote = mysql_real_escape_string($_SERVER['REMOTE_ADDR']);
40) 
41)   $scriptname = mysql_real_escape_string($scriptname);
42)   $scope = mysql_real_escape_string($scope);
43)   $message = mysql_real_escape_string($message);
44) 
bernd sql-abfragen abstrahiert

bernd authored 17 years ago

45)   db_query("INSERT INTO misc.scriptlog (remote, user,scriptname,scope,message) VALUES ('{$remote}', {$user}, '{$scriptname}', '{$scope}', '{$message}');");
bernd Logging aktiviert

bernd authored 17 years ago

46) }
47) 
48) 
bernd webinterface => /webinterface

bernd authored 17 years ago

49) function output($arg)
50) {
51)   global $output;
52)   $output .= $arg;
53) }
54) 
55) 
56) function random_string($nc, $a='abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789') {
57)     $l=strlen($a)-1; $r='';
58)     while($nc-->0) $r.=$a{mt_rand(0,$l)};
59)     return $r;
60)  }
61) 
62) 
63) function are_you_sure($query_string, $question)
64) {
bernd Neues Jabber-Modul (noch ni...

bernd authored 17 years ago

65)   global $debugmode;
66)   if ($debugmode)
67)     $query_string = 'debug&amp;'.$query_string;
bernd webinterface => /webinterface

bernd authored 17 years ago

68)   $token = random_string(20);
bernd XSRF-kram fixed

bernd authored 17 years ago

69)   $_SESSION['are_you_sure_token'] = $token;
bernd Umfangreiche Code-Aufräumar...

bernd authored 17 years ago

70)   output("<h3>Sicherheitsabfrage</h3>
71)     <form action=\"?{$query_string}\" method=\"post\">
72)     <div class=\"confirmation\">
73)       <div class=\"question\">{$question}</div>
74)       <p class=\"buttons\">
75)         <input type=\"hidden\" name=\"random_token\" value=\"{$token}\" />
76)         <input type=\"submit\" name=\"really\" value=\"Ja\" />
77)         &nbsp; &nbsp;
78)         <input type=\"submit\" name=\"not_really\" value=\"Nein\" />
79)       </p>
80)     </div>");
bernd </form>

bernd authored 17 years ago

81)   output("</form>\n");
bernd webinterface => /webinterface

bernd authored 17 years ago

82) }
83) 
84) 
85) function user_is_sure()
86) {
87)   if (isset($_POST['really']))
88)   {
bernd XSRF-kram fixed

bernd authored 17 years ago

89)     if ($_POST['random_token'] == $_SESSION['are_you_sure_token'])
bernd webinterface => /webinterface

bernd authored 17 years ago

90)       return true;
91)     else
92)       system_failure("Possible Cross-site-request-forgery detected!");
93)   }
94)   elseif (isset($_POST['not_really']))
95)     return false;
96)   else
97)     return NULL;
98) }
99) 
100) 
101) 
bernd XSRF-kram fixed

bernd authored 17 years ago

102) function generate_form_token($form_id)
103) {
104)   require_once("inc/debug.php");
105)   $sessid = session_id();
106)   if ($sessid == "") 
107)   {
108)     DEBUG("Uh? Session not running? Wtf?");
bernd Neues Jabber-Modul (noch ni...

bernd authored 17 years ago

109)     system_failure("Internal error!");
bernd XSRF-kram fixed

bernd authored 17 years ago

110)   }
111)   if (! isset($_SESSION['session_token']))
112)     $_SESSION['session_token'] = random_string(10);
bernd Umfangreiche Code-Aufräumar...

bernd authored 17 years ago

113)   return hash('sha256', $sessid.$form_id.$_SESSION['session_token']);
bernd XSRF-kram fixed

bernd authored 17 years ago

114) }
115) 
116) 
bernd Umfangreiche Code-Aufräumar...

bernd authored 17 years ago

117) function check_form_token($form_id, $formtoken = NULL)
bernd XSRF-kram fixed

bernd authored 17 years ago

118) {
bernd Umfangreiche Code-Aufräumar...

bernd authored 17 years ago

119)   if ($formtoken == NULL)
120)     $formtoken = $_POST['formtoken'];
bernd XSRF-kram fixed

bernd authored 17 years ago

121)   $sessid = session_id();
122)   if ($sessid == "") 
123)   {
124)     DEBUG("Uh? Session not running? Wtf?");
bernd Umfangreiche Code-Aufräumar...

bernd authored 17 years ago

125)     system_failure("Internal error! (Session not running)");
bernd XSRF-kram fixed

bernd authored 17 years ago

126)   }
127) 
bernd Neues Jabber-Modul (noch ni...

bernd authored 17 years ago

128)   $correct_formtoken = hash('sha256', $sessid.$form_id.$_SESSION['session_token']);
bernd XSRF-kram fixed

bernd authored 17 years ago

129) 
130)   if (! ($formtoken == $correct_formtoken))
131)     system_failure("Possible cross-site-request-forgery!");
132) }
133) 
bernd Neues Jabber-Modul (noch ni...

bernd authored 17 years ago

134) 
135) 
136) function internal_link($file, $label, $querystring = '')
137) {
138)   $debugstr = '';
139)   global $debugmode;
140)   if ($debugmode)
141)     $debugstr = 'debug&amp;';
142)   $querystring = str_replace('&', '&amp;', $querystring);
143) 
144)   return "<a href=\"{$file}?{$debugstr}${querystring}\">{$label}</a>";
145) }
146) 
147) 
148) function html_form($form_id, $scriptname, $querystring, $content)
149) {
150)   $debugstr = '';
151)   global $debugmode;
152)   if ($debugmode)
153)     $debugstr = 'debug&amp;';
154)   $querystring = str_replace('&', '&amp;', $querystring);
155)   $ret = '';
156)   $ret .= '<form action="'.$scriptname.'?'.$debugstr.$querystring.'" method="post">'."\n";
bernd Umfangreiche Code-Aufräumar...

bernd authored 17 years ago

157)   $ret .= '<p style="display: none;"><input type="hidden" name="formtoken" value="'.generate_form_token($form_id).'" /></p>'."\n";
bernd Neues Jabber-Modul (noch ni...

bernd authored 17 years ago

158)   $ret .= $content;
159)   $ret .= '</form>';
160)   return $ret;  
161) }
162) 
163) 
bernd Neues Modul für "Kunde werden"

bernd authored 17 years ago

164) function html_select($name, $options, $default)
165) {
166)   require_once('inc/security.php');
167)   $ret = "<select name=\"{$name}\" size=\"1\">\n";
168)   foreach ($options as $key => $value)
169)   {
170)     $selected = '';
171)     if ($default == $key)
172)       $selected = ' selected="selected" ';
173)     $key = filter_input_general($key);
174)     $value = filter_input_general($value);
175)     $ret .= "  <option value=\"{$key}\"{$selected}>{$value}</option>\n";
176)   }
177)   $ret .= '</select>';
178)   return $ret;
179) }
180) 
bernd Neues Jabber-Modul (noch ni...

bernd authored 17 years ago

181) 
182)