BSD 4 development

Work on file usr/src/cmd/lpr/lpq.c

Synthesized-from: CSRG//cd1/4.0

diff --git a/usr/src/cmd/lpr/lpq.c b/usr/src/cmd/lpr/lpq.c
new file mode 100755 (executable)
index 0000000..0ed9d72
--- /dev/null
+++ b/usr/src/cmd/lpr/lpq.c
@@ -0,0 +1,105 @@
+/*
+ * Line printer queue
+ */
+
+#include <sys/types.h>
+#include <dir.h>
+#include <stat.h>
+#include <stdio.h>
+
+#define        MAXJOBS 100
+
+struct dir dirent;
+struct stat stbuf;
+char   lpddir[] =      "/usr/spool/lpd";
+int    nextflag;
+int    linecnt;
+FILE   *df;
+FILE   *jf;
+char   line[100];
+char   username[10];
+int    cnt;
+int    isdown;
+
+main()
+{
+
+       if (access("/usr/bin/lpr", 1) && access("/bin/lpr", 1)
+           && access("/usr/ucb/lpr", 1))
+               isdown++;
+       if (chdir(lpddir) < 0) {
+               perror(lpddir);
+               exit(1);
+       }
+oloop:
+       df = fopen(".", "r");
+       if (df == NULL) {
+               perror(lpddir);
+               exit(1);
+       }
+loop:
+       fseek(df, 0l, 0);
+       linecnt = 0;
+       cnt = 0;
+       while (fread(&dirent, sizeof dirent, 1, df) == 1) {
+               if (dirent.d_ino == 0)
+                       continue;
+               if (dirent.d_name[0] != 'd')
+                       continue;
+               if (dirent.d_name[1] != 'f')
+                       continue;
+               if (stat(dirent.d_name, &stbuf) < 0)
+                       continue;
+               if (cnt == 0)
+                       printf("Owner\t  Id      Chars  Filename\n");
+               cnt++;
+               process();
+       }
+       if (cnt == 0) {
+               if (isdown)
+                       printf("Line printer is down.\n");
+               else
+                       printf("Line printer queue is empty.\n");
+       }
+       exit(0);
+}
+
+process()
+{
+
+       jf = fopen(dirent.d_name, "r");
+       if (jf == NULL)
+               return;
+       while (getline()) {
+               switch (line[0]) {
+
+               case 'L':
+                       strcpy(username, line+1);
+                       break;
+
+               case 'B':
+               case 'F':
+                       if (stat(line+1, &stbuf) < 0)
+                               stbuf.st_size = 0;
+                       printf("%-10s%5s%8d  %s\n", username, dirent.d_name+3,
+                           stbuf.st_size, line+1);
+                       break;
+               }
+       }
+       close(jf);
+}
+
+getline()
+{
+       register int i, c;
+
+       i = 0;
+       while ((c = getc(jf)) != '\n') {
+               if (c <= 0)
+                       return(0);
+               if (i < 100)
+                       line[i++] = c;
+       }
+       line[i++] = 0;
+       return (1);
+}