/*ARGSUSED*/
static void
update_progress_meter(__unused int ignore)
{
int save_errno;
save_errno = errno;
if (win_resized) {
setscreensize();
win_resized = 0;
}
if (can_output())
refresh_progress_meter();
signal(SIGALRM, update_progress_meter);
alarm(UPDATE_INTERVAL);
errno = save_errno;
}
void
start_progress_meter(char *f, off_t filesize, off_t *ctr)
{
start = last_update = time(NULL);
file = f;
end_pos = filesize;
cur_pos = 0;
counter = ctr;
stalled = 0;
bytes_per_second = 0;
setscreensize();
if (can_output())
refresh_progress_meter();
signal(SIGALRM, update_progress_meter);
signal(SIGWINCH, sig_winch);
alarm(UPDATE_INTERVAL);
}
PUBLIC int
main(int argc, char *argv[])
{
jmp_buf jmpbuf;
struct sigaction sa;
struct name *to, *cc, *bcc, *smopts;
#ifdef MIME_SUPPORT
struct name *attach_optargs;
struct name *attach_end;
#endif
char *subject;
const char *ef;
char nosrc = 0;
const char *rc;
int Hflag;
int i;
/*
* For portability, call setprogname() early, before
* getprogname() is called.
*/
(void)setprogname(argv[0]);
/*
* Set up a reasonable environment.
* Figure out whether we are being run interactively,
* start the SIGCHLD catcher, and so forth.
* (Other signals are setup later by sig_setup().)
*/
(void)sigemptyset(&sa.sa_mask);
sa.sa_flags = SA_RESTART;
sa.sa_handler = sigchild;
(void)sigaction(SIGCHLD, &sa, NULL);
if (isatty(0))
assign(ENAME_INTERACTIVE, "");
image = -1;
/*
* Now, determine how we are being used.
* We successively pick off - flags.
* If there is anything left, it is the base of the list
* of users to mail to. Argp will be set to point to the
* first of these users.
*/
rc = NULL;
ef = NULL;
to = NULL;
cc = NULL;
bcc = NULL;
smopts = NULL;
subject = NULL;
Hflag = 0;
#ifdef MIME_SUPPORT
attach_optargs = NULL;
attach_end = NULL;
while ((i = getopt(argc, argv, ":~EH:INT:a:b:c:dfinr:s:u:v")) != -1)
#else
while ((i = getopt(argc, argv, ":~EH:INT:b:c:dfinr:s:u:v")) != -1)
#endif
{
switch (i) {
case 'T':
/*
* Next argument is temp file to write which
* articles have been read/deleted for netnews.
*/
Tflag = optarg;
if ((i = creat(Tflag, 0600)) < 0) {
warn("%s", Tflag);
exit(1);
}
(void)close(i);
break;
#ifdef MIME_SUPPORT
case 'a': {
struct name *np;
np = nalloc(optarg, 0);
if (attach_end == NULL)
attach_optargs = np;
else {
np->n_blink = attach_end;
attach_end->n_flink = np;
}
attach_end = np;
break;
}
#endif
case 'u':
/*
* Next argument is person to pretend to be.
*/
myname = optarg;
(void)unsetenv("MAIL");
break;
case 'i':
/*
* User wants to ignore interrupts.
* Set the variable "ignore"
*/
assign(ENAME_IGNORE, "");
break;
case 'd':
debug++;
break;
case 'r':
rc = optarg;
break;
case 's':
/*
* Give a subject field for sending from
* non terminal
*/
subject = optarg;
break;
case 'f':
/*
* User is specifying file to "edit" with Mail,
* as opposed to reading system mailbox.
* If no argument is given after -f, we read his
* mbox file.
*
* getopt() can't handle optional arguments, so here
* is an ugly hack to get around it.
*/
if ((argv[optind]) && (argv[optind][0] != '-'))
ef = argv[optind++];
else
ef = "&";
break;
case 'H':
/*
* Print out the headers and quit.
*/
Hflag = get_Hflag(argv);
break;
case 'n':
/*
* User doesn't want to source /usr/lib/Mail.rc
*/
nosrc++;
break;
case 'N':
/*
* Avoid initial header printing.
*/
assign(ENAME_NOHEADER, "");
break;
case 'v':
/*
* Send mailer verbose flag
*/
assign(ENAME_VERBOSE, "");
break;
case 'I':
case '~':
/*
* We're interactive
*/
assign(ENAME_INTERACTIVE, "");
break;
case 'c':
/*
* Get Carbon Copy Recipient list
*/
cc = cat(cc, lexpand(optarg, GCC));
break;
case 'b':
/*
* Get Blind Carbon Copy Recipient list
*/
bcc = cat(bcc, lexpand(optarg, GBCC));
break;
case 'E':
/*
* Don't send empty files.
*/
assign(ENAME_DONTSENDEMPTY, "");
break;
case ':':
/*
* An optarg was expected but not found.
*/
if (optopt == 'H') {
Hflag = get_Hflag(NULL);
break;
}
(void)fprintf(stderr,
"%s: option requires an argument -- %c\n",
getprogname(), optopt);
/* FALLTHROUGH */
case '?':
/*
* An unknown option flag. We need to do the
* error message.
*/
if (optopt != '?')
(void)fprintf(stderr,
"%s: unknown option -- %c\n", getprogname(),
optopt);
usage(); /* print usage message and die */
/*NOTREACHED*/
}
}
for (i = optind; (argv[i]) && (*argv[i] != '-'); i++)
to = cat(to, nalloc(argv[i], GTO));
for (/*EMPTY*/; argv[i]; i++)
smopts = cat(smopts, nalloc(argv[i], GSMOPTS));
/*
* Check for inconsistent arguments.
*/
if (to == NULL && (subject != NULL || cc != NULL || bcc != NULL))
errx(EXIT_FAILURE, "You must specify direct recipients with -s, -c, or -b.");
if (ef != NULL && to != NULL) {
errx(EXIT_FAILURE, "Cannot give -f and people to send to.");
}
if (Hflag != 0 && to != NULL)
errx(EXIT_FAILURE, "Cannot give -H and people to send to.");
#ifdef MIME_SUPPORT
if (attach_optargs != NULL && to == NULL)
errx(EXIT_FAILURE, "Cannot give -a without people to send to.");
#endif
tinit(); /* must be done before loading the rcfile */
input = stdin;
mailmode = Hflag ? mm_hdrsonly :
to ? mm_sending : mm_receiving;
spreserve();
if (!nosrc)
load(_PATH_MASTER_RC);
/*
* Expand returns a savestr, but load only uses the file name
* for fopen, so it's safe to do this.
*/
if (rc == NULL && (rc = getenv("MAILRC")) == NULL)
rc = "~/.mailrc";
load(expand(rc));
setscreensize(); /* do this after loading the rcfile */
#ifdef USE_EDITLINE
/*
* This is after loading the MAILRC so we can use value().
* Avoid editline in mm_hdrsonly mode or pipelines will screw
* up. XXX - there must be a better way!
*/
if (mailmode != mm_hdrsonly)
init_editline();
#endif
sig_setup();
switch (mailmode) {
case mm_sending:
(void)mail(to, cc, bcc, smopts, subject,
mime_attach_optargs(attach_optargs));
/*
* why wait?
*/
exit(senderr);
break; /* XXX - keep lint happy */
case mm_receiving:
case mm_hdrsonly:
/*
* Ok, we are reading mail.
* Decide whether we are editing a mailbox or reading
* the system mailbox, and open up the right stuff.
*/
if (ef == NULL)
ef = "%";
if (setfile(ef) < 0)
exit(1); /* error already reported */
if (value(ENAME_QUIET) == NULL)
(void)printf("Mail version %s. Type ? for help.\n",
version);
if (mailmode == mm_hdrsonly)
show_headers_and_exit(Hflag); /* NORETURN */
announce();
(void)fflush(stdout);
if (setjmp(jmpbuf) != 0) {
/* Return here if quit() fails below. */
(void)printf("Use 'exit' to quit without saving changes.\n");
}
commands();
/* Ignore these signals from now on! */
(void)signal(SIGHUP, SIG_IGN);
(void)signal(SIGINT, SIG_IGN);
(void)signal(SIGQUIT, SIG_IGN);
quit(jmpbuf);
break;
default:
assert(/*CONSTCOND*/0);
break;
}
return 0;
}
// application entry point
void main(int argc,char *argv[])
{
int system_time=0;
int frame_counter=0;
int time0;
char s[20]="";
if (argc<2) {
printusage();
return;
}
// parses command line parameters
parsecmdline(argc-2,argv+2);
// initializes the video mode and geometry module
int mode=-1;
if (vbe_init()) {
mode=vbe_findmode(scrwidth,scrheight,8);
if (!mode) mode=-1;
}
if (mode==-1) vbe_done();
if (!vbe_setmode(mode,backbuffl)) goto err;
setscreensize(vbe_width,vbe_height);
scr_cols=vbe_width;
scr_bpp=vbe_bpp;
// initializes the keyboard
kbd_init();
// initializes the timer
timer_init();
// initializes the mouse
mouse_init();
// reads the map
if (!map_init(argv[1])) goto err;
vbe_setpal((Tcolor *)palette,0,256);
// main loop
time0=timer_clocks;
while(player_idle(timer_clocks)) {
// draws the current frame
draw_init(vbe_backbuffer,vbe_width,vbe_height);
map_draw();
// calculates the frame rate
frame_counter++;
int dt=timer_clocks-time0;
if (dt>500) {
float fps = (frame_counter*1000.)/dt;
sprintf(s,"%.1f FPS",fps);
time0 = timer_clocks;
frame_counter = 0;
}
textout(vbe_backbuffer,0,0,s,255);
// flips the video pages
vbe_flip(waitfl);
// applies the mouse movement
if (player_keys & kRUN) player_rotate(-mousedy*0.01,0,-mousedx*0.01);
else player_rotate(-mousedy*0.005,0,-mousedx*0.005);
mousedx=0;mousedy=0;
// clears the keyboard queue
while (kbhit()) getch();
}
err:
vbe_done();
vbe_settext();
}