contrib/plan9/9mail
author Josef 'Jeff' Sipek <jeffpc@josefsipek.net>
Wed, 13 Jun 2018 10:37:39 -0400
branchstable
changeset 38301 d9e87566f879
parent 19613 4bfd3c7160d9
permissions -rw-r--r--
cext: stop worrying and love the free(NULL) There is no need to check for a NULL pointer before calling free since free(NULL) is defined by C standards as a no-op. Lots of software relies on this behavior so it is completely safe to call even on the most obscure of systems.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
19613
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     1
#!/bin/rc
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     2
# 9mail - Mercurial email wrapper for upas/marshal
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     3
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     4
fn usage {
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     5
	echo >[1=2] usage: mercurial/9mail -f from to [cc]
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     6
	exit usage
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     7
}
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     8
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     9
from=()
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    10
cc=()
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    11
to=()
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    12
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    13
switch($1){
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    14
case -f
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    15
	from=$2
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    16
case *
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    17
	usage
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    18
}
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    19
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    20
to=($3)
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    21
if(~ $#* 4)
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    22
	cc=(-C $4)
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    23
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    24
upasname=$from
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    25
upas/marshal $cc $to
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    26