BSD 3 development

Work on file usr/src/cmd/wall.c

Synthesized-from: 3bsd

diff --git a/usr/src/cmd/wall.c b/usr/src/cmd/wall.c
new file mode 100644 (file)
index 0000000..3771936
--- /dev/null
+++ b/usr/src/cmd/wall.c
@@ -0,0 +1,98 @@
+#include <stdio.h>
+#include <utmp.h>
+#include <time.h>
+#define        USERS   50
+
+char   mesg[3000];
+int    msize,sline;
+struct utmp utmp[USERS];
+char   *strcpy();
+char   *strcat();
+char who[9] = "???";
+long   clock;
+struct tm *localtime();
+struct tm *localclock;
+
+main(argc, argv)
+char *argv[];
+{
+       register i;
+       register char c;
+       register struct utmp *p;
+       FILE *f;
+
+       if((f = fopen("/etc/utmp", "r")) == NULL) {
+               fprintf(stderr, "Cannot open /etc/utmp\n");
+               exit(1);
+       }
+       clock = time( 0 );
+       localclock = localtime( &clock );
+       fread((char *)utmp, sizeof(struct utmp), USERS, f);
+       fclose(f);
+       f = stdin;
+       if(argc >= 2) {
+               /* take message from unix file instead of standard input */
+               if((f = fopen(argv[1], "r")) == NULL) {
+                       fprintf(stderr,"Cannot open %s\n", argv[1]);
+                       exit(1);
+               }
+       }
+       while((i = getc(f)) != EOF) mesg[msize++] = i;
+       fclose(f);
+       sline = ttyslot(2); /* 'utmp' slot no. of sender */
+       if (sline) {
+               for (i=0;c=utmp[sline].ut_name[i];i++)
+                       who[i]=c;
+               who[i] = '\0'; /* sender initials */
+               }
+       for(i=0; i<USERS; i++) {
+               p = &utmp[i];
+               if(p->ut_name[0] == 0)
+                       continue;
+               sleep(1);
+               sendmes(p->ut_line);
+       }
+       exit(0);
+}
+
+sendmes(tty)
+char *tty;
+{
+       register i;
+       char t[50], buf[BUFSIZ];
+       register char *cp;
+       register int c, ch;
+       FILE *f;
+
+       i = fork();
+       if(i == -1) {
+               fprintf(stderr, "Try again\n");
+               return;
+       }
+       if(i)
+               return;
+       strcpy(t, "/dev/");
+       strcat(t, tty);
+
+       if((f = fopen(t, "w")) == NULL) {
+               fprintf(stderr,"cannot open %s\n", t);
+               exit(1);
+       }
+       setbuf(f, buf);
+       fprintf(f, "\n\a\a\aBroadcast Message from %s (%s) at %d:%02d ...\r\n\n"
+              ,who, utmp[sline].ut_line
+              , localclock -> tm_hour , localclock -> tm_min );
+       /* fwrite(mesg, msize, 1, f); */
+       for (cp = mesg, c = msize; c-- > 0; cp++) {
+               ch = *cp;
+               if (ch == '\n')
+                       putc('\r', f);
+               putc(ch, f);
+       }
+
+       /*
+        * Bitchin'.
+        */
+
+       exit(0);
+}