# these are generally in order from most specific to least,# since first rule that fires wins.include fileaddr# declarations of ports without rulesplumb to seemailplumb to showmail# relative files as file: urls get made into absolute pathstype is textdata matches 'file:([.a-zA-Z¡-0-9_\-]([.a-zA-Z¡-0-9_/\-]*[a-zA-Z¡-0-9_/\-]))?'arg isfile $1data set file://$fileplumb to webplumb start web $data# urls go to web browsertype is textdata matches '(https?|ftp|file|gopher|mailto|news|nntp|telnet|wais|prospero)://[a-zA-Z0-9_@\-]+([.:][a-zA-Z0-9_@\-]+)*/?[a-zA-Z0-9_?,%#~&/\-+=]+([:.][a-zA-Z0-9_?,%#~&/\-+=]+)*'plumb to webplumb start web $0# doc and rtf files go to wdoc2txttype is textdata matches '[a-zA-Z¡-0-9_\-./]+'data matches '([a-zA-Z¡-0-9_\-./]+)\.(doc|rtf)'arg isfile $0plumb to mswordplumb start wdoc2txt $file# start rule for microsoft word documents without .doc suffixtype is textdst is mswordplumb to mswordplumb start wdoc2txt $file# image files go to pagetype is textdata matches '[a-zA-Z¡-0-9_\-./]+'data matches '([a-zA-Z¡-0-9_\-./]+)\.(jpe?g|JPE?G|gif|GIF|tiff?|TIFF?|ppm|bit|png|PNG)'arg isfile $0plumb to imageplumb start 9 page $file# postscript/pdf/dvi go to page but not over the a plumb port# the port is here for reference but is unusedtype is textdata matches '[a-zA-Z¡-0-9_\-./]+'data matches '([a-zA-Z¡-0-9_\-./]+)\.(ps|PS|eps|EPS|pdf|PDF|dvi|DVI)'arg isfile $0plumb to postscriptplumb start 9 page $file# open office - s[xt][cdigmw], doc, xls, pptdata matches '[a-zA-Z¡-0-9_\-./]+'data matches '([a-zA-Z¡-0-9_\-./]+)\.([Ss][XxTt][CcDdIiGgMmWw]|[Dd][Oo][Cc]|[Xx][Ll][Ss]|[Pp][Pp][Tt])'arg isfile $0plumb to openofficeplumb start openoffice $file# existing files, possibly tagged by line number, go to editortype is textdata matches '([.a-zA-Z¡-0-9_/\-]*[a-zA-Z¡-0-9_/\-])('$addr')?'arg isfile $1data set $fileattr add addr=$3plumb to editplumb client $editor# .h files are looked up in /usr/include and passed to edittype is textdata matches '([a-zA-Z¡-0-9/_\-]+\.h)('$addr')?'arg isfile /usr/include/$1data set $fileattr add addr=$3plumb to editplumb client $editor# .h files are looked up in /usr/local/include and passed to edittype is textdata matches '([a-zA-Z¡-0-9/_\-]+\.h)('$addr')?'arg isfile /usr/local/include/$1data set $fileattr add addr=$3plumb to editplumb client $editor# .h files are looked up in $plan9/include and passed to edittype is textdata matches '([a-zA-Z¡-0-9/_\-]+\.h)('$addr')?'arg isfile $plan9/include/$1data set $fileattr add addr=$3plumb to editplumb client $editor# .m files are looked up in /usr/inferno/module and passed to edittype is textdata matches '([a-zA-Z¡-0-9/_\-]+\.m)('$addr')?'arg isfile /usr/inferno/module/$1data set $fileattr add addr=$3plumb to editplumb client window $editor# faces -> new mail window for messagetype is textdata matches '[a-zA-Z¡-0-9_\-./]+'data matches '/mail/fs/[a-zA-Z¡-0-9/]+/[0-9]+'plumb to showmailplumb start window -r 4 120 750 600 upas/nedmail -s $0# email addresses get a new mail windowtype is textdata matches '[a-zA-Z0-9_+.\-]+@[a-zA-Z0-9_+.\-]*'plumb to sendmailplumb start wmail $0# plumb start window rc -c '''echo % mail '''$0'; mail '$0# man index entries are synthesizedtype is textdata matches '([a-zA-Z¡-0-9_\-./]+)\(([1-8])\)'plumb start rc -c 'man '$2' '$1' >[2=1] | nobs | plumb -i -d edit -a ''action=showdata filename=/man/'$1'('$2')'''# start rule for images without known suffixesdst is imagearg isfile $dataplumb to imageplumb start 9 page $data# start rule for postscript without known suffixesdst is postscriptarg isfile $dataplumb start 9 page $data
# these are generally in order from most specific to least,
# since first rule that fires wins.
include fileaddr
# declarations of ports without rules
plumb to seemail
plumb to showmail
# relative files as file: urls get made into absolute paths
type is text
data matches 'file:([.a-zA-Z¡-0-9_\-]([.a-zA-Z¡-0-9_/\-]*[a-zA-Z¡-0-9_/\-]))?'
arg isfile $1
data set file://$file
plumb to web
plumb start web $data
# urls go to web browser
type is text
data matches '(https?|ftp|file|gopher|mailto|news|nntp|telnet|wais|prospero)://[a-zA-Z0-9_@\-]+([.:][a-zA-Z0-9_@\-]+)*/?[a-zA-Z0-9_?,%#~&/\-+=]+([:.][a-zA-Z0-9_?,%#~&/\-+=]+)*'
plumb to web
plumb start web $0
# doc and rtf files go to wdoc2txt
type is text
data matches '[a-zA-Z¡-0-9_\-./]+'
data matches '([a-zA-Z¡-0-9_\-./]+)\.(doc|rtf)'
arg isfile $0
plumb to msword
plumb start wdoc2txt $file
# start rule for microsoft word documents without .doc suffix
type is text
dst is msword
plumb to msword
plumb start wdoc2txt $file
# image files go to page
type is text
data matches '[a-zA-Z¡-0-9_\-./]+'
data matches '([a-zA-Z¡-0-9_\-./]+)\.(jpe?g|JPE?G|gif|GIF|tiff?|TIFF?|ppm|bit|png|PNG)'
arg isfile $0
plumb to image
plumb start 9 page $file
# postscript/pdf/dvi go to page but not over the a plumb port
# the port is here for reference but is unused
type is text
data matches '[a-zA-Z¡-0-9_\-./]+'
data matches '([a-zA-Z¡-0-9_\-./]+)\.(ps|PS|eps|EPS|pdf|PDF|dvi|DVI)'
arg isfile $0
plumb to postscript
plumb start 9 page $file
# open office - s[xt][cdigmw], doc, xls, ppt
data matches '[a-zA-Z¡-0-9_\-./]+'
data matches '([a-zA-Z¡-0-9_\-./]+)\.([Ss][XxTt][CcDdIiGgMmWw]|[Dd][Oo][Cc]|[Xx][Ll][Ss]|[Pp][Pp][Tt])'
arg isfile $0
plumb to openoffice
plumb start openoffice $file
# existing files, possibly tagged by line number, go to editor
type is text
data matches '([.a-zA-Z¡-0-9_/\-]*[a-zA-Z¡-0-9_/\-])('$addr')?'
arg isfile $1
data set $file
attr add addr=$3
plumb to edit
plumb client $editor
# .h files are looked up in /usr/include and passed to edit
type is text
data matches '([a-zA-Z¡-0-9/_\-]+\.h)('$addr')?'
arg isfile /usr/include/$1
data set $file
attr add addr=$3
plumb to edit
plumb client $editor
# .h files are looked up in /usr/local/include and passed to edit
type is text
data matches '([a-zA-Z¡-0-9/_\-]+\.h)('$addr')?'
arg isfile /usr/local/include/$1
data set $file
attr add addr=$3
plumb to edit
plumb client $editor
# .h files are looked up in $plan9/include and passed to edit
type is text
data matches '([a-zA-Z¡-0-9/_\-]+\.h)('$addr')?'
arg isfile $plan9/include/$1
data set $file
attr add addr=$3
plumb to edit
plumb client $editor
# .m files are looked up in /usr/inferno/module and passed to edit
type is text
data matches '([a-zA-Z¡-0-9/_\-]+\.m)('$addr')?'
arg isfile /usr/inferno/module/$1
data set $file
attr add addr=$3
plumb to edit
plumb client window $editor
# faces -> new mail window for message
type is text
data matches '[a-zA-Z¡-0-9_\-./]+'
data matches '/mail/fs/[a-zA-Z¡-0-9/]+/[0-9]+'
plumb to showmail
plumb start window -r 4 120 750 600 upas/nedmail -s $0
# email addresses get a new mail window
type is text
data matches '[a-zA-Z0-9_+.\-]+@[a-zA-Z0-9_+.\-]*'
plumb to sendmail
plumb start wmail $0
# plumb start window rc -c '''echo % mail '''$0'; mail '$0
# man index entries are synthesized
type is text
data matches '([a-zA-Z¡-0-9_\-./]+)\(([1-8])\)'
plumb start rc -c 'man '$2' '$1' >[2=1] | nobs | plumb -i -d edit -a ''action=showdata filename=/man/'$1'('$2')'''
# start rule for images without known suffixes
dst is image
arg isfile $data
plumb to image
plumb start 9 page $data
# start rule for postscript without known suffixes
dst is postscript
arg isfile $data
plumb start 9 page $data