X-Git-Url: https://vcs.fsf.org/?a=blobdiff_plain;ds=sidebyside;f=plugins%2Fbug_report%2Fbug_report.php;h=7aca17a64deef87431d44c15b2f2f19df53db4a0;hb=3ee2d2aefc07dc6365e9aa6f90e9c12170c6fbc4;hp=9fc9c32e7407b4f550bdb66277adeefdd886ee62;hpb=42a73e4906548ec0ff04e08a067a835349bf6aea;p=squirrelmail.git diff --git a/plugins/bug_report/bug_report.php b/plugins/bug_report/bug_report.php index 9fc9c32e..7aca17a6 100644 --- a/plugins/bug_report/bug_report.php +++ b/plugins/bug_report/bug_report.php @@ -13,7 +13,7 @@ * * This is a standard Squirrelmail-1.2 API for plugins. * - * $Id$ + * @version $Id$ * @package plugins * @subpackage bug_report */ @@ -30,24 +30,10 @@ require_once(SM_PATH . 'functions/forms.php'); displayPageHeader($color, 'None'); +include_once(SM_PATH . 'plugins/bug_report/system_specs.php'); +include_once(SM_PATH . 'plugins/bug_report/functions.php'); +global $body; -function Show_Array($array) { - $str = ''; - foreach ($array as $key => $value) { - if ($key != 0 || $value != '') { - $str .= " * $key = $value\n"; - } - } - if ($str == '') { - return " * Nothing listed\n"; - } - return $str; -} - -$browscap = ini_get('browscap'); -if(!empty($browscap)) { - $browser = get_browser(); -} $body_top = "I subscribe to the squirrelmail-users mailing list.\n" . " [ ] True - No need to CC me when replying\n" . " [ ] False - Please CC me when replying\n" . @@ -61,123 +47,51 @@ $body_top = "I subscribe to the squirrelmail-users mailing list.\n" . "I can reproduce the bug by:\n\n\n" . "(Optional) I got bored and found the bug occurs in:\n\n\n" . "(Optional) I got really bored and here's a fix:\n\n\n" . - "----------------------------------------------\n" . - "\nMy browser information:\n" . - ' '.$_SERVER['HTTP_USER_AGENT'] . "\n" ; - if(isset($browser)) { - $body_top .= " get_browser() information (List)\n" . - Show_Array((array) $browser); - } - $body_top .= "\nMy web server information:\n" . - " PHP Version " . phpversion() . "\n" . - " PHP Extensions (List)\n" . - Show_Array(get_loaded_extensions()) . - "\nSquirrelMail-specific information:\n" . - " Version: $version\n" . - " Plugins (List)\n" . - Show_Array($plugins); -if (isset($ldap_server) && $ldap_server[0] && ! extension_loaded('ldap')) { - $warning = 1; - $warnings['ldap'] = "LDAP server defined in SquirrelMail config, " . - "but the module is not loaded in PHP"; - $corrections['ldap'][] = "Reconfigure PHP with the option '--with-ldap'"; - $corrections['ldap'][] = "Then recompile PHP and reinstall"; - $corrections['ldap'][] = "-- OR --"; - $corrections['ldap'][] = "Reconfigure SquirrelMail to not use LDAP"; -} - -$body = "\nMy IMAP server information:\n" . - " Server type: $imap_server_type\n"; -$imap_stream = fsockopen ($imapServerAddress, $imapPort, $error_number, $error_string); -$server_info = fgets ($imap_stream, 1024); -if ($imap_stream) { - // SUPRESS HOST NAME - $list = explode(' ', $server_info); - $list[2] = '[HIDDEN]'; - $server_info = implode(' ', $list); - $body .= " Server info: $server_info"; - fputs ($imap_stream, "a001 CAPABILITY\r\n"); - $read = fgets($imap_stream, 1024); - $list = explode(' ', $read); - array_shift($list); - array_shift($list); - $read = implode(' ', $list); - $body .= " Capabilities: $read"; - fputs ($imap_stream, "a002 LOGOUT\r\n"); - fclose($imap_stream); -} else { - $body .= " Unable to connect to IMAP server to get information.\n"; - $warning = 1; - $warnings['imap'] = "Unable to connect to IMAP server"; - $corrections['imap'][] = "Make sure you specified the correct mail server"; - $corrections['imap'][] = "Make sure the mail server is running IMAP, not POP"; - $corrections['imap'][] = "Make sure the server responds to port $imapPort"; -} -$warning_html = ''; -$warning_num = 0; -if (isset($warning) && $warning) { - foreach ($warnings as $key => $value) { - if ($warning_num == 0) { - $body_top .= "WARNINGS WERE REPORTED WITH YOUR SETUP:\n"; - $body_top = "WARNINGS WERE REPORTED WITH YOUR SETUP -- SEE BELOW\n\n$body_top"; - $warning_html = "

Warnings were reported with your setup:

\n
\n"; - } - $warning_num ++; - $warning_html .= "
$value
\n"; - $body_top .= "\n$value\n"; - foreach ($corrections[$key] as $corr_val) { - $body_top .= " * $corr_val\n"; - $warning_html .= "
* $corr_val
\n"; - } - } - $warning_html .= "
\n

$warning_num warning(s) reported.

\n
\n"; - $body_top .= "\n$warning_num warning(s) reported.\n"; - $body_top .= "----------------------------------------------\n"; -} - -$body = htmlspecialchars($body_top . $body); + "----------------------------------------------\n\n"; + +$body = htmlspecialchars($body_top) . $body; ?> -
+
- "._("Submit a Bug Report")."",'center',$color[0]); ?> + '._("Submit a Bug Report").'','center',$color[0]); ?>
- '; echo _("Before you send your bug report, please make sure to check this checklist for any common problems."); - echo '

'; + echo "

\n"; - echo "