OpenEuphoria

Re: Security Issues?

• Posted by Euman <euman at bellsouth.net> Nov 26, 2002
• 521 views

Hey CK,

If your running the server then you could re-write these in Euphoria

#!/usr/local/bin/perl

use CGI;
$query = new CGI;

if ($query->param('url') ne '') {
 # redirect user to value of "url"
 print $query->redirect($query->param('url'));
} else {
 # no URL was provided so redirect back to referrer
 print $query->redirect($query->referer());
}

or, written in VB

<%@ LANGUAGE="VBScript" %>

<%
If (Request("url") <> "") Then
 ' redirect user to value of "url"
 Response.Redirect Request("url")
Else
 ' no URL was provided so redirect back to referrer
 Response.Redirect Request.ServerVariables("HTTP_REFERER")
End If
%>

you can write them in Euphoria in about 2 minutes!

Euman


----- Original Message ----- 
From: "C. K. Lester" <cklester at yahoo.com>
To: "EUforum" <EUforum at topica.com>
Sent: Tuesday, November 26, 2002 1:32 PM
Subject: RE: Security Issues?


: 
: 
: > Somebody see if this works for them: http://208.188.27.10/members (use 
: > any
: > userid and password). This may not be up for much longer...
: 
: It's not up anymore, but I'll be testing every once in a while.
: 
: I still need to know:
: 
:     how do i redirect to another page?
: 
: For instance, I've gotten the user's ID and password, and now I want to 
: send them to the next page. Or I guess I should just form the HTML with 
: the appropriate content and each link has a parameter indicating a valid 
: user is clicking around... ??? Anybody with some helpful hints and tips, 
: please speak up.
: 
: 
: 
: 
: