/* ***** BEGIN LICENSE BLOCK *****
 * Version: MPL 1.1/GPL 2.0/LGPL 2.1
 *
 * 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 the Firefox Distribution Customizations.
 *
 * The Initial Developer of the Original Code is Mozilla Foundation.
 * Portions created by the Initial Developer are Copyright (C) 2007
 * the Initial Developer. All Rights Reserved.
 *
 * Contributor(s):
 *   Dan Mills <thunder@mozilla.com>
 *
 * Alternatively, the contents of this file may be used under the terms of
 * either the GNU General Public License Version 2 or later (the "GPL"), or
 * the GNU Lesser General Public License Version 2.1 or later (the "LGPL"),
 * in which case the provisions of the GPL or the LGPL are applicable instead
 * of those above. If you wish to allow use of your version of this file only
 * under the terms of either the GPL or the LGPL, and not to allow others to
 * use your version of this file under the terms of the MPL, indicate your
 * decision by deleting the provisions above and replace them with the notice
 * and other provisions required by the GPL or the LGPL. If you do not delete
 * the provisions above, a recipient may use your version of this file under
 * the terms of any one of the MPL, the GPL or the LGPL.
 *
 * ***** END LICENSE BLOCK ***** */

EXPORTED_SYMBOLS = [ "DistributionCustomizer" ];

const Ci = Components.interfaces;
const Cc = Components.classes;
const Cr = Components.results;
const Cu = Components.utils;

const BOOKMARKS_ROOT = "SB:Bookmarks";

function DistributionCustomizer() {
  this._distroDir = this._dirSvc.get("XCurProcD", Ci.nsIFile);
  this._distroDir.append("distribution");

  let iniFile = this._distroDir.clone();
  iniFile.append("distribution.ini");
  this._iniExists = iniFile.exists();

  if (!this._iniExists)
    return;

  this._ini = Cc["@mozilla.org/xpcom/ini-parser-factory;1"].
    getService(Ci.nsIINIParserFactory).createINIParser(iniFile);

  this._prefs = this._prefSvc.getBranch(null);
  this._locale = this._prefs.getCharPref("general.useragent.locale");

}
DistributionCustomizer.prototype = {
  __bmSvc: null,
  get _bmSvc() {
    if (!this.__bmSvc)
      this.__bmSvc = Cc["@songbirdnest.com/servicepane/bookmarks;1"]
                       .getService(Ci.sbIBookmarks);
    return this.__bmSvc;
  },
  
  __spsSvc: null,
  get _spsSvc() {
    if (!this.__spsSvc)
      this.__spsSvc = Cc["@songbirdnest.com/servicepane/service;1"]
                       .getService(Ci.sbIServicePaneService);
    return this.__spsSvc;
  },

  __dirSvc: null,
  get _dirSvc() {
    if (!this.__dirSvc)
      this.__dirSvc = Cc["@mozilla.org/file/directory_service;1"].
        getService(Ci.nsIProperties);
    return this.__dirSvc;
  },

  __prefSvc: null,
  get _prefSvc() {
    if (!this.__prefSvc)
      this.__prefSvc = Cc["@mozilla.org/preferences-service;1"].
        getService(Ci.nsIPrefService);
    return this.__prefSvc;
  },

  __iosvc: null,
  get _iosvc() {
    if (!this.__iosvc)
      this.__iosvc = Cc["@mozilla.org/network/io-service;1"].
                   getService(Ci.nsIIOService);
    return this.__iosvc;
  },

  _locale: "en-US",
  _distroDir: null,
  _iniExists: false,
  _ini: null,


  _makeURI: function DIST__makeURI(spec) {
    return this._iosvc.newURI(spec, null, null);
  },
  _parseBookmarksSection: function DIST_parseBookmarksSection(aParentNode, section) {
    var parentNode = aParentNode;
    if (!(parentNode instanceof Ci.sbIServicePaneNode)) {
      parentNode = this._spsSvc.getNode(aParentNode);
      if (!parentNode) {
        throw "Failed to find parent node " + aParentNode;
      }
    }

    let keys = [];
    for (let i in enumerate(this._ini.getKeys(section)))
      keys.push(i);
    keys.sort();
    let items = {};
    let defaultItemId = -1;
    let maxItemId = -1;

    // read the items from the ini file
    for (let i = 0; i < keys.length; i++) {
      let m = /^item\.(\d+)\.(\w+)\.?(\w*)/.exec(keys[i]);
      if (m) {
        let [, iid, iprop, ilocale] = m;

        if (ilocale)
          continue;

        if (!items[iid])
          items[iid] = {};
        if (keys.indexOf(keys[i] + "." + this._locale) >= 0) {
          items[iid][iprop] = this._ini.getString(section, keys[i] + "." +
                                                  this._locale);
        } else {
          items[iid][iprop] = this._ini.getString(section, keys[i]);
        }

        if (maxItemId < iid)
          maxItemId = iid;
      } else {
        dump("Key did not match: " + keys[i] + "\n");
      }
    }

    // actually insert the items
    for (let iid = 0; iid <= maxItemId; iid++) {
      if (!items[iid])
        continue;
      
      if (!("title" in items[iid])) {
        dump("Distribution.ini: missing title in '" + iid + "'\n");
        continue;
      }

      let newNode;

      switch(items[iid]["type"]) {
        case "folder":
          if (!("folderId" in items[iid])) {
            dump("Distribution.ini: missing folderId in '" + iid + "'\n");
            continue;
          }
          newNode = this._bmSvc.addFolder(items[iid]["title"]);
          this._parseBookmarksSection(newNode,
                                      "BookmarksFolder-" + items[iid]["folderId"]);
          break;
        
        default:
          if ("type" in items[iid]) {
            dump("Distribution.ini: unknown type '" + items[iid]["type"] +
                 "' for '" + iid + "'\n");
            continue;
          }
          // fall through to bookmarks when no type given
        case "bookmark":
          if (!("link" in items[iid])) {
            dump("Distribution.ini: missing link in '" + iid + "'\n");
            continue;
          }
          let icon = items[iid]["icon"];
          if ("icon" in items[iid]) {
            try {
              // attempt to make sure this is a valid url; no need to keep it.
              this._makeURI(items[iid]["icon"]);
            } catch (e) {
              dump("Distribution.ini: invalid icon URL '" + items[iid]["icon"] +
                   "' for '" + iid + "'\n");
              continue;
            }
          } else {
            icon = null;
          }
          newNode = this._bmSvc.addBookmarkAt(items[iid]["link"],
                                              items[iid]["title"],
                                              icon,
                                              parentNode,
                                              null);
          break;
      }

      if ("weight" in items[iid]) {
        // weight was given, sort it
        this._spsSvc.sortNode(newNode);
      }
    }
  },
  applyCustomizations: function DIST_applyCustomizations() {
    if (!this._iniExists)
      return;

    // nsPrefService loads very early.  Reload prefs so we can set
    // distribution defaults during the prefservice:after-app-defaults
    // notification (see applyPrefDefaults below)
    this._prefSvc.QueryInterface(Ci.nsIObserver);
    this._prefSvc.observe(null, "reload-default-prefs", null);

    let sections = enumToObject(this._ini.getSections());

    // The global section, and several of its fields, is required
    // (we also check here to be consistent with applyPrefDefaults below)
    if (!sections["Global"])
      return;
    let globalPrefs = enumToObject(this._ini.getKeys("Global"));
    if (!(globalPrefs["id"] && globalPrefs["version"] && globalPrefs["about"]))
      return;

    let bmProcessed = false;
    let bmProcessedPref;

    try {
      bmProcessedPref = this._ini.getString("Global",
                                            "bookmarks.initialized.pref");
    } catch (e) {
      bmProcessedPref = "distribution." +
        this._ini.getString("Global", "id") + ".bookmarksProcessed";
    }

    try {
      bmProcessed = this._prefs.getBoolPref(bmProcessedPref);
    } catch (e) {}

    if (!bmProcessed) {
      if (sections["Bookmarks"])
        this._parseBookmarksSection(BOOKMARKS_ROOT, "Bookmarks");
      this._prefs.setBoolPref(bmProcessedPref, true);
    }
  },
  applyPrefDefaults: function DIST_applyPrefDefaults() {
    if (!this._iniExists)
      return;

    let sections = enumToObject(this._ini.getSections());

    // The global section, and several of its fields, is required
    if (!sections["Global"])
      return;
    let globalPrefs = enumToObject(this._ini.getKeys("Global"));
    if (!(globalPrefs["id"] && globalPrefs["version"] && globalPrefs["about"]))
      return;

    let defaults = this._prefSvc.getDefaultBranch(null);

    // Global really contains info we set as prefs.  They're only
    // separate because they are "special" (read: required)

    defaults.setCharPref("distribution.id", this._ini.getString("Global", "id"));
    defaults.setCharPref("distribution.version",
                         this._ini.getString("Global", "version"));

    let partnerAbout = Cc["@mozilla.org/supports-string;1"].
      createInstance(Ci.nsISupportsString);
    if (globalPrefs["about." + this._locale]) {
      partnerAbout.data = this._ini.getString("Global", "about." + this._locale);
    } else {
      partnerAbout.data = this._ini.getString("Global", "about");
    }
    defaults.setComplexValue("distribution.about",
                             Ci.nsISupportsString, partnerAbout);

    if (sections["Preferences"]) {
      for (let key in enumerate(this._ini.getKeys("Preferences"))) {
        try {
          let value = eval(this._ini.getString("Preferences", key));
          switch (typeof value) {
          case "boolean":
            defaults.setBoolPref(key, value);
            break;
          case "number":
            defaults.setIntPref(key, value);
            break;
          case "string":
            defaults.setCharPref(key, value);
            break;
          case "undefined":
            defaults.setCharPref(key, value);
            break;
          }
        } catch (e) { /* ignore bad prefs and move on */ }
      }
    }

    // We eval() the localizable prefs as well (even though they'll
    // always get set as a string) to keep the INI format consistent:
    // string prefs always need to be in quotes

    let localizedStr = Cc["@mozilla.org/pref-localizedstring;1"].
      createInstance(Ci.nsIPrefLocalizedString);

    if (sections["LocalizablePreferences"]) {
      for (let key in enumerate(this._ini.getKeys("LocalizablePreferences"))) {
        try {
          let value = eval(this._ini.getString("LocalizablePreferences", key));
          value = value.replace("%LOCALE%", this._locale, "g");
          localizedStr.data = "data:text/plain," + key + "=" + value;
          defaults.setComplexValue(key, Ci.nsIPrefLocalizedString, localizedStr);
        } catch (e) { /* ignore bad prefs and move on */ }
      }
    }

    if (sections["LocalizablePreferences-" + this._locale]) {
      for (let key in enumerate(this._ini.getKeys("LocalizablePreferences-" + this._locale))) {
        try {
          let value = eval(this._ini.getString("LocalizablePreferences-" + this._locale, key));
          localizedStr.data = "data:text/plain," + key + "=" + value;
          defaults.setComplexValue(key, Ci.nsIPrefLocalizedString, localizedStr);
        } catch (e) { /* ignore bad prefs and move on */ }
      }
    }
  }
};

function enumerate(UTF8Enumerator) {
  while (UTF8Enumerator.hasMore())
    yield UTF8Enumerator.getNext();
}

function enumToObject(UTF8Enumerator) {
  let ret = {};
  for (let i in enumerate(UTF8Enumerator))
    ret[i] = 1;
  return ret;
}
