+#ifndef _TP_H_
+#define _TP_H_
+
/* @(#)tp.h 4.2 6/28/84 */
/* c-version of tp?.s
extern short ndirent, ndentb;
extern struct dent *edir;
extern struct dent *lastd; /* for improvement */
-char *sbrk();
-char *strcpy();
-long lseek();
+/*char *sbrk();*/
+/*char *strcpy();*/
+/*long lseek();*/
int (*command)();
extern int flags;
#define flv 0040
#define flw 0100
#define fls 0200
+
+#ifndef __P
+#ifdef __STDC__
+#define __P(args) args
+#else
+#define __P(args) ()
+#endif
+#endif
+
+/* tp1.c */
+int main __P((int argc, char **argv));
+int optap __P((void));
+int setcom __P((int (*newcom)(void)));
+int useerr __P((void));
+int cmd __P((void));
+int cmr __P((void));
+int cmt __P((void));
+int cmx __P((void));
+int check __P((void));
+int done __P((void));
+int encode __P((char *pname, struct dent *dptr));
+int decode __P((char *pname, struct dent *dptr));
+
+/* tp2.c */
+int clrdir __P((void));
+int clrent __P((struct dent *ptr));
+int rddir __P((void));
+int wrdir __P((void));
+int tread __P((void));
+int twrite __P((void));
+int rseek __P((int blk));
+int wseek __P((int blk));
+int seekerr __P((void));
+int verify __P((int key));
+int getfiles __P((void));
+int expand __P((void));
+int fserr __P((void));
+int callout __P((void));
+int swabdir __P((register struct tent *tp));
+
+/* tp3.c */
+int gettape __P((int (*how)(void)));
+int delete __P((struct dent *dd));
+int update __P((void));
+int update1 __P((void));
+int phserr __P((void));
+int bitmap __P((void));
+int setmap __P((register struct dent *d));
+int maperr __P((void));
+int usage __P((void));
+int taboc __P((struct dent *dd));
+int extract __P((register struct dent *d));
+
+#endif
+#include "tp.h"
+
#ifndef lint
static char sccsid[] = "@(#)tp0.c 4.1 12/18/82";
#endif
-#include "tp.h"
+/*#include "tp.h"*/
int flags = flu;
char mt[] = "/dev/rmt0";
+#include <gen.h>
+#include <stdio.h>
+/*#include <strings.h> gen.h*/
+#include <sys/file.h>
+#include "tp.h"
+
#ifndef lint
static char sccsid[] = "@(#)tp1.c 4.2 6/28/84";
#endif
-#include "tp.h"
+/*#include "tp.h"*/
-main(argc,argv)
-char **argv;
-{
+int main(argc, argv) int argc; char **argv; {
register char c,*ptr;
extern cmd(), cmr(),cmx(), cmt();
(*command)();
}
-optap()
-{
+int optap() {
extern cmr();
if ((flags & flm) == 0) { /* DECTAPE */
edir = &dir[ndirent];
}
-setcom(newcom)
-int (*newcom)();
-{
+int setcom(newcom) int (*newcom)(); {
extern cmr();
if (command != cmr) useerr();
command = newcom;
}
-useerr()
-{
+int useerr() {
printf("Bad usage\n");
done();
}
/*\f/* COMMANDS */
-cmd()
-{
+int cmd() {
extern delete();
if (flags & (flm|flc)) useerr();
check();
}
-cmr()
-{
+int cmr() {
if (flags & (flc|flm)) clrdir();
else rddir();
getfiles();
check();
}
-cmt()
-{
+int cmt() {
extern taboc();
if (flags & (flc|flw)) useerr();
check();
}
-cmx()
-{
+int cmx() {
extern extract();
if (flags & (flc)) useerr();
done();
}
-check()
-{
+int check() {
usage();
done();
}
-done()
-{
+int done() {
printf("End\n");
exit(0);
}
-encode(pname,dptr) /* pname points to the pathname
- * dptr points to the dir entry */
-char *pname;
-struct dent *dptr;
-{
+int encode(pname, dptr) /* pname points to the pathname
+ * dptr points to the dir entry */ char *pname; struct dent *dptr; {
register char *np;
register n;
extern char *malloc();
}
}
-decode(pname,dptr) /* dptr points to the dir entry
- * name is placed in pname[] */
-char *pname;
-struct dent *dptr;
-{
+int decode(pname, dptr) /* dptr points to the dir entry
+ * name is placed in pname[] */ char *pname; struct dent *dptr; {
strcpy(pname, dptr->d_namep);
}
+#include <gen.h>
+#include <stdio.h>
+/*#include <strings.h> gen.h*/
+/*#include <sys/dir.h> gen.h*/
+#include <sys/file.h>
+#include <sys/stat.h>
+#include "tp.h"
+
#ifndef lint
static char sccsid[] = "@(#)tp2.c 4.1 12/18/82";
#endif
-#include "tp.h"
-#include <stdio.h>
-#include <sys/param.h>
-#include <sys/stat.h>
-#include <sys/dir.h>
+/*#include "tp.h"*/
+/*#include <stdio.h>*/
+/*#include <sys/param.h>*/
+/*#include <sys/stat.h>*/
+/*#include <sys/dir.h>*/
struct stat statb;
-clrdir()
-{
+int clrdir() {
register j, *p;
j = ndirent * (DIRSZ/sizeof(int));
lastd = 0;
}
-clrent(ptr)
-struct dent *ptr;
-{
+int clrent(ptr) struct dent *ptr; {
register *p, j;
p = (int *)ptr;
} while (lastd->d_namep == 0);
}
-
-rddir()
-{
+int rddir() {
register struct tent *tp;
register struct dent *p1;
struct dent *dptr;
bitmap();
}
-
-wrdir()
-{
+int wrdir() {
register struct tent *tp;
register struct dent *dp;
struct dent *dptr;
}
}
-tread()
-{
+int tread() {
register j, *ptr;
if (read(fio,(char *)tapeb,BSIZE) != BSIZE) {
rseeka++;
}
-twrite()
-{
+int twrite() {
if (write(fio, (char *)tapeb,BSIZE) != BSIZE) {
printf("Tape write error\n");
done();
++wseeka;
}
-rseek(blk)
-{
+int rseek(blk) int blk; {
rseeka = blk;
if (lseek(fio,(long)blk*BSIZE,0) < 0) seekerr();
}
-wseek(blk)
-{
+int wseek(blk) int blk; {
register amt, b;
amt = b = blk;
if (lseek(fio, (long)b*BSIZE, 0) < 0) seekerr();
}
-seekerr()
-{
+int seekerr() {
printf("Tape seek error\n");
done();
}
-verify(key)
-{
+int verify(key) int key; {
register c;
if ((flags & (flw | flv)) == 0)
goto repeat;
}
-getfiles()
-{
+int getfiles() {
if ((narg -= 2) == 0) {
strcpy(name, ".");
}
}
-
-expand()
-{
+int expand() {
register char *p0, *save0;
int n;
register DIR *dirp;
}
}
-fserr()
-{
+int fserr() {
printf("%s -- Cannot open file\n", name);
done();
}
-callout()
-{
+int callout() {
register struct dent *d;
register char *ptr1, *ptr0;
struct dent *empty;
;
}
-swabdir(tp)
-register struct tent *tp;
-{
+int swabdir(tp) register struct tent *tp; {
swab((char *)tp, (char *)tp, sizeof(*tp));
swab(tp->pathnam, tp->pathnam, NAMELEN);
swab((char *)&tp->uid, (char *)&tp->uid, 4); /* uid,gid,spare,size0 */
+#include <stdio.h>
+#include <sys/file.h>
+#include <time.h>
+#include "tp.h"
+
#ifndef lint
static char sccsid[] = "@(#)tp3.c 4.1 12/18/82";
#endif
-#include "tp.h"
+/*#include "tp.h"*/
-gettape(how)
-int (*how)();
-{
+int gettape(how) int (*how)(); {
register char *ptr0, *ptr1;
register struct dent *d;
int count;
} while (--narg > 2);
}
-delete(dd)
-struct dent *dd;
-{
+int delete(dd) struct dent *dd; {
if (verify('d') >= 0)
clrent(dd);
}
-
-update()
-{
+int update() {
register struct dent *d;
register b, last;
int first, size;
-
bitmap();
d = &dir[0];
do {
update1();
}
-
-update1()
-{
+int update1() {
register struct dent *d, *id;
register index;
int f;
}
}
-phserr()
-{ printf("%s -- Phase error \n", name); }
-
+int phserr() { printf("%s -- Phase error \n", name); }
-bitmap() /* place old files in the map */
-{
+int bitmap() /* place old files in the map */ {
register char *m;
register count;
register struct dent *d;
} while (--count);
}
-setmap(d)
-register struct dent *d;
-{
+int setmap(d) register struct dent *d; {
unsigned c, block;
char bit;
int i;
} while (++block < c);
}
-maperr()
-{
+int maperr() {
printf("Tape overflow\n");
done();
}
-
-usage()
-{
+int usage() {
register reg,count;
int nused, nentr, nfree;
static lused;
printf("%4d last\n", lused);
}
-
-taboc(dd)
-struct dent *dd;
-{
+int taboc(dd) struct dent *dd; {
register mode;
register *m;
register char *s;
printf("%s\n", name);
}
-
-extract(d)
-register struct dent *d;
-{
+int extract(d) register struct dent *d; {
register count, id;
if (d->d_size==0) return;