+ 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
+ flock(fileno(fp), LOCK_UN);
+#endif
+ (void) fclose(fp);
+}