3 This program is free software; you can redistribute it and/or modify
4 it under the terms of the Revised BSD License.
6 This program is distributed in the hope that it will be useful,
7 but WITHOUT ANY WARRANTY; without even the implied warranty of
8 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
9 Revised BSD License for more details.
11 Copyright 2004-2012 iDB Support - http://idb.berlios.de/
12 Copyright 2004-2012 Game Maker 2k - http://gamemaker2k.org/
14 $FileInfo: groupsetup.php - Last Update: 12/30/2011 SVN 781 - Author: cooldude2k $
16 $File3Name = basename($_SERVER['SCRIPT_NAME']);
17 if ($File3Name=="groupsetup.php"||$File3Name=="/groupsetup.php") {
20 //Set members temp location
21 $_SESSION['ViewingPage'] = url_maker(null,"no+ext","act=view","&","=",$prexqstr['index'],$exqstr['index']);
22 if($Settings['file_ext']!="no+ext"&&$Settings['file_ext']!="no ext") {
23 $_SESSION['ViewingFile'] = $exfile['index'].$Settings['file_ext']; }
24 if($Settings['file_ext']=="no+ext"||$Settings['file_ext']=="no ext") {
25 $_SESSION['ViewingFile'] = $exfile['index']; }
26 $_SESSION['PreViewingTitle'] = "Viewing";
27 $_SESSION['ViewingTitle'] = "Board index";
28 /*$ggidquery = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."groups\" WHERE \"Name\"='%s' LIMIT 1", array($Settings['GuestGroup']));
29 $ggidresult=sql_query($ggidquery,$SQLStat);
30 $Settings['GuestGroupID']=sql_result($ggidresult,0,"id");*/
31 // Check to make sure MemberInfo is right
32 $MyPostCountChk = null; $MyKarmaCount = null;
33 if(!isset($_SESSION['UserID'])) { $_SESSION['UserID'] = 0; }
34 if($_SESSION['UserID']!=0&&$_SESSION['UserID']!=null) { $BanError = null;
35 $kgbquerychkusr = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."members\" WHERE \"Name\"='%s' AND \"UserPassword\"='%s' AND \"id\"=%i LIMIT 1", array($_SESSION['MemberName'],$_SESSION['UserPass'],$_SESSION['UserID']));
36 $resultchkusr=sql_query($kgbquerychkusr,$SQLStat);
37 $numchkusr=sql_num_rows($resultchkusr);
39 $ChkUsrID=sql_result($resultchkusr,0,"id");
40 $ChkUsrName=sql_result($resultchkusr,0,"Name");
41 $ChkUsrGroup=sql_result($resultchkusr,0,"GroupID");
42 $ChkUsrGroupID=$ChkUsrGroup;
43 $ChkUsrPass=sql_result($resultchkusr,0,"UserPassword");
44 $ChkUsrTimeZone=sql_result($resultchkusr,0,"TimeZone");
45 $ChkUsrDateFormat=sql_result($resultchkusr,0,"DateFormat");
46 $ChkUsrTimeFormat=sql_result($resultchkusr,0,"TimeFormat");
47 $ChkUsrTheme=sql_result($resultchkusr,0,"UseTheme");
48 $ChkUsrLastPostTime=sql_result($resultchkusr,0,"LastPostTime");
49 $MyPostCountChk=sql_result($resultchkusr,0,"PostCount");
50 $MyKarmaCount=sql_result($resultchkusr,0,"Karma");
51 $MyKarmaUpdate=sql_result($resultchkusr,0,"KarmaUpdate");
52 $MyRepliesPerPage=sql_result($resultchkusr,0,"RepliesPerPage");
53 $Settings['max_posts'] = $MyRepliesPerPage;
54 $MyTopicsPerPage=sql_result($resultchkusr,0,"TopicsPerPage");
55 $Settings['max_topics'] = $MyTopicsPerPage;
56 $MyMessagesPerPage=sql_result($resultchkusr,0,"MessagesPerPage");
57 $Settings['max_memlist'] = $MyMessagesPerPage;
58 $Settings['max_pmlist'] = $MyMessagesPerPage;
59 $ChkUsrDST=sql_result($resultchkusr,0,"DST");
60 $svrquery = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."groups\" WHERE \"id\"=%i LIMIT 1", array($ChkUsrGroup));
61 $svrgresultkgb=sql_query($svrquery,$SQLStat);
62 $ChkUsrGroup=sql_result($svrgresultkgb,0,"Name");
63 $ChkUsrBanTime=sql_result($resultchkusr,0,"BanTime");
64 $ChkUsrGMTime = GMTimeStamp();
65 if($ChkUsrBanTime!=0&&$ChkUsrBanTime!=null) {
66 if($ChkUsrBanTime>=$ChkUsrGMTime) { $BanError = "yes"; }
67 if($ChkUsrBanTime<0) { $BanError = "yes"; } }
68 if($BanError!="yes") {
69 $_SESSION['Theme']=$ChkUsrTheme;
70 $_SESSION['MemberName']=$ChkUsrName;
71 $_SESSION['UserID']=$ChkUsrID;
72 $_SESSION['UserIP']=$_SERVER['REMOTE_ADDR'];
73 $_SESSION['UserTimeZone']=$ChkUsrTimeZone;
74 $_SESSION['iDBDateFormat']=$ChkUsrDateFormat;
75 $_SESSION['iDBTimeFormat']=$ChkUsrTimeFormat;
76 $_SESSION['UserGroup']=$ChkUsrGroup;
77 $_SESSION['UserGroupID']=$ChkUsrGroupID;
78 $_SESSION['UserDST']=$ChkUsrDST;
79 $_SESSION['UserPass']=$ChkUsrPass;
80 $_SESSION['LastPostTime'] = $ChkUsrLastPostTime; } }
81 if($numchkusr<=0||$numchkusr>1||$BanError=="yes") { session_unset();
82 if($cookieDomain==null) {
83 setcookie("MemberName", null, GMTimeStamp() - 3600, $cbasedir);
84 setcookie("UserID", null, GMTimeStamp() - 3600, $cbasedir);
85 setcookie("SessPass", null, GMTimeStamp() - 3600, $cbasedir);
86 setcookie(session_name(), "", GMTimeStamp() - 3600, $cbasedir); }
87 if($cookieDomain!=null) {
88 if($cookieSecure===true) {
89 setcookie("MemberName", null, GMTimeStamp() - 3600, $cbasedir, $cookieDomain, 1);
90 setcookie("UserID", null, GMTimeStamp() - 3600, $cbasedir, $cookieDomain, 1);
91 setcookie("SessPass", null, GMTimeStamp() - 3600, $cbasedir, $cookieDomain, 1);
92 setcookie(session_name(), "", GMTimeStamp() - 3600, $cbasedir, $cookieDomain, 1); }
93 if($cookieSecure===false) {
94 setcookie("MemberName", null, GMTimeStamp() - 3600, $cbasedir, $cookieDomain);
95 setcookie("UserID", null, GMTimeStamp() - 3600, $cbasedir, $cookieDomain);
96 setcookie("SessPass", null, GMTimeStamp() - 3600, $cbasedir, $cookieDomain);
97 setcookie(session_name(), "", GMTimeStamp() - 3600, $cbasedir, $cookieDomain); } }
98 unset($_COOKIE[session_name()]);
99 $_SESSION = array(); session_unset(); session_destroy();
100 redirect("location",$rbasedir.url_maker($exfile['member'],$Settings['file_ext'],"act=login",$Settings['qstr'],$Settings['qsep'],$prexqstr['member'],$exqstr['member'],false)); sql_free_result($resultchkusr); sql_free_result($svrgresultkgb);
101 ob_clean(); header("Content-Type: text/plain; charset=".$Settings['charset']); $urlstatus = 302;
102 gzip_page($Settings['use_gzip'],$GZipEncode['Type']); session_write_close(); die(); }
103 sql_free_result($resultchkusr); sql_free_result($svrgresultkgb); }
104 if($_SESSION['UserID']==0||$_SESSION['UserID']==null) {
105 $_SESSION['UserIP']=$_SERVER['REMOTE_ADDR'];
106 $_SESSION['MemberName'] = null;
107 $_SESSION['UserGroup'] = $Settings['GuestGroup'];
108 $gidquery = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."groups\" WHERE \"Name\"='%s' LIMIT 1", array($Settings['GuestGroup']));
109 $gidresult=sql_query($gidquery,$SQLStat);
110 $_SESSION['UserGroupID']=sql_result($gidresult,0,"id");
111 sql_free_result($gidresult); }
112 if($_SESSION['MemberName']==null) { $_SESSION['UserID'] = "0";
113 $_SESSION['UserIP']=$_SERVER['REMOTE_ADDR'];
114 $_SESSION['UserGroup'] = $Settings['GuestGroup'];
115 $gidquery = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."groups\" WHERE \"Name\"='%s' LIMIT 1", array($Settings['GuestGroup']));
116 $gidresult=sql_query($gidquery,$SQLStat);
117 $_SESSION['UserGroupID']=sql_result($gidresult,0,"id");
118 sql_free_result($gidresult); }
119 // Member Group Setup
120 if(!isset($_SESSION['UserGroup'])) { $_SESSION['UserGroup'] = null; }
121 if($_SESSION['UserGroup']==null) {
122 $_SESSION['UserGroup']=$Settings['GuestGroup']; } $GruError = null;
123 $gruquery = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."groups\" WHERE \"Name\"='%s' LIMIT 1", array($_SESSION['UserGroup']));
124 $gruresult=sql_query($gruquery,$SQLStat);
125 $grunum=sql_num_rows($gruresult);
126 if($grunum<=0) { $GruError = true; sql_free_result($gruresult);
127 header("Content-Type: text/plain; charset=".$Settings['charset']); $urlstatus = 503;
128 ob_clean(); echo "Sorry could not find group data in database.\nContact the board admin about error.";
129 gzip_page($Settings['use_gzip'],$GZipEncode['Type']); session_write_close(); die(); }
130 if($_SESSION['UserID']!=0) {
131 $memprequery = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."mempermissions\" WHERE \"id\"=%i LIMIT 1", array($_SESSION['UserID'])); }
132 if($_SESSION['UserID']==0) {
133 $memprequery = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."mempermissions\" WHERE \"id\"=%i LIMIT 1", array(-1)); }
134 $mempreresult=sql_query($memprequery,$SQLStat);
135 $memprenum=sql_num_rows($mempreresult);
137 $GroupInfo['ID']=sql_result($gruresult,0,"id");
138 if(!is_numeric($GroupInfo['ID'])) { $GruError = true; }
139 $GroupInfo['Name']=sql_result($gruresult,0,"Name");
140 $GroupInfo['PermissionID']=sql_result($mempreresult,0,"PermissionID");
141 if(!is_numeric($GroupInfo['PermissionID'])||$GroupInfo['PermissionID']=="0") {
142 $GroupInfo['PermissionID']=sql_result($gruresult,0,"PermissionID");
143 if(!is_numeric($GroupInfo['PermissionID'])) { $GruError = true; } }
144 $GroupInfo['NamePrefix']=sql_result($gruresult,0,"NamePrefix");
145 $GroupInfo['NameSuffix']=sql_result($gruresult,0,"NameSuffix");
146 $GroupInfo['CanViewBoard']=sql_result($mempreresult,0,"CanViewBoard");
147 if($GroupInfo['CanViewBoard']!="yes"&&$GroupInfo['CanViewBoard']!="no"&&$GroupInfo['CanViewBoard']!="group") {
149 if($GroupInfo['CanViewBoard']=="group") {
150 $GroupInfo['CanViewBoard']=sql_result($gruresult,0,"CanViewBoard");
151 if($GroupInfo['CanViewBoard']!="yes"&&$GroupInfo['CanViewBoard']!="no") {
152 $GruError = true; } }
153 $GroupInfo['CanViewOffLine']=sql_result($mempreresult,0,"CanViewOffLine");
154 if($GroupInfo['CanViewOffLine']!="yes"&&$GroupInfo['CanViewOffLine']!="no"&&$GroupInfo['CanViewOffLine']!="group") {
156 if($GroupInfo['CanViewOffLine']=="group") {
157 $GroupInfo['CanViewOffLine']=sql_result($gruresult,0,"CanViewOffLine");
158 if($GroupInfo['CanViewOffLine']!="yes"&&$GroupInfo['CanViewOffLine']!="no") {
159 $GruError = true; } }
160 $GroupInfo['FloodControl']=sql_result($mempreresult,0,"FloodControl");
161 if(!is_numeric($GroupInfo['FloodControl'])) { $GroupInfo['FloodControl'] = 30; }
162 if($GroupInfo['FloodControl']==-1) {
163 $GroupInfo['FloodControl']=sql_result($gruresult,0,"FloodControl");
164 if(!is_numeric($GroupInfo['FloodControl'])) { $GroupInfo['FloodControl'] = 30; } }
165 $GroupInfo['SearchFlood']=sql_result($mempreresult,0,"SearchFlood");
166 if(!is_numeric($GroupInfo['SearchFlood'])) { $GroupInfo['SearchFlood'] = 30; }
167 if($GroupInfo['SearchFlood']==-1) {
168 $GroupInfo['SearchFlood']=sql_result($gruresult,0,"SearchFlood");
169 if(!is_numeric($GroupInfo['SearchFlood'])) { $GroupInfo['SearchFlood'] = 30; } }
170 $GroupInfo['CanEditProfile']=sql_result($mempreresult,0,"CanEditProfile");
171 if($GroupInfo['CanEditProfile']!="yes"&&$GroupInfo['CanEditProfile']!="no"&&$GroupInfo['CanEditProfile']!="group") {
173 if($GroupInfo['CanEditProfile']=="group") {
174 $GroupInfo['CanEditProfile']=sql_result($gruresult,0,"CanEditProfile");
175 if($GroupInfo['CanEditProfile']!="yes"&&$GroupInfo['CanEditProfile']!="no") {
176 $GruError = true; } }
177 $GroupInfo['CanAddEvents']=sql_result($mempreresult,0,"CanAddEvents");
178 if($GroupInfo['CanAddEvents']!="yes"&&$GroupInfo['CanAddEvents']!="no"&&$GroupInfo['CanAddEvents']!="group") {
180 if($GroupInfo['CanAddEvents']=="group") {
181 $GroupInfo['CanAddEvents']=sql_result($gruresult,0,"CanAddEvents");
182 if($GroupInfo['CanAddEvents']!="yes"&&$GroupInfo['CanAddEvents']!="no") {
183 $GruError = true; } }
184 $GroupInfo['CanPM']=sql_result($mempreresult,0,"CanPM");
185 if($GroupInfo['CanPM']!="yes"&&$GroupInfo['CanPM']!="no"&&$GroupInfo['CanPM']!="group") {
187 if($GroupInfo['CanPM']=="group") {
188 $GroupInfo['CanPM']=sql_result($gruresult,0,"CanPM");
189 if($GroupInfo['CanPM']!="yes"&&$GroupInfo['CanPM']!="no") {
190 $GruError = true; } }
191 $GroupInfo['CanSearch']=sql_result($mempreresult,0,"CanSearch");
192 if($GroupInfo['CanSearch']!="yes"&&$GroupInfo['CanSearch']!="no"&&$GroupInfo['CanSearch']!="group") {
194 if($GroupInfo['CanSearch']=="group") {
195 $GroupInfo['CanSearch']=sql_result($gruresult,0,"CanSearch");
196 if($GroupInfo['CanSearch']!="yes"&&$GroupInfo['CanSearch']!="no") {
197 $GruError = true; } }
198 $GroupInfo['CanExecPHP']=sql_result($mempreresult,0,"CanExecPHP");
199 if($GroupInfo['CanExecPHP']!="yes"&&$GroupInfo['CanExecPHP']!="no"&&$GroupInfo['CanExecPHP']!="group") {
200 $GroupInfo['CanExecPHP'] = "no"; }
201 if($GroupInfo['CanExecPHP']=="group") {
202 $GroupInfo['CanExecPHP']=sql_result($gruresult,0,"CanExecPHP");
203 if($GroupInfo['CanExecPHP']!="yes"&&$GroupInfo['CanExecPHP']!="no") {
204 $GroupInfo['CanExecPHP'] = "no"; } }
205 $GroupInfo['CanDoHTML']=sql_result($mempreresult,0,"CanDoHTML");
206 if($GroupInfo['CanDoHTML']!="yes"&&$GroupInfo['CanDoHTML']!="no"&&$GroupInfo['CanDoHTML']!="group") {
207 $GroupInfo['CanDoHTML'] = "no"; }
208 if($GroupInfo['CanDoHTML']=="group") {
209 $GroupInfo['CanDoHTML']=sql_result($gruresult,0,"CanDoHTML");
210 if($GroupInfo['CanDoHTML']!="yes"&&$GroupInfo['CanDoHTML']!="no") {
211 $GroupInfo['CanDoHTML'] = "no"; } }
212 $GroupInfo['CanUseBBags']=sql_result($mempreresult,0,"CanUseBBags");
213 if($GroupInfo['CanUseBBags']!="yes"&&$GroupInfo['CanUseBBags']!="no"&&$GroupInfo['CanUseBBags']!="group") {
214 $GroupInfo['CanUseBBags'] = "no"; }
215 if($GroupInfo['CanUseBBags']=="group") {
216 $GroupInfo['CanUseBBags']=sql_result($gruresult,0,"CanUseBBags");
217 if($GroupInfo['CanUseBBags']!="yes"&&$GroupInfo['CanUseBBags']!="no") {
218 $GroupInfo['CanUseBBags'] = "no"; } }
219 $GroupInfo['PromoteTo']=sql_result($gruresult,0,"PromoteTo");
220 $GroupInfo['PromotePosts']=sql_result($gruresult,0,"PromotePosts");
221 if(!is_numeric($GroupInfo['PromotePosts'])) {
222 $GroupInfo['PromotePosts'] = 0; $GroupInfo['PromoteTo'] = 0; }
223 $GroupInfo['PromoteKarma']=sql_result($gruresult,0,"PromoteKarma");
224 if(!is_numeric($GroupInfo['PromoteKarma'])) {
225 $GroupInfo['PromoteKarma'] = 0; $GroupInfo['PromoteTo'] = 0; }
226 if(!isset($Settings['KarmaBoostDays'])) {
227 $Settings['KarmaBoostDays'] = null; }
228 $Settings['OldKarmaBoostDays'] = $Settings['KarmaBoostDays'];
229 if(!isset($Settings['KBoostPercent'])) {
230 $Settings['KBoostPercent'] = "6|10"; }
231 //Update karma and group upgrade on post count or karma count.
232 if($_SESSION['UserID']!=0) { $BoostTotal = null;
233 $KarmaExp = explode("&",$Settings['KarmaBoostDays']);
234 $KarmaNow = GMTimeGet("md",$_SESSION['UserTimeZone'],0,$_SESSION['UserDST']);
236 if(in_array($KarmaNow,$KarmaExp)) {
237 $KarmaNum = count($KarmaExp);
239 while ($Karmai < $KarmaNum) {
240 if($KarmaExp[$Karmai]==$KarmaNow) {
241 $Settings['KarmaBoostDays'] = $KarmaExp[$Karmai];
242 $kupdate = true; break 1; }
244 if($kupdate===false) {
245 $Settings['KarmaBoostDays'] = $KarmaExp[0]; }
246 $NewKarmaUpdate = GMTimeGet("Ymd",$_SESSION['UserTimeZone'],0,$_SESSION['UserDST']);
247 $ThisYearUpdate = GMTimeGet("Y",$_SESSION['UserTimeZone'],0,$_SESSION['UserDST']);
248 if($MyKarmaUpdate<$NewKarmaUpdate&&$MyPostCountChk>0) {
249 $KarmaBoostDay = $Settings['KarmaBoostDays'];
250 $KBoostPercent = explode("|",$Settings['KBoostPercent']);
251 if(count($KBoostPercent)<1) {
252 $KBoostPercent[0] = rand(1,4); }
253 if(!is_numeric($KBoostPercent[0])) {
254 $KBoostPercent[0] = 6; }
255 if(count($KBoostPercent)==1) {
256 $KBoostPercent[1] = $KBoostPercent[0] + rand(3,6); }
257 if(!is_numeric($KBoostPercent[1])) {
258 $KBoostPercent[0] = 10; }
259 $KBoostPercent = rand($KBoostPercent[0],$KBoostPercent[1]);
260 if($ThisYearUpdate.$KarmaBoostDay==$NewKarmaUpdate&&
261 is_numeric($KarmaBoostDay)) {
262 $KBoostPercent = $KBoostPercent / 100;
263 $BoostTotal = $MyKarmaCount * $KBoostPercent;
264 $BoostTotal = round($BoostTotal,0); }
265 if($BoostTotal!=null) {
266 $MyKarmaCount = $MyKarmaCount + $BoostTotal; }
267 if($BoostTotal==null) {
268 $MyKarmaCount = $MyKarmaCount + 1; }
269 $querykarmaup = sql_pre_query("UPDATE \"".$Settings['sqltable']."members\" SET \"Karma\"=%i,\"KarmaUpdate\"=%i WHERE \"id\"=%i", array($MyKarmaCount,$NewKarmaUpdate,$_SESSION['UserID']));
270 sql_query($querykarmaup,$SQLStat); }
271 $Settings['KarmaBoostDays'] = $Settings['OldKarmaBoostDays'];
272 if($GroupInfo['PromoteTo']!=0&&$MyPostCountChk>=$GroupInfo['PromotePosts']) {
273 $sql_group_check = sql_query(sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."groups\" WHERE \"id\"=%i LIMIT 1", array($GroupInfo['PromoteTo'])),$SQLStat);
274 $group_check = sql_num_rows($sql_group_check);
275 sql_free_result($sql_group_check);
276 if($group_check > 0) {
277 $queryupgrade = sql_pre_query("UPDATE \"".$Settings['sqltable']."members\" SET \"GroupID\"=%i WHERE \"id\"=%i", array($GroupInfo['PromoteTo'],$_SESSION['UserID']));
278 sql_query($queryupgrade,$SQLStat); } }
279 if($GroupInfo['PromotePosts']==0&&$GroupInfo['PromoteTo']!=0&&$MyKarmaCount>=$GroupInfo['PromoteKarma']) {
280 $sql_group_check = sql_query(sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."groups\" WHERE \"id\"=%i LIMIT 1", array($GroupInfo['PromoteTo'])),$SQLStat);
281 $group_check = sql_num_rows($sql_group_check);
282 sql_free_result($sql_group_check);
283 if($group_check > 0) {
284 $queryupgrade = sql_pre_query("UPDATE \"".$Settings['sqltable']."members\" SET \"GroupID\"=%i WHERE \"id\"=%i", array($GroupInfo['PromoteTo'],$_SESSION['UserID']));
285 sql_query($queryupgrade,$SQLStat); } } }
286 $GroupInfo['HasModCP']=sql_result($mempreresult,0,"HasModCP");
287 if($GroupInfo['HasModCP']!="yes"&&$GroupInfo['HasModCP']!="no"&&$GroupInfo['HasModCP']!="group") {
288 $GroupInfo['HasModCP'] = "no"; }
289 if($GroupInfo['HasModCP']=="group") {
290 $GroupInfo['HasModCP']=sql_result($gruresult,0,"HasModCP");
291 if($GroupInfo['HasModCP']!="yes"&&$GroupInfo['HasModCP']!="no") {
292 $GroupInfo['HasModCP'] = "no"; } }
293 $GroupInfo['HasAdminCP']=sql_result($mempreresult,0,"HasAdminCP");
294 if($GroupInfo['HasAdminCP']!="yes"&&$GroupInfo['HasAdminCP']!="no"&&$GroupInfo['HasAdminCP']!="group") {
295 $GroupInfo['HasAdminCP'] = "no"; }
296 if($GroupInfo['HasAdminCP']=="group") {
297 $GroupInfo['HasAdminCP']=sql_result($gruresult,0,"HasAdminCP");
298 if($GroupInfo['HasAdminCP']!="yes"&&$GroupInfo['HasAdminCP']!="no") {
299 $GroupInfo['HasAdminCP'] = "no"; } }
300 $GroupInfo['CanViewIPAddress']=sql_result($mempreresult,0,"CanViewIPAddress");
301 if($GroupInfo['CanViewIPAddress']!="yes"&&$GroupInfo['CanViewIPAddress']!="no"&&$GroupInfo['CanViewIPAddress']!="group") {
302 $GroupInfo['CanViewIPAddress'] = "no"; }
303 if($GroupInfo['CanViewIPAddress']=="group") {
304 $GroupInfo['CanViewIPAddress']=sql_result($gruresult,0,"CanViewIPAddress");
305 if($GroupInfo['CanViewIPAddress']!="yes"&&$GroupInfo['CanViewIPAddress']!="no") {
306 $GroupInfo['CanViewIPAddress'] = "no"; } }
307 $GroupInfo['CanViewUserAgent']=sql_result($mempreresult,0,"CanViewUserAgent");
308 if($GroupInfo['CanViewUserAgent']!="yes"&&$GroupInfo['CanViewUserAgent']!="no"&&$GroupInfo['CanViewUserAgent']!="group") {
309 $GroupInfo['CanViewUserAgent'] = "no"; }
310 if($GroupInfo['CanViewUserAgent']=="group") {
311 $GroupInfo['CanViewUserAgent']=sql_result($gruresult,0,"CanViewUserAgent");
312 if($GroupInfo['CanViewUserAgent']!="yes"&&$GroupInfo['CanViewUserAgent']!="no") {
313 $GroupInfo['CanViewUserAgent'] = "no"; } }
314 $GroupInfo['ViewDBInfo']=sql_result($mempreresult,0,"ViewDBInfo");
315 if($GroupInfo['ViewDBInfo']!="yes"&&$GroupInfo['ViewDBInfo']!="no"&&$GroupInfo['ViewDBInfo']!="group") {
316 $GroupInfo['ViewDBInfo'] = "no"; }
317 if($GroupInfo['ViewDBInfo']=="group") {
318 $GroupInfo['ViewDBInfo']=sql_result($gruresult,0,"ViewDBInfo");
319 if($GroupInfo['ViewDBInfo']!="yes"&&$GroupInfo['ViewDBInfo']!="no") {
320 $GroupInfo['ViewDBInfo'] = "no"; } }
321 if($GruError==true) {
322 header("Content-Type: text/plain; charset=".$Settings['charset']);
323 sql_free_result($gruresult); sql_free_result($mempreresult); $urlstatus = 503;
324 ob_clean(); echo "Sorry could not load all group data in database.\nContact the board admin about error.";
325 gzip_page($Settings['use_gzip'],$GZipEncode['Type']); session_write_close(); die(); } }
326 sql_free_result($gruresult);
327 if($GroupInfo['CanViewBoard']=="no") {
328 header("Content-Type: text/plain; charset=".$Settings['charset']);
329 ob_clean(); echo "Sorry you can not view the board."; $urlstatus = 503;
330 gzip_page($Settings['use_gzip'],$GZipEncode['Type']); session_write_close(); die(); }
331 // Member Group Permissions Setup
332 $perquery = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."permissions\" WHERE \"PermissionID\"=%i ORDER BY \"ForumID\" ASC", array($GroupInfo['PermissionID']));
333 $peresult=sql_query($perquery,$SQLStat);
334 $pernum=sql_num_rows($peresult);
335 $peri=0; $PerError = null;
336 if($pernum<0) { $PerError = true; sql_free_result($peresult);
337 header("Content-Type: text/plain; charset=".$Settings['charset']); $urlstatus = 503;
338 ob_clean(); echo "Sorry could not find permission data in database.\nContact the board admin about error.";
339 gzip_page($Settings['use_gzip'],$GZipEncode['Type']); session_write_close(); die(); }
340 $ForumIgnoreList1 = null; $ForumIgnoreList2 = null;
341 $ForumIgnoreList3 = null; $ForumIgnoreList4 = null;
342 $ForumIgnoreList5 = null; $ForumIgnoreList6 = null;
343 $ModForumIgnoreList1 = null; $ModForumIgnoreList2 = null;
344 $ModForumIgnoreList3 = null; $ModForumIgnoreList4 = null;
345 if($pernum>=1) { while ($peri < $pernum) {
346 $PerForumID=sql_result($peresult,$peri,"ForumID");
347 if(!is_numeric($PerForumID)) { $PerError = true; }
348 $PermissionInfo['ID'][$PerForumID]=sql_result($peresult,$peri,"id");
349 if(!is_numeric($PermissionInfo['ID'][$PerForumID])) { $PerError = true; }
350 $PermissionInfo['PermissionID'][$PerForumID]=sql_result($peresult,$peri,"PermissionID");
351 if(!is_numeric($PermissionInfo['PermissionID'][$PerForumID])) { $PerError = true; }
352 $PermissionInfo['Name'][$PerForumID]=sql_result($peresult,$peri,"Name");
353 $PermissionInfo['ForumID'][$PerForumID]=sql_result($peresult,$peri,"ForumID");
354 if(!is_numeric($PermissionInfo['ForumID'][$PerForumID])) { $PerError = true; }
355 $PermissionInfo['CanViewForum'][$PerForumID]=sql_result($peresult,$peri,"CanViewForum");
356 if($PermissionInfo['CanViewForum'][$PerForumID]!="yes"&&$PermissionInfo['CanViewForum'][$PerForumID]!="no") {
358 if($PermissionInfo['CanViewForum'][$PerForumID]=="no") {
359 if(strlen($ForumIgnoreList1)>1) { $ForumIgnoreList1 .= " AND \"id\"<>".$PerForumID; }
360 if(strlen($ForumIgnoreList1)<1) { $ForumIgnoreList1 = " \"id\"<>".$PerForumID; }
361 if(strlen($ForumIgnoreList2)>1) { $ForumIgnoreList2 .= " AND \"id\"<>".$PerForumID; }
362 if(strlen($ForumIgnoreList2)<1) { $ForumIgnoreList2 = " AND \"id\"<>".$PerForumID; }
363 if(strlen($ForumIgnoreList3)>1) { $ForumIgnoreList3 .= " AND \"ForumID\"<>".$PerForumID; }
364 if(strlen($ForumIgnoreList3)<1) { $ForumIgnoreList3 = " WHERE \"ForumID\"<>".$PerForumID; }
365 if(strlen($ForumIgnoreList4)>1) { $ForumIgnoreList4 .= " AND \"ForumID\"<>".$PerForumID; }
366 if(strlen($ForumIgnoreList4)<1) { $ForumIgnoreList4 = " AND \"ForumID\"<>".$PerForumID; }
367 if(strlen($ForumIgnoreList5)>1) { $ForumIgnoreList5 .= " AND \"OldForumID\"<>".$PerForumID; }
368 if(strlen($ForumIgnoreList5)<1) { $ForumIgnoreList5 = " WHERE \"OldForumID\"<>".$PerForumID; }
369 if(strlen($ForumIgnoreList6)>1) { $ForumIgnoreList6 .= " AND \"OldForumID\"<>".$PerForumID; }
370 if(strlen($ForumIgnoreList6)<1) { $ForumIgnoreList6 = " AND \"OldForumID\"<>".$PerForumID; } }
371 $PermissionInfo['CanMakePolls'][$PerForumID]=sql_result($peresult,$peri,"CanMakePolls");
372 if($PermissionInfo['CanMakePolls'][$PerForumID]!="yes"&&$PermissionInfo['CanMakePolls'][$PerForumID]!="no") {
374 $PermissionInfo['CanMakeTopics'][$PerForumID]=sql_result($peresult,$peri,"CanMakeTopics");
375 if($PermissionInfo['CanMakeTopics'][$PerForumID]!="yes"&&$PermissionInfo['CanMakeTopics'][$PerForumID]!="no") {
377 $PermissionInfo['CanMakeReplys'][$PerForumID]=sql_result($peresult,$peri,"CanMakeReplys");
378 if($PermissionInfo['CanMakeReplys'][$PerForumID]!="yes"&&$PermissionInfo['CanMakeReplys'][$PerForumID]!="no") {
380 $PermissionInfo['CanMakeReplysClose'][$PerForumID]=sql_result($peresult,$peri,"CanMakeReplysCT");
381 if($PermissionInfo['CanMakeReplysClose'][$PerForumID]!="yes"&&$PermissionInfo['CanMakeReplysClose'][$PerForumID]!="no") {
383 $PermissionInfo['CanEditTopics'][$PerForumID]=sql_result($peresult,$peri,"CanEditTopics");
384 if($PermissionInfo['CanEditTopics'][$PerForumID]!="yes"&&$PermissionInfo['CanEditTopics'][$PerForumID]!="no") {
385 $PermissionInfo['CanEditTopics'][$PerForumID] = "no"; }
386 $PermissionInfo['CanEditTopicsClose'][$PerForumID]=sql_result($peresult,$peri,"CanEditTopicsCT");
387 if($PermissionInfo['CanEditTopicsClose'][$PerForumID]!="yes"&&$PermissionInfo['CanEditTopicsClose'][$PerForumID]!="no") {
388 $PermissionInfo['CanEditTopicsClose'][$PerForumID] = "no"; }
389 $PermissionInfo['CanEditReplys'][$PerForumID]=sql_result($peresult,$peri,"CanEditReplys");
390 if($PermissionInfo['CanEditReplys'][$PerForumID]!="yes"&&$PermissionInfo['CanEditReplys'][$PerForumID]!="no") {
391 $PermissionInfo['CanEditReplys'][$PerForumID] = "no"; }
392 $PermissionInfo['CanEditReplysClose'][$PerForumID]=sql_result($peresult,$peri,"CanEditReplysCT");
393 if($PermissionInfo['CanEditReplysClose'][$PerForumID]!="yes"&&$PermissionInfo['CanEditReplysClose'][$PerForumID]!="no") {
394 $PermissionInfo['CanEditReplysClose'][$PerForumID] = "no"; }
395 $PermissionInfo['CanDeleteTopics'][$PerForumID]=sql_result($peresult,$peri,"CanDeleteTopics");
396 if($PermissionInfo['CanDeleteTopics'][$PerForumID]!="yes"&&$PermissionInfo['CanDeleteTopics'][$PerForumID]!="no") {
397 $PermissionInfo['CanDeleteTopics'][$PerForumID] = "no"; }
398 $PermissionInfo['CanDeleteTopicsClose'][$PerForumID]=sql_result($peresult,$peri,"CanDeleteTopicsCT");
399 if($PermissionInfo['CanDeleteTopicsClose'][$PerForumID]!="yes"&&$PermissionInfo['CanDeleteTopicsClose'][$PerForumID]!="no") {
400 $PermissionInfo['CanDeleteTopicsClose'][$PerForumID] = "no"; }
401 $PermissionInfo['CanDeleteReplys'][$PerForumID]=sql_result($peresult,$peri,"CanDeleteReplys");
402 if($PermissionInfo['CanDeleteReplys'][$PerForumID]!="yes"&&$PermissionInfo['CanDeleteReplys'][$PerForumID]!="no") {
403 $PermissionInfo['CanDeleteReplys'][$PerForumID] = "no"; }
404 $PermissionInfo['CanDeleteReplysClose'][$PerForumID]=sql_result($peresult,$peri,"CanDeleteReplysCT");
405 if($PermissionInfo['CanDeleteReplysClose'][$PerForumID]!="yes"&&$PermissionInfo['CanDeleteReplysClose'][$PerForumID]!="no") {
406 $PermissionInfo['CanDeleteReplysClose'][$PerForumID] = "no"; }
407 $PermissionInfo['CanCloseTopics'][$PerForumID]=sql_result($peresult,$peri,"CanCloseTopics");
408 if($PermissionInfo['CanCloseTopics'][$PerForumID]!="yes"&&$PermissionInfo['CanCloseTopics'][$PerForumID]!="no") {
409 $PermissionInfo['CanCloseTopics'][$PerForumID] = "no"; }
410 $PermissionInfo['CanPinTopics'][$PerForumID]=sql_result($peresult,$peri,"CanPinTopics");
411 if($PermissionInfo['CanPinTopics'][$PerForumID]!="yes"&&$PermissionInfo['CanPinTopics'][$PerForumID]!="no") {
412 $PermissionInfo['CanPinTopics'][$PerForumID] = "no"; }
413 $PermissionInfo['CanDoHTML'][$PerForumID]=sql_result($peresult,$peri,"CanDoHTML");
414 if($PermissionInfo['CanDoHTML'][$PerForumID]!="yes"&&$PermissionInfo['CanDoHTML'][$PerForumID]!="no") {
415 $PermissionInfo['CanDoHTML'][$PerForumID] = "no"; }
416 $PermissionInfo['CanUseBBags'][$PerForumID]=sql_result($peresult,$peri,"CanUseBBags");
417 if($PermissionInfo['CanUseBBags'][$PerForumID]!="yes"&&$PermissionInfo['CanUseBBags'][$PerForumID]!="no") {
418 $PermissionInfo['CanUseBBags'][$PerForumID] = "no"; }
419 $PermissionInfo['CanModForum'][$PerForumID]=sql_result($peresult,$peri,"CanModForum");
420 if($PermissionInfo['CanModForum'][$PerForumID]!="yes"&&$PermissionInfo['CanModForum'][$PerForumID]!="no") {
421 $PermissionInfo['CanModForum'][$PerForumID] = "no"; }
422 if($PermissionInfo['CanModForum'][$PerForumID]=="no") {
423 if(strlen($ModForumIgnoreList1)>1) { $ModForumIgnoreList1 .= " AND \"id\"<>".$PerForumID; }
424 if(strlen($ModForumIgnoreList1)<1) { $ModForumIgnoreList1 = " \"id\"<>".$PerForumID; }
425 if(strlen($ModForumIgnoreList2)>1) { $ModForumIgnoreList2 .= " AND \"id\"<>".$PerForumID; }
426 if(strlen($ModForumIgnoreList2)<1) { $ModForumIgnoreList2 = " AND \"id\"<>".$PerForumID; }
427 if(strlen($ModForumIgnoreList3)>1) { $ModForumIgnoreList3 .= " AND \"ForumID\"<>".$PerForumID; }
428 if(strlen($ModForumIgnoreList3)<1) { $ModForumIgnoreList3 = " WHERE \"ForumID\"<>".$PerForumID; }
429 if(strlen($ModForumIgnoreList4)>1) { $ModForumIgnoreList4 .= " AND \"ForumID\"<>".$PerForumID; }
430 if(strlen($ModForumIgnoreList4)<1) { $ModForumIgnoreList4 = " AND \"ForumID\"<>".$PerForumID; } }
431 if($PerError===true) { $peri = $pernum; }
432 ++$peri; } if($PerError===true) {
433 header("Content-Type: text/plain; charset=".$Settings['charset']); sql_free_result($peresult); $urlstatus = 503;
434 ob_clean(); echo "Sorry could not load all permission data in database.\nContact the board admin about error.";
435 gzip_page($Settings['use_gzip'],$GZipEncode['Type']); session_write_close(); die(); } }
436 sql_free_result($peresult);
437 $per2query = sql_pre_query("SELECT * FROM \"".$Settings['sqltable']."catpermissions\" WHERE \"PermissionID\"=%i ORDER BY \"CategoryID\" ASC", array($GroupInfo['PermissionID']));
438 $per2esult=sql_query($per2query,$SQLStat);
439 $per2num=sql_num_rows($per2esult);
440 $per2i=0; $Per2Error = null;
441 if($per2num<=0) { $Per2Error = true; sql_free_result($per2esult);
442 header("Content-Type: text/plain; charset=".$Settings['charset']); $urlstatus = 503;
443 ob_clean(); echo "Sorry could not find permission data in database.\nContact the board admin about error.";
444 gzip_page($Settings['use_gzip'],$GZipEncode['Type']); session_write_close(); die(); }
445 $CatIgnoreList1 = null; $CatIgnoreList2 = null;
446 $CatIgnoreList3 = null; $CatIgnoreList4 = null;
447 $CatIgnoreList5 = null; $CatIgnoreList6 = null;
448 if($per2num>=1) { while ($per2i < $per2num) {
449 $PerCatID=sql_result($per2esult,$per2i,"CategoryID");
450 if(!is_numeric($PerCatID)) { $Per2Error = true; }
451 $CatPermissionInfo['ID'][$PerCatID]=sql_result($per2esult,$per2i,"id");
452 if(!is_numeric($CatPermissionInfo['ID'][$PerCatID])) { $Per2Error = true; }
453 $CatPermissionInfo['PermissionID'][$PerCatID]=sql_result($per2esult,$per2i,"PermissionID");
454 if(!is_numeric($CatPermissionInfo['PermissionID'][$PerCatID])) { $Per2Error = true; }
455 $CatPermissionInfo['Name'][$PerCatID]=sql_result($per2esult,$per2i,"Name");
456 $CatPermissionInfo['CategoryID'][$PerCatID]=sql_result($per2esult,$per2i,"CategoryID");
457 if(!is_numeric($CatPermissionInfo['CategoryID'][$PerCatID])) { $Per2Error = true; }
458 $CatPermissionInfo['CanViewCategory'][$PerCatID]=sql_result($per2esult,$per2i,"CanViewCategory");
459 if($CatPermissionInfo['CanViewCategory'][$PerCatID]!="yes"&&$CatPermissionInfo['CanViewCategory'][$PerCatID]!="no") { $Per2Error = true; }
460 if($CatPermissionInfo['CanViewCategory'][$PerCatID]=="no") {
461 if(strlen($CatIgnoreList1)>1) { $CatIgnoreList1 .= " AND \"id\"<>".$PerCatID; }
462 if(strlen($CatIgnoreList1)<1) { $CatIgnoreList1 = " \"id\"<>".$PerCatID; }
463 if(strlen($CatIgnoreList2)>1) { $CatIgnoreList2 .= " AND \"id\"<>".$PerCatID; }
464 if(strlen($CatIgnoreList2)<1) { $CatIgnoreList2 = " AND \"id\"<>".$PerCatID; }
465 if(strlen($CatIgnoreList3)>1) { $CatIgnoreList3 .= " AND \"CategoryID\"<>".$PerCatID; }
466 if(strlen($CatIgnoreList3)<1) { $CatIgnoreList3 = " WHERE \"CategoryID\"<>".$PerCatID; }
467 if(strlen($CatIgnoreList4)>1) { $CatIgnoreList4 .= " AND \"CategoryID\"<>".$PerCatID; }
468 if(strlen($CatIgnoreList4)<1) { $CatIgnoreList4 = " AND \"CategoryID\"<>".$PerCatID; }
469 if(strlen($CatIgnoreList5)>1) { $CatIgnoreList5 .= " AND \"OldCategoryID\"<>".$PerCatID; }
470 if(strlen($CatIgnoreList5)<1) { $CatIgnoreList5 = " WHERE \"OldCategoryID\"<>".$PerCatID; }
471 if(strlen($CatIgnoreList6)>1) { $CatIgnoreList6 .= " AND \"OldCategoryID\"<>".$PerCatID; }
472 if(strlen($CatIgnoreList6)<1) { $CatIgnoreList6 = " AND \"OldCategoryID\"<>".$PerCatID; } }
473 if($Per2Error===true) { $per2i = $per2num; }
474 ++$per2i; } if($Per2Error===true) {
475 header("Content-Type: text/plain; charset=".$Settings['charset']); sql_free_result($per2esult); $urlstatus = 503;
476 ob_clean(); echo "Sorry could not load all permission data in database.\nContact the board admin about error.";
477 gzip_page($Settings['use_gzip'],$GZipEncode['Type']); session_write_close(); die(); } }
478 sql_free_result($per2esult);