X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=lib%2Furl.c;h=d5cbcea21a34d718b7e9b70f6ee09131574deaa4;hb=d1a5b69d490ce61a0f41db08263580487720bf2f;hp=453538c229ef1176a3cedaaa56625a60324a1833;hpb=8470d2e0e8dc928babaddabc107393b9351adb90;p=libucw.git

diff --git a/lib/url.c b/lib/url.c
index 453538c2..d5cbcea2 100644
--- a/lib/url.c
+++ b/lib/url.c
@@ -224,18 +224,28 @@ url_split(byte *s, struct url *u, byte *d)
     {
       if (s[1] == '/')			/* Host spec */
 	{
-	  byte *q, *w, *e;
+	  byte *q, *e;
+	  byte *at = NULL;
 	  char *ep;
 
 	  s += 2;
 	  q = d;
 	  while (*s && *s != '/' && *s != '?')	/* Copy user:passwd@host:port */
-	    *d++ = *s++;
+	    {
+	      if (*s != '@')
+		*d++ = *s;
+	      else if (!at)
+		{
+		  *d++ = 0;
+		  at = d;
+		}
+	      else			/* This shouldn't happen with sane URL's, but we need to be sure */
+		*d++ = NCC_AT;
+	      s++;
+	    }
 	  *d++ = 0;
-	  w = strchr(q, '@');
-	  if (w)			/* user:passwd present */
+	  if (at)			/* user:passwd present */
 	    {
-	      *w++ = 0;
 	      u->user = q;
 	      if (e = strchr(q, ':'))
 		{
@@ -244,8 +254,8 @@ url_split(byte *s, struct url *u, byte *d)
 		}
 	    }
 	  else
-	    w = q;
-	  e = strchr(w, ':');
+	    at = q;
+	  e = strchr(at, ':');
 	  if (e)			/* host:port present */
 	    {
 	      uns p;
@@ -256,7 +266,7 @@ url_split(byte *s, struct url *u, byte *d)
 	      else if (p)		/* Port 0 (e.g. in :/) is treated as default port */
 		u->port = p;
 	    }
-	  u->host = w;
+	  u->host = at;
 	}
     }