/* This Source Code Form is subject to the terms of the Mozilla Public
 * License, v. 2.0. If a copy of the MPL was not distributed with this file,
 * You can obtain one at http://mozilla.org/MPL/2.0/. */

const XUL_NS = "http://www.mozilla.org/keymaster/gatekeeper/there.is.only.xul";

const { attachTo } = require("sdk/content/mod");
const { ContextualIdentityService } = require("resource://gre/modules/ContextualIdentityService.jsm");
const { getFavicon } = require("sdk/places/favicon");
const self = require("sdk/self");
const { Style } = require("sdk/stylesheet/style");
const tabs = require("sdk/tabs");
const tabsUtils = require("sdk/tabs/utils");
const { viewFor } = require("sdk/view/core");
const webExtension = require("sdk/webextension");
const windows = require("sdk/windows");
const windowUtils = require("sdk/window/utils");

const IDENTITY_COLORS = ["blue", "turquoise", "green", "yellow", "orange", "red", "pink", "purple"];

let ContainerService = {
  _identitiesState: {},

  init() {
    // Enabling preferences

    let prefs = [
      [ "privacy.userContext.enabled", true ],
      [ "privacy.userContext.ui.enabled", true ],
      [ "privacy.usercontext.about_newtab_segregation.enabled", true ],
      [ "privacy.usercontext.longPressBehavior", 1 ]
    ];

    const prefService = require("sdk/preferences/service");
    prefs.forEach((pref) => {
      prefService.set(pref[0], pref[1]);
    });

    // Message routing

    // only these methods are allowed. We have a 1:1 mapping between messages
    // and methods. These methods must return a promise.
    let methods = [
      "hideTabs",
      "showTabs",
      "sortTabs",
      "getTabs",
      "showTab",
      "openTab",
      "moveTabsToWindow",
      "queryIdentities",
      "getIdentity",
      "createIdentity",
      "removeIdentity",
      "updateIdentity",
    ];

    // Map of identities.
    ContextualIdentityService.getIdentities().forEach(identity => {
      this._identitiesState[identity.userContextId] = {
        hiddenTabUrls: [],
        openTabs: 0
      };
    });

    // It can happen that this jsm is loaded after the opening a container tab.
    for (let tab of tabs) {
      const userContextId = this._getUserContextIdFromTab(tab);
      if (userContextId) {
        ++this._identitiesState[userContextId].openTabs;
      }
    }

    tabs.on("open", tab => {
      const userContextId = this._getUserContextIdFromTab(tab);
      if (userContextId) {
        ++this._identitiesState[userContextId].openTabs;
      }
    });

    tabs.on("close", tab => {
      const userContextId = this._getUserContextIdFromTab(tab);
      if (userContextId && this._identitiesState[userContextId].openTabs) {
        --this._identitiesState[userContextId].openTabs;
      }
    });

    // Modify CSS and other stuff for each window.

    for (let window of windows.browserWindows) {
      this.configureWindow(viewFor(window));
    }

    windows.browserWindows.on("open", window => {
      this.configureWindow(viewFor(window));
    });

    // WebExtension startup

    webExtension.startup().then(api => {
      api.browser.runtime.onMessage.addListener((message, sender, sendReply) => {
        if ("method" in message && methods.indexOf(message.method) !== -1) {
          sendReply(this[message.method](message));
        }
      });
    });
  },

  // utility methods

  _convert(identity) {
    // In FF 50-51, the icon is the full path, in 52 and following
    // releases, we have IDs to be used with a svg file. In this function
    // we map URLs to svg IDs.
    let image, color;

    if (identity.icon === "fingerprint" ||
        identity.icon === "chrome://browser/skin/usercontext/personal.svg") {
      image = "fingerprint";
    } else if (identity.icon === "briefcase" ||
             identity.icon === "chrome://browser/skin/usercontext/work.svg") {
      image = "briefcase";
    } else if (identity.icon === "dollar" ||
             identity.icon === "chrome://browser/skin/usercontext/banking.svg") {
      image = "dollar";
    } else if (identity.icon === "cart" ||
             identity.icon === "chrome://browser/skin/usercontext/shopping.svg") {
      image = "cart";
    } else {
      image = "circle";
    }

    if (identity.color === "#00a7e0") {
      color = "blue";
    } else if (identity.color === "#f89c24") {
      color = "orange";
    } else if (identity.color === "#7dc14c") {
      color = "green";
    } else if (identity.color === "#ee5195") {
      color = "pink";
    } else if (IDENTITY_COLORS.indexOf(identity.color) !== -1) {
      color = identity.color;
    } else {
      color = "";
    }

    return {
      name: ContextualIdentityService.getUserContextLabel(identity.userContextId),
      image,
      color,
      userContextId: identity.userContextId,
      hasHiddenTabs: !!this._identitiesState[identity.userContextId].hiddenTabUrls.length,
      hasOpenTabs: !!this._identitiesState[identity.userContextId].openTabs
    };
  },

  _getUserContextIdFromTab(tab) {
    return parseInt(viewFor(tab).getAttribute("usercontextid") || 0, 10);
  },

  _getTabList(userContextId) {
    let list = [];
    for (let tab of tabs) {
      if (userContextId === this._getUserContextIdFromTab(tab)) {
        let object = { title: tab.title, url: tab.url, id: tab.id };
        list.push(object);
      }
    }

    return list;
  },

  // Tabs management

  hideTabs(args) {
    return new Promise((resolve, reject) => {
      if (!("userContextId" in args)) {
        reject("hideTabs must be called with userContextId argument.");
        return;
      }

      for (let tab of tabs) {
        if (args.userContextId !== this._getUserContextIdFromTab(tab)) {
          continue;
        }

        this._identitiesState[args.userContextId].hiddenTabUrls.push(tab.url);
        tab.close();
      }

      resolve(null);
    });
  },

  showTabs(args) {
    if (!("userContextId" in args)) {
      Promise.reject("showTabs must be called with userContextId argument.");
      return;
    }

    let promises = [];

    for (let url of this._identitiesState[args.userContextId].hiddenTabUrls) {
      promises.push(this.openTab({ userContextId: args.userContextId, url }));
    }

    this._identitiesState[args.userContextId].hiddenTabUrls = [];

    return Promise.all(promises);
  },

  sortTabs() {
    return new Promise(resolve => {
      for (let window of windows.browserWindows) {
        // First the pinned tabs, then the normal ones.
        this._sortTabsInternal(window, true);
        this._sortTabsInternal(window, false);
      }
      resolve(null);
    });
  },

  _sortTabsInternal(window, pinnedTabs) {
    // From model to XUL window.
    const xulWindow = viewFor(window);

    const tabs = tabsUtils.getTabs(xulWindow);
    let pos = 0;

    // Let's collect UCIs/tabs for this window.
    let map = new Map;
    for (let tab of tabs) {
      if (pinnedTabs && !tabsUtils.isPinned(tab)) {
        // We don't have, or we already handled all the pinned tabs.
        break;
      }

      if (!pinnedTabs && tabsUtils.isPinned(tab)) {
        // pinned tabs must be consider as taken positions.
        ++pos;
        continue;
      }

      const userContextId = this._getUserContextIdFromTab(tab);
      if (!map.has(userContextId)) {
        map.set(userContextId, []);
      }
      map.get(userContextId).push(tab);
    }

    // Let's sort the map.
    const sortMap = new Map([...map.entries()].sort((a, b) => a[0] > b[0]));

    // Let's move tabs.
    sortMap.forEach(tabs => {
      for (let tab of tabs) {
        xulWindow.gBrowser.moveTabTo(tab, pos++);
      }
    });
  },

  getTabs(args) {
    return new Promise((resolve, reject) => {
      if (!("userContextId" in args)) {
        reject("getTabs must be called with userContextId argument.");
        return;
      }

      const list = this._getTabList(args.userContextId);
      let promises = [];

      for (let object of list) {
        promises.push(getFavicon(object.url).then(url => {
          object.favicon = url;
        }, () => {
          object.favicon = "";
        }));
      }

      Promise.all(promises).then(() => {
        resolve(list);
      });
    });
  },

  showTab(args) {
    return new Promise((resolve, reject) => {
      if (!("tabId" in args)) {
        reject("showTab must be called with tabId argument.");
        return;
      }

      for (let tab of tabs) {
        if (tab.id === args.tabId) {
          tab.window.activate();
          tab.activate();
          break;
        }
      }

      resolve(null);
    });
  },

  moveTabsToWindow(args) {
    return new Promise((resolve, reject) => {
      if (!("userContextId" in args)) {
        reject("moveTabsToWindow must be called with userContextId argument.");
        return;
      }

      // Let"s create a list of the tabs.
      const list = this._getTabList(args.userContextId);

      // Nothing to do
      if (list.length === 0) {
        resolve(null);
        return;
      }

      windows.browserWindows.open({
        url: "about:blank",
        onOpen: window => {
          const newBrowserWindow = viewFor(window);

          // Let's move the tab to the new window.
          for (let tab of list) {
            const newTab = newBrowserWindow.gBrowser.addTab("about:blank");
            newBrowserWindow.gBrowser.swapBrowsersAndCloseOther(newTab, tab);
            // swapBrowsersAndCloseOther is an internal method of gBrowser
            // an it's not supported by addon SDK. This means that we
            // don't receive an 'open' event, but only the 'close' one.
            // We have to force a +1 in our tab counter.
            ++this._identitiesState[args.userContextId].openTabs;
          }

          // Let's close all the normal tab in the new window. In theory it
          // should be only the first tab, but maybe there are addons doing
          // crazy stuff.
          for (let tab of window.tabs) {
            const userContextId = this._getUserContextIdFromTab(tab);
            if (args.userContextId !== userContextId) {
              newBrowserWindow.gBrowser.removeTab(viewFor(tab));
            }
          }
          resolve(null);
        },
      });
    });
  },

  openTab(args) {
    return new Promise(resolve => {
      let browserWin = windowUtils.getMostRecentBrowserWindow();

      // This should not really happen.
      if (!browserWin || !browserWin.gBrowser) {
        return Promise.resolve(false);
      }

      let userContextId = 0;
      if ("userContextId" in args) {
        userContextId = args.userContextId;
      }

      let tab = browserWin.gBrowser.addTab(args.url || null, { userContextId });
      browserWin.gBrowser.selectedTab = tab;
      resolve(true);
    });
  },

  // Identities management

  queryIdentities() {
    return new Promise(resolve => {
      let identities = [];

      ContextualIdentityService.getIdentities().forEach(identity => {
        let convertedIdentity = this._convert(identity);
        identities.push(convertedIdentity);
      });

      resolve(identities);
    });
  },

  getIdentity(args) {
    if (!("userContextId" in args)) {
      Promise.reject("getIdentity must be called with userContextId argument.");
      return;
    }

    let identity = ContextualIdentityService.getIdentityFromId(args.userContextId);
    return Promise.resolve(identity ? this._convert(identity) : null);
  },

  createIdentity(args) {
    for (let arg of [ "name", "color", "icon"]) {
      if (!(arg in args)) {
        Promise.reject("createIdentity must be called with " + arg + " argument.");
        return;
      }
    }

    // FIXME: icon and color conversion based on FF version.
    const identity = ContextualIdentityService.create(args.name, args.icon, args.color);

    this._identitiesState[identity.userContextId] = {
      hiddenTabUrls: [],
      openTabs: 0
    };

    return Promise.resolve(this._convert(identity));
  },

  updateIdentity(args) {
    if (!("userContextId" in args)) {
      Promise.reject("updateIdentity must be called with userContextId argument.");
      return;
    }

    let identity = ContextualIdentityService.getIdentityFromId(args.userContextId);
    for (let arg of [ "name", "color", "icon"]) {
      if ((arg in args)) {
        identity[arg] = args[arg];
      }
    }

    // FIXME: icon and color conversion based on FF version.
    // FIXME: color/name update propagation
    return Promise.resolve(ContextualIdentityService.update(args.userContextId,
                                                            identity.name,
                                                            identity.icon,
                                                            identity.color));
  },

  removeIdentity(args) {
    if (!("userContextId" in args)) {
      Promise.reject("removeIdentity must be called with userContextId argument.");
      return;
    }
    return Promise.resolve(ContextualIdentityService.remove(args.userContextId));
  },

  // Styling the window

  configureWindow(window) {
    var tabsElement = window.document.getElementById("tabbrowser-tabs");
    var button = window.document.getAnonymousElementByAttribute(tabsElement, "anonid", "tabs-newtab-button");

    function getTabOverlay() {
      button.parentElement.querySelector('new-tab-overlay');
    }
    while (getTabOverlay()) {
      button.parentElement.removeChild(getTabOverlay());
    }

    let panelElement = window.document.createElementNS(XUL_NS, "panel");
    panelElement.className = "new-tab-overlay";
    //panelElement.setAttribute("side", "top");
    button.after(panelElement);
    panelElement.hidden = true;

    function repositionPopup() {
      //let panelElementSize = panelElement.getBoxQuads()[0];
      let size = button.getBoxQuads()[0];
      let innerWindow = tabsElement.getBoxQuads()[0]
      let panelElementWidth = 200;//panelElementSize.p2.x - panelElementSize.p1.x;
      // 1/4th of the way past the left hand side of the new tab button
      // This seems to line up nicely with the left of the +
      let offset = ((size.p3.x - size.p4.x) / 4);
      let left = size.p4.x + offset;
      if (left + panelElementWidth > innerWindow.p2.x) {
        left -= panelElementWidth - offset;
      }
      panelElement.style.left = left + 'px';
      panelElement.style.top = size.p4.y + 'px';
    }
    repositionPopup();

    ContextualIdentityService.getIdentities().forEach(identity => {
      identity = this._convert(identity);

      let menuItemElement = window.document.createElementNS(XUL_NS, "menuitem");
      panelElement.appendChild(menuItemElement);
      menuItemElement.className = "menuitem-iconic";
      menuItemElement.setAttribute("label", identity.name);
      menuItemElement.setAttribute("data-usercontextid", identity.userContextId);
      menuItemElement.setAttribute("data-identity-icon", identity.image);
      menuItemElement.setAttribute("data-identity-color", identity.color);
      menuItemElement.addEventListener("command", (event) => {
        this.openTab({userContextId: identity.userContextId});
        event.stopPropagation();
      });
      //Command isn't working probably because I'm in a panel
      menuItemElement.addEventListener("click", (event) => {
        panelElement.hidden = true;
        this.openTab({userContextId: identity.userContextId});
        event.stopPropagation();
      });

      panelElement.appendChild(menuItemElement);
    });

    button.addEventListener('click', (e) => {
      panelElement.hidden = false;
    });
    button.addEventListener('mouseover', (e) => {
console.log('got mouseover', e);
      repositionPopup();
      panelElement.hidden = false;
    });
/*
    button.addEventListener('mouseout', (e) => {
      let currentTarget = e.relatedTarget;
      //el.closest(panelElement) doesn't seem to work on xul els
      while (currentTarget) {
        if (currentTarget == panelElement) {
          return;
        }
        currentTarget = currentTarget.parentElement;
      }
      panelElement.hidden = true;
      //if (e.relatedTarget !== panelElement) {
      //  panelElement.hidden = true;
      //}
    });
*/
    panelElement.addEventListener('mouseout', (e) => {
console.log('got mouseout', e);
      if (e.target !== panelElement) {
        panelElement.hidden = true;
        return;
      }
      repositionPopup();
    });

    let style = Style({ uri: self.data.url("chrome.css") });
    attachTo(style, viewFor(window));
    let style2 = Style({ uri: self.data.url("usercontext.css") });
    attachTo(style2, viewFor(window));
  }
};

ContainerService.init();