package eu.siacs.conversations.utils;

import java.util.ArrayList;
import java.net.URLConnection;
import java.util.Calendar;
import java.util.Date;
import java.util.HashMap;
import java.util.List;
import java.util.Locale;
import java.util.Map;
import java.util.Map.Entry;
import java.util.regex.Pattern;
import java.util.regex.Matcher;

import eu.siacs.conversations.Config;
import eu.siacs.conversations.R;
import eu.siacs.conversations.entities.Contact;
import eu.siacs.conversations.entities.Conversation;
import eu.siacs.conversations.entities.Downloadable;
import eu.siacs.conversations.entities.Message;
import eu.siacs.conversations.xmpp.jid.Jid;

import android.content.Context;
import android.text.format.DateFormat;
import android.text.format.DateUtils;
import android.text.Spannable.Factory;
import android.text.style.ImageSpan;
import android.text.Spannable;
import android.util.Pair;

public class UIHelper {
	private static final int SHORT_DATE_FLAGS = DateUtils.FORMAT_SHOW_DATE
		| DateUtils.FORMAT_NO_YEAR | DateUtils.FORMAT_ABBREV_ALL;
	private static final int FULL_DATE_FLAGS = DateUtils.FORMAT_SHOW_TIME
		| DateUtils.FORMAT_ABBREV_ALL | DateUtils.FORMAT_SHOW_DATE;

	public static String readableTimeDifference(Context context, long time) {
		return readableTimeDifference(context, time, false);
	}

	public static String readableTimeDifferenceFull(Context context, long time) {
		return readableTimeDifference(context, time, true);
	}

	private static String readableTimeDifference(Context context, long time,
			boolean fullDate) {
		if (time == 0) {
			return context.getString(R.string.just_now);
		}
		Date date = new Date(time);
		long difference = (System.currentTimeMillis() - time) / 1000;
		if (difference < 60) {
			return context.getString(R.string.just_now);
		} else if (difference < 60 * 2) {
			return context.getString(R.string.minute_ago);
		} else if (difference < 60 * 15) {
			return context.getString(R.string.minutes_ago,
					Math.round(difference / 60.0));
		} else if (today(date)) {
			java.text.DateFormat df = DateFormat.getTimeFormat(context);
			return df.format(date);
		} else {
			if (fullDate) {
				return DateUtils.formatDateTime(context, date.getTime(),
						FULL_DATE_FLAGS);
			} else {
				return DateUtils.formatDateTime(context, date.getTime(),
						SHORT_DATE_FLAGS);
			}
		}
	}

	private static boolean today(Date date) {
		return sameDay(date,new Date(System.currentTimeMillis()));
	}

	public static boolean sameDay(long timestamp1, long timestamp2) {
		return sameDay(new Date(timestamp1),new Date(timestamp2));
	}

	private static boolean sameDay(Date a, Date b) {
		Calendar cal1 = Calendar.getInstance();
		Calendar cal2 = Calendar.getInstance();
		cal1.setTime(a);
		cal2.setTime(b);
		return cal1.get(Calendar.YEAR) == cal2.get(Calendar.YEAR)
			&& cal1.get(Calendar.DAY_OF_YEAR) == cal2
			.get(Calendar.DAY_OF_YEAR);
	}

	public static String lastseen(Context context, long time) {
		if (time == 0) {
			return context.getString(R.string.never_seen);
		}
		long difference = (System.currentTimeMillis() - time) / 1000;
		if (difference < 60) {
			return context.getString(R.string.last_seen_now);
		} else if (difference < 60 * 2) {
			return context.getString(R.string.last_seen_min);
		} else if (difference < 60 * 60) {
			return context.getString(R.string.last_seen_mins,
					Math.round(difference / 60.0));
		} else if (difference < 60 * 60 * 2) {
			return context.getString(R.string.last_seen_hour);
		} else if (difference < 60 * 60 * 24) {
			return context.getString(R.string.last_seen_hours,
					Math.round(difference / (60.0 * 60.0)));
		} else if (difference < 60 * 60 * 48) {
			return context.getString(R.string.last_seen_day);
		} else {
			return context.getString(R.string.last_seen_days,
					Math.round(difference / (60.0 * 60.0 * 24.0)));
		}
	}

	public static final Map<Pattern, Integer> ANDROID_EMOTICONS = new HashMap<Pattern, Integer>();

	private static final Factory spannableFactory = Spannable.Factory
			.getInstance();
	
	static {
		addPattern(ANDROID_EMOTICONS, ":)", R.drawable.emo_im_happy);
		addPattern(ANDROID_EMOTICONS, ":-)", R.drawable.emo_im_happy);
		addPattern(ANDROID_EMOTICONS, ":(", R.drawable.emo_im_sad);
		addPattern(ANDROID_EMOTICONS, ":-(", R.drawable.emo_im_sad);
		addPattern(ANDROID_EMOTICONS, ";)", R.drawable.emo_im_winking);
		addPattern(ANDROID_EMOTICONS, ";-)", R.drawable.emo_im_winking);
		addPattern(ANDROID_EMOTICONS, ":P",
				R.drawable.emo_im_tongue_sticking_out);
		addPattern(ANDROID_EMOTICONS, ":-P",
				R.drawable.emo_im_tongue_sticking_out);
		addPattern(ANDROID_EMOTICONS, "=-O", R.drawable.emo_im_surprised);
		addPattern(ANDROID_EMOTICONS, ":*", R.drawable.emo_im_kissing);
		addPattern(ANDROID_EMOTICONS, ":-*", R.drawable.emo_im_kissing);
		addPattern(ANDROID_EMOTICONS, ":O", R.drawable.emo_im_wtf);
		addPattern(ANDROID_EMOTICONS, ":-O", R.drawable.emo_im_wtf);
		addPattern(ANDROID_EMOTICONS, "B)", R.drawable.emo_im_cool);
		addPattern(ANDROID_EMOTICONS, "B-)", R.drawable.emo_im_cool);
		addPattern(ANDROID_EMOTICONS, "8)", R.drawable.emo_im_cool);
		addPattern(ANDROID_EMOTICONS, "8-)", R.drawable.emo_im_cool);
		addPattern(ANDROID_EMOTICONS, ":$", R.drawable.emo_im_money_mouth);
		addPattern(ANDROID_EMOTICONS, ":-$", R.drawable.emo_im_money_mouth);
		addPattern(ANDROID_EMOTICONS, ":-!", R.drawable.emo_im_foot_in_mouth);
		addPattern(ANDROID_EMOTICONS, ":-[", R.drawable.emo_im_embarrassed);
		addPattern(ANDROID_EMOTICONS, "O:)", R.drawable.emo_im_angel);
		addPattern(ANDROID_EMOTICONS, "O:-)", R.drawable.emo_im_angel);
		addPattern(ANDROID_EMOTICONS, ":\\", R.drawable.emo_im_undecided);
		addPattern(ANDROID_EMOTICONS, ":-\\", R.drawable.emo_im_undecided);
		addPattern(ANDROID_EMOTICONS, ":'(", R.drawable.emo_im_crying);
		addPattern(ANDROID_EMOTICONS, ":D", R.drawable.emo_im_laughing);
		addPattern(ANDROID_EMOTICONS, ":-D", R.drawable.emo_im_laughing);
		addPattern(ANDROID_EMOTICONS, "O_o", R.drawable.emo_im_wtf);
		addPattern(ANDROID_EMOTICONS, "o_O", R.drawable.emo_im_wtf);
		addPattern(ANDROID_EMOTICONS, ">:O", R.drawable.emo_im_yelling);
		addPattern(ANDROID_EMOTICONS, ">:0", R.drawable.emo_im_yelling);
		addPattern(ANDROID_EMOTICONS, ":S", R.drawable.emo_im_lips_are_sealed);
		addPattern(ANDROID_EMOTICONS, ":-S", R.drawable.emo_im_lips_are_sealed);
		addPattern(ANDROID_EMOTICONS, "<3", R.drawable.emo_im_heart);
	}
 
	private static void addPattern(Map<Pattern, Integer> map, String smile,
			int resource) {
		map.put(Pattern.compile(Pattern.quote(smile)), resource);
	}
	
	private static boolean getSmiledText(Context context, Spannable spannable) {
		boolean hasChanges = false;
		Map<Pattern, Integer> emoticons = ANDROID_EMOTICONS;
		for (Entry<Pattern, Integer> entry : emoticons.entrySet()) {
			Matcher matcher = entry.getKey().matcher(spannable);
			while (matcher.find()) {
				boolean set = true;
				for (ImageSpan span : spannable.getSpans(matcher.start(),
						matcher.end(), ImageSpan.class))
					if (spannable.getSpanStart(span) >= matcher.start()
							&& spannable.getSpanEnd(span) <= matcher.end())
						spannable.removeSpan(span);
					else {
						set = false;
						break;
					}
				if (set) {
					spannable.setSpan(new ImageSpan(context, entry.getValue()),
							matcher.start(), matcher.end(),
							Spannable.SPAN_EXCLUSIVE_EXCLUSIVE);
					hasChanges = true;
				}
			}
		}
		return hasChanges;
	}

	private final static class EmoticonPattern {
		Pattern pattern;
		String replacement;

		EmoticonPattern(String ascii, int unicode) {
			this.pattern = Pattern.compile("(?<=(^|\\s))" + ascii
					+ "(?=(\\s|$))");
			this.replacement = new String(new int[] { unicode, }, 0, 1);
		}

		String replaceAll(String body) {
			return pattern.matcher(body).replaceAll(replacement);
		}
	}

	private static final EmoticonPattern[] patterns = new EmoticonPattern[] {
			new EmoticonPattern(":-?D", 0x1f600),
			new EmoticonPattern("\\^\\^", 0x1f601),
			new EmoticonPattern(":'D", 0x1f602),
			new EmoticonPattern("\\]-?D", 0x1f608),
			new EmoticonPattern(";-?\\)", 0x1f609),
			new EmoticonPattern(":-?\\)", 0x1f60a),
			new EmoticonPattern("[B8]-?\\)", 0x1f60e),
			new EmoticonPattern(":-?\\|", 0x1f610),
			new EmoticonPattern(":-?[/\\\\]", 0x1f615),
			new EmoticonPattern(":-?\\*", 0x1f617),
			new EmoticonPattern(":-?[Ppb]", 0x1f61b),
			new EmoticonPattern(":-?\\(", 0x1f61e),
			new EmoticonPattern(":-?[0Oo]", 0x1f62e),
			new EmoticonPattern("\\\\o/", 0x1F631), };

	public static String transformAsciiEmoticonsToUtf8(String body) {
		if (body != null) {
			for (EmoticonPattern p : patterns) {
				body = p.replaceAll(body);
			}
			body = body.trim();
		}
		return body;
	}

	public static Spannable transformAsciiEmoticons(Context context, String body) {
		Spannable spannable;
		if (Config.UTF8_EMOTICONS) {
			spannable = spannableFactory.newSpannable(transformAsciiEmoticonsToUtf8(body));
		}
		else {
			spannable = spannableFactory.newSpannable(body);
			getSmiledText(context, spannable);	
		}
		return spannable;
	}

	public static int getColorForName(String name) {
		if (name.isEmpty()) {
			return 0xFF202020;
		}
		int colors[] = {0xFFe91e63, 0xFF9c27b0, 0xFF673ab7, 0xFF3f51b5,
			0xFF5677fc, 0xFF03a9f4, 0xFF00bcd4, 0xFF009688, 0xFFff5722,
			0xFF795548, 0xFF607d8b};
		return colors[(int) ((name.hashCode() & 0xffffffffl) % colors.length)];
	}

	public static Pair<String,Boolean> getMessagePreview(final Context context, final Message message) {
		final Downloadable d = message.getDownloadable();
		if (d != null ) {
			switch (d.getStatus()) {
				case Downloadable.STATUS_CHECKING:
					return new Pair<>(context.getString(R.string.checking_image),true);
				case Downloadable.STATUS_DOWNLOADING:
					return new Pair<>(context.getString(R.string.receiving_x_file,
									getFileDescriptionString(context,message),
									d.getProgress()),true);
				case Downloadable.STATUS_OFFER:
				case Downloadable.STATUS_OFFER_CHECK_FILESIZE:
					return new Pair<>(context.getString(R.string.x_file_offered_for_download,
									getFileDescriptionString(context,message)),true);
				case Downloadable.STATUS_DELETED:
					return new Pair<>(context.getString(R.string.file_deleted),true);
				case Downloadable.STATUS_FAILED:
					return new Pair<>(context.getString(R.string.file_transmission_failed),true);
				case Downloadable.STATUS_UPLOADING:
					if (message.getStatus() == Message.STATUS_OFFERED) {
						return new Pair<>(context.getString(R.string.offering_x_file,
								getFileDescriptionString(context, message)), true);
					} else {
						return new Pair<>(context.getString(R.string.sending_x_file,
								getFileDescriptionString(context, message)), true);
					}
				default:
					return new Pair<>("",false);
			}
		} else if (message.getEncryption() == Message.ENCRYPTION_PGP) {
			return new Pair<>(context.getString(R.string.encrypted_message_received),true);
		} else if (message.getType() == Message.TYPE_FILE || message.getType() == Message.TYPE_IMAGE) {
			if (message.getStatus() == Message.STATUS_RECEIVED) {
				return new Pair<>(context.getString(R.string.received_x_file,
							getFileDescriptionString(context, message)), true);
			} else {
				return new Pair<>(getFileDescriptionString(context,message),true);
			}
		} else {
			if (message.getBody().startsWith(Message.ME_COMMAND)) {
				return new Pair<>(message.getBody().replaceAll("^" + Message.ME_COMMAND,
						UIHelper.getMessageDisplayName(message) + " "), false);
			} else if (GeoHelper.isGeoUri(message.getBody())) {
				if (message.getStatus() == Message.STATUS_RECEIVED) {
					return new Pair<>(context.getString(R.string.received_location),true);
				} else {
					return new Pair<>(context.getString(R.string.location), true);
				}
			} else{
				return new Pair<>(message.getBody().trim(), false);
			}
		}
	}

	public static String getFileDescriptionString(final Context context, final Message message) {
		if (message.getType() == Message.TYPE_IMAGE) {
			return context.getString(R.string.image);
		}
		final String path = message.getRelativeFilePath();
		if (path == null) {
			return "";
		}
		final String mime;
		try {
			mime = URLConnection.guessContentTypeFromName(path.replace("#",""));
		} catch (final StringIndexOutOfBoundsException ignored) {
			return context.getString(R.string.file);
		}
		if (mime == null) {
			return context.getString(R.string.file);
		} else if (mime.startsWith("audio/")) {
			return context.getString(R.string.audio);
		} else if(mime.startsWith("video/")) {
			return context.getString(R.string.video);
		} else if (mime.startsWith("image/")) {
			return context.getString(R.string.image);
		} else if (mime.contains("pdf")) {
			return context.getString(R.string.pdf_document)	;
		} else if (mime.contains("application/vnd.android.package-archive")) {
			return context.getString(R.string.apk)	;
		} else if (mime.contains("vcard")) {
			return context.getString(R.string.vcard)	;
		} else {
			return mime;
		}
	}

	public static String getMessageDisplayName(final Message message) {
		if (message.getStatus() == Message.STATUS_RECEIVED) {
			if (message.getConversation().getMode() == Conversation.MODE_MULTI) {
				return getDisplayedMucCounterpart(message.getCounterpart());
			} else {
				final Contact contact = message.getContact();
				return contact != null ? contact.getDisplayName() : "";
			}
		} else {
			if (message.getConversation().getMode() == Conversation.MODE_MULTI) {
				return getDisplayedMucCounterpart(message.getConversation().getJid());
			} else {
				final Jid jid = message.getConversation().getAccount().getJid();
				return jid.hasLocalpart() ? jid.getLocalpart() : jid.toDomainJid().toString();
			}
		}
	}

	private static String getDisplayedMucCounterpart(final Jid counterpart) {
		if (counterpart==null) {
			return "";
		} else if (!counterpart.isBareJid()) {
			return counterpart.getResourcepart().trim();
		} else {
			return counterpart.toString().trim();
		}
	}
}