// ==UserScript==
// @name amazon2melvyl
// @namespace http://aeshin.org/userscripts
// @description Inserts a link to Melvyl after each link to Amazon
// @include *
// ==/UserScript==
(
function() {
// Find links to books at Amazon.
var links = document.evaluate(
'//a', document, null, XPathResult.ANY_TYPE, null);
var amazon_links = new Array();
var current_link = links.iterateNext();
while (current_link) {
var href = current_link.getAttribute('href');
if (href) {
// http://www.amazon.com/exec/obidos/redirect?tag=citeulike-20&path=ASIN/0520058380
if (( href.indexOf('/exec/obidos/ASIN') >= 0
|| href.indexOf('/exec/obidos/redirect') >= 0
|| href.indexOf('/exec/obidos/tg/detail/-/') >= 0
|| href.indexOf('/dp/') >= 0)
&& current_link.textContent.length > 0) {
amazon_links.push(current_link);
}
}
current_link = links.iterateNext();
}
// Augment them with links to Melvyl.
var melvyl_links = {};
for (var i = 0; i < amazon_links.length; i++) {
var amazon_link = amazon_links[i];
var has_isbn = amazon_link.getAttribute('href').match(/\/\d{9}[\d|X]/);
if (has_isbn) {
// Insert Melvyl link.
var melvyl_link = document.createElement('a');
melvyl_link.setAttribute('title', 'Look this up on Melvyl');
amazon_link.parentNode.insertBefore(melvyl_link, amazon_link);
amazon_link.parentNode.insertBefore(amazon_link, melvyl_link);
var isbn = has_isbn[0].slice(1).toLowerCase();
if (! melvyl_links[isbn]) {
melvyl_links[isbn] = [];
}
melvyl_links[isbn].push(melvyl_link);
// Get alias ISBNs from OCLC.
var xisbn_url = 'http://labs.oclc.org/xisbn/' + isbn;
GM_xmlhttpRequest({
method: "GET",
url: xisbn_url,
onload: function(details) {
// Would be nice to use XPath here, but we can't since
// GM_xmlhttprequest doesn't support responseXML due to
// security restrictions.
var isbns = details.responseText.match(/\d{9}[\d|X]/gi);
var melvyl_url = 'http://melvyl.cdlib.org/F/?func=find-c&ccl_term=';
for (var count = 0; count < isbns.length; count++) {
if (count == 21) { // Melvyl's limit
break;
}
if (count > 0) {
melvyl_url += '+or+';
}
melvyl_url += '020=' + isbns[count];
}
var proxy_problem = false;
if (details.responseText.match('UCB Library Proxy Server Authentication')) {
proxy_problem = true;
}
// Set HREF on links.
for (var j = 0; j < melvyl_links[isbns[0]].length; j++) {
var next_link = melvyl_links[isbns[0]][j];
next_link.setAttribute('href', melvyl_url);
if (proxy_problem) {
next_link.setAttribute('title', 'Look this up on Melvyl (login to UCB library proxy for better results)');
next_link.innerHTML
= '%A52000%60%B5uqP%10%3C%ED%23%87%81mC%03%23Qa%F0%E2%D3\'%0C%B1%5B7o%92%1E%40%5D%9E%9E%FF%97%25\'%FF%C7%A7%06%00%D7GdA%7C%25d%B9%00%00%00%00IEND%AEB%60%82)
';
} else {
next_link.innerHTML
= '
';
}
}
}
});
}
}
}
)();