root/lang/javascript/userscripts/googlereaderfullfeed.user.js @ 7141

// ==UserScript==
// @name        Google Reader Full Feed
// @namespace   tag:mattn.jp@gmail.com,2008-02-25:/coderepos.org
// @include     http://www.google.com/reader/*
// @include     https://www.google.com/reader/*
// @include     http://www.google.co.jp/reader/*
// @include     https://www.google.co.jp/reader/*
// @description loading full entry on Google Reader
// @privilege   false
// @version     0.0.6
// based on LDR Full Feed(http://d.hatena.ne.jp/toshi123)
//
// author: mattn (mattn.jp@gmail.com)
// ==/UserScript==
setTimeout(function(){

var w = (typeof unsafeWindow == 'undefined') ? window : unsafeWindow;

// == [CSS] =========================================================
const CSS = [
'.gm_fullfeed_loading, .gm_fullfeed_loading a{color : green !important;}',
'.gm_fullfeed_loading .item_body a{color : palegreen !important;}',
'.gm_fullfeed_loading{background-color : Honeydew !important;}',
].join('');

// == [Icon] ========================================================
const ICON = 'data:image/gif;base64,'+
'R0lGODdhEwATAPMAMf+MAP+lAP+lOv+0AP+0kP/EAP/Etv/TOv/hZv/x2//x////tv//2////wAA'+
'AAAAACwAAAAAEwATAAAETBDISWsNOOuNJf+aB4LiyJUZ0awNsqGB0RSYkAwhoAnKYaIEBm4EXJgC'+
'QGFA1VBmUDwfJjjs6DQy2tJp5TBX0uf1mCO/xmYk2mxptyMAOw==';

// == [Config] ======================================================

const KEY = 'g';
const ADCHECKER = /^(?:AD|PR):/;
const LOADING_MOTION = true;
const REMOVE_SCRIPT = true;
const REMOVE_H2TAG = false;
const OPEN = false; //SITEINFOになかった場合にそのエントリを開くかどうか。
const WIDGET = true;
const SITEINFO_IMPORT_URLS = [
    'http://constellation.jottit.com/siteinfo',
];

// == [SITE_INFO] ===================================================

const SITE_INFO = [
];

// == [Application] =================================================

var FullFeed = function(info, c){
  this.itemInfo = c;
  this.info = info;
  this.requestURL = this.itemInfo.itemURL;
  var bodyXPath = 'id("current-entry")//ins/div';
  this.itemInfo.item_body = getFirstElementByXPath(bodyXPath);
  this.state = 'wait';

  if (this.info.enc) {
    this.mime = 'text/html; charset=' + this.info.enc;
  } else {
    this.mime = 'text/html; charset=' + document.characterSet;
  }


  this.request();
};

FullFeed.prototype.request = function(){
  if (!this.requestURL) {
    return
  }
  this.state = 'request';
  var self = this;
  var opt = {
        method: 'get',
        url: this.requestURL,
        overrideMimeType: this.mime,
        onerror: function(){
          self.requestError.apply(self, ['Request Error'])
        },
        onload: function(res){
          self.requestLoad.apply(self, [res])
        },
  };
  message('Loading');
  w.toggleClass(this.itemInfo.item_container, 'gm_fullfeed_loading');
  if (opt.url.indexOf("http:") != 0) {
    opt.url = pathToURL(this.info.base, opt.url);
  }
  window.setTimeout(function(){ GM_xmlhttpRequest(opt);}, 0);
}

FullFeed.prototype.requestLoad = function(res) {
  this.state = 'loading';
  var text = res.responseText;

  if(this.info.base){
    text = relativeToAbsolutePath(text, this.info.base);
  } else {
    text = relativeToAbsolutePath(text, this.itemInfo.itemURL);
  }
  if(REMOVE_SCRIPT) text = text.replace(/<script[^>]*>[\S\s]*?<\/script[^>]*>/g, "");
  if(REMOVE_H2TAG) text = text.replace(/<h2[^>]*>[\S\s]*?<\/h2[^>]*>/g, "");
  var htmldoc = parseHTML(text);
  for (var i = 0;i < FullFeed.documentFilters.length; i++) {
    FullFeed.documentFilters[i](htmldoc, this.itemInfo.itemURL, this.info);
  }
  try{
    var entry = getElementsByXPath(this.info.xpath, htmldoc);
  }
  catch(e) {
    message(e);
    return;
  }

  if (entry) {
    this.removeEntry();
    entry = this.addEntry(entry);
    for (var j = 0;j < FullFeed.filters.length; j++) {
      FullFeed.filters[j](entry);
    }
    this.requestEnd();
  } else {
    this.requestError('This SITE_INFO is unmatched to this entry');
  }

  if (this.info.base) {
    w.addClass(this.itemInfo.item_container, this.info.base);
  } else {
    w.addClass(this.itemInfo.item_container, this.itemInfo.itemURL);
  }
}

FullFeed.prototype.requestEnd = function(){
  this.state = 'loaded';
  message('Done');
  w.toggleClass(this.itemInfo.item_container, 'gm_fullfeed_loading');
  w.addClass(this.itemInfo.item_container, 'gm_fullfeed_loaded');
}

FullFeed.prototype.requestError = function(e){
  this.state = 'error';
  message('Error : ' + e);
  w.toggleClass(this.itemInfo.item_container, 'gm_fullfeed_loading');
  w.addClass(this.itemInfo.item_container, 'gm_fullfeed_error');
}

FullFeed.prototype.removeEntry = function(){
  while (this.itemInfo.item_body.firstChild) {
    this.itemInfo.item_body.removeChild(this.itemInfo.item_body.firstChild);
  }
}

FullFeed.prototype.addEntry = function(entry){
  var self = this;
  return entry.map(function(i) {
      var pe = document.importNode(i,true);
      self.itemInfo.item_body.appendChild(pe);
      return pe;
  });
}

FullFeed.parser = function(text){
  var lines = text.split(/\r?\n|\r/);
  var reg = /(^[^:]*):(.*)$/;
  var trimspace = function(str){
    return str.replace(/^\s+|\s+$/g, '');
  };
  var info = {};
  for(var i = 0; i < lines.length; i++) {
    if (reg.test(lines[i])) {
      info[RegExp.$1] = trimspace(RegExp.$2);
    }
  }
  var isValid = function(info) {
    var infoProp = ['url', 'xpath'];
    for (var i = 0; i <infoProp.length; i++) {
      if (!info[infoProp[i]]) {
        return false;
      }
    }
    try{
      new RegExp(info.url);
    } catch(e) {
      return false;
    }
    return true;
  };
  return isValid(info) ? info : null;
}

FullFeed.resetCache = function(){
  message('Resetting cache. Please wait.');
  SITEINFO_IMPORT_URLS.forEach(function(l){
    var opt = {
      method: 'get',
      url: l,
      onload: function(res){
        FullFeed.setCache(res, l);
      },
      onerror: function(res){
        message('Cache Request Error');
      },
    }
    window.setTimeout(GM_xmlhttpRequest, 0, opt);
  });
}

FullFeed.setCache = function(res, url){
  var info = [];
  var doc = parseHTML(res.responseText);
  var lists = getElementsByXPath(
      '//textarea[@class="ldrfullfeed_data"]', doc);
  lists.forEach(function(list){
      var data = FullFeed.parser(list.value);
      if (data) {
        info.push(data);
      }
  });
  if (info.length > 0) {
    cacheInfo[url] = {
      url: url,
      info: info
    }
    GM_setValue('cache', cacheInfo.toSource());
    if(WIDGET) FullFeed.createPattern();
    message('Done');
  }
}


FullFeed.getCache = function(){
  return eval(GM_getValue('cache')) || {};
}

FullFeed.createPattern = function(){
  if(!WIDGET) return;
  var exps = [];
  for (var i = 0; i < SITE_INFO.length; i++){
    exps.push(SITE_INFO[i].url);
  }
  for (var url in cacheInfo) {
    var site = cacheInfo[url];
    for (var j = 0; j < site.info.length; j++){
      exps.push(site.info[j].url);
    }
  }
  pattern = exps.join('|');
}

FullFeed.registerWidgets = function() {
  if(!WIDGET) return;
  var container = getFirstElementByXPath('id("current-entry")//a[contains(concat(" ",normalize-space(@class)," ")," entry-title-link ")]').parentNode;
  if (!container) return;

  FullFeed.createPattern();
  var description = "\u5168\u6587\u53d6\u5f97\u3067\u304d\u308b\u3088\uff01";

  var c = new getCurrentItem();
  var item = c.item;
  var feed = c.feed;
  if (item.link.match(pattern) || feed.channel.link.match(pattern)) {
    icon = document.createElement('span');
    icon.title = description;
    icon.innerHTML = '<img src="'+ICON+'">'
    w.addClass(icon, 'gm_fullfeed_checked');
    container.appendChild(document.createTextNode(' '));
    container.appendChild(icon);
  }
}

FullFeed.documentFilters = [
// addTargetAttr
(function (doc){
  var anchors = getElementsByXPath('descendant-or-self::a', doc);
  anchors.forEach(function(i){
    i.target = '_blank';
  });
}),
];

FullFeed.filters= [];

window.FullFeed = {};

window.FullFeed.addDocumentFilter = function(f){
  FullFeed.documentFilters.push(f);
};

window.FullFeed.addFilter = function(f){
  FullFeed.filters.push(f);
};

w.get_active_item = function(flag) {
  var item = {}
  try {
    item.link = getFirstElementByXPath('id("current-entry")//a[contains(concat(" ",normalize-space(@class)," ")," entry-title-link ")]').href;
    item.title = getFirstElementByXPath('id("current-entry")//a[contains(concat(" ",normalize-space(@class)," ")," entry-title-link ")]').textContent;
  } catch(e) {}
  return item;
}

w.get_active_feed = function() {
  var feed = {};
  feed.channel = {}
  try {
    feed.channel.link = decodeURIComponent(getFirstElementByXPath('id("current-entry")//a[contains(concat(" ",normalize-space(@class)," ")," entry-source-title ")]').href.replace(/^.*\/(?=http)/, ''));
  } catch(e) {}
  return feed;
}

var hasClass = w.hasClass = function(element, classname) {
  var cl = element.className;
  var cls = cl.split(/\s+/);
  return cls.indexOf(classname) != -1;
}

var toggleClass = w.toggleClass = function(element, classname) {
  hasClass(element, classname) ? removeClass(element, classname) : addClass(element, classname);
}

var removeClass = w.removeClass = function(element, classname) {
  var cl = element.className;
  var cls = cl.split(/\s+/);
  element.className = cls.remove(classname).join(" ");
}

var addClass = w.addClass = function(element, classname) {
  var cl = element.className;
  if (!contain(cl, classname)) {
    element.className += " " + classname;
  }
}

var contain = w.contain = function(self, other) {
  if (isString(self) && isString(other)) {
    return self.indexOf(other) != -1;
  }
  if (isRegExp(other)) {
    return other.test(self);
  }
}

var isString = w.isString = function(obj) {
  return typeof obj == "string" || obj instanceof String;
}

var isRegExp = w.isRegExp = function(obj) {
  return obj instanceof RegExp;
}

Array.prototype.remove = function(to_remove) {
  return this.filter(function (val) {return val != to_remove});
}

// itemの情報を格納するobjectのconstructor
var getCurrentItem = function(){
  this.item = w.get_active_item(true);
  this.feed = w.get_active_feed();
  this.itemURL = this.item.link;
  this.feedURL = this.feed.channel.link;
  this.id = this.item.id;
  this.item_container = getFirstElementByXPath('id("current-entry")//ins/div');
  this.title = this.item.title;
  this.find = false;
};

var launchFullFeed = function (list, c){
  if(list){
    for (var i = 0; i < list.length; i++){
      var reg = new RegExp(list[i].url);
      if (reg.test(c.itemURL) || reg.test(c.feedURL)){
        c.find = true;
        var ff = new FullFeed(list[i], c);
        break;
      }
    }
  }
};

var init = function(){
  var c = new getCurrentItem();
  if (!c.title) return;
  if(ADCHECKER.test(c.title)){
    message('This entry is advertisement');
    return;
  }
  if(w.hasClass(c.item_container, 'gm_fullfeed_loaded')){
    message('This entry has been already loaded.');
    return;
  }

  launchFullFeed(SITE_INFO, c);

  if (!c.find) {
    for ( i = 0; i < SITEINFO_IMPORT_URLS.length && !c.find; i++){
      launchFullFeed(cacheInfo[SITEINFO_IMPORT_URLS[i]].info, c);
    }
  }

  if (!c.find){
    message('This entry is not listed on SITE_INFO');
    if (OPEN) window.open(c.itemURL) || message('Cannot popup');
  }

};

var cacheInfo = FullFeed.getCache();
var pattern;

GM_registerMenuCommand('Google Reader Full Feed - reset cache', FullFeed.resetCache)

if(LOADING_MOTION) addStyle(CSS, 'gm_fullfeed');

document.addEventListener('keyup', function(e) {
  if (e.keyCode == 71) {
    init();
    //FullFeed.registerWidgets();
  }
}, true);

var timer = setTimeout(function() {
  if (timer) clearTimeout(timer);
  try {
    var container = getFirstElementByXPath('id("current-entry")//a[contains(concat(" ",normalize-space(@class)," ")," entry-title-link ")]');
    var icon = getFirstElementByXPath('id("current-entry")//span[contains(concat(" ",normalize-space(@class)," ")," gm_fullfeed_checked ")]');
    if (container && !icon) {
      FullFeed.registerWidgets();
    }
  } catch(e) {}
  timer = setTimeout(arguments.callee, 200);
});

// == [Utility] =====================================================

function relativeToAbsolutePath (text, link){
  text = text.replace(/(<[^>]*img\s+[^>]*src\s*=\s*")([^"]+)(?="[^>]*>)/gi, function(match, l, src){
    if (/^https?:\/\//.test(src)) {
      return l+src;
    } else if (src[0] == "/") {
      var link_top = link.replace(/^(https?:\/\/[^\/]+)\/.*$/, '$1');
      return l+link_top+src;
    } else {
      var link_base = link.replace(/\/[^\/]+$/, '/');
      return l+link_base+src;
    }
    });
  return text;
}

function message (mes){
  //w.message(mes);
  console.log(mes);
}

// copied from AutoPagerize(c) id:swdyh
function getElementsByXPath(xpath, node) {
    var node = node || document
    var doc = node.ownerDocument ? node.ownerDocument : node
    var nodesSnapshot = doc.evaluate(xpath, node, null,
        XPathResult.ORDERED_NODE_SNAPSHOT_TYPE, null)
    var data = []
    for (var i = 0; i < nodesSnapshot.snapshotLength; i++) {
        data.push(nodesSnapshot.snapshotItem(i))
    }
    return (data.length >= 1) ? data : null
}

function getFirstElementByXPath(xpath, node) {
    var node = node || document
    var doc = node.ownerDocument ? node.ownerDocument : node
    var result = doc.evaluate(xpath, node, null,
        XPathResult.FIRST_ORDERED_NODE_TYPE, null)
    return result.singleNodeValue ? result.singleNodeValue : null
}

// copied from Pagerization (c) id:ofk
function parseHTML(str) {
  str = str.replace(/^[\s\S]*?<html[^>]*>|<\/html\s*>[\s\S]*$/ig, '')
  var res = document.implementation.createDocument(null, 'html', null)
  var range = document.createRange();
  range.setStartAfter(document.body);
  res.documentElement.appendChild(
  res.importNode(range.createContextualFragment(str), true)
  );
  return res;
}

function pathToURL(url, path) {
    var re = path[0] == "/"
           ? /^([a-zA-Z]+:\/\/[^\/]+)\/.*$/
           : /^(.*\/).*$/;
    return url.replace(re, "$1" + path)
}

// copied from LDRize (c) id:snj14
function addStyle(css, id){ // GM_addStyle is slow
    var link = document.createElement('link');
    link.rel = 'stylesheet';
    link.href = 'data:text/css,' + escape(css);
    document.documentElement.appendChild(link);
}

}, 0)