using System;
using System.Collections.Generic;
using System.Linq;
using System.Transactions;
using System.Web;
using System.Web.Mvc;
using System.Web.Security;
using DotNetOpenAuth.AspNet;
using Microsoft.Web.WebPages.OAuth;
using WebMatrix.WebData;
using FotbalPortal.Filters;
using FotbalPortal.Models;
using FotbalPortal.DAL;
using System.Diagnostics;

namespace FotbalPortal.Controllers
{
    [Authorize]
    //[InitializeSimpleMembership]
    public class AccountController : Controller
    {

        private PortalContext db = new PortalContext();

        //
        // GET: /Account/Users

        public ActionResult Users()
        {
            var actualId = (int)WebMatrix.WebData.WebSecurity.CurrentUserId;

            var users = db.Users.Where(u => u.UserId != actualId);

            List<int> friends = new List<int>();

            foreach (var fr in db.Friendships.Where(u => u.userId == actualId).ToArray())
            {
                friends.Add(fr.friendUserId);    

            }

            ViewBag.friends = friends;

            return View(users.ToList());
        }

        //
        // GET: /Account/Friendship/5

        public ActionResult Friendship(int friendId = 0)
        {
            UserFriendship friendship = new UserFriendship();
            
            friendship.userId = (int)WebMatrix.WebData.WebSecurity.CurrentUserId;
            friendship.friendUserId = friendId;
            return View(friendship);
        }

        //
        // POST: /Account/Friendship/5

        [HttpPost]
        [ValidateAntiForgeryToken]
        public ActionResult Friendship(UserFriendship friendship)
        {
            if (ModelState.IsValid)
            {
                db.Friendships.Add(friendship);

                UserFriendship secondFirendship = new UserFriendship();
                secondFirendship.userId = friendship.friendUserId;
                secondFirendship.friendUserId = friendship.userId;
                db.Friendships.Add(secondFirendship);

                db.SaveChanges();
                return RedirectToAction("Users");
            }
            return View(friendship);
        }

        // GET: /Account/Unfriendship/5

        public ActionResult Unfriendship(int friendId = 0)
        {

            var actualId = (int)WebMatrix.WebData.WebSecurity.CurrentUserId;

            UserFriendship friendship = db.Friendships.Where(u => u.userId == actualId).Where(u => u.friendUserId == friendId).First();
            UserFriendship secondFirendship = db.Friendships.Where(u => u.userId == friendId).Where(u => u.friendUserId == actualId).First();

            db.Friendships.Remove(friendship);
            db.Friendships.Remove(secondFirendship);

            db.SaveChanges();

            return RedirectToAction("Users", "Account");
        }

        //
        // GET: /Account/Login

        [AllowAnonymous]
        public ActionResult Login(string returnUrl)
        {
            ViewBag.ReturnUrl = returnUrl;
            return View();
        }

        //
        // POST: /Account/Login

        [HttpPost]
        [AllowAnonymous]
        [ValidateAntiForgeryToken]
        public ActionResult Login(LoginModel model, string returnUrl)
        {
            if (ModelState.IsValid && WebSecurity.Login(model.UserName, model.Password, persistCookie: model.RememberMe))
            {
                return RedirectToLocal(returnUrl);
            }

            // Pokud jsme došli až sem, pak něco selhalo a je třeba znovu zobrazit formulář.
            ModelState.AddModelError("", "Zadané uživatelské jméno nebo heslo je neplatné.");
            return View(model);
        }

        //
        // POST: /Account/LogOff

        [HttpPost]
        [ValidateAntiForgeryToken]
        public ActionResult LogOff()
        {
            WebSecurity.Logout();

            return RedirectToAction("Index", "Home");
        }

        //
        // GET: /Account/Register

        [AllowAnonymous]
        public ActionResult Register()
        {
            return View();
        }

        //
        // POST: /Account/Register

        [HttpPost]
        [AllowAnonymous]
        [ValidateAntiForgeryToken]
        public ActionResult Register(RegisterModel model)
        {
            if (ModelState.IsValid)
            {
                // Pokus o registraci uživatele
                try
                {
                    WebSecurity.CreateUserAndAccount(model.UserName, model.Password);
                    WebSecurity.Login(model.UserName, model.Password);
                    return RedirectToAction("Index", "Home");
                }
                catch (MembershipCreateUserException e)
                {
                    ModelState.AddModelError("", ErrorCodeToString(e.StatusCode));
                }
            }

            // Pokud jsme došli až sem, pak něco selhalo a je třeba znovu zobrazit formulář.
            return View(model);
        }

        //
        // POST: /Account/Disassociate

        [HttpPost]
        [ValidateAntiForgeryToken]
        public ActionResult Disassociate(string provider, string providerUserId)
        {
            string ownerAccount = OAuthWebSecurity.GetUserName(provider, providerUserId);
            ManageMessageId? message = null;

            // Zrušit přidružení, pouze pokud je přihlášen uživatel, který je vlastníkem
            if (ownerAccount == User.Identity.Name)
            {
                // Použít transakci zabraňující uživateli odstranit poslední vlastní přihlašovací pověření
                using (var scope = new TransactionScope(TransactionScopeOption.Required, new TransactionOptions { IsolationLevel = IsolationLevel.Serializable }))
                {
                    bool hasLocalAccount = OAuthWebSecurity.HasLocalAccount(WebSecurity.GetUserId(User.Identity.Name));
                    if (hasLocalAccount || OAuthWebSecurity.GetAccountsFromUserName(User.Identity.Name).Count > 1)
                    {
                        OAuthWebSecurity.DeleteAccount(provider, providerUserId);
                        scope.Complete();
                        message = ManageMessageId.RemoveLoginSuccess;
                    }
                }
            }

            return RedirectToAction("Manage", new { Message = message });
        }

        //
        // GET: /Account/Manage

        public ActionResult Manage(ManageMessageId? message)
        {
            ViewBag.StatusMessage =
                message == ManageMessageId.ChangePasswordSuccess ? "Heslo bylo změněno."
                : message == ManageMessageId.SetPasswordSuccess ? "Heslo bylo nastaveno."
                : message == ManageMessageId.RemoveLoginSuccess ? "Externí přihlášení bylo odebráno."
                : "";
            ViewBag.HasLocalPassword = OAuthWebSecurity.HasLocalAccount(WebSecurity.GetUserId(User.Identity.Name));
            ViewBag.ReturnUrl = Url.Action("Manage");
            return View();
        }

        //
        // POST: /Account/Manage

        [HttpPost]
        [ValidateAntiForgeryToken]
        public ActionResult Manage(LocalPasswordModel model)
        {
            bool hasLocalAccount = OAuthWebSecurity.HasLocalAccount(WebSecurity.GetUserId(User.Identity.Name));
            ViewBag.HasLocalPassword = hasLocalAccount;
            ViewBag.ReturnUrl = Url.Action("Manage");
            if (hasLocalAccount)
            {
                if (ModelState.IsValid)
                {
                    // Metoda ChangePassword způsobí v některých situacích výjimku, a nikoli navrácení hodnoty false.
                    bool changePasswordSucceeded;
                    try
                    {
                        changePasswordSucceeded = WebSecurity.ChangePassword(User.Identity.Name, model.OldPassword, model.NewPassword);
                    }
                    catch (Exception)
                    {
                        changePasswordSucceeded = false;
                    }

                    if (changePasswordSucceeded)
                    {
                        return RedirectToAction("Manage", new { Message = ManageMessageId.ChangePasswordSuccess });
                    }
                    else
                    {
                        ModelState.AddModelError("", "Aktuální heslo je nesprávné nebo nové heslo je neplatné.");
                    }
                }
            }
            else
            {
                // Uživatel nemá místní heslo, proto odebrat případné chyby ověření způsobené chybějícím
                // polem OldPassword
                ModelState state = ModelState["OldPassword"];
                if (state != null)
                {
                    state.Errors.Clear();
                }

                if (ModelState.IsValid)
                {
                    try
                    {
                        WebSecurity.CreateAccount(User.Identity.Name, model.NewPassword);
                        return RedirectToAction("Manage", new { Message = ManageMessageId.SetPasswordSuccess });
                    }
                    catch (Exception)
                    {
                        ModelState.AddModelError("", String.Format("Nelze vytvořit místní účet. Účet s názvem {0} již může existovat.", User.Identity.Name));
                    }
                }
            }

            // Pokud jsme došli až sem, pak něco selhalo a je třeba znovu zobrazit formulář.
            return View(model);
        }

        //
        // POST: /Account/ExternalLogin

        [HttpPost]
        [AllowAnonymous]
        [ValidateAntiForgeryToken]
        public ActionResult ExternalLogin(string provider, string returnUrl)
        {
            return new ExternalLoginResult(provider, Url.Action("ExternalLoginCallback", new { ReturnUrl = returnUrl }));
        }

        //
        // GET: /Account/ExternalLoginCallback

        [AllowAnonymous]
        public ActionResult ExternalLoginCallback(string returnUrl)
        {
            AuthenticationResult result = OAuthWebSecurity.VerifyAuthentication(Url.Action("ExternalLoginCallback", new { ReturnUrl = returnUrl }));
            if (!result.IsSuccessful)
            {
                return RedirectToAction("ExternalLoginFailure");
            }

            if (OAuthWebSecurity.Login(result.Provider, result.ProviderUserId, createPersistentCookie: false))
            {
                return RedirectToLocal(returnUrl);
            }

            if (User.Identity.IsAuthenticated)
            {
                // Je-li aktuální uživatel přihlášen, přidat nový účet
                OAuthWebSecurity.CreateOrUpdateAccount(result.Provider, result.ProviderUserId, User.Identity.Name);
                return RedirectToLocal(returnUrl);
            }
            else
            {
                // Uživatel je nový, zeptat se na požadované jméno členství
                string loginData = OAuthWebSecurity.SerializeProviderUserId(result.Provider, result.ProviderUserId);
                ViewBag.ProviderDisplayName = OAuthWebSecurity.GetOAuthClientData(result.Provider).DisplayName;
                ViewBag.ReturnUrl = returnUrl;
                return View("ExternalLoginConfirmation", new RegisterExternalLoginModel { UserName = result.UserName, ExternalLoginData = loginData });
            }
        }

        //
        // POST: /Account/ExternalLoginConfirmation

        [HttpPost]
        [AllowAnonymous]
        [ValidateAntiForgeryToken]
        public ActionResult ExternalLoginConfirmation(RegisterExternalLoginModel model, string returnUrl)
        {
            string provider = null;
            string providerUserId = null;

            if (User.Identity.IsAuthenticated || !OAuthWebSecurity.TryDeserializeProviderUserId(model.ExternalLoginData, out provider, out providerUserId))
            {
                return RedirectToAction("Manage");
            }

            if (ModelState.IsValid)
            {
                // Vložit nového uživatele do databáze
                using (UsersContext db = new UsersContext())
                {
                    UserProfile user = db.UserProfiles.FirstOrDefault(u => u.UserName.ToLower() == model.UserName.ToLower());
                    // Zkontrolovat, zda již uživatel existuje
                    if (user == null)
                    {
                        // Vložit jméno do tabulky profilů
                        db.UserProfiles.Add(new UserProfile { UserName = model.UserName });
                        db.SaveChanges();

                        OAuthWebSecurity.CreateOrUpdateAccount(provider, providerUserId, model.UserName);
                        OAuthWebSecurity.Login(provider, providerUserId, createPersistentCookie: false);

                        return RedirectToLocal(returnUrl);
                    }
                    else
                    {
                        ModelState.AddModelError("UserName", "Uživatelské jméno již existuje. Zadejte jiné uživatelské jméno.");
                    }
                }
            }

            ViewBag.ProviderDisplayName = OAuthWebSecurity.GetOAuthClientData(provider).DisplayName;
            ViewBag.ReturnUrl = returnUrl;
            return View(model);
        }

        //
        // GET: /Account/ExternalLoginFailure

        [AllowAnonymous]
        public ActionResult ExternalLoginFailure()
        {
            return View();
        }

        [Authorize(Roles = "Admin")]
        public ActionResult RoleCreate()
        {
            return View();
        }

        [Authorize(Roles = "Admin")]
        [HttpPost]
        [ValidateAntiForgeryToken]
        public ActionResult RoleCreate(string RoleName)
        {

            Roles.CreateRole(Request.Form["RoleName"]);

            return RedirectToAction("RoleIndex", "Account");
        }

        [Authorize(Roles = "Admin")]
        public ActionResult RoleIndex()
        {
            var roles = Roles.GetAllRoles();
            return View(roles);
        }

        [Authorize(Roles = "Admin")]
        public ActionResult RoleDelete(string RoleName)
        {

            Roles.DeleteRole(RoleName);
            // ViewBag.ResultMessage = "Role deleted succesfully !";


            return RedirectToAction("RoleIndex", "Account");
        }

        [Authorize(Roles = "Admin")]
        public ActionResult RoleAddToUser()
        {
            SelectList list = new SelectList(Roles.GetAllRoles());
            ViewBag.Roles = list;

            return View();
        }

        [Authorize(Roles = "Admin")]
        [HttpPost]
        [ValidateAntiForgeryToken]
        public ActionResult RoleAddToUser(string RoleName, string UserName)
        {

            if (Roles.IsUserInRole(UserName, RoleName))
            {
                ViewBag.ResultMessage = "Uživatel již tuto roli má!";
            }
            else
            {
                Roles.AddUserToRole(UserName, RoleName);
                ViewBag.ResultMessage = "Role přidána!";
            }

            SelectList list = new SelectList(Roles.GetAllRoles());
            ViewBag.Roles = list;
            return View();
        }

        [Authorize(Roles = "Admin")]
        [HttpPost]
        [ValidateAntiForgeryToken]
        public ActionResult GetRoles(string UserName)
        {
            if (!string.IsNullOrWhiteSpace(UserName))
            {
                ViewBag.RolesForThisUser = Roles.GetRolesForUser(UserName);
                SelectList list = new SelectList(Roles.GetAllRoles());
                ViewBag.Roles = list;
            }
            return View("RoleAddToUser");
        }

        [HttpPost]
        [Authorize(Roles = "Admin")]
        [ValidateAntiForgeryToken]
        public ActionResult DeleteRoleForUser(string UserName, string RoleName)
        {

            if (Roles.IsUserInRole(UserName, RoleName))
            {
                Roles.RemoveUserFromRole(UserName, RoleName);
                ViewBag.ResultMessage = "Role odebrána!";
            }
            else
            {
                ViewBag.ResultMessage = "Tuto roli uživatel nemá.";
            }
            ViewBag.RolesForThisUser = Roles.GetRolesForUser(UserName);
            SelectList list = new SelectList(Roles.GetAllRoles());
            ViewBag.Roles = list;


            return View("RoleAddToUser");
        }

        [AllowAnonymous]
        [ChildActionOnly]
        public ActionResult ExternalLoginsList(string returnUrl)
        {
            ViewBag.ReturnUrl = returnUrl;
            return PartialView("_ExternalLoginsListPartial", OAuthWebSecurity.RegisteredClientData);
        }

        [ChildActionOnly]
        public ActionResult RemoveExternalLogins()
        {
            ICollection<OAuthAccount> accounts = OAuthWebSecurity.GetAccountsFromUserName(User.Identity.Name);
            List<ExternalLogin> externalLogins = new List<ExternalLogin>();
            foreach (OAuthAccount account in accounts)
            {
                AuthenticationClientData clientData = OAuthWebSecurity.GetOAuthClientData(account.Provider);

                externalLogins.Add(new ExternalLogin
                {
                    Provider = account.Provider,
                    ProviderDisplayName = clientData.DisplayName,
                    ProviderUserId = account.ProviderUserId,
                });
            }

            ViewBag.ShowRemoveButton = externalLogins.Count > 1 || OAuthWebSecurity.HasLocalAccount(WebSecurity.GetUserId(User.Identity.Name));
            return PartialView("_RemoveExternalLoginsPartial", externalLogins);
        }

        public string userName(int userId) {

            UserProfile userProfile = db.Users.Find(userId);

            if (userProfile != null)
            {
                return userProfile.UserName;
            }
            
            return "";
        }

        #region Pomocné objekty
        private ActionResult RedirectToLocal(string returnUrl)
        {
            if (Url.IsLocalUrl(returnUrl))
            {
                return Redirect(returnUrl);
            }
            else
            {
                return RedirectToAction("Index", "Home");
            }
        }

        public enum ManageMessageId
        {
            ChangePasswordSuccess,
            SetPasswordSuccess,
            RemoveLoginSuccess,
        }

        internal class ExternalLoginResult : ActionResult
        {
            public ExternalLoginResult(string provider, string returnUrl)
            {
                Provider = provider;
                ReturnUrl = returnUrl;
            }

            public string Provider { get; private set; }
            public string ReturnUrl { get; private set; }

            public override void ExecuteResult(ControllerContext context)
            {
                OAuthWebSecurity.RequestAuthentication(Provider, ReturnUrl);
            }
        }

        private static string ErrorCodeToString(MembershipCreateStatus createStatus)
        {
            // Na webu http://go.microsoft.com/fwlink/?LinkID=177550 naleznete
            // úplný seznam stavových kódů.
            switch (createStatus)
            {
                case MembershipCreateStatus.DuplicateUserName:
                    return "Uživatelské jméno již existuje. Zadejte jiné uživatelské jméno.";

                case MembershipCreateStatus.DuplicateEmail:
                    return "Uživatelské jméno pro tuto e­mailovou adresu již existuje. Zadejte jinou e­mailovou adresu.";

                case MembershipCreateStatus.InvalidPassword:
                    return "Zadané heslo je neplatné. Zadejte platné heslo.";

                case MembershipCreateStatus.InvalidEmail:
                    return "Zadaná e-mailová adresa je neplatná. Zkontrolujte zadání a akci zopakujte.";

                case MembershipCreateStatus.InvalidAnswer:
                    return "Odpověď pro získání hesla je neplatná. Zkontrolujte zadání a akci zopakujte.";

                case MembershipCreateStatus.InvalidQuestion:
                    return "Otázka pro získání hesla je neplatná. Zkontrolujte zadání a akci zopakujte.";

                case MembershipCreateStatus.InvalidUserName:
                    return "Zadané uživatelské jméno je neplatné. Zkontrolujte zadání a akci zopakujte.";

                case MembershipCreateStatus.ProviderError:
                    return "Zprostředkovatel ověřování vrátil chybu. Ověřte zadané údaje a poté akci zopakujte. Pokud problém potrvá, obraťte se na správce systému.";

                case MembershipCreateStatus.UserRejected:
                    return "Požadavek na vytvoření uživatele byl zrušen. Ověřte zadané údaje a poté akci zopakujte. Pokud problém potrvá, obraťte se na správce systému.";

                default:
                    return "Došlo k neznámé chybě. Ověřte zadané údaje a poté akci zopakujte. Pokud problém potrvá, obraťte se na správce systému.";
            }
        }
        #endregion
    }
}
