// basic keyword search
// inspired by and partially derived from the Web Command Line by Russ Cox,
// available at .
var searchkeys = {
// search engines
// "x": ['https://eu.ixquick.com/do/metasearch.pl?query=%s', 'ixquick'],
"g": ['https://www.google.com/search?q=%s', 'google'],
"gmap": ['http://maps.google.com/maps?q=%s', 'google maps'],
"gt": ['http://translate.google.com/?hl=en&layout=1&eotf=0&sl=auto&tl=en&q=%s', 'google translate'],
"gs": ['http://scholar.google.com/scholar?q=%s', 'google scholar'],
"wa": ['http://www.wolframalpha.com/input/?i=%s', 'wolfram alpha'],
"doi": ['http://dx.doi.org/%s', 'doi'],
"mr": ['http://ams.math.uni-bielefeld.de/mathscinet/search/publications.html?pg4=ALLF&s4=%s&Submit=Search&dr=all&yrop=eq&arg3=&yearRangeFirst=&yearRangeSecond=&pg8=ET&s8=All&review_format=html', 'mathscinet'],
"msc": ['http://www.ams.org/mathscinet/msc/msc2010.html?s=%s&btn=Search', 'maths subject classification'],
// references
"eom": ['http://www.google.com/search?q=site:eom.springer.de+%s', 'springer encyclopaedia of mathematics'],
"bwv": ['http://www.jsbach.org/bwv%s.html', 'Bach-Werke-Verzeichnis'],
"wp": ['http://en.wikipedia.org/wiki/Special:Search?search=%s', 'wikipedia'],
"wp-fr":['http://fr.wikipedia.org/wiki/Special:Search?search=%s', 'wikipedia (fr)'],
"md": ['http://www.merriam-webster.com/medlineplus/%s', 'medlineplus medical dictionary'],
"bf": ['http://www.bookfinder.com/search/?keywords=%s&st=sh&ac=qr&submit=', 'bookfinder.com'],
"z": ['http://www.amazon.com/s?keywords=%s', 'amazon.com'],
"zg": ['http://www.amazon.com/s/ref=nb_sb_noss?url=search-alias%3Dus-worldwide-shipping-aps&field-keywords=%s&x=0&y=0', 'amazon global'],
"z-uk": ['http://www.amazon.co.uk/s?keywords=%s', 'amazon.co.uk'],
"z-de": ['http://www.amazon.de/s?keywords=%s', 'amazon.de'],
"z-fr": ['http://www.amazon.fr/s?keywords=%s', 'amazon.fr'],
// languages and dictionaries
"oed": ['http://www.oed.com:80/search?searchType=dictionary&isWritersAndEditors=true&searchUri=All&q=%s', 'the oed'],
"oed-th": ['http://oed.com/browsethesaurus?thesaurusTerm=%s&searchType=words&type=thesaurussearch', 'the oed: historical thesaurus'],
"dico-th": ['http://dico.isc.cnrs.fr/dico/en/search?b=1&r=%s&send=Look+it+up', 'cnrs thesaurus'],
"bnc": ['http://bnc.bl.uk/saraWeb.php?qy=%s&mysubmit=Go', 'british national corpus'],
"enfr":['http://www.wordreference.com/enit/translation.asp?w=%s&dict=enfr&B=Rechercher', 'wordreference (en2fr)'],
"fren":['http://www.wordreference.com/enit/translation.asp?w=%s&dict=fren&B=Rechercher', 'wordreference (fr2en)'],
"ende":['http://www.wordreference.com/enit/translation.asp?w=%s&dict=ende&B=Rechercher', 'wordreference (en2de)'],
"deen":['http://www.wordreference.com/enit/translation.asp?w=%s&dict=deen&B=Rechercher', 'wordreference (de2en)'],
"conj-fr": ['http://www.wordreference.com/conj/FRverbs.asp?v=%s', 'wordreference (fr conjugator)'],
// epfl
"lib": ['http://opac.nebis.ch/F?local_base=nebis&con_lng=FRE&func=find-b&find_code=WRD&request=%s', 'nebis'],
"ep-map": ['http://map.epfl.ch/?q=%s', 'epfl map'],
"ep-dir": ['http://search.epfl.ch/compoundDirectory.do?q=%s', 'epfl dir'],
// switzerland
"met": ['http://www.meteosuisse.admin.ch/web/fr/meteo/previsions_en_detail/previsions_locales.html?language=fr&plz=%s&x=0&y=0','météosuisse'],
"p": ['http://www.poste.ch/post-startseite/post-privatkunden/post-track-and-trace-search.htm?formattedParcelCodes=%s','la poste suisse'],
// misc
"pkg": ['http://pkgsrc.se/search.php?so=%s', 'pkgsrc.se']
}
function keytable()
{
var s = '
\n';
for(var key in searchkeys)
s += ' ' + key + ' | ' + searchkeys[key][1] + ' |
\n';
s += '
';
return s;
}
function runquery(input)
{
var spc = input.indexOf(' ');
var url = '';
if(spc != -1) {
var query = input.substr(spc+1);
var keyword = input.substr(0, spc);
if(searchkeys[keyword] != undefined)
url = searchkeys[keyword][0].replace('%s',escape(query));
else
url = '';
} else {
url = input;
}
window.location = url;
return false;
}