FILE		*fp;
log_score(list_em){	register int	i, fd, num_scores = 0, good, changed = 0, found = 0;	struct passwd	*pw;	FILE		*fp;	char		*cp;	SCORE		score[100], thisscore;#ifdef SYSV	struct utsname	name;#endif	umask(0);	fd = open(_PATH_SCORE, O_CREAT|O_RDWR, 0644);	if (fd < 0) {		perror(_PATH_SCORE);		return (-1);	}	/*	 * This is done to take advantage of stdio, while still 	 * allowing a O_CREAT during the open(2) of the log file.	 */	fp = fdopen(fd, "r+");	if (fp == NULL) {		perror(_PATH_SCORE);		return (-1);	}#ifdef BSD	if (flock(fileno(fp), LOCK_EX) < 0)#endif#ifdef SYSV	while (lockf(fileno(fp), F_LOCK, 1) < 0)#endif	{		perror("flock");		return (-1);	}	for (;;) {		good = fscanf(fp, "%s %s %s %d %d %d",			score[num_scores].name, 			score[num_scores].host, 			score[num_scores].game,			&score[num_scores].planes, 			&score[num_scores].time,			&score[num_scores].real_time);		if (good != 6 || ++num_scores >= NUM_SCORES)			break;	}	if (!test_mode && !list_em) {		if ((pw = (struct passwd *) getpwuid(getuid())) == NULL) {			fprintf(stderr, 				"getpwuid failed for uid %d.  Who are you?\n",				getuid());			return (-1);		}		strcpy(thisscore.name, pw->pw_name);#ifdef BSD		if (gethostname(thisscore.host, sizeof (thisscore.host)) < 0) {			perror("gethostname");			return (-1);		}#endif#ifdef SYSV		uname(&name);		strcpy(thisscore.host, name.sysname);#endif		cp = strrchr(file, '/');		if (cp == NULL) {			fprintf(stderr, "log: where's the '/' in %s?\n", file);			return (-1);		}		cp++;		strcpy(thisscore.game, cp);		thisscore.time = clck;		thisscore.planes = safe_planes;		thisscore.real_time = time(0) - start_time;		for (i = 0; i < num_scores; i++) {			if (strcmp(thisscore.name, score[i].name) == 0 &&			    strcmp(thisscore.host, score[i].host) == 0 &&			    strcmp(thisscore.game, score[i].game) == 0) {				if (thisscore.time > score[i].time) {					score[i].time = thisscore.time;					score[i].planes = thisscore.planes;					score[i].real_time =						thisscore.real_time;					changed++;				}				found++;				break;			}		}		if (!found) {			for (i = 0; i < num_scores; i++) {				if (thisscore.time > score[i].time) {					if (num_scores < NUM_SCORES)						num_scores++;					bcopy(&score[i],						&score[num_scores - 1], 						sizeof (score[i]));					bcopy(&thisscore, &score[i],						sizeof (score[i]));					changed++;					break;				}			}		}		if (!found && !changed && num_scores < NUM_SCORES) {			bcopy(&thisscore, &score[num_scores], 				sizeof (score[num_scores]));			num_scores++;			changed++;		}		if (changed) {			if (found)				puts("You beat your previous score!");			else				puts("You made the top players list!");			qsort(score, num_scores, sizeof (*score), compar);			rewind(fp);			for (i = 0; i < num_scores; i++)				fprintf(fp, "%s %s %s %d %d %d\n",					score[i].name, score[i].host, 					score[i].game, score[i].planes,					score[i].time, score[i].real_time);		} else {			if (found)				puts("You didn't beat your previous score.");			else				puts("You didn't make the top players list.");		}		putchar('\n');	}#ifdef BSD	flock(fileno(fp), LOCK_UN);#endif#ifdef SYSV	/* lock will evaporate upon close */#endif	fclose(fp);	printf("%2s:  %-8s  %-8s  %-18s  %4s  %9s  %4s\n", "#", "name", "host", 		"game", "time", "real time", "planes safe");	puts("-------------------------------------------------------------------------------");	for (i = 0; i < num_scores; i++) {		cp = strchr(score[i].host, '.');		if (cp != NULL)			*cp = '\0';		printf("%2d:  %-8s  %-8s  %-18s  %4d  %9s  %4d\n", i + 1,			score[i].name, score[i].host, score[i].game,			score[i].time, timestr(score[i].real_time),			score[i].planes);	}	putchar('\n');	return (0);}