The Community Forums

Interact with an entire community of cPanel & WHM users!
  1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

/usr/local/cpanel/base/webmaillogin.cgi

Discussion in 'E-mail Discussions' started by L4S, Apr 8, 2003.

  1. L4S

    L4S Well-Known Member

    Joined:
    Feb 23, 2003
    Messages:
    47
    Likes Received:
    0
    Trophy Points:
    6
    Location:
    Australia
    Could someone post the above file (original) as mine has become corrupted.

    Thanks in advance.
    :)
     
  2. casey

    casey Well-Known Member

    Joined:
    Jan 17, 2003
    Messages:
    2,303
    Likes Received:
    0
    Trophy Points:
    36
    Location:
    If there is trouble, it will find me
    #!/usr/bin/perl

    open(CF,"/var/cpanel/cpanel.config");
    while(<CF>) {
    next if (/^#/);
    s/\n//g;
    ($var,$value) = split(/=/, $_);
    $$var = $value;
    }
    close(CF);


    $urlbase = $ARGV[0];
    if ($urlbase =~ /\@/) {
    $urlbase =~ s/\@/+/g;
    $urlbase = "/" . $urlbase;
    } else {
    $urlbase='';
    }


    print <<EOM;

    <html>
    <style>
    a:link { font-family: arial, verdana; color: #000000; text-decoration: none; }
    a:visited { font-family: arial, verdana; color: #000000; text-decoration: none; }
    a:active { font-family: arial, verdana; color: #000000; text-decoration: none; }
    a:hover { font-family: arial, verdana; color: #000000; text-decoration: underline; }
    </style>

    <body bgcolor=#FFFFFF>
    <center>
    <table><tr>
    EOM
    if (!$skipneomail) {
    print <<EOM;
    <td>
    <center>
    <a href="$urlbase/neomail/neomail.pl">
    <img border=0 src="$urlbase/neomail/neomail.gif"><br>
    Neomail</a>
    </td>
    EOM
    }

    if (!$skiphorde) {
    print <<EOM;
    <td>
    <center>
    <a href="/horde/index.php">
    <img border=0 src="$urlbase/neomail/horde-color.gif"><br>
    Horde<br> (requires login with full email address)</a>
    </td>
    EOM
    }

    print <<EOM;
    </tr></table>
    <br><br>
    <br>
    You are logged in as: $ENV{'REMOTE_USER'}<br><br>
    EOM
    if ($ENV{'REMOTE_USER'} =~ /\@/) {
    print <<EOM;
    <a href="$urlbase/webmailpasswd.cgi">Change Password</a>
    EOM
    }
    print "<br><br>\n";
    if ($ENV{'SERVER_PORT'} =~ /2096/) {
    print "<br>SSL <img src=\"$urlbase/lock.gif\"><br>\n";
    } else {
    my ($newhost) = $ENV{'HTTP_HOST'};
    print "<br>Non-SSL <img src=\"$urlbase/unlock.gif\"><br><a href=\"https://${newhost}:2096${urlbase}/\">Click for Secure Site</a><br>\$
    }

    print <<EOM;
    </center>
    <br><br>
    <!---
    All Web Mail:
    <a href="$urlbase/neomail/neomail.pl">Neomail</a>
    <a href="$urlbase/uebimiau/index.php">Uebimiau</a>
    <a href="$urlbase/openwebmail/openwebmail.pl">Open WebMail</a>
    ---->
    Notes: Uebimiau has been removed due to bugs and security problems.
    <br>


    </html>
    EOM
     
  3. L4S

    L4S Well-Known Member

    Joined:
    Feb 23, 2003
    Messages:
    47
    Likes Received:
    0
    Trophy Points:
    6
    Location:
    Australia
    Thanks....

    When i load this file i nothing happens, no viewing at all????

    It it possible that this file is specific to WHM?

    If so my current version is WHM 6.2.0
    Cpanel 6.2.0-S56
    RedHat 7.3

    with updated SQL.
     
  4. casey

    casey Well-Known Member

    Joined:
    Jan 17, 2003
    Messages:
    2,303
    Likes Received:
    0
    Trophy Points:
    36
    Location:
    If there is trouble, it will find me
    Those match my versions, except for cpanel itself. I'm using 6.2.0 R-47
     
Loading...

Share This Page