Pastable version of Socket Loop, Need Constant Function

<pre class='prettyprint' language='php'>&lt;?php
function ircinit()
{
	global $con, $CONFIG, $channels, $last_chat;
	/* We need this to see if we need to JOIN (the channel) during
	the first iteration of the main loop */
	$firstTime = true;
	
	/* Connect to the irc server */
	$con['socket'] = fsockopen($CONFIG['server'], $CONFIG['port']);
	
	/* Check that we have connected */
	if (!$con['socket']) {
		print (&quot;\nCould not connect to: &quot;. $CONFIG['server'] .&quot; on port &quot;. $CONFIG['port']);
	} else {
		/* Send the username and nick */
		cmd_send(&quot;USER &quot;. $CONFIG['nick'] .&quot; roleplaygateway.com roleplaygateway.com :&quot;. $CONFIG['name']);
		cmd_send(&quot;NICK &quot;. $CONFIG['nick'] .&quot; roleplaygateway.com&quot;);
		
		/* Here is the loop. Read the incoming data (from the socket connection) */
		while (!feof($con['socket']))
		{
			/* Think of $con['buffer']['all'] as a line of chat messages.
			We are getting a 'line' and getting rid of whitespace around it. */
			$con['buffer']['all'] = trim(fgets($con['socket'], 4096));
			
			/* Pring the line/buffer to the console
			I used &lt;- to identify incoming data, -&gt; for outgoing. This is so that
			you can identify messages that appear in the console. */
			print date(&quot;[d/m @ H:i]&quot;).&quot;&lt;- &quot;.$con['buffer']['all'] .&quot;\n&quot;;
			
			/* If the server is PINGing, then PONG. This is to tell the server that
			we are still here, and have not lost the connection */
			if(substr($con['buffer']['all'], 0, 6) == 'PING :') {
				/* PONG : is followed by the line that the server
				sent us when PINGing */
				cmd_send('PONG :'.substr($con['buffer']['all'], 6));
				/* If this is the first time we have reached this point,
				then JOIN the channel */
				if ($firstTime == true){
					//cmd_send(&quot;JOIN &quot;. $CONFIG['channel']);
					// for all the channels we want to join
					foreach ($channels as $chan)
					{
						cmd_send(&quot;JOIN &quot;.$chan);			
					}
					/* The next time we get here, it will NOT be the firstTime */
					$firstTime = false;
				}
			} elseif (preg_match(&quot;/:NickServ!services@services.SC.net NOTICE HAL :This nickname is registered and protected./&quot;,$con['buffer']['all'])) {
				/* Need to register */
				register();
				/* Make sure that we have a NEW line of chats to analyse. If we don't,
				there is no need to parse the data again */
			} elseif ($old_buffer != $con['buffer']['all']) {
				/* Determine the patterns to be passed
				to parse_buffer(). buffer is in the form:
				:username!~identd@hostname JOIN :#php
				:username!~identd@hostname PRIVMSG #PHP :action text
				:username!~identd@hostname command channel :text */

// log the buffer to &quot;log.txt&quot; (file must have
				// already been created).
				//log_to_file($con['buffer']['all']);

// make sense of the buffer
				parse_buffer();
				
				// now process any commands issued to the bot
				process_commands();
				
			}
			
			update_http();
					
			$old_buffer = $con['buffer']['all'];
		}
	}
}
?&gt;</pre>
<a href="http://www.refactormycode.com/codes/250-socket-loop-need-constant-function" style="color:#fff" title="As seen on RefactorMyCode.com"><img alt="Small_logo" src="http://www.refactormycode.com/images/small_logo.gif" style="border:0" /></a>

Refactor :my => 'code'

Recent

Popular

Pastable version of Socket Loop, Need Constant Function