Annotation of sbbs/src/sbbs3/asc2ans.c, revision 1.1

1.1     ! root        1: /* asc2ans.c */
        !             2: 
        !             3: /* Converts Synchronet Ctrl-A codes into ANSI escape sequences */
        !             4: 
        !             5: /* $Id: asc2ans.c,v 1.4 2006/05/09 23:03:09 deuce Exp $ */
        !             6: 
        !             7: /****************************************************************************
        !             8:  * @format.tab-size 4          (Plain Text/Source Code File Header)                    *
        !             9:  * @format.use-tabs true       (see http://www.synchro.net/ptsc_hdr.html)              *
        !            10:  *                                                                                                                                                     *
        !            11:  * Copyright 2003 Rob Swindell - http://www.synchro.net/copyright.html         *
        !            12:  *                                                                                                                                                     *
        !            13:  * This program is free software; you can redistribute it and/or                       *
        !            14:  * modify it under the terms of the GNU General Public License                         *
        !            15:  * as published by the Free Software Foundation; either version 2                      *
        !            16:  * of the License, or (at your option) any later version.                                      *
        !            17:  * See the GNU General Public License for more details: gpl.txt or                     *
        !            18:  * http://www.fsf.org/copyleft/gpl.html                                                                                *
        !            19:  *                                                                                                                                                     *
        !            20:  * Anonymous FTP access to the most recent released source is available at     *
        !            21:  * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net     *
        !            22:  *                                                                                                                                                     *
        !            23:  * Anonymous CVS access to the development source and modification history     *
        !            24:  * is available at cvs.synchro.net:/cvsroot/sbbs, example:                                     *
        !            25:  * cvs -d :pserver:[email protected]:/cvsroot/sbbs login                       *
        !            26:  *     (just hit return, no password is necessary)                                                     *
        !            27:  * cvs -d :pserver:[email protected]:/cvsroot/sbbs checkout src                *
        !            28:  *                                                                                                                                                     *
        !            29:  * For Synchronet coding style and modification guidelines, see                                *
        !            30:  * http://www.synchro.net/source.html                                                                          *
        !            31:  *                                                                                                                                                     *
        !            32:  * You are encouraged to submit any modifications (preferably in Unix diff     *
        !            33:  * format) via e-mail to [email protected]                                                                      *
        !            34:  *                                                                                                                                                     *
        !            35:  * Note: If this box doesn't appear square, then you need to fix your tabs.    *
        !            36:  ****************************************************************************/
        !            37: 
        !            38: #include <stdio.h>
        !            39: #include <ctype.h>     /* toupper */
        !            40: #include <string.h>    /* strcmp */
        !            41: 
        !            42: #define ANSI fprintf(out,"\x1b[")
        !            43: 
        !            44: int main(int argc, char **argv)
        !            45: {
        !            46:        char    revision[16];
        !            47:        int             ch;
        !            48:        FILE*   in;
        !            49:        FILE*   out;
        !            50: 
        !            51:        sscanf("$Revision: 1.4 $", "%*s %s", revision);
        !            52: 
        !            53:        if(argc<2) {
        !            54:                fprintf(stderr,"\nasc2ans %s\n",revision);
        !            55:                fprintf(stderr,"\nusage: %s infile.asc [outfile.ans]\n",argv[0]);
        !            56:                return(0)        !            57:        }
        !            58: 
        !            59:        if(strcmp(argv[1],"-")) {
        !            60:                if((in=fopen(argv[1],"rb"))==NULL) {
        !            61:                        perror(argv[1]);
        !            62:                        return(1);
        !            63:                }
        !            64:        }
        !            65:        else
        !            66:                in=stdin;
        !            67: 
        !            68:        if(argc > 2 && (strcmp(argv[2],"-"))) {
        !            69:                if((out=fopen(argv[2],"wb"))==NULL) {
        !            70:                        perror(argv[2]);
        !            71:                        return(1);
        !            72:                }
        !            73:        }
        !            74:        else
        !            75:                out=stdout;
        !            76: 
        !            77:        while((ch=fgetc(in))!=EOF) {
        !            78:                if(ch==1) { /* ctrl-a */
        !            79:                        ch=fgetc(in);
        !            80:                        if(ch==EOF)
        !            81:                                break;
        !            82:                        if(ch>=0x7f) {                                  /* move cursor right x columns */
        !            83:                                ANSI;
        !            84:                                fprintf(out,"%uC",ch-0x7f);
        !            85:                                continue; 
        !            86:                        }
        !            87:                        switch(toupper(ch)) {
        !            88:                                case 'A':
        !            89:                                        fputc('\1',out);
        !            90:                                        break;
        !            91:                                case '<':
        !            92:                                        fputc('\b',out);
        !            93:                                        break;
        !            94:                                case '>':
        !            95:                                        ANSI;
        !            96:                                        fputc('K',out);
        !            97:                                        break;
        !            98:                                case '[':
        !            99:                                        fputc('\r',out);
        !           100:                                        break;
        !           101:                                case ']':
        !           102:                                        fputc('\n',out);
        !           103:                                        break;
        !           104:                                case 'L':
        !           105:                                        ANSI;
        !           106:                                        fprintf(out,"2J");
        !           107:                                        break;
        !           108:                                case '-':
        !           109:                                case '_':
        !           110:                                case 'N':
        !           111:                                        ANSI;
        !           112:                                        fprintf(out,"0m");
        !           113:                                        break;
        !           114:                                case 'H':
        !           115:                                        ANSI;
        !           116:                                        fprintf(out,"1m");
        !           117:                                        break;
        !           118:                                case 'I':
        !           119:                                        ANSI;
        !           120:                                        fprintf(out,"5m");
        !           121:                                        break;
        !           122:                                case 'K':
        !           123:                                        ANSI;
        !           124:                                        fprintf(out,"30m");
        !           125:                                        break;
        !           126:                                case 'R':
        !           127:                                        ANSI;
        !           128:                                        fprintf(out,"31m");
        !           129:                                        break;
        !           130:                                case 'G':
        !           131:                                        ANSI;
        !           132:                                        fprintf(out,"32m");
        !           133:                                        break;
        !           134:                                case 'Y':
        !           135:                                        ANSI;
        !           136:                                        fprintf(out,"33m");
        !           137:                                        break;
        !           138:                                case 'B':
        !           139:                                        ANSI;
        !           140:                                        fprintf(out,"34m");
        !           141:                                        break;
        !           142:                                case 'M':
        !           143:                                        ANSI;
        !           144:                                        fprintf(out,"35m");
        !           145:                                        break;
        !           146:                                case 'C':
        !           147:                                        ANSI;
        !           148:                                        fprintf(out,"36m");
        !           149:                                        break;
        !           150:                                case 'W':
        !           151:                                        ANSI;
        !           152:                                        fprintf(out,"37m");
        !           153:                                        break;
        !           154:                                case '0':
        !           155:                                        ANSI;
        !           156:                                        fprintf(out,"40m");
        !           157:                                        break;
        !           158:                                case '1':
        !           159:                                        ANSI;
        !           160:                                        fprintf(out,"41m");
        !           161:                                        break;
        !           162:                                case '2':
        !           163:                                        ANSI;
        !           164:                                        fprintf(out,"42m");
        !           165:                                        break;
        !           166:                                case '3':
        !           167:                                        ANSI;
        !           168:                                        fprintf(out,"43m");
        !           169:                                        break;
        !           170:                                case '4':
        !           171:                                        ANSI;
        !           172:                                        fprintf(out,"44m");
        !           173:                                        break;
        !           174:                                case '5':
        !           175:                                        ANSI;
        !           176:                                        fprintf(out,"45m");
        !           177:                                        break;
        !           178:                                case '6':
        !           179:                                        ANSI;
        !           180:                                        fprintf(out,"46m");
        !           181:                                        break;
        !           182:                                case '7':
        !           183:                                        ANSI;
        !           184:                                        fprintf(out,"47m");
        !           185:                                        break;
        !           186:                                default:
        !           187:                                        fprintf(out,"\1%c",ch);
        !           188:                                        break; 
        !           189:                        } 
        !           190:                }
        !           191:                else
        !           192:                        fputc(ch,out); 
        !           193:        }
        !           194: 
        !           195:        return(0);
        !           196: }      
        !           197: 
        !           198: 
        !           199: 
        !           200: 

unix.superglobalmegacorp.com

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