<?php

/*
+--------------------------------------------------------------------------
|   Invision Power Board v1.2
|   ========================================
|   by Matthew Mecham
|   (c) 2001 - 2003 Invision Power Services
|   http://www.invisionpower.com
|   ========================================
|   Web: http://www.invisionboard.com
|   Email: matt@invisionpower.com
|   Licence Info: http://www.invisionboard.com/?license
+---------------------------------------------------------------------------
|
|   > Add POLL module
|   > Module written by Matt Mecham
|
+--------------------------------------------------------------------------
|
|   QUOTE OF THE MODULE: (Taken from BtVS)
|   --------------------
|	Drusilla: I'm naming all the stars...
|   Spike: You can't see the stars love, That's the ceiling. Also, it's day.
|
+--------------------------------------------------------------------------
*/


$idx = new Poll;

class Poll {


	var $topic = array();
	var $poll  = array();
	var $upload = array();
	var $poll_count = 0;
	var $poll_choices = "";

	function Poll() {

		global $ibforums, $std, $DB, $print;

		$ibforums->lang      = $std->load_words($ibforums->lang, 'lang_post', $ibforums->lang_id);

		// Lets do some tests to make sure that we are allowed to start a new topic

		if (! $ibforums->member['g_vote_polls'])
		{
			$std->Error( array( LEVEL => 1, MSG => 'no_reply_polls') );
		}

		// Did we choose a choice?

		if (!$ibforums->input['nullvote'])
		{
			if (! isset($ibforums->input['poll_vote']) )
			{
				$std->Error( array( LEVEL => 1, MSG => 'no_vote') );
			}
		}

		// Make sure we have a valid poll id

       	$ibforums->input[t] = $std->is_number($ibforums->input[t]);
		if (! $ibforums->input[t] ) {
			$std->Error( array( LEVEL => 1, MSG => 'missing_files') );
		}

   		// Load the topic and poll

   		$DB->query("SELECT f.allow_pollbump, t.*, p.pid as poll_id,p.choices,p.starter_id,p.votes from ibf_polls p, ibf_topics t, ibf_forums f WHERE t.tid='".$ibforums->input['t']."' and p.tid=t.tid and t.forum_id=f.id");

   		$this->topic = $DB->fetch_row();

   		if (! $this->topic['tid'] )
   		{
   			$std->Error( array( LEVEL => 1, MSG => 'poll_none_found') );
   		}

   		if ($this->topic['state'] != 'open')
   		{
   			$std->Error( array( LEVEL => 1, MSG => 'locked_topic') );
   		}
		// Have we voted before?

		$DB->query("SELECT member_id from ibf_voters WHERE tid='".$this->topic['tid']."' and member_id='".$ibforums->member['uid']."'");

		if ( $DB->get_num_rows() )
		{
			$std->Error( array( LEVEL => 1, MSG => 'poll_you_voted') );
		}

		// If we're here, lets add the vote


		$db_string = $std->compile_db_string(
											  array (
											  			'member_id'  => $ibforums->member['uid'],
											  			'ip_address' => $ibforums->input['IP_ADDRESS'],
											  			'tid'        => $this->topic['tid'],
											  			'forum_id'   => $this->topic['forum_id'],
											  			'vote_date'  => time(),
											  		)
											  );

		$DB->query("INSERT INTO ibf_voters (" .$db_string['FIELD_NAMES']. ") VALUES (". $db_string['FIELD_VALUES'] .")");


		// If this isn't a null vote...

		if (!$ibforums->input['nullvote'])
		{
			$poll_answers = unserialize($this->topic['choices']);
        	reset($poll_answers);
        	$new_poll_array = array();
        	foreach ($poll_answers as $entry)
        	{
        		$id     = $entry[0];
        		$choice = $entry[1];
        		$votes  = $entry[2];

        		if ($id == $ibforums->input['poll_vote'])
        		{
        			$votes++;
        		}

        		$new_poll_array[] = array( $id, $choice, $votes);
        	}

            $this->topic['choices'] = $DB->oopsAddSlashes(serialize($new_poll_array));
        	$DB->query("UPDATE ibf_polls SET ".
        				 "votes=votes+1, ".
        				 "choices='"  . $this->topic['choices'] . "' ".
        				 "WHERE pid='" . $this->topic['poll_id']    . "'");

        	if ($this->topic['allow_pollbump'])
        	{

        		$this->topic['last_vote'] = time();
        		$this->topic['last_post'] = time();

				$DB->query("UPDATE ibf_topics SET ".
        				 	"last_vote='" . $this->topic['last_vote'] . "', ".
        				 	"last_post='" . $this->topic['last_post'] . "' ".
        				 	"WHERE tid='" . $this->topic['tid']       . "'");

        	}
        	else
        	{
        		$this->topic['last_vote'] = time();

				$DB->query("UPDATE ibf_topics SET ".
        				 	"last_vote='" . $this->topic['last_vote'] . "', ".
        				 	"last_post='" . $this->topic['last_post'] . "' ".
        				 	"WHERE tid='" . $this->topic['tid']       . "'");

        	}


        }

		$lang = $ibforums->input['nullvote'] ? $ibforums->lang['poll_viewing_results'] : $ibforums->lang['poll_vote_added'];

		$print->redirect_screen( $lang , "act=ST&f={$this->topic['forum_id']}&t={$this->topic['tid']}" );


	}

}

?>
