Plan 9 from Bell Labs’s /usr/web/sources/contrib/rsc/linuxemu/libc/port/hangup.c
#include <u.h> #include <libc.h> #include <ctype.h> /* * force a connection to hangup */ int hangup(int ctl) { return write(ctl, "hangup", sizeof("hangup")-1) != sizeof("hangup")-1; }