webinterface.git

1) <?php

2) /*
3) This file belongs to the Webinterface of schokokeks.org Hosting
4) 

5) Written 2008-2013 by schokokeks.org Hosting, namely

6)   Bernd Wurst <bernd@schokokeks.org>
7)   Hanno Böck <hanno@schokokeks.org>
8) 
9) To the extent possible under law, the author(s) have dedicated all copyright and related and neighboring rights to this software to the public domain worldwide. This software is distributed without any warranty.
10) 
11) You should have received a copy of the CC0 Public Domain Dedication along with this software. If not, see 
12) http://creativecommons.org/publicdomain/zero/1.0/
13) 
14) Nevertheless, in case you use a significant part of this code, we ask (but not require, see the license) that you keep the authors' names in place and return your changes to the public. We would be especially happy if you tell us what you're going to do with this code.
15) */
16) 

17) require_role(ROLE_SYSTEMUSER);

18) require_once("inc/base.php");
19) require_once("inc/security.php");
20) require_once("inc/debug.php");
21) 
22) 
23) function list_subusers()
24) {
25)   $uid = (int) $_SESSION['userinfo']['uid'];

26)   $result = DB::query("SELECT id, username, modules FROM system.subusers WHERE uid={$uid}");

27)   $subusers = array();

28)   while ($item = $result->fetch_assoc())

29)   {
30)     $item['modules'] = explode(',', $item['modules']);
31)     $subusers[] = $item;
32)   }
33)   DEBUG($subusers);
34)   return $subusers;
35) }
36) 
37) 
38) function load_subuser($id) {
39)   $id = (int) $id;
40)   $uid = (int) $_SESSION['userinfo']['uid'];
41)   

42)   $result = DB::query("SELECT id, username, modules FROM system.subusers WHERE uid={$uid} AND id={$id}");
43)   $item = $result->fetch_assoc();

44)   $item['modules'] = explode(',', $item['modules']);
45)   return $item;
46) }
47) 
48) 
49) function available_modules()
50) {
51)   $modules = array();

52)   $allmodules = get_modules_info();
53) 
54)   // Das su-Modul ist hierfuer unwichtig
55)   unset($allmodules['su']);
56) 
57)   foreach ($allmodules as $modname => $modinfo)

58)   {

59)     if (isset($modinfo['permission']))
60)       $modules[$modname] = $modinfo['permission'];

61)   }
62)   return $modules;
63) }
64) 
65) function delete_subuser($id) {
66)   $id = (int) $id;
67)   $uid = (int) $_SESSION['userinfo']['uid'];
68)   

69)   DB::query("DELETE FROM system.subusers WHERE id={$id} AND uid={$uid}");

70) }
71) 
72) function empty_subuser()
73) {
74)   $subuser = array("id" => NULL, "username" => $_SESSION['userinfo']['username'].'_', "modules" => array('index'));
75)   return $subuser;
76) }
77) 
78) function new_subuser($username, $requested_modules, $password) 
79) {
80)   $uid = (int) $_SESSION['userinfo']['uid'];
81) 

82)   $username = DB::escape(filter_input_username($username));

83)   if (strpos($username, $_SESSION['userinfo']['username']) !== 0) {
84)     // Username nicht enthalten (FALSE) oder nicht am Anfang (>0)
85)     system_failure("Ungültiger Benutzername!");
86)   }
87) 
88)   if (!is_array($requested_modules)) {
89)     system_failure("Module nicht als array erhalten!");
90)   }
91)   DEBUG($requested_modules);
92)   $allmods = available_modules();
93)   $modules = array();
94)   foreach ($requested_modules as $mod) {
95)     if (isset($allmods[$mod])) {
96)       $modules[] = $mod;
97)     }
98)   }
99)   DEBUG($modules);
100)   if (count($modules) == 0) {
101)     system_failure("Es sind (nach der Filterung) keine Module mehr übrig!");
102)   }

103)   $modules = DB::escape(implode(',', $modules));

104)   
105)   $result = strong_password($password);
106)   if ($result !== true) {
107)     system_failure("Unsicheres Passwort. Die Meldung von cracklib lautet: ".$result);
108)   }
109)   $password = hash("sha256", $password);
110) 

111)   DB::query("INSERT INTO system.subusers (uid, username, password, modules) VALUES ({$uid}, '{$username}', '{$password}', '{$modules}')");

112) }
113) 
114) 
115) function edit_subuser($id, $username, $requested_modules, $password) 
116) {
117)   $uid = (int) $_SESSION['userinfo']['uid'];
118) 
119)   $id = (int) $id;
120)   $my_subusers = list_subusers();
121)   $valid = false;
122)   foreach ($my_subusers as $x) {
123)     if ($x['id'] == $id) {
124)       $valid = true;
125)     }
126)   }
127)   if (!$valid) {
128)     system_failure("Kann diesen Account nicht finden!");
129)   }
130) 

131)   $username = DB::escape(filter_input_username($username));

132)   if (strpos($username, $_SESSION['userinfo']['username']) !== 0) {
133)     // Username nicht enthalten (FALSE) oder nicht am Anfang (>0)
134)     system_failure("Ungültiger Benutzername!");
135)   }
136) 
137) 
138)   if (!is_array($requested_modules)) {
139)     system_failure("Module nicht als array erhalten!");
140)   }
141)   $allmods = available_modules();
142)   $modules = array();
143)   foreach ($requested_modules as $mod) {
144)     if (isset($allmods[$mod])) {
145)       $modules[] = $mod;
146)     }
147)   }
148)   if (count($modules) == 0) {
149)     system_failure("Es sind (nach der Filterung) keine Module mehr übrig!");
150)   }

151)   $modules = DB::escape(implode(',', $modules));

152)   
153)   $pwchange = '';
154)   if ($password) {
155)     $result = strong_password($password);
156)     if ($result !== true) {
157)       system_failure("Unsicheres Passwort. Die Meldung von cracklib lautet: ".$result);
158)     }
159)     $password = hash("sha256", $password);
160)     $pwchange = ", password='{$password}'";
161)   }
162) 
163) 

164)   DB::query("UPDATE system.subusers SET username='{$username}', modules='{$modules}'{$pwchange} WHERE id={$id} AND uid={$uid}");