gistfile1.sh

#!/bin/sh

myname="`basename $0`"
me=terry
identity=

case $# in
    0) echo usage: "$myname" host; exit 1;;
    *) host="$1";;
esac

case "$HOSTTYPE" in
    sparc) ping="ping -s" ;;
    *) ping=ping ;;
esac

shift

case "$host" in
    *.*)           ;;
    [0-9] | [1-9][0-9] | [12][0-9][0-9]) host=192.168.1.$host;;
    ab*)           host=abo.santafe.edu;;
    aco*)          host=acoma.santafe.edu;;
    ad*)           host=adam.es;;
    alg*)          host=algodones.unm.edu;;
    ali*)          host=alife.santafe.edu;;
    alt*)          host=www.altavista.digital.com;;
    ant*)          host=ants.neurones.espci.fr;;
    ax*)           host=194.133.64.141;;
    ay*)           host=ayesha.eatoni.com;;
    apl*)          host=aplysia.biology.yale.edu;;
    ap*)           host=apollo.eatoni.com;;
    at*)           host=atalaya.santafe.edu;;
    aw*)           host=awatovi.santafe.edu;;
    az*)           host=aztec.santafe.edu;;
    ani*)          host=anis.teclata.es;;
    ana*)          host=ana.jones.tc;;
    a*)            host=antigenic-cartography.org;;
    bad*)          host=badshot.cs.unm.edu;;
    bas*)          host=basser.cs.su.oz.au;;
    boa*)          host=boa.cs.unm.edu;;
    bi*)           host=bicv.org;;
    br*)           host=bronze.ucs.indiana.edu;;
    bun*)          host=bunny.cogsci.indiana.edu;;
    bla*)          host=blacksbeach.ucsd.edu;;
    be*)           host=bens.eatoni.com;;
    bg*)           host=bgross.eatoni.com;;
    b*)            host=blogs.fluidinfo.com; me=fluidinf;;
    car*)          host=carina.unm.edu;;
    chim*)         host=chimayo.santafe.edu;;
    cha*)          host=chaco.cs.unm.edu;;
    ch*)           host=chiliad.teclata.es;;
    cl*)           host=cliffs.ucsd.edu;;
    cob*)          host=cobra.cs.unm.edu;;
    coc*)          host=cochiti.santafe.edu;;
    cog*)          host=cogsci.ucsd.edu;;
    cora*)         host=coral.cs.unm.edu;;
    cor*)          host=coronado.santafe.edu;;
    co*)           host=cogsci.indiana.edu;;
    c*)            host=cus.cam.ac.uk; me=tcj25;;
    dar*)          host=darwin.cs.unm.edu;;
    do*)           host=doliolum.biology.yale.edu;;
    dr*)           host=draco.unm.edu;;
    duckf*)        host=duckfeet.ucsd.edu;;
    duc*)          host=duckie.cogsci.indiana.edu;;
    da*)           host=dave.eatoni.com;;
    d*)            host=data.antigenic-cartography.org;;
    e0)            host=escuela0.teclata.es;;
    e1)            host=escuela1.teclata.es;;
    e2)            host=escuela2.teclata.es;;
    e3)            host=escuela3.teclata.es;;
    em*)           host=emma.jones.tc;;
    ec*)           host=ecoalpha.unimo.it;;
    e*)            host=eatoni.com;;
    fa*)           host=fare.ucsd.edu;;
    fdb*)          host=fluiddb.fluidinfo.com; identity="-i $EC2_KEYPAIR";;
    fiv*)          host=fiveup.cs.unm.edu;;
    fr*)           host=froggy.cogsci.indiana.edu;;
    ft2*)          host=ftp2.santafe.edu;;
    fu*)           host=fuzzbox.cse.unsw.edu.au;;
    ftpe*)         host=ftp.eatoni.com;;
    f*)            host=fluidinfo.com;;
    gi*)           host=gila.santafe.edu;;
    gl*)           host=glyph.is-a-geek.org;;
    goa*)          host=goanna.cse.unsw.edu.au;;
    gol*)          host=golondrinas.unm.edu;;
    goos*)         host=goosie.cogsci.indiana.edu;;
    go*)           host=www.google.com;;
    gra*)          host=grasshopper.santafe.edu;;
    gre*)          host=greatwhite.cs.indiana.edu;;
    gr*)           host=grupoweb.upf.es; me=tjones;;
    gw)            host=gateway;;
    g*)            host=gateway;;
    hp*)           host=132.239.215.210;; # HP5000 printer in UCSD HCI lab.
    hop*)          host=hopi.santafe.edu;;
    hor*)          host=horsie.cogsci.indiana.edu;;
    hy*)           host=hydra.unm.edu;;
    hc*)           host=hci.ucsd.edu;;
    h*)            host=blogs.fluidinfo.com; me=fluidinf;;
    ie*)           host=ieng9.ucsd.edu;;
    in*)           host=indus.unm.edu;;
    is*)           host=isleta.santafe.edu;;
    je*)           host=jemez.santafe.edu;;
    joa*)          host=joan.teclata.es;;
    jones.tc.sitegenie)  host=12.47.44.104; me=terryj;;
    jones.tc.avid)  host=65.108.79.60;;
    ji*)           host=12.47.44.16; me=terryj;;
    ju*)           host=jupiter.eatoni.com;;
    j*)            host=jon.es;;
    ki*)           host=kiowa.santafe.edu;;
    ku*)           host=kurama.cs.unm.edu;;
    k*)            host=kneeboard.ucsd.edu;;
    la*)           host=laguna.santafe.edu;;
    ly*)           host=lyra.santafe.edu;;
    l*)            host=loveme.do;;
    mam*)          host=mamba.cs.unm.edu;;
    mari*)         host=mariajo.teclata.es;;
    may*)          host=maya.santafe.edu;;
    men*)          host=mendel.cs.unm.edu;;
    meg*)          host=megalon.berkeley.edu;;
    mon*)          host=monet.cs.unm.edu;;
    moq*)          host=moqui.santafe.edu;;
    moos*)         host=moose.cs.indiana.edu;;
    mus*)          host=musca.unm.edu;;
    mo*)           host=moocow.cogsci.indiana.edu;;
    mal*)          host=mallet.jones.tc;;
    m*)            host=marbo;;
    ni*)           host=nickel.ucs.indiana.edu;;
    na*)           host=nambe.santafe.edu;;
    newfi)         host=92.243.20.182;;
    news*)         host=news.ucsd.edu;;
    n*)            host=192.168.1.4;;
    or*)           host=orion.biology.yale.edu;;
    o*)            host=oodl.es;;
    paq*)          host=paquime.santafe.edu;;
    pa*)           host=pad.ucsd.edu;;
    pea*)          host=peaplant.biology.yale.edu;;
    peg*)          host=pegasus.unm.edu;;
    pel*)          host=pele.cs.unm.edu;;
    pen*)          host=penitente.santafe.edu;;
    po*)           host=pojoaque.santafe.edu;;
    pr*)           host=prep.ai.mit.edu;;
    pup*)          host=puppy.cogsci.indiana.edu;;
    pu*)           host=puye.santafe.edu;;
    pic*)          host=picuris.santafe.edu;;
    p*)            host=pipeline.ucsd.edu;;
    ra*)           host=rajesh.eatoni.com;;
    ri*)           host=rio.eatoni.com;;
    re*)           host=research.eatoni.com;;
    r*)            host=rob.eatoni.com;;
    sf*)           host=gateway.santafe.edu;;
    silver*)       host=silver.ucs.indiana.edu;;
    sam*)          host=samba.eatoni.com;;
    sang*)         host=sangre.santafe.edu;;
    santac*)       host=santaclara.santafe.edu;;
    sc*)           host=scratch.jones.tc;;
    se*)           host=seker.es;;
    sha*)          host=shabikeschee.santafe.edu;;
    sh*)           host=shortboard.ucsd.edu;;
    si*)           host=silvia.teclata.es;;
    sun*)          host=sunsite.unc.edu;;
    sur*)          host=surf.cs.unm.edu;;
    s*)            host=sandbox.fluidinfo.com; identity="-i $EC2_KEYPAIR";;
    tao*)          host=taos.santafe.edu;;
    tav*)          host=tavarua.ucsd.edu;;
    ta*)           host=tapdance.eatoni.com;;
    teb*)          host=tebah.smif.local;;
    teq*)          host=tequila.teclata.es;;
    tes*)          host=tesuque.santafe.edu;;
    te)            host=te.teclata.es;;
    tie*)          host=tierra.santafe.edu;;
    tij*)          host=tijeras.santafe.edu;;
    tl*)           host=tlaloc.santafe.edu;;
    tri*)          host=triton.unm.edu;;
    tr*)           host=truchas.santafe.edu;;
    ts*)           host=tsankawi.santafe.edu;;
    ty*)           host=tyuonyi.santafe.edu;;
    ton*)          host=tonemail.eatoni.com;;
    to*)           host=terryold.eatoni.com;;
    t*)            host=tickery.net;;
    un*)           host=unmvax.cs.unm.edu;;
    ut*)           host=ute.santafe.edu;;
    v*)            host=vida.santafe.edu;;
    we*)           host=werc.cs.unm.edu;;
    wij*)          host=wijiji.santafe.edu;;
    win*)          host=winnetou.santafe.edu;;
    wu*)           host=wupatki.santafe.edu;;
    wai*)          host=waimea.cs.unm.edu;;
    wav*)          host=waves.ucsd.edu;;
    wa*)           host=wasps.eatoni.com;;
    w*)            host=wifi;;
    ys*)           host=ysidro.unm.edu;;
    yaq*)          host=yaqui.santafe.edu;;
    y*)            host=www.yahoo.com;;
    zi*)           host=zia.santafe.edu;;
    zu*)           host=zuni.santafe.edu;;
    z*)            host=zeus.eatoni.com;;
esac

case "$myname" in
    fat)  echo finger @$host;                        exec finger @$host;;
    ft)   echo ncftp -u $me $host;                   exec ncftp -u $me $host;;
    oft*) echo ftp -p $host;                         exec ftp -p $host;;
    nsl)  echo nslookup $host;                       exec nslookup $host;;
    p)    echo $ping $host "$@";                     exec $ping $host "$@";;
    pk)   echo $ping -p 2b2b2b415448300d -c 5 $host; exec $ping -p 2b2b2b415448300d -c 5 $host;;
    r)    echo rsh -l $me $host "$@";                exec rsh -l $me $host "$@";;
    sf*)  echo sftp $me@$host "$@";                  exec sftp $me@$host "$@";;
    s)    echo ssh -l $me $identity $host "$@";      exec ssh -l $me $identity $host "$@";;
    rl)   echo rlogin -l $me $host "$@";             exec rlogin -l $me $host "$@";;
    t)    echo telnet $host "$@";                    exec telnet $host "$@";;
    ton)  echo telnet $host 13;                      exec telnet $host 13;;
    tt)   echo traceroute $host "$@";                exec traceroute $host "$@";;
    xh*)  echo xhost $host;                          exec xhost $host;;
    xh+*) echo xhost +$host;                         exec xhost +$host;;
    xh-*) echo xhost -$host;                         exec xhost -$host;;
    *)    echo ${myname}: unrecognized invocation name >&2; exit 1;;
esac