Return to display_mail.c CVS log

Up to [MW Coherent from dump] / coherent / d / support / bbsadmin

Annotation of coherent/d/support/bbsadmin/display_mail.c, revision 1.1

1.1     ! root        1: #include <stdio.h>
        !             2: #include <curses.h>
        !             3: #include "contents.h"
        !             4: #include "maillist.h"
        !             5: 
        !             6: void display_mail (master_win,win3,row,col,screen_num)
        !             7: WINDOW *master_win, *win3;
        !             8: int row, col, screen_num;
        !             9: 
        !            10: {
        !            11: FILE *infp;
        !            12: char choice = '\0';
        !            13: 
        !            14:        if((infp=fopen(workfile,"r")) == NULL)
        !            15:                {
        !            16:                noraw();
        !            17:                endwin();
        !            18:                printf("(mail)ADD_DEL_SCREEN: could'nt open file for input!\n");
        !            19:                exit(1);
        !            20:                }
        !            21: 
        !            22:        /* draw entry template */
        !            23:        add_del_screen(master_win);
        !            24:        
        !            25:        /* get the desired record */
        !            26:        fseek(infp,MAIL_FORMULA,0l);
        !            27:        fread(&mail_rec,sizeof(struct mail),1,infp);
        !            28: 
        !            29: 
        !            30:        /* print the info from this record */
        !            31:        wstandout(master_win);
        !            32:        
        !            33:        wmove(master_win,SITEHI);
        !            34:        waddstr(master_win,mail_rec.site);
        !            35: 
        !            36:        wmove(master_win,LOGHI);
        !            37:        waddstr(master_win,mail_rec.login);
        !            38: 
        !            39:        wmove(master_win,STATEHI);
        !            40:        waddstr(master_win,mail_rec.state);
        !            41:        
        !            42:        wmove(master_win,CITYHI);
        !            43:        waddstr(master_win,mail_rec.city);
        !            44: 
        !            45:        wstandend(master_win);
        !            46:        wrefresh(master_win);
        !            47:        fclose(infp);
        !            48: 
        !            49: 
        !            50: 
        !            51:        /* prompt the user to delete the record */
        !            52: 
        !            53:        wclear(win3);
        !            54:        wmove(win3,0,0);
        !            55:        waddstr(win3,"Press [y] to delete, or");
        !            56:        wmove(win3,1,0);
        !            57:        waddstr(win3,"any other to abort.");
        !            58:        wrefresh(win3);
        !            59: 
        !            60:                
        !            61:        while(choice == '\0')
        !            62:                choice = wgetch(win3);
        !            63: 
        !            64: 
        !            65:        /* if the user really chose to delete the record, then call del_rec */
        !            66: 
        !            67:        if ((choice == 'y') || (choice == 'Y'))
        !            68:                {
        !            69:                wclear(win3);
        !            70:                wrefresh(win3);
        !            71:                del_rec(win3,row,col,screen_num);
        !            72:                }
        !            73: 
        !            74:        wclear(master_win);
        !            75:        wrefresh(master_win);
        !            76:        wclear(win3);
        !            77:        wmove(win3,1,0);
        !            78:        waddstr(win3,"Press <RETURN>");
        !            79:        wrefresh(win3);
        !            80:        while (13 != wgetch(win3));
        !            81: 
        !            82: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.