/* * Win Treese, Jeff Jimenez * Student Consulting Staff * MIT Project Athena * * Lucien Van Elsen * MIT Project Athena * Copyright (c) 1985 by the Massachusetts Institute of Technology * * Permission to use, copy, modify, and distribute this program * for any purpose and without fee is hereby granted, provided * that this copyright and permission notice appear on all copies * and supporting documentation, the name of M.I.T. not be used * in advertising or publicity pertaining to distribution of the * program without specific prior permission, and notice be given * in supporting documentation that copying and distribution is * by permission of M.I.T. M.I.T. makes no representations about * the suitability of this software for any purpose. It is pro- * vided "as is" without express or implied warranty. */ /* This file is part of the CREF finder. It contains miscellaneous useful * utilities. * * $Source: /afs/sipb.mit.edu/project/sipb-athena/repository/src/olc/browser/curses/cref_utils.c,v $ * $Author: ghudson $ * $Header: /afs/sipb.mit.edu/project/sipb-athena/repository/src/olc/browser/curses/cref_utils.c,v 1.1 1996/06/02 08:42:20 ghudson Exp $ */ #ifndef lint #ifndef SABER static char *rcsid_commands_c = "$Header: "; #endif #endif #include #include /* Standard I/O definitions. */ #include /* Curses package defs. */ #include #include /* System file definitions. */ #include #include /* Character type macros. */ #include /* System parameters file. */ #ifdef TERMIO #include #else #include #endif #include /* System group defs. */ #include #include "cref.h" /* Finder defs. */ #include "globals.h" /* Global variable defs. */ /* Function: err_abort() prints an error message and exits. * Arguments: message: Message to print. * Returns: Doesn't return. * Notes: */ err_abort(message, string) char *message; char *string; { move(LINES, 0); fprintf(stderr, "%s %s\n", message, string); wait_for_key(); echo(); noraw(); endwin(); exit(ERROR); } /* Function: err_exit() prints an error message and exits. * Arguments: message: Message to print. * string: Additional string to print. * Returns: Doesn't return. * Notes: * There are two differences between this function and err_abort(): * (1) This is used before the curses window is initialized. * (2) This allows an additional string argument to be printed. */ err_exit(message, string) char *message; char *string; { fprintf(stderr, "%s %s\n", message, string); exit(ERROR); } /* Function: call_program() executes the named program by forking the * main process. * Arguments: program: Name of the program to execute. * argument: Argument to be passed to the program. * Note: Currently we support only a single argument, though it * may be necessary to extend this later. * Returns: An error code. * Notes: * First, we fork a new process. If the fork is unsuccessful, this * fact is logged, and we return an error. Otherwise, the child * process (pid = 0) exec's the desired program, while the parent * program waits for it to finish. */ ERRCODE call_program(program, argument) char *program; /* Name of program to be called. */ char *argument; /* Argument to be passed to program. */ { int pid; /* Process id for forking. */ char error[ERRSIZE]; /* Error message. */ extern int errno; /* Global error variable. */ extern char *sys_errlist[]; /* System error messages. */ #ifdef NO_VFORK if ( (pid = fork() ) == -1) #else if ( (pid = vfork() ) == -1) #endif { sprintf(error, "Can't fork to execute %s\n", program); message(1, error); return(ERROR); } else if ( pid == 0 ) { execlp(program, program, argument, 0); sprintf(error,"Error execing %s: %s", program, sys_errlist[errno]); message(1, error); return(ERROR); } else { wait(0); return(SUCCESS); } } /* Function: get_input() gets an input string from the terminal. It * handles line editing even in CBREAK mode. * Arguments: buffer: Buffer to hold input string. It may also be * initialized with an a string to print at the * beginning. * Returns: Nothing. * Notes: */ get_input(buffer) char *buffer; { #ifdef TERMIO struct termio tty; /* Terminal description structure. */ #else struct sgttyb tty; /* Terminal description structure. */ #endif char c; /* Input character. */ int x,y; /* X,Y coordinates. */ int x_start; /* Starting X coordinate. */ int length; /* Length of input string. */ char *ptr; /* Current character in buffer. */ #ifdef TERMIO if ( ioctl(fileno(stdin), TCGETA, &tty) < 0 ) #else if ( ioctl(fileno(stdin), TIOCGETP, &tty) < 0 ) #endif { message(1, "Cannot access terminal."); *buffer = (char) NULL; return; } length = strlen(buffer); ptr = buffer + length; noecho(); addstr(buffer); getyx(stdscr, y, x); x_start = x - length; refresh(); while ( (c = getch()) != '\n') { #ifdef TERMIO if (c == tty.c_cc[VERASE]) #else if (c == tty.sg_erase) #endif { if (x > x_start) { x--; move(y, x); clrtoeol(); refresh(); *ptr = (char) NULL; ptr--; } else if (x == x_start) { move(y, x); clrtoeol(); refresh(); *ptr = (char) NULL; } } #ifdef TERMIO else if (c == tty.c_cc[VKILL]) #else else if (c == tty.sg_kill) #endif { x = x_start; move(y,x); clrtoeol(); refresh(); ptr = buffer; *buffer = (char) NULL; } else if (isalnum(c) || ispunct(c) || isspace(c)) { *ptr = c; ptr++; x++; addch(c); refresh(); } else putchar('\007'); } *(ptr) = (char) NULL; echo(); } /* Function: check_cref_dir() checks to ensure that a directory is a * valid CREF directory * Arguments: dir: Directory to be checked. * Returns: TRUE or FALSE. * Notes: */ check_cref_dir(dir) char *dir; { char contents[MAXPATHLEN]; /* Pathname of contents file. */ int fd; /* File descriptor. */ make_path(dir, CONTENTS, contents); if ( (fd = open(contents, O_RDONLY, 0)) < 0) return(FALSE); else { close(fd); return(TRUE); } } /* Function: make_path() concatenates two filenames into a single pathname. * Arguments: head: Head of new pathname. * tail: Tail of new pathname. * buffer: Buffer to hold new pathname. * Returns: Nothing. * Notes: */ make_path(head, tail, buffer) char *head; char *tail; char *buffer; { strcpy(buffer, head); strcat(buffer, "/"); strcat(buffer, tail); } /* Function: copy_file() makes a copy of a file. * Arguments: src_file: Source filename. * dest_file: Destination filename. * Returns: Nothing. * Notes: */ copy_file(src_file, dest_file) char *src_file; char *dest_file; { int in_fd; /* Input file descriptor. */ int out_fd; /* Output file descriptor */ char inbuf[LINE_LENGTH]; /* Input buffer. */ char error[ERRSIZE]; /* Error message. */ int nbytes; /* Number of bytes read. */ if ((in_fd = open(src_file, O_RDONLY, 0)) < 0) { sprintf(error, "Unable to open input file %s\n", src_file); message(1, error); return(ERROR); } if ((out_fd = open(dest_file, O_WRONLY | O_CREAT | O_TRUNC, CLOSED_FILE)) < 0) { sprintf(error, "Unable to open output file %s\n", dest_file); message(1, error); return(ERROR); } while ( (nbytes = read(in_fd, inbuf, LINE_LENGTH)) == LINE_LENGTH) write(out_fd, inbuf, LINE_LENGTH); write(out_fd, inbuf, nbytes); close(out_fd); close(in_fd); } /* Function: wait_for_key() prints a message at the bottom of the * screen and waits for the user to type a key. * Arguments: None. * Returns: Nothing. * Notes: */ wait_for_key() { standout(); mvaddstr(LINES-1, 0, " Hit any key to continue..."); standend(); refresh(); getch(); } /* Function: create_cref_dir() makes a new CREF directory with an * empty contents file. * Arguments: dir: Name of directory to create. * Returns: Nothing. * Notes: */ create_cref_dir(dir) char *dir; { FILE *fp; /* FILE pointer. */ char contents[MAXPATHLEN]; /* Name of contents file. */ make_path(dir, CONTENTS, contents); if (mkdir(dir, CLOSED_DIR) < 0) { printf("\nUnable to create directory %s.\n", dir); return(ERROR); } else if ( (fp = fopen(contents, "w")) == NULL) { printf("\nUnable to create file %s\n", contents); return(ERROR); } else { fclose(fp); return(SUCCESS); } } log_status(logfile,logstring) char *logfile; char *logstring; { FILE *fp; long current_time; fp = fopen(logfile,"a"); time(¤t_time); fprintf(fp,"%.24s\n %s\n",ctime(¤t_time),logstring); fclose(fp); return(SUCCESS); }