Usenet 1994 January/usenetsourcesnewsgroupsinfomagicjanuary1994.iso/sources/misc/volume23/tin/part08

Text File | 1991-09-25 | 49.9 KB | 2,151 lines

Newsgroups: comp.sources.misc
From: [e-mail] (Iain J. Lea)
Subject:  v23i022:  tin - threaded full screen newsreader v1.0 PL2, Part08/09
Message-ID: <[e-mail]>
X-Md4-Signature: 14f65fd5d9549ea44667c8d0f317c5b7
Date: Wed, 25 Sep 1991 20:53:34 GMT
Approved: [e-mail]

Submitted-by: [e-mail] (Iain J. Lea)
Posting-number: Volume 23, Issue 22
Archive-name: tin/part08
Environment: BSD, SCO, ISC, SUNOS, SYSVR3, SYSVR4, ULTRIX, XENIX

#!/bin/sh
# this is tin.shar.08 (part 8 of tin1.02)
# do not concatenate these parts, unpack them in order with /bin/sh
# file select.c continued
#
if touch 2>&1 | fgrep '[-amc]' > /dev/null
 then TOUCH=touch
 else TOUCH=true
fi
if test ! -r shar3_seq_.tmp; then
    echo "Please unpack part 1 first!"
    exit 1
fi
(read Scheck
 if test "$Scheck" != 8; then
    echo "Please unpack part $Scheck next!"
    exit 1
 else
    exit 0
 fi
) < shar3_seq_.tmp || exit 1
echo "x - Continuing file select.c"
sed 's/^X//' << 'SHAR_EOF' >> select.c &&
X#endif
X                                if (active[my_group[i]].flag == SUBS) {
X#ifndef SLOW_SCREEN_UPDATE
X                                sprintf (msg, txt_unsubscribing_from, active[my_group[i]].name);
X                                wait_message (msg);
X#endif
X                                subscribe (active[my_group[i]].name,
X                                    '!', my_group[i], FALSE);
X                            }
X                            subscribe_num++;
X                        }
X                    }
X                    if (subscribe_num) {
X                        group_selection_page ();
X                        sprintf (buf, txt_unsubscribed_num_groups, subscribe_num);
X                        info_message (buf);
X                    } else {
X                        info_message (txt_no_match);
X                    }
X                } else {
X                    clear_message ();
X                }
X                break;
X
X            case 'v':    /* show tin version */
X                info_message (cvers);
X                break;
X
X            case 'w':    /* post a basenote */
X                if (post_base (active[my_group[cur_groupnum]].name)) {
X                    group_selection_page ();
X                }
X                break;
X
X            case 'W':    /* display messages posted by user */
X                if (user_posted_messages ()) {
X                    group_selection_page ();
X                }
X                break;
X
X            case 'y':    /* pull in rest of groups from active */
X                if (reread_active_file) {
X                    n = local_top;
X                    for (i = 0; i < num_active; i++) {
X                        active[i].flag = NOTGOT;
X                    }
X                    read_newsrc (FALSE);
X                    for (i = 0; i < num_active; i++) {
X                        if (active[i].flag & NOTGOT) {
X                            active[i].flag &= ~NOTGOT;
X                            my_group[local_top] = i;
X                            unread[local_top] = -1;
X                            local_top++;
X                        }
X                    }
X                    if (n < local_top) {
X                        sprintf(buf, txt_added_groups, local_top - n,
X                            local_top - n == 1 ? "" : txt_plural);
X                        group_selection_page();
X                        info_message(buf);
X                    } else {
X                        info_message(txt_no_groups_to_yank_in);
X                    }
X                    reread_active_file = FALSE;
X                } else {
X                    read_newsrc (TRUE);
X                    cur_groupnum = local_top - 1;
X                    group_selection_page();
X                    reread_active_file = TRUE;
X                }
X                break;
X
X            case 'Y':    /* reread .newsrc, no unsub groups */
X                cur_groupnum = 0;
X                local_top = 0;
X                for (i = 0; i < num_active; i++)
X                    active[i].flag = NOTGOT;
X                read_newsrc (TRUE);
X                group_selection_page ();
X                break;
X
X            case 'z':    /* mark group unread */
X                n = cur_groupnum;
X                update_newsrc (active[my_group[n]].name, my_group[n], TRUE);
X                cur_groupnum = 0;
X                local_top = 0;
X                read_newsrc (TRUE);
X                cur_groupnum = n;
X                group_selection_page ();
X                break;
X
X            case 'Z':    /* undelete groups deleted by ctrl-K */
X                if (undel_group ()) {
X                    group_selection_page ();
X                    info_message (txt_group_undeleted);
X                }
X                break;
X
X            default:
X                info_message(txt_bad_command);
X        }
X    }
X}
X
X
Xvoid group_selection_page ()
X{
X    char buf[LEN];
X    char new[10];
X    char subs;
X    int col, i, j, n;
X
X#ifdef SIGTSTP
X    if (do_sigtstp) {
X#ifdef POSIX_JOB_CONTROL
X        sigemptyset (&select_act.sa_mask);
X        select_act.sa_flags = SA_RESTART | SA_RESETHAND;
X        select_act.sa_handler = select_suspend;
X        sigaction (SIGTSTP, &select_act, 0L);
X#else
X        signal (SIGTSTP, select_suspend);
X#endif
X    }
X#endif
X
X#ifdef SIGWINCH
X    signal (SIGWINCH, select_resize);
X#endif
X
X#ifdef USE_CLEARSCREEN
X    ClearScreen ();
X#else
X    MoveCursor (0, 0);        /* top left corner */
X    CleartoEOLN ();
X#endif
X
X    sprintf (buf, "%s (%d)", txt_group_selection, local_top);
X    center_line (0, TRUE, buf);
X
X    if (col = (COLS - (int) strlen (txt_type_h_for_help))+1) {
X        MoveCursor (0, 0);            /* in upper middle */
X        if (kill_articles) {        /* display KILL on screen */
X            printf ("KILL ON");
X        }
X
X        MoveCursor (0, col);        /* in upper middle */
X        if (mail_check ()) {        /* you have mail message */
X            printf (txt_you_have_mail);
X        } else {
X            printf (txt_type_h_for_help);
X        }
X    }
X
X#ifndef USE_CLEARSCREEN
X    MoveCursor (1, 0);
X    CleartoEOLN ();
X#endif
X
X    MoveCursor (INDEX_TOP, 0);
X
X    first_group_on_screen = (cur_groupnum / NOTESLINES) * NOTESLINES;
X
X    last_group_on_screen = first_group_on_screen + NOTESLINES;
X    if (last_group_on_screen >= local_top)
X        last_group_on_screen = local_top;
X
X    for (j=0, i = first_group_on_screen; i < last_group_on_screen; i++,j++) {
X        switch (unread[i]) {
X            case -2:
X                sprintf (new, "?   ");
X                break;
X
X            case -1:
X                sprintf (new, "-   ");
X                break;
X
X            case 0:
X                sprintf (new, "    ");
X                break;
X
X            default:
X                sprintf (new, "%-4d", unread[i]);
X        }
X
X        n = my_group[i];
X        if (active[n].flag & SUBS)    /* subscribed? */
X            subs = ' ';
X        else
X            subs = 'u';    /* u next to unsubscribed groups */
X
X        if (draw_arrow_mark) {
X            printf ("   %c %4d  %-40s %s\r\n",
X                   subs, i+1, active[n].name, new);
X        } else {
X            sprintf (screen[j].col, "   %c %4d  %-40s %s%*s\r\n",
X                subs, i+1, active[n].name, new, COLS-BLANK_SELECT_COLS, " ");
X            printf ("%s", screen[j].col);
X        }
X    }
X#ifndef USE_CLEARSCREEN
X    CleartoEOS ();
X#endif
X
X    if (local_top <= 0) {
X        info_message (txt_no_groups);
X        return;
X    } else if (last_group_on_screen == local_top) {
X        info_message (txt_end_of_groups);
X    }
X
X    draw_group_arrow ();
X}
X
X
Xint prompt_group_num (ch)
X    char ch;
X{
X    int num;
X
X    clear_message ();
X
X    if ((num = parse_num (ch, txt_select_group)) == -1) {
X        clear_message ();
X        return FALSE;
X    }
X    num--;        /* index from 0 (internal) vs. 1 (user) */
X
X    if (num >= local_top)
X        num = local_top - 1;
X
X    if (num >= first_group_on_screen
X    &&  num < last_group_on_screen) {
X        erase_group_arrow ();
X        cur_groupnum = num;
X        draw_group_arrow ();
X    } else {
X#ifndef USE_CLEARSCREEN
X        erase_group_arrow ();
X#endif
X        cur_groupnum = num;
X        group_selection_page ();
X    }
X
X    return TRUE;
X}
X
X
Xvoid erase_group_arrow ()
X{
X    erase_arrow (INDEX_TOP + (cur_groupnum-first_group_on_screen) );
X}
X
X
Xvoid draw_group_arrow()
X{
X    draw_arrow (INDEX_TOP + (cur_groupnum-first_group_on_screen) );
X}
X
X
Xint choose_new_group ()
X{
X    char buf[LEN+1];
X    char *p;
X    int ret;
X
X    if (! parse_string (txt_newsgroup, buf))
X        return -1;
X
X    for (p = buf; *p && (*p == ' ' || *p == '\t'); p++)
X        continue;
X    if (*p == '\0')
X        return -1;
X
X    clear_message ();
X
X    if ((ret = add_group (p, TRUE)) < 0) {
X        sprintf (msg, txt_not_in_active_file, p);
X        info_message (msg);
X    }
X
X    return ret;
X}
X
X
X/*
X *  Add a group to the selection list (my_group[])
X *  Return the index of my_group[] if group is added or was already
X *  there.  Return -1 if named group is not in active[].
X */
X
Xint add_group (s, get_unread)
X    char *s;
X    int get_unread;            /* look in .newsrc for sequencer unread info? */
X{
X    long h;
X    int i, j;
X
X    h = hash_groupname (s);
X
X    for (i = group_hash[h]; i >= 0; i = active[i].next) {
X        if (strcmp (s, active[i].name) == 0) {
X            for (j = 0; j < local_top; j++) {
X                if (my_group[j] == i) {
X                    return j;
X                }
X            }
X
X            active[i].flag &= ~NOTGOT;   /* mark that we got it */
X            my_group[local_top] = i;
X
X            if (get_unread)
X                unread[local_top] = get_line_unread (s, i);
X            else
X                unread[local_top] = -2;
X
X            local_top++;
X            return local_top - 1;
X        }
X    }
X
X    return -1;
X}
X
X/*
X *  Find the next unread response in this group
X */
X
Xint next_unread(n)
X    int n;
X{
X    while (n >= 0) {
X        if (arts[n].unread == ART_UNREAD)
X            return n;
X        n = next_response (n);
X    }
X
X    return -1;
X}
X
X
X/*
X *  Find the previous unread response in this thread
X */
X
Xint prev_unread(n)
X    int n;
X{
X    while (n >= 0) {
X        if (arts[n].unread == ART_UNREAD)
X            return n;
X        n = prev_response(n);
X    }
X
X    return -1;
X}
X
X
Xint reposition_group (group, default_num)
X    char *group;
X    int default_num;
X{
X    char buf[LEN+1];
X    char pos[LEN+1];
X    int pos_num = 0;
X
X    sprintf (buf, txt_newsgroup_position, group);
X
X    if (! parse_string (buf, pos))
X        return default_num;
X
X    if (pos[0] == '\0')
X        return default_num;
X
X    if (pos[0] == '$') {
X        pos_num = local_top;
X    } else {
X        pos_num = atoi (pos);
X        if (pos_num > local_top) {
X            pos_num = local_top;
X        } else if (pos_num <= 0) {
X            pos_num = 1;
X        }
X    }
X
X    wait_message (txt_moving);
X
X    if (pos_group_in_newsrc (group, pos_num)) {
X        read_newsrc (TRUE);
X        return (pos_num-1);
X    } else {
X        return (default_num);
X    }
X}
X
X
Xvoid catchup_group (goto_next_unread_group)
X    int goto_next_unread_group;
X{
X    int i;
X
X    if (prompt_yn (LINES, txt_mark_group_read, 'y')) {
X        unread[cur_groupnum] = 0;
X        mark_group_read (active[my_group[cur_groupnum]].name,
X                        my_group[cur_groupnum]);
X        if (draw_arrow_mark) {
X            MoveCursor (INDEX_TOP+(cur_groupnum - first_group_on_screen), 51);
X            printf ("     ");
X            MoveCursor (LINES, 0);
X            fflush (stdout);
X        } else {
X            i = cur_groupnum - first_group_on_screen;
X            screen[i].col[51] = ' ';
X            screen[i].col[52] = ' ';
X            screen[i].col[53] = ' ';
X            screen[i].col[54] = ' ';
X            screen[i].col[55] = ' ';
X        }
X        erase_group_arrow ();
X        if (cur_groupnum+1 < last_group_on_screen) {
X            cur_groupnum++;
X        }
X        draw_group_arrow ();
X
X        if (goto_next_unread_group) {
X            next_unread_group (FALSE);
X        }
X    }
X}
X
X
Xvoid next_unread_group (enter_group)
X    int enter_group;
X{
X    int i;
X
X    for (i = cur_groupnum; i < local_top; i++) {
X        if (unread[i] != 0) {
X            break;
X        }
X    }
X    if (i >= local_top) {
X        info_message (txt_no_groups_to_read);
X        return;
X    }
X
X    erase_group_arrow ();
X    cur_groupnum = i;
X    if (cur_groupnum >= last_group_on_screen) {
X        group_selection_page ();
X    } else {
X        draw_group_arrow ();
X    }
X    space_mode = pos_first_unread;
X
X    if (enter_group) {
X        clear_message ();
X        index_point = -1;
X        do {
X            group_page (active[my_group[cur_groupnum]].name);
X        } while (index_point == -3);
X        group_selection_page ();
X    }
X}
X
X#ifdef TEST
X                    do {
X                        n = my_group[cur_groupnum];
X                        if (active[n].min <= active[n].max) {
X                            group_page (active[n].name);
X                        } else {
X                            if (cur_groupnum > n) {    /* next group */
X                                n = my_group[cur_groupnum];
X                                while (active[n].min <= active[n].max) {
X                                    cur_groupnum++;
X                                    if (cur_groupnum >= local_top) {
X                                        cur_groupnum = local_top - 1;
X                                        index_point = -1;
X                                        break;
X                                    }
X                                    n = my_group[cur_groupnum];
X                                }
X                            } else {    /* previous group */
X                                n = my_group[cur_groupnum];
X                                while (active[n].min <= active[n].max) {
X                                    cur_groupnum--;
X                                    if (cur_groupnum < 0) {
X                                        cur_groupnum = 0;
X                                        index_point = -1;
X                                        break;
X                                    }
X                                    n = my_group[cur_groupnum];
X                                }
X                            }
X                        }
X                    } while (index_point == -3);
X#endif
SHAR_EOF
echo "File select.c is complete" &&
$TOUCH -am 0923175591 select.c &&
chmod 0600 select.c ||
echo "restore of select.c failed"
set `wc -c select.c`;Wc_c=$1
if test "$Wc_c" != "19579"; then
    echo original size 19579, current size $Wc_c
fi
# ============= signal.c ==============
echo "x - extracting signal.c (Text)"
sed 's/^X//' << 'SHAR_EOF' > signal.c &&
X/*
X *  Project   : tin - a visual threaded usenet newsreader
X *  Module    : signal.c
X *  Author    : R.Skrenta / I.Lea
X *  Created   : 01-04-91
X *  Updated   : 10-09-91
X *  Release   : 1.0
X *  Notes     : signal handlers for different modes and window resizing
X *  Copyright : (c) Copyright 1991 by Rich Skrenta & Iain Lea
X *                You may  freely  copy or  redistribute  this software,
X *              so  long as there is no profit made from its use, sale
X *              trade or  reproduction.  You may not change this copy-
X *              right notice, and it must be included in any copy made
X */
X
X#include    "tin.h"
X
Xextern char *glob_art_group;
Xextern char *glob_group;
Xextern int glob_respnum;
Xextern char *glob_page_group;
X
X#ifdef SIGTSTP
Xint do_sigtstp = 0;
X#endif
X
X#ifdef POSIX_JOB_CONTROL
Xstruct sigaction art_act;
Xstruct sigaction group_act;
Xstruct sigaction main_act;
Xstruct sigaction page_act;
Xstruct sigaction rcfile_act;
Xstruct sigaction select_act;
Xstruct sigaction old_act;
X#endif
X
X
Xvoid set_signal_handlers ()
X{
X    signal (SIGINT, signal_handler);        /* ctrl-C */
X    signal (SIGQUIT, signal_handler);        /* ctrl-\ */
X    signal (SIGILL, signal_handler);
X    signal (SIGBUS, signal_handler);
X    signal (SIGSEGV, signal_handler);
X
X    signal (SIGPIPE, SIG_IGN);
X
X#ifdef SIGTSTP
X    {
X        void (*ptr)();
X        ptr = signal (SIGTSTP, SIG_DFL);
X        signal (SIGTSTP, ptr);
X        if (ptr != SIG_IGN) {
X            /*
X             *  SIGTSTP is ignored when starting from shells
X             *  without job-control
X             */
X            do_sigtstp = 1;
X            signal (SIGTSTP, main_suspend);
X        }
X    }
X#endif
X
X#ifdef SIGWINCH
X    signal (SIGWINCH, main_resize);
X#endif
X}
X
X
Xvoid signal_handler (sig)
X    int sig;
X{
X    switch (sig) {
X        case SIGINT:
X            signal (SIGINT, signal_handler);
X            break;
X        default:
X            Raw (FALSE);
X            printf ("\n%s: signal handler caught signal %d\n", progname,sig);
X            exit (1);
X    }
X}
X
X
Xvoid set_win_size (num_lines, num_cols)
X    int *num_lines;
X    int *num_cols;
X{
X#ifdef TIOCGWINSZ
X    char buf[64];
X    int old_lines, old_cols;
X    struct winsize win;
X
X    if (debug) {
X        old_lines = *num_lines;
X        old_cols = *num_cols;
X    }
X#endif
X
X    init_screen_array (FALSE);        /* deallocate screen array */
X
X#ifdef TIOCGWINSZ
X    if (ioctl (0, TIOCGWINSZ, &win) == 0) {
X        if (win.ws_row != 0) {
X            *num_lines = win.ws_row - 1;
X        }
X        if (win.ws_col != 0) {
X            *num_cols = win.ws_col;
X        }
X    }
X
X    if (debug) {
X        sprintf (buf, "RESIZED lines %d to %d  cols %d to %d",
X            old_lines, *num_lines, old_cols, *num_cols);
X        info_message (buf);
X    }
X#endif
X
X    init_screen_array (TRUE);        /* allocate screen array for resize */
X
X    max_subj = (*num_cols / 2) - 2;
X    max_from = (*num_cols - max_subj) - 17;
X    RIGHT_POS = *num_cols - 18;
X    MORE_POS  = *num_cols - 15;
X    NOTESLINES = *num_lines - INDEX_TOP - 1;
X    if (NOTESLINES <= 0) {
X        NOTESLINES = 1;
X    }
X}
X
X
X#ifdef SIGTSTP
X
X/* ARGSUSED0 */
Xvoid art_suspend (sig)
X    int sig;
X{
X    char buf[LEN];
X
X    Raw (FALSE);
X    putchar ('\n');
X
X#ifdef POSIX_JOB_CONTROL
X    sigsetmask(0);
X#else
X    signal(SIGTSTP, SIG_DFL);
X#ifdef BSD
X    sigsetmask (sigblock(0) & ~(1 << (SIGTSTP -1)));
X#endif
X#endif
X
X    kill (0, SIGTSTP);
X
X#ifdef POSIX_JOB_CONTROL
X    sigemptyset (&art_act.sa_mask);
X    art_act.sa_flags = SA_RESTART | SA_RESETHAND;
X    art_act.sa_handler = art_suspend;
X    sigaction (SIGTSTP, &art_act, 0L);
X#else
X    signal (SIGTSTP, art_suspend);
X#endif
X
X    if (! update) {
X        mail_setup ();
X
X        Raw (TRUE);
X
X        ClearScreen ();
X        sprintf (buf, txt_group, glob_art_group);
X        wait_message (buf);
X    }
X}
X
X
X/* ARGSUSED0 */
Xvoid main_suspend (sig)
X    int sig;
X{
X    Raw (FALSE);
X    putchar ('\n');
X
X#ifdef POSIX_JOB_CONTROL
X    sigsetmask(0);
X#else
X    signal(SIGTSTP, SIG_DFL);
X#ifdef BSD
X    sigsetmask (sigblock(0) & ~(1 << (SIGTSTP -1)));
X#endif
X#endif
X
X    kill (0, SIGTSTP);
X
X#ifdef POSIX_JOB_CONTROL
X    sigemptyset (&main_act.sa_mask);
X    main_act.sa_flags = SA_RESTART | SA_RESETHAND;
X    main_act.sa_handler = main_suspend;
X    sigaction (SIGTSTP, &main_act, 0L);
X#else
X    signal (SIGTSTP, main_suspend);
X#endif
X
X    mail_setup ();
X    if (! update) {
X        Raw (TRUE);
X    }
X}
X
X
X/* ARGSUSED0 */
Xvoid select_suspend (sig)
X    int sig;
X{
X
X    Raw (FALSE);
X    putchar ('\n');
X
X#ifdef POSIX_JOB_CONTROL
X    sigsetmask(0);
X#else
X    signal(SIGTSTP, SIG_DFL);
X#ifdef BSD
X    sigsetmask (sigblock(0) & ~(1 << (SIGTSTP -1)));
X#endif
X#endif
X
X    kill (0, SIGTSTP);
X
X#ifdef POSIX_JOB_CONTROL
X    sigemptyset (&select_act.sa_mask);
X    select_act.sa_flags = SA_RESTART | SA_RESETHAND;
X    select_act.sa_handler = select_suspend;
X    sigaction (SIGTSTP, &select_act, 0L);
X#else
X    signal (SIGTSTP, select_suspend);
X#endif
X
X    if (! update) {
X        Raw (TRUE);
X    }
X
X#ifndef USE_CLEARSCREEN
X    ClearScreen ();
X#endif
X    mail_setup ();
X    group_selection_page ();
X}
X
X
X/* ARGSUSED0 */
Xvoid group_suspend (sig)
X    int sig;
X{
X    Raw (FALSE);
X    putchar ('\n');
X
X#ifdef POSIX_JOB_CONTROL
X    sigsetmask(0);
X#else
X    signal(SIGTSTP, SIG_DFL);
X#ifdef BSD
X    sigsetmask (sigblock(0) & ~(1 << (SIGTSTP -1)));
X#endif
X#endif
X
X    kill (0, SIGTSTP);
X
X#ifdef POSIX_JOB_CONTROL
X    sigemptyset (&group_act.sa_mask);
X    group_act.sa_flags = SA_RESTART | SA_RESETHAND;
X    group_act.sa_handler = group_suspend;
X    sigaction (SIGTSTP, &group_act, 0L);
X#else
X    signal (SIGTSTP, group_suspend);
X#endif
X
X    if (! update) {
X        Raw (TRUE);
X    }
X
X#ifndef USE_CLEARSCREEN
X    ClearScreen ();
X#endif
X    mail_setup ();
X    show_group_page (glob_group);
X}
X
X
X/* ARGSUSED0 */
Xvoid page_suspend (sig)
X    int sig;
X{
X
X    Raw (FALSE);
X    putchar ('\n');
X
X#ifdef POSIX_JOB_CONTROL
X    sigsetmask(0);
X#else
X    signal(SIGTSTP, SIG_DFL);
X#ifdef BSD
X    sigsetmask (sigblock(0) & ~(1 << (SIGTSTP -1)));
X#endif
X#endif
X
X    kill (0, SIGTSTP);
X
X#ifdef POSIX_JOB_CONTROL
X    sigemptyset (&page_act.sa_mask);
X    page_act.sa_flags = SA_RESTART | SA_RESETHAND;
X    page_act.sa_handler = page_suspend;
X    sigaction (SIGTSTP, &page_act, 0L);
X#else
X    signal (SIGTSTP, page_suspend);
X#endif
X
X    mail_setup ();
X
X    if (! update) {
X        Raw (TRUE);
X    }
X
X#ifndef USE_CLEARSCREEN
X    ClearScreen ();
X#endif
X    redraw_page (glob_respnum, glob_page_group);
X}
X
X
X/* ARGSUSED0 */
Xvoid rcfile_suspend (sig)
X    int sig;
X{
X    Raw (FALSE);
X    putchar ('\n');
X
X#ifdef POSIX_JOB_CONTROL
X    sigsetmask(0);
X#else
X    signal(SIGTSTP, SIG_DFL);
X#ifdef BSD
X    sigsetmask (sigblock(0) & ~(1 << (SIGTSTP -1)));
X#endif
X#endif
X
X    kill (0, SIGTSTP);
X
X#ifdef POSIX_JOB_CONTROL
X    sigemptyset (&rcfile_act.sa_mask);
X    rcfile_act.sa_flags = SA_RESTART | SA_RESETHAND;
X    rcfile_act.sa_handler = rcfile_suspend;
X    sigaction (SIGTSTP, &rcfile_act, 0L);
X#else
X    signal (SIGTSTP, rcfile_suspend);
X#endif
X
X    Raw (TRUE);
X    show_rcfile_menu ();
X}
X
X#endif /* SIGTSTP */
X
X
X#ifdef SIGWINCH
X
X/* ARGSUSED0 */
Xvoid art_resize (sig)
X    int sig;
X{
X    char buf[LEN];
X
X    info_message (txt_resizing_window);
X    set_win_size (&LINES, &COLS);
X    signal (SIGWINCH, art_resize);
X
X    ClearScreen ();
X    sprintf (buf, txt_group, glob_art_group);
X    wait_message (buf);
X}
X
X
X/* ARGSUSED0 */
Xvoid main_resize (sig)
X    int sig;
X{
X    info_message (txt_resizing_window);
X    set_win_size (&LINES, &COLS);
X    signal (SIGWINCH, main_resize);
X}
X
X
X/* ARGSUSED0 */
Xvoid select_resize (sig)
X    int sig;
X{
X    info_message (txt_resizing_window);
X    set_win_size (&LINES, &COLS);
X    signal (SIGWINCH, select_resize);
X
X#ifndef USE_CLEARSCREEN
X    ClearScreen ();
X#endif
X    group_selection_page ();
X}
X
X
X/* ARGSUSED0 */
Xvoid group_resize (sig)
X    int sig;
X{
X    info_message (txt_resizing_window);
X    set_win_size (&LINES, &COLS);
X    signal (SIGWINCH, group_resize);
X
X#ifndef USE_CLEARSCREEN
X    ClearScreen ();
X#endif
X    show_group_page (glob_group);
X}
X
X
X/* ARGSUSED0 */
Xvoid page_resize (sig)
X    int sig;
X{
X    info_message (txt_resizing_window);
X    set_win_size (&LINES, &COLS);
X    signal (SIGWINCH, page_resize);
X
X#ifndef USE_CLEARSCREEN
X    ClearScreen ();
X#endif
X    redraw_page (glob_respnum, glob_page_group);
X}
X
X#endif /* SIGWINCH */
X
SHAR_EOF
$TOUCH -am 0923175591 signal.c &&
chmod 0600 signal.c ||
echo "restore of signal.c failed"
set `wc -c signal.c`;Wc_c=$1
if test "$Wc_c" != "7569"; then
    echo original size 7569, current size $Wc_c
fi
# ============= wildmat.c ==============
echo "x - extracting wildmat.c (Text)"
sed 's/^X//' << 'SHAR_EOF' > wildmat.c &&
X/*  $Revision: 1.5 $
X**
X**  Do shell-style pattern matching for ?, \, [], and * characters.
X**  Might not be robust in face of malformed patterns; e.g., "foo[a-"
X**  could cause a segmentation violation.  It is 8bit clean.
X**
X**  Written by Rich $alz, mirror!rs, Wed Nov 26 19:03:17 EST 1986.
X**  Rich $alz is now <[e-mail]>.
X**  April, 1991:  Replaced mutually-recursive calls with in-line code
X**  for the star character.
X**
X**  Special thanks to Lars Mathiesen <[e-mail]> for the ABORT code.
X**  This can greatly speed up failing wildcard patterns.  For example:
X**    pattern: -*-*-*-*-*-*-12-*-*-*-m-*-*-*
X**    text 1:     -adobe-courier-bold-o-normal--12-120-75-75-m-70-iso8859-1
X**    text 2:     -adobe-courier-bold-o-normal--12-120-75-75-X-70-iso8859-1
X**  Text 1 matches with 51 calls, while text 2 fails with 54 calls.  Without
X**  the ABORT, then it takes 22310 calls to fail.  Ugh.  The following
X**  explanation is from Lars:
X**  The precondition that must be fulfilled is that DoMatch will consume
X**  at least one character in text.  This is true if *p is neither '*' nor
X**  '\0'.)  The last return has ABORT instead of FALSE to avoid quadratic
X**  behaviour in cases like pattern "*a*b*c*d" with text "abcxxxxx".  With
X**  FALSE, each star-loop has to run to the end of the text; with ABORT
X**  only the last one does.
X**
X**  Once the control of one instance of DoMatch enters the star-loop, that
X**  instance will return either TRUE or ABORT, and any calling instance
X**  will therefore return immediately after (without calling recursively
X**  again).  In effect, only one star-loop is ever active.  It would be
X**  possible to modify the code to maintain this context explicitly,
X**  eliminating all recursive calls at the cost of some complication and
X**  loss of clarity (and the ABORT stuff seems to be unclear enough by
X**  itself).  I think it would be unwise to try to get this into a
X**  released version unless you have a good test data base to try it out
X**  on.
X*/
X
X#define TRUE            1
X#define FALSE            0
X#define ABORT            -1
X
X
X    /* What character marks an inverted character class? */
X#define NEGATE_CLASS        '^'
X    /* Is "*" a common pattern? */
X#define OPTIMIZE_JUST_STAR
X    /* Do tar(1) matching rules, which ignore a trailing slash? */
X#undef MATCH_TAR_PATTERN
X
X
X/*
X**  Match text and p, return TRUE, FALSE, or ABORT.
X*/
Xstatic int
XDoMatch(text, p)
X    register char    *text;
X    register char    *p;
X{
X    register int    last;
X    register int    matched;
X    register int    reverse;
X
X    for ( ; *p; text++, p++) {
X    if (*text == '\0' && *p != '*')
X        return ABORT;
X    switch (*p) {
X    case '\\':
X        /* Literal match with following character. */
X        p++;
X        /* FALLTHROUGH */
X    default:
X        if (*text != *p)
X        return FALSE;
X        continue;
X    case '?':
X        /* Match anything. */
X        continue;
X    case '*':
X        while (*++p == '*')
X        /* Consecutive stars act just like one. */
X        continue;
X        if (*p == '\0')
X        /* Trailing star matches everything. */
X        return TRUE;
X        while (*text)
X        if ((matched = DoMatch(text++, p)) != FALSE)
X            return matched;
X        return ABORT;
X    case '[':
X        reverse = p[1] == NEGATE_CLASS ? TRUE : FALSE;
X        if (reverse)
X        /* Inverted character class. */
X        p++;
X        matched = FALSE;
X        if (p[1] == ']' || p[1] == '-')
X        if (*++p == *text)
X            matched = TRUE;
X        for (last = *p; *++p && *p != ']'; last = *p)
X        /* This next line requires a good C compiler. */
X        if (*p == '-' && p[1] != ']'
X            ? *text <= *++p && *text >= last : *text == *p)
X            matched = TRUE;
X        if (matched == reverse)
X        return FALSE;
X        continue;
X    }
X    }
X
X#ifdef    MATCH_TAR_PATTERN
X    if (*text == '/')
X    return TRUE;
X#endif    /* MATCH_TAR_ATTERN */
X    return *text == '\0';
X}
X
X
X/*
X**  User-level routine.  Returns TRUE or FALSE.
X*/
Xint
Xwildmat(text, p)
X    char    *text;
X    char    *p;
X{
X#ifdef    OPTIMIZE_JUST_STAR
X    if (p[0] == '*' && p[1] == '\0')
X    return TRUE;
X#endif    /* OPTIMIZE_JUST_STAR */
X    return DoMatch(text, p) == TRUE;
X}
X
X
X
X#ifdef    TEST
X#include <stdio.h>
X
X/* Yes, we use gets not fgets.  Sue me. */
Xextern char    *gets();
X
X
Xmain()
X{
X    char     p[80];
X    char     text[80];
X
X    printf("Wildmat tester.  Enter pattern, then strings to test.\n");
X    printf("A blank line gets prompts for a new pattern; a blank pattern\n");
X    printf("exits the program.\n");
X
X    for ( ; ; ) {
X    printf("\nEnter pattern:  ");
X    (void)fflush(stdout);
X    if (gets(p) == NULL || p[0] == '\0')
X        break;
X    for ( ; ; ) {
X        printf("Enter text:  ");
X        (void)fflush(stdout);
X        if (gets(text) == NULL)
X        exit(0);
X        if (text[0] == '\0')
X        /* Blank line; go back and get a new pattern. */
X        break;
X        printf("      %s\n", wildmat(text, p) ? "YES" : "NO");
X    }
X    }
X
X    exit(0);
X    /* NOTREACHED */
X}
X#endif    /* TEST */
SHAR_EOF
$TOUCH -am 0923175591 wildmat.c &&
chmod 0600 wildmat.c ||
echo "restore of wildmat.c failed"
set `wc -c wildmat.c`;Wc_c=$1
if test "$Wc_c" != "4749"; then
    echo original size 4749, current size $Wc_c
fi
# ============= tin.h ==============
echo "x - extracting tin.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > tin.h &&
X/*
X *  Project   : tin - a visual threaded usenet newsreader
X *  Module    : tin.h
X *  Author    : R.Skrenta / I.Lea
X *  Created   : 01-04-91
X *  Updated   : 24-09-91
X *  Release   : 1.0
X *  Notes     :
X *  Copyright : (c) Copyright 1991 by Rich Skrenta & Iain Lea
X *                You may  freely  copy or  redistribute  this software,
X *              so  long as there is no profit made from its use, sale
X *              trade or  reproduction.  You may not change this copy-
X *              right notice, and it must be included in any copy made
X */
X
X#include    <stdio.h>
X#include    <signal.h>
X#include    <pwd.h>
X#include    <sys/types.h>
X#include    <memory.h>
X#include    <ctype.h>
X#include    <time.h>
X#include    <sys/stat.h>
X
X#ifdef BSD
X#include    <strings.h>
X#else
X#include    <string.h>
X#include    <malloc.h>
X#endif
X
X#ifdef SCO_UNIX
X#include    <sys/streams.h>
X#include    <sys/ptem.h>
X#endif
X
X#ifdef SIGWINCH
X#include    <sys/ioctl.h>
X#ifdef AUTO_RESIZE
X#include    <sys/ttold.h>        /* needed for resizing under an xterm */
X#endif
X#endif
X
X#include    "patchlevel.h"
X
X
X#define BUG_REPORT_ADDRESS    "[e-mail]"
X
X#ifndef SPOOLDIR
X#define        SPOOLDIR        "/usr/spool/news"
X#endif
X#ifndef LIBDIR
X#define        LIBDIR            "/usr/lib/news"
X#endif
X#ifndef INEWSDIR
X#define        INEWSDIR        LIBDIR
X#endif
X
X#define        RCDIR            ".tin"
X#define        RCFILE            "tinrc"
X#define        INDEXDIR        ".index"
X#define        KILLFILE        "kill"
X#define        POSTFILE        "posted"
X
X#define        DEFAULT_SHELL    "/bin/sh"
X#define        DEFAULT_MAILDIR    "Mail"
X
X#ifdef BSD
X#define     DEFAULT_EDITOR    "/usr/ucb/vi"
X#define        DEFAULT_MAILER    "/bin/rmail"
X#define        DEFAULT_MAILBOX    "/usr/spool/mail"
X#define        DEFAULT_PRINTER    "/usr/ucb/lpr"
X#define        DEFAULT_SUM        "sum"
X#ifndef USE_LONG_FILENAMES
X#define USE_LONG_FILENAMES
X#endif
X#else
X#ifdef M_XENIX
X#define     DEFAULT_EDITOR    "/bin/vi"
X#define        DEFAULT_MAILBOX    "/usr/spool/mail"
X#else
X#define     DEFAULT_EDITOR    "/usr/bin/vi"
X#define        DEFAULT_MAILBOX    "/usr/mail"
X#endif
X#define        DEFAULT_MAILER    "/usr/bin/rmail"
X/*
X#define        DEFAULT_MAILER    "/usr/lib/sendmail -t"
X*/
X#define        DEFAULT_PRINTER    "/usr/bin/lp"
X#define        DEFAULT_SUM        "sum -r"
X#endif
X
X#define        DEFAULT_ACTIVE_NUM    100        /* initial size of active array */
X#define        DEFAULT_ARTICLE_NUM    400        /* initial size of art array */
X#define        DEFAULT_KILL_NUM    10        /* initial size of kill array */
X#define        DEFAULT_SAVE_NUM    10        /* initial size of save array */
X
X#define        TRUE        1
X#define        FALSE        0
X
X#define        LEN        200
X
X#ifdef USE_LONG_FILENAMES
X#define        LONG_PATH_PART    "part"
X#define        LONG_PATH_PATCH    "patch"
X#else
X#define        LONG_PATH_PART    ""
X#define        LONG_PATH_PATCH    "p"
X#endif
X
X#define        DEFAULT_COMMENT    ": "    /* used when by follow-ups & replys */
X
X/*
X *  used by feed.c - feed_articles()
X */
X
X#define        SELECT_LEVEL            1
X#define        GROUP_LEVEL                2
X#define        PAGE_LEVEL                3
X
X#define        FEED_MAIL                1
X#define        FEED_PIPE                2
X#define        FEED_PRINT                3
X#define        FEED_SAVE                4
X
X
X#ifdef USE_INVERSE_HACK
X#define        BLANK_SELECT_COLS        59
X#define        BLANK_GROUP_COLS        2
X#define        BLANK_PAGE_COLS            2
X#else
X#define        BLANK_SELECT_COLS        57
X#define        BLANK_GROUP_COLS        0
X#define        BLANK_PAGE_COLS            0
X#endif
X
X#define        SCREEN_READ_UNREAD        6        /* position for "  +" / "   " */
X#define        DEFAULT_COLS            132        /* used when updating indexes */
X#define        INDEX_TOP                2
X
X#define        SORT_BY_NOTHING            0        /* sort types on arts[] array */
X#define        SORT_BY_SUBJ_DESCEND    1
X#define        SORT_BY_SUBJ_ASCEND        2
X#define        SORT_BY_FROM_DESCEND    3
X#define        SORT_BY_FROM_ASCEND        4
X#define        SORT_BY_DATE_DESCEND    5
X#define        SORT_BY_DATE_ASCEND        6
X
X#define        HELP_INFO    0
X#define        POST_INFO    1
X
Xextern int sort_art_type;
X
Xextern int NOTESLINES;
Xextern int RIGHT_POS;
Xextern int MORE_POS;
X
Xextern int max_subj;
Xextern int max_from;
X
X#define        TABLE_SIZE        1409
X#define        MAX_PAGES        1000
X
X#ifdef BSD
X#define CR    '\r'
X#else
X#define CR    10
X#endif
X
X/*
X * return codes for change_rcfile ()
X */
X
X#define        NO_KILLING        0
X#define        KILLING            1
X
X/*
X *  art.thread
X */
X
X#define        ART_NORMAL        -1
X#define        ART_EXPIRED        -2
X
X/*
X *  art.unread
X */
X
X#define        ART_READ        0
X#define        ART_UNREAD        1
X#define        ART_WILL_RETURN    2
X
Xstruct header {
X    long artnum;
X    char *subject;    /* Subject: line from mail header */
X    char *from;        /* From: line from mail header */
X    int thread;
X    int inthread;
X    int unread;        /* 0 = read, 1 = unread, 2 = will return */
X    char date[16];    /* Date: line from mail header */
X    char *archive;    /* Archive-name: line from mail header */
X    char *part;        /* part no. of archive */
X    char *patch;    /* patch no. of archive */
X    int tagged;        /* 0 = not killed/tagged, 1 = killed/tagged */
X};
X
X/*
X *  header.artnum:
X *    article number in spool directory for group
X *
X *  header.thread:
X *    initially -1
X *    points to another arts[] (struct header): zero and up
X *    -2 means article has expired (wasn't found in file search
X *    of spool directory for the group)
X *
X *  header.inthread:
X *    FALSE for the first article in a thread, TRUE for all
X *    following articles in thread
X *
X *  header.read:
X *    boolean, has this article been read or not
X *
X *  header.date
X *  date: line used for sorting articles by date order
X *
X *  header.archive:
X *    archive name used in *source* groups
X *
X *  header.part:
X *    part no. of archive
X *
X *  header.patch:
X *    patch no. of archive
X *
X *  header.tagged:
X *    boolean, has this article been killed/tagged for saving or not
X */
X
Xstruct group_ent {
X    char *name;
X    long max;
X    long min;
X    int next;        /* next active entry in hash chain */
X    int flag;
X};
X
X#define        NOTGOT            0x01    /* haven't put in my_group yet */
X#define        SUBS            0x02    /* subscribed to */
X
X#define KILL_SUBJ    1
X#define KILL_FROM    2
X#define KILL_BOTH    3
X
Xstruct kill_t {
X    int kill_type;
X    long kill_group;
X    char *kill_subj;
X    char *kill_from;
X};
X
Xextern struct kill_t *killf;
Xextern int kill_num;
Xextern int max_kill;
X
X#define POST_PROC_NONE            0
X#define POST_PROC_SHAR            1
X#define POST_PROC_UUDECODE        2
X#define POST_PROC_UUD_LST_ZOO    3
X#define POST_PROC_UUD_EXT_ZOO    4
X#define POST_PROC_PATCH            5
X
Xstruct save_t {
X    char *subject;
X    char *dir;
X    char *file;
X    char *archive;
X    char *part;
X    char *patch;
X    int index;
X    int saved;
X    int is_mailbox;
X};
X
Xextern struct save_t *save;
Xextern int save_num;
Xextern int max_save;
X
Xstruct screen_t {
X    char *col;
X};
X
Xextern struct screen_t *screen;
X
Xstruct posted_t {
X    char date[LEN];
X    char group[LEN];
X    char subj[LEN];
X};
X
Xextern struct posted_t *posted;
X
X#ifdef POSIX_JOB_CONTROL
Xextern struct sigaction art_act;
Xextern struct sigaction group_act;
Xextern struct sigaction main_act;
Xextern struct sigaction page_act;
Xextern struct sigaction select_act;
Xextern struct sigaction rcfile_act;
Xextern struct sigaction old_act;
X#endif
X
Xextern int debug;
Xextern int active_num;
Xextern int article_num;
Xextern int start_line_offset;
X
Xextern int read_news_via_nntp;
Xextern char nntp_server[LEN+1];
Xextern int top;
Xextern struct header *arts;
Xextern long *base;
Xextern int max_art;
X
Xextern int index_file_killed;
Xextern int save_separate;
Xextern int save_archive_name;
Xextern int show_author;
Xextern int draw_arrow_mark;
Xextern int kill_articles;
Xextern int mark_saved_read;
Xextern int post_proc_type;
Xextern int default_printer;
Xextern int print_header;
Xextern int pos_first_unread;
Xextern int num_of_tagged_files;
Xextern int compiled_with_nntp;
Xextern int save_news;
X
Xextern char rcdir[LEN+1];
Xextern char rcfile[LEN+1];
Xextern char indexdir[LEN+1];
Xextern char killfile[LEN+1];
Xextern char postfile[LEN+1];
X
Xextern char msg[LEN+1];
Xextern char userid[LEN+1];
Xextern char homedir[LEN+1];
Xextern char add_addr[LEN+1];
Xextern char bug_addr[LEN+1];
Xextern char txt_help_bug_report[LEN+1];
Xextern char reply_to[LEN+1];
Xextern char my_org[LEN+1];
Xextern char active_file[LEN+1];
Xextern char newsrc[LEN+1];
Xextern char newnewsrc[LEN+1];
Xextern char delgroups[LEN+1];
X
Xextern char *version;
Xextern char cvers[LEN+1];
Xextern char progname[LEN+1];
Xextern char article[LEN+1];
Xextern char dead_article[LEN+1];
Xextern char mailer[LEN+1];
Xextern char printer[LEN+1];
Xextern char spooldir[LEN+1];
Xextern char savedir[LEN+1];
Xextern char maildir[LEN+1];
Xextern char mailbox[LEN+1];
Xextern char page_header[LEN+1];
Xextern char signature[LEN+1];
Xextern char sig[LEN+1];
Xextern char killsubj[LEN+1];
Xextern char killfrom[LEN+1];
Xextern char author_search_string[LEN+1];
Xextern char group_search_string[LEN+1];
Xextern char subject_search_string[LEN+1];
Xextern char art_search_string[LEN+1];
Xextern char default_mail_address[LEN];
Xextern char default_pipe_command[LEN];
Xextern char default_regex_pattern[LEN];
Xextern char default_save_file[LEN];
Xextern char proc_ch_default;                /* set in change_rcfile () */
X
Xextern char *help_select[];
Xextern char *help_group[];
Xextern char *help_page[];
X
Xextern int top_base;
Xextern int LINES, COLS;
Xextern int group_hash[TABLE_SIZE];
Xextern int num_active;
Xextern struct group_ent *active;
Xextern int *my_group;
Xextern int *unread;
Xextern int max_active;
X
Xextern int local_top;
Xextern int catchup;
Xextern int update;
Xextern int verbose;
Xextern int inverse_okay;
X
Xextern int tin_uid;
Xextern int tin_gid;
Xextern int real_uid;
Xextern int real_gid;
Xextern int local_index;
X
X#ifdef SIGTSTP
Xextern int do_sigtstp;
X#endif
X
X#define        ctrl(c)            ((c) & 0x1F)
X
X/*
X *  Assertion verifier
X */
X
X#ifdef __STDC__
X#define    assert(p)    if(! (p)) asfail(__FILE__, __LINE__, #p); else
X#else
X#define    assert(p)    if(! (p)) asfail(__FILE__, __LINE__, "p"); else
X#endif
X
X/*
X *  function prototypes    & language definitions
X */
X
X#include    "proto.h"
X#include    "lang.h"
SHAR_EOF
$TOUCH -am 0924140291 tin.h &&
chmod 0600 tin.h ||
echo "restore of tin.h failed"
set `wc -c tin.h`;Wc_c=$1
if test "$Wc_c" != "9348"; then
    echo original size 9348, current size $Wc_c
fi
# ============= lang.h ==============
echo "x - extracting lang.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > lang.h &&
X/*
X *  Project   : tin - a visual threaded usenet newsreader
X *  Module    : lang.h
X *  Author    : I.Lea
X *  Created   : 01-04-91
X *  Updated   : 24-09-91
X *  Release   : 1.0
X *  Notes     :
X *  Copyright : (c) Copyright 1991 by Iain Lea
X *                You may  freely  copy or  redistribute  this software,
X *              so  long as there is no profit made from its use, sale
X *              trade or  reproduction.  You may not change this copy-
X *              right notice, and it must be included in any copy made
X */
X
X/*
X *  art.c
X */
X
Xextern char txt_group[];
Xextern char txt_cannot_open_art[];
Xextern char txt_indexing[];
Xextern char txt_corrupt_index[];
X
X/*
X *  feed.c
X */
X
Xextern char txt_art_thread_regex_tag[];
Xextern char txt_post_procees_type[];
Xextern char txt_feed_pattern[];
Xextern char txt_no_command[];
X
X/*
X *  group.c
X */
X
Xextern char txt_tagged_art[];
Xextern char txt_untagged_art[];
Xextern char txt_inverse_on[];
Xextern char txt_inverse_off[];
Xextern char txt_subscribed_to[];
Xextern char txt_unsubscribed_to[];
Xextern char txt_mark_all_read[];
Xextern char txt_marked_as_read[];
Xextern char txt_no_more_groups[];
Xextern char txt_no_prev_group[];
Xextern char txt_no_arts[];
Xextern char txt_no_groups[];
Xextern char txt_end_of_arts[];
Xextern char txt_end_of_groups[];
Xextern char txt_no_next_unread_art[];
Xextern char txt_no_prev_unread_art[];
Xextern char txt_no_last_message[];
Xextern char txt_bad_command[];
Xextern char txt_you_have_mail[];
Xextern char txt_type_h_for_help[];
Xextern char txt_read_art[];
Xextern char txt_author_search_forwards[];
Xextern char txt_author_search_backwards[];
Xextern char txt_search_forwards[];
Xextern char txt_search_backwards[];
Xextern char txt_no_search_string[];
Xextern char txt_no_match[];
Xextern char txt_post_subject[];
Xextern char txt_no_subject[];
Xextern char txt_cannot_open[];
Xextern char txt_posting[];
Xextern char txt_art_posted[];
Xextern char txt_art_rejected[];
Xextern char txt_abort_edit_post[];
Xextern char txt_index_page_com[];
Xextern char txt_help_i_4[];
Xextern char txt_help_ctrl_k[];
Xextern char txt_help_ctrl_l[];
Xextern char txt_help_ctrl_d[];
Xextern char txt_help_i_cr[];
Xextern char txt_help_i_tab[];
Xextern char txt_help_m[];
Xextern char txt_help_M[];
Xextern char txt_help_a[];
Xextern char txt_help_sel_c[];
Xextern char txt_help_c[];
Xextern char txt_help_g[];
Xextern char txt_help_I[];
Xextern char txt_help_K[];
Xextern char txt_help_j[];
Xextern char txt_help_i_n[];
Xextern char txt_help_i_p[];
Xextern char txt_help_q[];
Xextern char txt_help_s[];
Xextern char txt_help_S[];
Xextern char txt_help_t[];
Xextern char txt_help_T[];
Xextern char txt_help_U[];
Xextern char txt_help_v[];
Xextern char txt_help_i_u[];
Xextern char txt_help_w[];
Xextern char txt_help_i_search[];
Xextern char txt_help_thread[];
Xextern char txt_help_dash[];
Xextern char txt_save_pattern[];
Xextern char txt_base_subdir[];
Xextern char txt_saved_pattern_to[];
Xextern char txt_saved_to_mailbox[];
Xextern char txt_switch_on_kill_art_menu[];
X
X/*
X *  help.c:
X */
X
Xextern char txt_post_history_menu[];
Xextern char txt_hit_space_for_more[];
X
X/*
X *  kill.c:
X */
X
Xextern char txt_kill_menu[];
Xextern char txt_kill_subject[];
Xextern char txt_kill_from[];
Xextern char txt_kill_text[];
Xextern char txt_kill_text_type[];
Xextern char txt_kill_group[];
Xextern char txt_help_kill_subject[];
Xextern char txt_help_kill_from[];
Xextern char txt_help_kill_text[];
Xextern char txt_help_kill_text_type[];
Xextern char txt_help_kill_group[];
Xextern char txt_abort_edit_save_killfile[];
X
X/*
X *  page.c
X */
X
Xextern char txt_quit[];
Xextern char txt_art_unavailable[];
Xextern char txt_art_marked_as_unread[];
Xextern char txt_thread_marked_as_unread[];
Xextern char txt_begin_of_art[];
Xextern char txt_next_resp[];
Xextern char txt_last_resp[];
Xextern char txt_more_percent[];
Xextern char txt_more[];
Xextern char txt_thread_x_of_n[];
Xextern char txt_art[];
Xextern char txt_resp_x_of_n[];
Xextern char txt_no_resp[];
Xextern char txt_1_resp[];
Xextern char txt_x_resp[];
Xextern char txt_s_at_s[];
Xextern char txt_thread_resp_page[];
Xextern char txt_thread_page[];
Xextern char txt_read_resp[];
Xextern char txt_art_pager_com[];
Xextern char txt_help_p_0[];
Xextern char txt_help_p_4[];
Xextern char txt_help_p_cr[];
Xextern char txt_help_p_tab[];
Xextern char txt_help_b[];
Xextern char txt_help_C[];
Xextern char txt_help_bug[];
Xextern char txt_help_p_f[];
Xextern char txt_help_ctrl_h[];
Xextern char txt_help_h[];
Xextern char txt_help_p_i[];
Xextern char txt_help_p_k[];
Xextern char txt_help_p_m[];
Xextern char txt_help_p_n[];
Xextern char txt_help_o[];
Xextern char txt_help_p_p[];
Xextern char txt_help_p_r[];
Xextern char txt_help_p_s[];
Xextern char txt_help_p_z[];
Xextern char txt_help_p_ctrl_r[];
Xextern char txt_help_p_g[];
Xextern char txt_help_p_d[];
Xextern char txt_help_pipe[];
Xextern char txt_help_p_search[];
Xextern char txt_mail_art_to[];
Xextern char txt_no_mail_address[];
Xextern char txt_abort_edit_send[];
Xextern char txt_abort_edit_cancel[];
Xextern char txt_cancelling[];
Xextern char txt_art_cancelled[];
Xextern char txt_mailing_to[];
Xextern char txt_message_sent[];
Xextern char txt_command_failed_s[];
Xextern char txt_in_art_you_write[];
Xextern char txt_resp_to_poster[];
Xextern char txt_resp_redirect[];
Xextern char txt_continue[];
Xextern char txt_writes[];
Xextern char txt_save_filename[];
Xextern char txt_art_not_saved[];
Xextern char txt_no_filename[];
Xextern char txt_saving[];
Xextern char txt_art_saved_to[];
Xextern char txt_thread_not_saved[];
Xextern char txt_thread_saved_to_many[];
Xextern char txt_thread_saved_to[];
Xextern char txt_pipe_to_command[];
Xextern char txt_command_failed[];
Xextern char txt_error_printing_art[];
Xextern char txt_printing[];
Xextern char txt_printed[];
Xextern char txt_append_to_file[];
X
X/*
X *  prompt.c
X */
X
Xextern char txt_hit_any_key[];
X
X/*
X *  main.c:
X */
X
Xextern char txt_not_in_active_file[];
Xextern char txt_screen_init_failed[];
Xextern char txt_bad_active_file[];
X
X/*
X *  misc.c
X */
X
Xextern char txt_cannot_find_base_art[];
Xextern char txt_out_of_memory[];
Xextern char txt_rename_error[];
Xextern char txt_shell_escape[];
X
X/*
X *  nntp.c
X */
X
Xextern char txt_cannot_get_nntp_server_name[];
Xextern char txt_server_name_in_file_env_var[];
Xextern char txt_failed_to_connect_to_server[];
Xextern char txt_rejected_by_nntpserver[];
Xextern char txt_connection_to_server_broken[];
Xextern char txt_stuff_nntp_cannot_open[];
Xextern char txt_nntp_to_fp_cannot_reopen[];
Xextern char txt_nntp_to_fd_cannot_reopen[];
Xextern char txt_toggled_rot13[];
X
X/*
X *  post.c
X */
X
Xextern char txt_no_arts_posted[];
X
X/*
X *  rcfile.c
X */
X
Xextern char txt_opt_autosave[];
Xextern char txt_opt_save_separate[];
Xextern char txt_opt_mark_saved_read[];
Xextern char txt_opt_kill_articles[];
Xextern char txt_opt_show_author[];
Xextern char txt_opt_draw_arrow[];
Xextern char txt_opt_post_process[];
Xextern char txt_opt_print_header[];
Xextern char txt_opt_pos_first_unread[];
Xextern char txt_opt_process_type[];
Xextern char txt_opt_sort_type[];
Xextern char txt_post_process_none[];
Xextern char txt_post_process_sh[];
Xextern char txt_post_process_uudecode[];
Xextern char txt_post_process_uud_lst_zoo[];
Xextern char txt_post_process_uud_ext_zoo[];
Xextern char txt_post_process_patch[];
Xextern char txt_sort_by_nothing[];
Xextern char txt_sort_by_subj_descend[];
Xextern char txt_sort_by_subj_ascend[];
Xextern char txt_sort_by_from_descend[];
Xextern char txt_sort_by_from_ascend[];
Xextern char txt_sort_by_date_descend[];
Xextern char txt_sort_by_date_ascend[];
Xextern char txt_opt_savedir[];
Xextern char txt_opt_maildir[];
Xextern char txt_opt_printer[];
Xextern char txt_opt_kill_subj[];
Xextern char txt_opt_kill_from[];
Xextern char txt_options_menu[];
Xextern char txt_help_autosave[];
Xextern char txt_help_save_separate[];
Xextern char txt_help_print_header[];
Xextern char txt_help_pos_first_unread[];
Xextern char txt_help_show_author[];
Xextern char txt_help_draw_arrow[];
Xextern char txt_help_kill_articles[];
Xextern char txt_help_post_process[];
Xextern char txt_help_mark_saved_read[];
Xextern char txt_help_post_proc_type[];
Xextern char txt_help_sort_type[];
Xextern char txt_help_savedir[];
Xextern char txt_help_maildir[];
Xextern char txt_help_printer[];
Xextern char txt_select_rcfile_option[];
Xextern char txt_save_options[];
X
X/*
X *  save.c
X */
X
Xextern char txt_post_processing[];
Xextern char txt_post_processing_finished[];
Xextern char txt_deleting[];
X
X/*
X *  search.c
X */
X
Xextern char txt_searching[];
X
X/*
X *  select.c
X */
X
Xextern char txt_moving[];
Xextern char txt_subscribe_pattern[];
Xextern char txt_unsubscribe_pattern[];
Xextern char txt_subscribing[];
Xextern char txt_subscribing_to[];
Xextern char txt_unsubscribing[];
Xextern char txt_unsubscribing_from[];
Xextern char txt_subscribed_num_groups[];
Xextern char txt_unsubscribed_num_groups[];
Xextern char txt_del_group_in_newsrc[];
Xextern char txt_group_deleted[];
Xextern char txt_group_undeleted[];
Xextern char txt_mark_group_read[];
Xextern char txt_no_groups_to_delete[];
Xextern char txt_reset_newsrc[];
Xextern char txt_no_groups_to_read[];
Xextern char txt_added_groups[];
Xextern char txt_rewriting_newsrc_file[];
Xextern char txt_plural[];
Xextern char txt_no_groups_to_yank_in[];
Xextern char txt_group_selection[];
Xextern char txt_select_group[];
Xextern char txt_group_select_com[];
Xextern char txt_help_g_4[];
Xextern char txt_help_g_ctrl_r[];
Xextern char txt_help_g_ctrl_k[];
Xextern char txt_help_g_cr[];
Xextern char txt_help_g_tab[];
Xextern char txt_help_g_c[];
Xextern char txt_help_W[];
Xextern char txt_help_g_y[];
Xextern char txt_help_g_z[];
Xextern char txt_help_g_dollar[];
Xextern char txt_help_g_search[];
Xextern char txt_newsgroup[];
Xextern char txt_newsgroup_position[];
X
X/*
X *  signal.c
X */
X
Xextern char txt_resizing_window[];
SHAR_EOF
$TOUCH -am 0924083791 lang.h &&
chmod 0600 lang.h ||
echo "restore of lang.h failed"
set `wc -c lang.h`;Wc_c=$1
if test "$Wc_c" != "9707"; then
    echo original size 9707, current size $Wc_c
fi
# ============= nntp.h ==============
echo "x - extracting nntp.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > nntp.h &&
X/*
X *  Project   : tin - a visual threaded usenet newsreader
X *  Module    : nntp.h
X *  Author    : R.Skrenta
X *  Created   : 01-04-91
X *  Updated   : 10-08-91
X *  Release   : 1.0
X *  Notes     : Changed a bit so nntp knows about Tass
X *              This file is originally from the nntp 1.5 source.
X *  Copyright : (c) Copyright 1991 by Rich Skrenta
X *                You may  freely  copy or  redistribute  this software,
X *              so  long as there is no profit made from its use, sale
X *              trade or  reproduction.  You may not change this copy-
X *              right notice, and it must be included in any copy made
X */
X
X#define    NNTP_SERVER_FILE    "/etc/nntpserver"
X
X/*
X *  External routine declarations
X */
X
Xextern char *getserverbyfile();
Xextern int server_init();
Xextern int get_tcp_socket();
Xextern int handle_server_response();
Xextern void put_server();
Xextern int get_server();
Xextern void close_server();
X
X/*
X *  External file descriptors for the server connection
X */
X
Xextern FILE *ser_wr_fp;
Xextern FILE *ser_wr_fp;
X
X
X/*
X * Response codes for NNTP server
X *
X * @(#)nntp.h    1.7    (Berkeley) 1/11/88
X *
X * First digit:
X *
X *    1xx    Informative message
X *    2xx    Command ok
X *    3xx    Command ok so far, continue
X *    4xx    Command was correct, but couldn't be performed
X *        for some specified reason.
X *    5xx    Command unimplemented, incorrect, or a
X *        program error has occured.
X *
X * Second digit:
X *
X *    x0x    Connection, setup, miscellaneous
X *    x1x    Newsgroup selection
X *    x2x    Article selection
X *    x3x    Distribution
X *    x4x    Posting
X */
X
X#define    CHAR_INF    '1'
X#define    CHAR_OK        '2'
X#define    CHAR_CONT    '3'
X#define    CHAR_ERR    '4'
X#define    CHAR_FATAL    '5'
X
X#define    INF_HELP    100    /* Help text on way */
X#define    INF_DEBUG    199    /* Debug output */
X
X#define    OK_CANPOST    200    /* Hello; you can post */
X#define    OK_NOPOST    201    /* Hello; you can't post */
X#define    OK_SLAVE    202    /* Slave status noted */
X#define    OK_GOODBYE    205    /* Closing connection */
X#define    OK_GROUP    211    /* Group selected */
X#define    OK_GROUPS    215    /* Newsgroups follow */
X
X#define OK_TASSINDEX    218    /* Tass index follows */
X
X#define    OK_ARTICLE    220    /* Article (head & body) follows */
X#define    OK_HEAD        221    /* Head follows */
X#define    OK_BODY        222    /* Body follows */
X#define    OK_NOTEXT    223    /* No text sent -- stat, next, last */
X#define    OK_NEWNEWS    230    /* New articles by message-id follow */
X#define    OK_NEWGROUPS    231    /* New newsgroups follow */
X#define    OK_XFERED    235    /* Article transferred successfully */
X#define    OK_POSTED    240    /* Article posted successfully */
X
X#define CONT_XFER    335    /* Continue to send article */
X#define    CONT_POST    340    /* Continue to post article */
X
X#define    ERR_GOODBYE    400    /* Have to hang up for some reason */
X#define    ERR_NOGROUP    411    /* No such newsgroup */
X#define    ERR_NCING    412    /* Not currently in newsgroup */
X
X#define ERR_NOTASS    418    /* No tin index for this group */
X
X#define    ERR_NOCRNT    420    /* No current article selected */
X#define    ERR_NONEXT    421    /* No next article in this group */
X#define    ERR_NOPREV    422    /* No previous article in this group */
X#define    ERR_NOARTIG    423    /* No such article in this group */
X#define ERR_NOART    430    /* No such article at all */
X#define ERR_GOTIT    435    /* Already got that article, don't send */
X#define ERR_XFERFAIL    436    /* Transfer failed */
X#define    ERR_XFERRJCT    437    /* Article rejected, don't resend */
X#define    ERR_NOPOST    440    /* Posting not allowed */
X#define    ERR_POSTFAIL    441    /* Posting failed */
X
X#define    ERR_COMMAND    500    /* Command not recognized */
X#define    ERR_CMDSYN    501    /* Command syntax error */
X#define    ERR_ACCESS    502    /* Access to server denied */
X#define ERR_FAULT    503    /* Program fault, command not performed */
X
X/* RFC 977 defines this; don't change it. */
X
X#define    NNTP_STRLEN    512
SHAR_EOF
$TOUCH -am 0923175591 nntp.h &&
chmod 0600 nntp.h ||
echo "restore of nntp.h failed"
set `wc -c nntp.h`;Wc_c=$1
if test "$Wc_c" != "3688"; then
    echo original size 3688, current size $Wc_c
fi
# ============= proto.h ==============
echo "x - extracting proto.h (Text)"
sed 's/^X//' << 'SHAR_EOF' > proto.h &&
X#ifdef __STDC__
X
X/* art.c */
Xlong my_atol(char *s, int n);
Xvoid find_base(void);
Xint num_of_arts(void);
Xint valid_artnum(long art);
Xint purge_needed(void);
Xvoid index_group(char *group, char *group_path);
Xint read_group(char *group, char *group_path);
Xvoid make_threads(int rethread);
Xchar *eat_re(char *s);
Xlong hash_s(char *s);
Xint parse_headers(int fd, struct header *h);
Xvoid dump_index(char *group, int killed);
Xvoid my_strncpy(char *p, char *q, int n);
Xint load_index(void);
Xvoid find_local_index(char *group);
Xvoid do_update(void);
Xvoid save_any_news(void);
Xvoid reload_index_file(char *group, int killed);
Xchar *parse_date(char *date, char *str);
Xint artnum_comp(char *p1, char *p2);
SHAR_EOF
echo "End of tin1.02 part 8"
echo "File proto.h is continued in part 9"
echo "9" > shar3_seq_.tmp
exit 0

exit 0 # Just in case...
--
Kent Landfield                   INTERNET: [e-mail]
Sterling Software, IMD           UUCP:     uunet!sparky!kent
Phone:    [phone]         FAX:      [phone]
Please send comp.sources.misc-related mail to [e-mail].