install approved copyright notice

[unix-history] / usr / src / games / sail / misc.c

diff --git a/usr/src/games/sail/misc.c b/usr/src/games/sail/misc.c
index 2564af4..e7740d2 100644 (file)
--- a/usr/src/games/sail/misc.c
+++ b/usr/src/games/sail/misc.c
@@ -1,6 +1,24 @@
+/*
+ * Copyright (c) 1983 Regents of the University of California.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms are permitted
+ * provided that the above copyright notice and this paragraph are
+ * duplicated in all such forms and that any documentation,
+ * advertising materials, and other materials related to such
+ * distribution and use acknowledge that the software was developed
+ * by the University of California, Berkeley.  The name of the
+ * University may not be used to endorse or promote products derived
+ * from this software without specific prior written permission.
+ * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
+ * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+ */
+

 #ifndef lint
 #ifndef lint

-static char *sccsid = "@(#)misc.c      1.2 83/07/20";
-#endif
+static char sccsid[] = "@(#)misc.c     5.3 (Berkeley) %G%";
+#endif /* not lint */
+

 #include "externs.h"
 
 #define distance(x,y) (abs(x) >= abs(y) ? abs(x) + abs(y)/2 : abs(y) + abs(x)/2)
 #include "externs.h"
 
 #define distance(x,y) (abs(x) >= abs(y) ? abs(x) + abs(y)/2 : abs(y) + abs(x)/2)


@@ -14,7 +32,7 @@ struct ship *from, *to;
        register int bb, bs, sb, ss, result;
 
        if (!to->file->dir)
        register int bb, bs, sb, ss, result;
 
        if (!to->file->dir)

-               return 30000;
+               return -1;

        stern1r = bow1r = from->file->row;
        stern1c = bow1c = from->file->col;
        stern2r = bow2r = to->file->row;
        stern1r = bow1r = from->file->row;
        stern1c = bow1c = from->file->col;
        stern2r = bow2r = to->file->row;


@@ -61,3 +79,138 @@ char side, anyship;
        }
        return closest;
 }
        }
        return closest;
 }

+
+angle(dr, dc)
+register dr, dc;
+{
+       register i;
+
+       if (dc >= 0 && dr > 0)
+               i = 0;
+       else if (dr <= 0 && dc > 0)
+               i = 2;
+       else if (dc <= 0 && dr < 0)
+               i = 4;
+       else
+               i = 6;
+       dr = abs(dr);
+       dc = abs(dc);
+       if ((i == 0 || i == 4) && dc * 2.4 > dr) {
+               i++;
+               if (dc > dr * 2.4)
+                       i++;
+       } else if ((i == 2 || i == 6) && dr * 2.4 > dc) {
+               i++;
+               if (dr > dc * 2.4)
+                       i++;
+       }
+       return i % 8 + 1;
+}
+
+gunsbear(from, to)             /* checks for target bow or stern */
+register struct ship *from, *to;
+{
+       int Dr, Dc, i;
+       register ang;
+
+       Dr = from->file->row - to->file->row;
+       Dc = to->file->col - from->file->col;
+       for (i = 2; i; i--) {
+               if ((ang = angle(Dr, Dc) - from->file->dir + 1) < 1)
+                       ang += 8;
+               if (ang >= 2 && ang <= 4)
+                       return 'r';
+               if (ang >= 6 && ang <= 7)
+                       return 'l';
+               Dr += dr[to->file->dir];
+               Dc += dc[to->file->dir];
+       }
+       return 0;
+}
+
+portside(from, on, quick)
+register struct ship *from, *on;
+int quick;                     /* returns true if fromship is */
+{                              /* shooting at onship's starboard side */
+       register ang;
+       register Dr, Dc;
+
+       Dr = from->file->row - on->file->row;
+       Dc = on->file->col - from->file->col;
+       if (quick == -1) {
+               Dr += dr[on->file->dir];
+               Dc += dc[on->file->dir];
+       }
+       ang = angle(Dr, Dc);
+       if (quick != 0)
+               return ang;
+       ang = (ang + 4 - on->file->dir - 1) % 8 + 1;
+       return ang < 5;
+}
+
+colours(sp)
+register struct ship *sp;
+{
+       register char flag;
+
+       if (sp->file->struck)
+               flag = '!';
+       if (sp->file->explode)
+               flag = '#';
+       if (sp->file->sink)
+               flag = '~';
+       if (sp->file->struck)
+               return flag;
+       flag = *countryname[capship(sp)->nationality];
+       return sp->file->FS ? flag : tolower(flag);
+}
+
+#include <sys/file.h>
+log(s)
+register struct ship *s;
+{
+       FILE *fp;
+       int persons;
+       int n;
+       struct logs log[NLOG];
+       float net;
+       register struct logs *lp;
+
+       if ((fp = fopen(LOGFILE, "r+")) == NULL)
+               return;
+#ifdef LOCK_EX
+       if (flock(fileno(fp), LOCK_EX) < 0)
+               return;
+#endif
+       net = (float)s->file->points / s->specs->pts;
+       persons = getw(fp);
+       n = fread((char *)log, sizeof(struct logs), NLOG, fp);
+       for (lp = &log[n]; lp < &log[NLOG]; lp++)
+               lp->l_name[0] = lp->l_uid = lp->l_shipnum
+                       = lp->l_gamenum = lp->l_netpoints = 0;
+       rewind(fp);
+       if (persons < 0)
+               (void) putw(1, fp);
+       else
+               (void) putw(persons + 1, fp);
+       for (lp = log; lp < &log[NLOG]; lp++)
+               if (net > (float)lp->l_netpoints
+                   / scene[lp->l_gamenum].ship[lp->l_shipnum].specs->pts) {
+                       (void) fwrite((char *)log,
+                               sizeof (struct logs), lp - log, fp);
+                       (void) strcpy(log[NLOG-1].l_name, s->file->captain);
+                       log[NLOG-1].l_uid = getuid();
+                       log[NLOG-1].l_shipnum = s->file->index;
+                       log[NLOG-1].l_gamenum = game;
+                       log[NLOG-1].l_netpoints = s->file->points;
+                       (void) fwrite((char *)&log[NLOG-1],
+                               sizeof (struct logs), 1, fp);
+                       (void) fwrite((char *)lp,
+                               sizeof (struct logs), &log[NLOG-1] - lp, fp);
+                       break;
+               }
+#ifdef LOCK_EX
+       (void) flock(fileno(fp), LOCK_UN);
+#endif
+       (void) fclose(fp);
+}