간단한 URL 파싱 코드

void __w3curlparse(const char *szurl,
			char *szprotocol, char *szuser,	char *szpassword,
			char *szaddress, unsigned long &nport, char *szuri){

	char szport[1024]="\0";
	unsigned long npos=0;
	bool bflag=false;

	while(strlen(szurl)>0 && npos<strlen(szurl) && strncmp((szurl+npos), ":", 1))
		++npos;

	if(!strncmp((szurl+npos+1), "/", 1)){	// is protocol
		if(szprotocol){
			strncpy(szprotocol, szurl, npos);
			szprotocol[npos]=0;
		}
		bflag=true;
	}else{	// is host
		if(szprotocol){
			strncpy(szprotocol, "http", 4);
			szprotocol[5]='\0';
		}
	}

	unsigned long nsp=0, usp=0;
	
	if(bflag){
		usp=nsp=npos+=3;
	}else{
		usp=nsp=npos=0;
	}
	
	while(strlen(szurl)>0 && usp<strlen(szurl) && strncmp((szurl+usp), "@", 1))
			++usp;

	if(usp<strlen(szurl)){ // find username and find password
		unsigned long ssp=nsp;
		while(strlen(szurl)>0 && npos<strlen(szurl) && strncmp((szurl+ssp), ":", 1))
			++ssp;

		if(ssp<usp){// find
			strncpy(szuser, szurl+nsp, ssp-nsp);
			szuser[ssp-nsp+1]='\0';
			strncpy(szpassword, szurl+ssp+1, usp-ssp-1);
			szpassword[usp-ssp]='\0';
		}

		nsp=npos=usp+1;
	}

	bflag=false;
	while(strlen(szurl)>0 && npos<strlen(szurl) && strncmp((szurl+npos), "/", 1))
			++npos;

	unsigned long nf=nsp;

	for(;nf<=npos;nf++){
		if(!strncmp((szurl+nf), ":", 1)){ // find PORT
			bflag=true;
			break;
		}
	}

	if(bflag){
		char sztmp[1024]="\0";
		strncpy(sztmp, (szurl+nf+1), npos-nf);
		nport=atol(sztmp);
		strncpy(szaddress, (szurl+nsp), nf-nsp);
	}else if(!strcmp(szprotocol,"https")){
		nport=INTERNET_DEFAULT_HTTPS_PORT;
		strncpy(szaddress, (szurl+nsp), npos-nsp);
	}else if(!strcmp(szprotocol, "ftp")){
		nport=INTERNET_DEFAULT_FTP_PORT;
		strncpy(szaddress, (szurl+nsp), npos-nsp);
	}else {
		nport=INTERNET_DEFAULT_HTTP_PORT;
		strncpy(szaddress, (szurl+nsp), npos-nsp);
	}

	if(npos<strlen(szurl)){ // find URI
		strncpy(szuri, (szurl+npos), strlen(szurl)-npos);
	}else{
		szuri[0]='/';
		szuri[1]='\0';
	}

	return;
}