/*
 * 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): Wade Majors <wade@ezri.org>
 *                 Todd Lair
 *                 Andrew Bazan
 */

#include <stdio.h>
#include <time.h>

#include <Application.h>
#include <Roster.h>
#include <Entry.h>
#include <Path.h>
#include <String.h>

const float doubleClickThresh = 6;

BString
GetWord (const char* cData, int32 wordNeeded)
{
	/*
	 * Function purpose: Get word number {wordNeeded} from {cData}
	 *                   (space delimited)
	 */

	BString data (cData);
	BString buffer ("-9z99");
	int32 wordAt (1), place (0);

	while (wordAt != wordNeeded && place != B_ERROR) {
		if ((place = data.FindFirst ('\x20', place)) != B_ERROR)
			if (++place < data.Length()
			        &&  data[place] != '\x20')
				++wordAt;
	}

	if (wordAt == wordNeeded
	        &&  place != B_ERROR
	        &&  place < data.Length()) {
		int32 end (data.FindFirst ('\x20', place));

		if (end == B_ERROR)
			end = data.Length();

		data.CopyInto (buffer, place, end - place);
	}

	return buffer;
}

BString
GetWordColon (const char* cData, int32 wordNeeded)
{
	/*
	 * Function purpose: Get word number {wordNeeded} from {cData}
	 *                   (colon delimited)
	 */

	BString data (cData);
	BString buffer ("-9z99");
	int32 wordAt (1), place (0);

	while (wordAt != wordNeeded && place != B_ERROR) {
		if ((place = data.FindFirst (':', place)) != B_ERROR)
			if (++place < data.Length()
			        &&  data[place] != ':')
				++wordAt;
	}

	if (wordAt == wordNeeded
	        &&  place != B_ERROR
	        &&  place < data.Length()) {
		int32 end (data.FindFirst (':', place));

		if (end == B_ERROR)
			end = data.Length();

		data.CopyInto (buffer, place, end - place);
	}

	return buffer;
}

BString
RestOfString (const char* cData, int32 wordStart)
{
	/*
	 * Function purpose: Get word number {wordStart} from {cData}
	 *                   append the rest of the string after {wordStart}
	 *                   (space delimited)
	 */

	BString data (cData);
	int32 wordAt (1), place (0);
	BString buffer ("-9z99");

	while (wordAt != wordStart && place != B_ERROR) {
		if ((place = data.FindFirst ('\x20', place)) != B_ERROR)
			if (++place < data.Length()
			        &&  data[place] != '\x20')
				++wordAt;
	}

	if (wordAt == wordStart
	        &&  place != B_ERROR
	        &&  place < data.Length())
		data.CopyInto (buffer, place, data.Length() - place);

	return buffer;
}

BString
GetNick (const char* cData)
{
	/*
	 * Function purpose: Get nickname from {cData}
	 *
	 *  Expected format: nickname!user@host.name
	 */

	BString data (cData);
	BString theNick;

	for (int32 i = 1; i < data.Length() && data[i] != '!' && data[i] != '\x20'; ++i)
		theNick += data[i];

	return theNick;
}

BString
GetIdent (const char* cData)
{
	/*
	 * Function purpose: Get identname/username from {cData}
	 *
	 *  Expected format: nickname!user@host.name
	 */

	BString data (GetWord(cData, 1));
	BString theIdent;
	int32 place[2];

	if ((place[0] = data.FindFirst ('!')) != B_ERROR
	        &&  (place[1] = data.FindFirst ('@')) != B_ERROR) {
		++(place[0]);
		data.CopyInto (theIdent, place[0], place[1] - place[0]);
	}

	return theIdent;
}

BString
GetAddress (const char* cData)
{
	/*
	 * Function purpose: Get address/hostname from {cData}
	 *
	 *  Expected format: nickname!user@host.name
	 */

	BString data (GetWord(cData, 1));
	BString address;
	int32 place;

	if ((place = data.FindFirst ('@')) != B_ERROR) {
		int32 length (data.FindFirst ('\x20', place));

		if (length == B_ERROR)
			length = data.Length();

		++place;
		data.CopyInto (address, place, length - place);
	}

	return address;
}

BString
TimeStamp()
{
	/*
	 * Function purpose: Return the timestamp string
	 *
	 */

	//  if(!vision_app->GetBool ("timestamp"))
	//    return "";

	//  const char *ts_format (vision_app->GetString ("timestamp_format"));
	const char* ts_format = "[%H:%M]";

	time_t myTime (time (0));
	tm curTime;
	localtime_r (&myTime, &curTime);

	char tempTime[32];
	tempTime[strftime (tempTime, 31, ts_format, &curTime)] = '\0';

	return BString (tempTime).Append('\x20', 1);
}


BString
ExpandKeyed (
    const char* incoming,
    const char* keys,
    const char** expansions)
{
	BString buffer;

	while (incoming && *incoming) {
		if (*incoming == '$') {
			const char* place;

			++incoming;

			if ((place = strchr (keys, *incoming)) != 0)
				buffer += expansions[place - keys];
			else
				buffer += *incoming;
		} else
			buffer += *incoming;

		++incoming;
	}

	buffer += "\n";

	return buffer;
}

BString
StringToURI (const char* string)
{
	/*
	 * Function purpose: Converts {string} to a URI safe format
	 *
	 */

	BString buffer (string);
	buffer.ToLower();
	buffer.ReplaceAll ("%",  "%25"); // do this first!
	buffer.ReplaceAll ("\n", "%20");
	buffer.ReplaceAll (" ",  "%20");
	buffer.ReplaceAll ("\"", "%22");
	buffer.ReplaceAll ("#",  "%23");
	buffer.ReplaceAll ("@",  "%40");
	buffer.ReplaceAll ("`",  "%60");
	buffer.ReplaceAll (":",  "%3A");
	buffer.ReplaceAll ("<",  "%3C");
	buffer.ReplaceAll (">",  "%3E");
	buffer.ReplaceAll ("[",  "%5B");
	buffer.ReplaceAll ("\\", "%5C");
	buffer.ReplaceAll ("]",  "%5D");
	buffer.ReplaceAll ("^",  "%5E");
	buffer.ReplaceAll ("{",  "%7B");
	buffer.ReplaceAll ("|",  "%7C");
	buffer.ReplaceAll ("}",  "%7D");
	buffer.ReplaceAll ("~",  "%7E");
	return buffer;
}

BString
DurationString (int64 value)
{
	/*
	 * Function purpose: Return a duration string based on {value}
	 *
	 */

	BString duration;
	bigtime_t micro = value;
	bigtime_t milli = micro / 1000;
	bigtime_t sec = milli / 1000;
	bigtime_t min = sec / 60;
	bigtime_t hours = min / 60;
	bigtime_t days = hours / 24;

	char message[512] = "";
	if (days)
		sprintf(message, "%Ld day%s ", days, days != 1 ? "s" : "");

	if (hours % 24)
		sprintf(message, "%s%Ld hr%s ", message, hours % 24, (hours % 24) != 1 ? "s" : "");

	if (min % 60)
		sprintf(message, "%s%Ld min%s ", message, min % 60, (min % 60) != 1 ? "s" : "");

	sprintf(message, "%s%Ld.%Ld sec%s", message, sec % 60, (milli % 1000), (sec % 60) != 1 ? "s" : "");

	duration += message;

	return duration;
}


const char *
RelToAbsPath (const char* append_)
{
	app_info ai;
	be_app->GetAppInfo (&ai);

	BEntry entry (&ai.ref);
	BPath path;
	entry.GetPath (&path);
	path.GetParent (&path);
	path.Append (append_);

	return path.Path();
}


int32
Get440Len (const char* cData)
{
	BString data (cData);

	if (data.Length() < 440)
		return data.Length();
	else {
		int32 place (data.FindLast ('\x20', 440));
		if (place == B_ERROR)
			return 440;
		return place;
	}
}

uint16
CheckClickCount(BPoint point, BPoint& lastClick, bigtime_t sysTime, bigtime_t& lastClickTime, int16& clickCount)
{
	// check time and proximity
	BPoint delta = point - lastClick;

	bigtime_t timeDelta = sysTime - lastClickTime;

	bigtime_t doubleClickSpeed;
	get_click_speed(&doubleClickSpeed);

	lastClickTime = sysTime;

	if (timeDelta < doubleClickSpeed
	        && fabs(delta.x) < doubleClickThresh
	        && fabs(delta.y) < doubleClickThresh)
		return (++clickCount);

	lastClick = point;
	clickCount = 1;
	return clickCount;
}