FTP URL in Bestandteile splitten

[eyeless]

hallo,

wie ist denn das jetzt, wenn man als passwort eine email hat: ftp://anonymous:[e-mail]@server.com:21/www/file.ext
bei den beispielen hier, TIdURI und internetcrackurl wird als passwort 'eine' und als host '[e-mail]' zurückgegeben ... was nun?

[sECuRE]

Hi,

ich würde es mit dem für URL encodierten Code für das @-Zeichen probieren: %40, also sollte die URL dann so aussehen: "ftp://benutzer:e%40mail.de@server:port/verzeichnis/file.ext".

Auf http://www.w3schools.com/tags/ref_urlencode.asp kann man diese Codes nachlesen.

cu

[Flocke]

Da musst du den ersten Klammeraffen wohl Url-encoden '@' => %40, also
ftp://anonymous:eine%40mail.de@serve...1/www/file.ext

//EDIT: roten Kasten ignoriert

[eyeless]

mein vorschlag: (funzt mit emails im user und pass)

Delphi-Quellcode:

type
  TMyURL = record
   url, protocol, user, pass, host, port, path, filename : String;
  end;

function CrackUrl(url : String; var res : TMyURL):boolean;
var
  atpos, tmppos : integer;
  hp, rest : string;
begin
try
 tmppos := 0;
 res.url := url;
 res.protocol := copy(url,0,pos('://',url)-1);
 url := copy(url,pos('://',url)+3,length(url));
 res.user := copy(url,0,pos(':',url)-1);
 url := copy(url,pos(':',url)+1,length(url));
 repeat
  atpos := tmppos;
  tmppos := PosEx('@',url,tmppos+1);
 until tmppos+atpos = atpos;
 res.pass := copy(url,0,atpos-1);
 url := copy(url,atpos+1,length(url));
 hp := copy(url,0,pos('/',url)-1);
 if pos(':',hp)=0 then
  begin
   res.host := hp;
   res.port := '21';
  end
 else
  begin
   res.host := copy(hp,0,pos(':',hp)-1);
   res.port := copy(hp,pos(':',hp)+1,length(hp));
  end;
 url := copy(url,pos('/',url),length(url));
 res.filename := fMain.GetFileName(url);
 if (res.filename = '') or (pos('.',res.filename)=0) then
  res.path := copy(url,0,length(url))
 else
  res.path := copy(url,0,pos(res.filename,url)-1);
 Result := true;
except
 Result := false;
end;
end;

GetFilename kopiert einfach nur den filename raus ...

das ganze könte man jez noch mehr absichern, indem man auch des letzte ':' und auch auf unglückliche '/' im user/pass prüft ...

mfg, eyeless