-<?PHP
+<?php
-/* functions for info plugin
- * Copyright (c) 1999-2002 The SquirrelMail Project Team
- * Licensed under the GNU GPL. For full terms see the file COPYING.
+/**
+ * functions for info plugin
*
* Here are two functions for the info plugin
* The first gets the CAPABILITY response from your IMAP server.
- * The second runs the passed IMAP test and returns the results
+ * The second runs the passed IMAP test and returns the results
* The third prints the results of the IMAP command
* to options.php.
- * by: Jason Munro jason@stdbev.com
+ *
+ * @author Jason Munro <jason at stdbev.com>
+ * @copyright 1999-2010 The SquirrelMail Project Team
+ * @license http://opensource.org/licenses/gpl-license.php GNU Public License
+ * @version $Id$
+ * @package plugins
+ * @subpackage info
*/
+/**
+ * Get the IMAP capabilities
+ *
+ * @param mixed $imap_stream
+ * @return array
+ * @access private
+ */
function get_caps($imap_stream) {
- $sid = sqimap_session_id();
- $query = "$sid CAPABILITY\r\n";
- fputs ($imap_stream, $query);
- $responses = sqimap_read_data_list($imap_stream, $sid, true, $responses, $message);
- return $responses;
+ return sqimap_run_command_list($imap_stream, 'CAPABILITY',false, $responses, $message,false);
}
+/**
+ * Run an IMAP test and return the results
+ *
+ * @param mixed $imap_stream
+ * @param string $string imap command
+ * @return array Response from the IMAP server
+ * @access private
+ */
function imap_test($imap_stream, $string) {
- global $default_charset;
- $message = '';
- $responses = array ();
- $sid = sqimap_session_id();
- $results = array();
- $query = "$sid ".trim($string)."\r\n";
- print "<TR><TD>".$query."</TD></TR>";
- fputs ($imap_stream, $query);
- $response = sqimap_read_data_list($imap_stream, $sid, false, $responses, $message);
- array_push($response, $message);
+ print "<tr><td>".htmlspecialchars($string)."</td></tr>";
+ $response = sqimap_run_command_list($imap_stream, trim($string),false, $responses, $message,false);
+ array_push($response, $responses . ' ' .$message);
return $response;
}
+/**
+ * Print the IMAP response to options.php
+ *
+ * @param array $response results of imap command
+ * @access private
+ */
function print_response($response) {
- foreach($response as $index=>$value) {
+ foreach($response as $value) {
if (is_array($value)) {
print_response($value);
}
else {
- $value = preg_replace("/</", "<", $value);
- $value = preg_replace("/>/", ">", $value);
- print $value."<BR>\n";
+ print htmlspecialchars($value)."<br />\n";
}
}
}
-
-?>