using System;
using System.Globalization;
using System.IO;
using System.Linq;
using System.Text;
using System.Threading;
using System.Web.UI.WebControls.WebParts;
using System.Xml;
using Microsoft.SharePoint;
using Microsoft.SharePoint.Publishing;
using Microsoft.SharePoint.WebPartPages;
using Taloyhtio.CondoUpdate.Common;
using WebPart = System.Web.UI.WebControls.WebParts.WebPart;

namespace CondoUpdate.AddContactsWebPart
{
    public class UpdaterImpl : ICondoUpdater
    {
        private readonly Guid SITE_FEATURE_ID = new Guid("7912CF98-DA3F-41e5-B9D1-5793262BFCEA");
        private readonly Guid WEB_FEATURE_ID = new Guid("3E32CA82-BBCD-4395-8811-0B28A6318324");

        public event EventHandler<LogEventArgs> OnNotify;
        public void Update(object args)
        {
            string url = args as string;
            if (string.IsNullOrEmpty(url))
            {
                this.warn("Url is empty");
                return;
            }

            try
            {
                this.updateImpl(url);
            }
            catch(Exception x)
            {
                this.error("Error occured during updating of Condo '{0}':\n{1}\n{2}", url, x.Message, x.StackTrace);
            }
        }

        private void updateImpl(string url)
        {
            using (var site = new SPSite(url))
            {
                using (var condoWeb = site.OpenWeb())
                {
                    if (!condoWeb.Exists || string.Compare(condoWeb.Url, url, true) != 0)
                    {
                        return;
                    }

                    if (!PublishingWeb.IsPublishingWeb(condoWeb))
                    {
                        return;
                    }
                    var pweb = PublishingWeb.GetPublishingWeb(condoWeb);
                    Thread.CurrentThread.CurrentUICulture = new CultureInfo((int)condoWeb.Language);
                    this.ensureSiteFeatureActivated(site);
                    this.ensureWebFeatureActivated(condoWeb);
                    this.addWebPart(pweb);
                }
            }
        }

        private void addWebPart(PublishingWeb pweb)
        {
            SPLimitedWebPartManager webPartManager = null;
            try
            {
                var file = pweb.DefaultPage;
                if (file == null)
                {
                    this.error("Start page is null. Site won't be updated");
                    return;
                }

                if (file.CheckOutStatus == SPFile.SPCheckOutStatus.None)
                {
                    file.CheckOut();
                }
                else
                {
                    // if file was checked out by another user, need undo check out and check in again in order to avoid errors
                    // when add web part
                    file.UndoCheckOut();
                    file.CheckOut();
                }

                webPartManager = file.GetLimitedWebPartManager(PersonalizationScope.Shared);
                if (webPartManager == null)
                {
                    this.error("Web part manager is null. Site won't be updated");
                    file.UndoCheckOut();
                    return;
                }

                bool alreadyExists = false;
                var webParts = webPartManager.WebParts;
                WebPart oldContactsWebPart = null;
                if (webParts != null)
                {
                    foreach (WebPart wp in webParts)
                    {
                        if (wp.GetType().FullName == "Taloyhtio.ContactsUpdateTool.CodeFiles.ContactsWebPart")
                        {
                            this.warn("ContactsWebPart already exist on start page. Site won't be updated");
                            alreadyExists = true;
                        }
                        else if (wp.Title == "Yhteystiedot" && wp.GetType().FullName == "Microsoft.SharePoint.WebPartPages.XsltListViewWebPart")
                        {
                            oldContactsWebPart = wp;
                        }
                    }
                }

                if (alreadyExists)
                {
                    file.UndoCheckOut();
                    return;
                }

                if (oldContactsWebPart != null)
                {
                    webPartManager.DeleteWebPart(oldContactsWebPart);
                }

                using (var fs = new MemoryStream(Encoding.UTF8.GetBytes(File.ReadAllText("TaloyhtioContacts.webpart"))))
                {
                    using (var reader = new XmlTextReader(fs))
                    {
                        string error;
                        WebPart wp = webPartManager.ImportWebPart(reader, out error);
                        if (wp == null)
                        {
                            this.error("Imported web part is null. Site '{0}' won't be updated. Error message: {1}", pweb.Web.Url, error);
                            file.UndoCheckOut();
                            return;
                        }
                        webPartManager.AddWebPart(wp, "RightColumnZone", 10);
                        webPartManager.SaveChanges(wp);
                    }
                }

                file.CheckIn("ContactsWebPart is added");
                file.Update();
                file.Publish("ContactsWebPart is added");
            }
            catch (Exception x)
            {
                this.error("Error occured when add web part to the '{0}' site:\n{1}\n{2}", pweb.Web.Url, x.Message, x.StackTrace);
                var file = pweb.DefaultPage;
                if (file.CheckOutStatus != SPFile.SPCheckOutStatus.None)
                {
                    file.UndoCheckOut();
                }
            }
            finally
            {
                if (webPartManager != null)
                {
                    if (webPartManager.Web != null)
                    {
                        webPartManager.Web.Dispose();
                    }
                    webPartManager.Dispose();
                }
            }
        }

        private void ensureSiteFeatureActivated(SPSite site)
        {
            if (!site.Features.Cast<SPFeature>().Any(f => f.DefinitionId == SITE_FEATURE_ID))
            {
                site.Features.Add(SITE_FEATURE_ID, false);
            }
        }

        private void ensureWebFeatureActivated(SPWeb web)
        {
            if (!web.Features.Cast<SPFeature>().Any(f => f.DefinitionId == WEB_FEATURE_ID))
            {
                web.Features.Add(WEB_FEATURE_ID, false);
            }
        }

        private void info(string msg, params object[] args)
        {
            this.notify(LogLevel.Info, msg, args);
        }

        private void warn(string msg, params object[] args)
        {
            this.notify(LogLevel.Warn, msg, args);
        }

        private void error(string msg, params object[] args)
        {
            this.notify(LogLevel.Error, msg, args);
        }

        private void notify(LogLevel level, string msg, params object[] args)
        {
            this.notify(level, string.Format(msg, args));
        }

        private void notify(LogLevel level, string msg)
        {
            if (this.OnNotify != null)
            {
                this.OnNotify(this, new LogEventArgs { LogLevel = level, Message = msg });
            }
        }
    }
}