File: ipcfree

package info (click to toggle)
pvm 3.4beta7-4
  • links: PTS
  • area: main
  • in suites: slink
  • size: 5,256 kB
  • ctags: 5,938
  • sloc: ansic: 66,147; makefile: 1,446; fortran: 631; sh: 424; csh: 70; asm: 37
file content (30 lines) | stat: -rwxr-xr-x 584 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
#!/bin/sh
#
# $Id: ipcfree,v 1.1 1996/09/23 21:15:42 pvmsrc Exp $
#
# ipcfree
#
# Delete any shared memory or semaphores lying around after a PVM
# program bombs out or is killed ungracefully.
# Run it if you're getting error messages like:
#   semget: ... No space left on device
#   shmget: ... No space left on device
# when using one of the *MP PVM architectures.
#

if [ "$USER" = "" ]; then
	USER=` whoami `
fi

m=` ipcs | awk '$1~/^[ms]$/ && $5~/'$USER'/ {print "-"$1, $2}' `

case "$m" in
?*) echo "deleting $m"
    ipcrm $m
;;
*) echo "didn't find anything"
;;
esac

exit 0