/* 
 * The contents of this file are subject to the Mozilla Public 
 * License Version 1.1 (the "License"); you may not use this file 
 * except in compliance with the License. You may obtain a copy of 
 * the License at http://www.mozilla.org/MPL/ 
 * 
 * Software distributed under the License is distributed on an "AS 
 * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or 
 * implied. See the License for the specific language governing 
 * rights and limitations under the License. 
 * 
 * The Original Code is Vision.
 * 
 * The Initial Developer of the Original Code is The Vision Team.
 * Portions created by The Vision Team are
 * Copyright (C) 1999, 2000, 2001 The Vision Team.  All Rights
 * Reserved.
 * 
 * Contributor(s): Rene Gollent
 *                 Todd Lair
 */
 
#include <ctype.h>

#include "URLCrunch.h"

URLCrunch::URLCrunch (const char *data, int32 len)
	: buffer (""),
	  current_pos (0)
{
	buffer.Append (data, len);
}

URLCrunch::~URLCrunch (void)
{
}

int32
URLCrunch::Crunch (BString *url)
{
	if (current_pos >= buffer.Length())
		return B_ERROR;

	const int32 tagNum = 7;
	const char *tags[tagNum] =
	{
		"http://",
		"https://",
		"www.",
		"ftp://",
		"ftp.",
		"file:/",
		"mailto:"
	};

	int32 marker (buffer.Length());
	int32 pos (current_pos);
	int32 url_length (0);
	int32 markers[tagNum];
	int32 i(0);

	for (i = 0; i < tagNum; ++i)
		markers[i] = buffer.IFindFirst (tags[i], pos);

	for (i = 0; i < tagNum; ++i)
	
		if (markers[i] != B_ERROR
		&&  markers[i] < marker)
		{
			url_length = markers[i] + strlen(tags[i]);
			
			url_length += strcspn (buffer.String() + url_length, " \t\n|\\<>\")(][}{;'*^");


			int len (strlen (tags[i]));

			if (url_length - markers[i] > len
			&& (isdigit (buffer[markers[i] + len])
			||  isalpha (buffer[markers[i] + len])))
			{
				marker = markers[i];
				pos = url_length + 1;
				url_length -= marker;
			}
			else
				pos = markers[i] + 1;
		}
		
		if (marker < buffer.Length())
		{
			*url = "";

			url->Append (buffer.String() + marker, url_length);
		}

		current_pos = pos;

	return marker < buffer.Length() ? marker : B_ERROR;
}