2 include_once("htmlparse.inc");
3 switch ($_POST['event']) {
6 $status=eventz::addForum();
8 Header("Location:".SCRIPT."?action=forum&node_id=$status&nocache=".time());
19 global $forum_icon_name;
21 $forum_public=$_POST['forum_public'];
23 $forum_category=$_POST['forum_category'];
24 $forum_type=$_POST['forum_type'];
25 $forum_info=$_POST['forum_info'];
26 $forum_name=$_POST['forum_name'];
28 if (empty($forum_name)) {
29 $error="nazov fora je prilis kratky!!!!";
33 if (!htmlparse::htmlparse($forum_name)) {
41 if (!htmlparse::htmlparse($forum_info)) {
51 $set=$kyberia->query("INSERT INTO forum set forum_name='$forum_name',forum_category='$forum_category',forum_owner='$user_id',forum_public='$forum_public',forum_type='$forum_type'");
52 $lastid=$kyberia->getLastInsertId();
53 $kyberia->query("insert into forum_info set forum_id='$lastid',forum_info='$forum_info'");
54 $kyberia->query("update category set category_forums=category_forums+1 where category_id='$forum_category'");
56 $q="select friends.* from friends where friend_id='$user_id'";
57 $set=$kyberia->query($q);
59 $send_bin=$set->getString('send_mail');
60 $u_id=$set->getString('user_id');
61 $s_forum=floor($send_bin/2);
63 if (($s_forum)&&(!$check)){
65 $sprava="<b>".$user_name."</b> vytvoril novy klub s nazvom <br>\"<a href='?action=forum&node_id=$lastid' target='_blank'>".$forum_name."</a>\"";
66 $kyberia->ubikMail($u_id,$sprava);
71 if (strstr($forum_icon_name,".jp")){
72 $cmd=NETPBM."/jpegtopnm $forum_icon | ".NETPBM."/pnmscale -width=123 | ".NETPBM."/ppmquant 256 | ".NETPBM."/ppmtogif > ".ICONDIR_FORUM.strtolower($lastid).".gif";
75 elseif (strstr($forum_icon_name,".gif")) {
76 $cmd=GIFSICLE." --resize 123x_ $forum_icon > ".ICONDIR_FORUM.strtolower($lastid).".gif";
79 if ($cmd) shell_exec($cmd);