Annotation of sbbs/src/conio/win32cio.c, revision 1.1.1.1

1.1       root        1: /* $Id: win32cio.c,v 1.73 2006/05/18 06:22:51 rswindell Exp $ */
                      2: 
                      3: /****************************************************************************
                      4:  * @format.tab-size 4          (Plain Text/Source Code File Header)                    *
                      5:  * @format.use-tabs true       (see http://www.synchro.net/ptsc_hdr.html)              *
                      6:  *                                                                                                                                                     *
                      7:  * Copyright 2005 Rob Swindell - http://www.synchro.net/copyright.html         *
                      8:  *                                                                                                                                                     *
                      9:  * This library is free software; you can redistribute it and/or                       *
                     10:  * modify it under the terms of the GNU Lesser General Public License          *
                     11:  * as published by the Free Software Foundation; either version 2                      *
                     12:  * of the License, or (at your option) any later version.                                      *
                     13:  * See the GNU Lesser General Public License for more details: lgpl.txt or     *
                     14:  * http://www.fsf.org/copyleft/lesser.html                                                                     *
                     15:  *                                                                                                                                                     *
                     16:  * Anonymous FTP access to the most recent released source is available at     *
                     17:  * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net     *
                     18:  *                                                                                                                                                     *
                     19:  * Anonymous CVS access to the development source and modification history     *
                     20:  * is available at cvs.synchro.net:/cvsroot/sbbs, example:                                     *
                     21:  * cvs -d :pserver:[email protected]:/cvsroot/sbbs login                       *
                     22:  *     (just hit return, no password is necessary)                                                     *
                     23:  * cvs -d :pserver:[email protected]:/cvsroot/sbbs checkout src                *
                     24:  *                                                                                                                                                     *
                     25:  * For Synchronet coding style and modification guidelines, see                                *
                     26:  * http://www.synchro.net/source.html                                                                          *
                     27:  *                                                                                                                                                     *
                     28:  * You are encouraged to submit any modifications (preferably in Unix diff     *
                     29:  * format) via e-mail to [email protected]                                                                      *
                     30:  *                                                                                                                                                     *
                     31:  * Note: If this box doesn't appear square, then you need to fix your tabs.    *
                     32:  ****************************************************************************/
                     33: 
                     34: #include <windows.h>   /* INPUT_RECORD, etc. */
                     35: #include <genwrap.h>
                     36: #include <stdio.h>             /* stdin */
                     37: #if defined(_WIN32)
                     38:  #include <malloc.h>   /* alloca() on Win32 */
                     39: #endif
                     40: 
                     41: #if (defined CIOLIB_IMPORTS)
                     42:  #undef CIOLIB_IMPORTS
                     43: #endif
                     44: #if (defined CIOLIB_EXPORTS)
                     45:  #undef CIOLIB_EXPORTS
                     46: #endif
                     47: 
                     48: #include "ciolib.h"
                     49: #include "keys.h"
                     50: #include "vidmodes.h"
                     51: #include "win32cio.h"
                     52: 
                     53: const int      cio_tabs[10]={9,17,25,33,41,49,57,65,73,80};
                     54: 
                     55: struct keyvals {
                     56:        int     VirtualKeyCode
                     57:                ,Key
                     58:                ,Shift
                     59:                ,CTRL
                     60:                ,ALT;
                     61: };
                     62: 
                     63: const struct keyvals keyval[] =
                     64: {
                     65:        {VK_BACK, 0x08, 0x08, 0x7f, 0x0e00},
                     66:        {VK_TAB, 0x09, 0x0f00, 0x9400, 0xa500},
                     67:        {VK_RETURN, 0x0d, 0x0d, 0x0a, 0xa600},
                     68:        {VK_ESCAPE, 0x1b, 0x1b, 0x1b, 0x0100},
                     69:        {VK_SPACE, 0x20, 0x20, 0x0300, 0x20,},
                     70:        {'0', '0', ')', 0, 0x8100},
                     71:        {'1', '1', '!', 0, 0x7800},
                     72:        {'2', '2', '@', 0x0300, 0x7900},
                     73:        {'3', '3', '#', 0, 0x7a00},
                     74:        {'4', '4', '$', 0, 0x7b00},
                     75:        {'5', '5', '%', 0, 0x7c00},
                     76:        {'6', '6', '^', 0x1e, 0x7d00},
                     77:        {'7', '7', '&', 0, 0x7e00},
                     78:        {'8', '8', '*', 0, 0x7f00},
                     79:        {'9', '9', '(', 0, 0x8000},
                     80:        {'A', 'a', 'A', 0x01, 0x1e00},
                     81:        {'B', 'b', 'B', 0x02, 0x3000},
                     82:        {'C', 'c', 'C', 0x03, 0x2e00},
                     83:        {'D', 'd', 'D', 0x04, 0x2000},
                     84:        {'E', 'e', 'E', 0x05, 0x1200},
                     85:        {'F', 'f', 'F', 0x06, 0x2100},
                     86:        {'G', 'g', 'G', 0x07, 0x2200},
                     87:        {'H', 'h', 'H', 0x08, 0x2300},
                     88:        {'I', 'i', 'I', 0x09, 0x1700},
                     89:        {'J', 'j', 'J', 0x0a, 0x2400},
                     90:        {'K', 'k', 'K', 0x0b, 0x2500},
                     91:        {'L', 'l', 'L', 0x0c, 0x2600},
                     92:        {'M', 'm', 'M', 0x0d, 0x3200},
                     93:        {'N', 'n', 'N', 0x0e, 0x3100},
                     94:        {'O', 'o', 'O', 0x0f, 0x1800},
                     95:        {'P', 'p', 'P', 0x10, 0x1900},
                     96:        {'Q', 'q', 'Q', 0x11, 0x1000},
                     97:        {'R', 'r', 'R', 0x12, 0x1300},
                     98:        {'S', 's', 'S', 0x13, 0x1f00},
                     99:        {'T', 't', 'T', 0x14, 0x1400},
                    100:        {'U', 'u', 'U', 0x15, 0x1600},
                    101:        {'V', 'v', 'V', 0x16, 0x2f00},
                    102:        {'W', 'w', 'W', 0x17, 0x1100},
                    103:        {'X', 'x', 'X', 0x18, 0x2d00},
                    104:        {'Y', 'y', 'Y', 0x19, 0x1500},
                    105:        {'Z', 'z', 'Z', 0x1a, 0x2c00},
                    106:        {VK_PRIOR, 0x4900, 0x4900, 0x8400, 0x9900},
                    107:        {VK_NEXT, 0x5100, 0x5100, 0x7600, 0xa100},
                    108:        {VK_END, 0x4f00, 0x4f00, 0x7500, 0x9f00},
                    109:        {VK_HOME, 0x4700, 0x4700, 0x7700, 0x9700},
                    110:        {VK_LEFT, 0x4b00, 0x4b00, 0x7300, 0x9b00},
                    111:        {VK_UP, 0x4800, 0x4800, 0x8d00, 0x9800},
                    112:        {VK_RIGHT, 0x4d00, 0x4d00, 0x7400, 0x9d00},
                    113:        {VK_DOWN, 0x5000, 0x5000, 0x9100, 0xa000},
                    114:        {VK_INSERT, 0x5200, 0x5200, 0x9200, 0xa200},
                    115:        {VK_DELETE, 0x5300, 0x5300, 0x9300, 0xa300},
                    116:        {VK_NUMPAD0, '0', 0x5200, 0x9200, 0},
                    117:        {VK_NUMPAD1, '1', 0x4f00, 0x7500, 0},
                    118:        {VK_NUMPAD2, '2', 0x5000, 0x9100, 0},
                    119:        {VK_NUMPAD3, '3', 0x5100, 0x7600, 0},
                    120:        {VK_NUMPAD4, '4', 0x4b00, 0x7300, 0},
                    121:        {VK_NUMPAD5, '5', 0x4c00, 0x8f00, 0},
                    122:        {VK_NUMPAD6, '6', 0x4d00, 0x7400, 0},
                    123:        {VK_NUMPAD7, '7', 0x4700, 0x7700, 0},
                    124:        {VK_NUMPAD8, '8', 0x4800, 0x8d00, 0},
                    125:        {VK_NUMPAD9, '9', 0x4900, 0x8400, 0},
                    126:        {VK_MULTIPLY, '*', '*', 0x9600, 0x3700},
                    127:        {VK_ADD, '+', '+', 0x9000, 0x4e00},
                    128:        {VK_SUBTRACT, '-', '-', 0x8e00, 0x4a00},
                    129:        {VK_DECIMAL, '.', '.', 0x5300, 0x9300},
                    130:        {VK_DIVIDE, '/', '/', 0x9500, 0xa400},
                    131:        {VK_F1, 0x3b00, 0x5400, 0x5e00, 0x6800},
                    132:        {VK_F2, 0x3c00, 0x5500, 0x5f00, 0x6900},
                    133:        {VK_F3, 0x3d00, 0x5600, 0x6000, 0x6a00},
                    134:        {VK_F4, 0x3e00, 0x5700, 0x6100, 0x6b00},
                    135:        {VK_F5, 0x3f00, 0x5800, 0x6200, 0x6c00},
                    136:        {VK_F6, 0x4000, 0x5900, 0x6300, 0x6d00},
                    137:        {VK_F7, 0x4100, 0x5a00, 0x6400, 0x6e00},
                    138:        {VK_F8, 0x4200, 0x5b00, 0x6500, 0x6f00},
                    139:        {VK_F9, 0x4300, 0x5c00, 0x6600, 0x7000},
                    140:        {VK_F10, 0x4400, 0x5d00, 0x6700, 0x7100},
                    141:        {VK_F11, 0x8500, 0x8700, 0x8900, 0x8b00},
                    142:        {VK_F12, 0x8600, 0x8800, 0x8a00, 0x8c00},
                    143:        {0xdc, '\\', '|', 0x1c, 0x2b00},
                    144:        {0xbf, '/', '?', 0, 0x3500},
                    145:        {0xbd, '-', '_', 0x1f, 0x8200},
                    146:        {0xbb, '=', '+', 0, 0x8300},
                    147:        {0xdb, '[', '{', 0x1b, 0x1a00},
                    148:        {0xdd, ']', '}', 0x1d, 0x1b00},
                    149:        {0xba, ';', ':', 0, 0x2700},
                    150:        {0xde, '\'', '"', 0, 0x2800},
                    151:        {0xbc, ',', '<', 0, 0x3300},
                    152:        {0xbe, '.', '>', 0, 0x3400},
                    153:        {0xc0, '`', '~', 0, 0x2900},
                    154:        {0, 0, 0, 0, 0} /** END **/
                    155: };
                    156: 
                    157: static int domouse=1;
                    158: static DWORD last_state=0;
                    159: static int LastX=-1, LastY=-1;
                    160: static int xpos=1;
                    161: static int ypos=1;
                    162: 
                    163: static int currattr=7;
                    164: static int modeidx=3;
                    165: 
                    166: #if defined(_DEBUG)
                    167: static void dputs(const char* str)
                    168: {
                    169:        char msg[1024];
                    170: 
                    171:        SAFEPRINTF(msg,"%s\r\n",str);
                    172:        OutputDebugString(msg);
                    173: }
                    174: #endif
                    175: 
                    176: static void dprintf(const char* fmt, ...)
                    177: {
                    178: #if defined(_DEBUG)
                    179:        va_list argptr;
                    180:        char sbuf[1024];
                    181: 
                    182:     va_start(argptr,fmt);
                    183:     vsnprintf(sbuf,sizeof(sbuf),fmt,argptr);
                    184:        sbuf[sizeof(sbuf)-1]=0;
                    185:     va_end(argptr);
                    186:     dputs(sbuf);
                    187: #endif /* _DEBUG */
                    188: }
                    189: 
                    190: WORD DOStoWinAttr(int newattr)
                    191: {
                    192:        WORD ret=0;
                    193: 
                    194:        if(newattr&0x01)
                    195:                ret|=FOREGROUND_BLUE;
                    196:        if(newattr&0x02)
                    197:                ret|=FOREGROUND_GREEN;
                    198:        if(newattr&0x04)
                    199:                ret|=FOREGROUND_RED;
                    200:        if(newattr&0x08)
                    201:                ret|=FOREGROUND_INTENSITY;
                    202:        if(newattr&0x10)
                    203:                ret|=BACKGROUND_BLUE;
                    204:        if(newattr&0x20)
                    205:                ret|=BACKGROUND_GREEN;
                    206:        if(newattr&0x40)
                    207:                ret|=BACKGROUND_RED;
                    208:        if(newattr&0x80)
                    209:                ret|=BACKGROUND_INTENSITY;
                    210:        return(ret);
                    211: }
                    212: 
                    213: unsigned char WintoDOSAttr(WORD newattr)
                    214: {
                    215:        unsigned char ret=0;
                    216: 
                    217:        if(newattr&FOREGROUND_BLUE)
                    218:                ret|=0x01;
                    219:        if(newattr&FOREGROUND_GREEN)
                    220:                ret|=0x02;
                    221:        if(newattr&FOREGROUND_RED)
                    222:                ret|=0x04;
                    223:        if(newattr&FOREGROUND_INTENSITY)
                    224:                ret|=0x08;
                    225:        if(newattr&BACKGROUND_BLUE)
                    226:                ret|=0x10;
                    227:        if(newattr&BACKGROUND_GREEN)
                    228:                ret|=0x20;
                    229:        if(newattr&BACKGROUND_RED)
                    230:                ret|=0x40;
                    231:        if(newattr&BACKGROUND_INTENSITY)
                    232:                ret|=0x80;
                    233:        return(ret);
                    234: }
                    235: 
                    236: int win32_getchcode(WORD code, DWORD state)
                    237: {
                    238:        int i;
                    239: 
                    240:        for(i=0;keyval[i].Key;i++) {
                    241:                if(keyval[i].VirtualKeyCode==code) {
                    242:                        if(state & (RIGHT_ALT_PRESSED|LEFT_ALT_PRESSED))
                    243:                                return(keyval[i].ALT);
                    244:                        if(state & (RIGHT_CTRL_PRESSED|LEFT_CTRL_PRESSED))
                    245:                                return(keyval[i].CTRL);
                    246:                        if((state & (CAPSLOCK_ON)) && isalpha(keyval[i].Key)) {
                    247:                                if(!(state & SHIFT_PRESSED))
                    248:                                        return(keyval[i].Shift);
                    249:                        }
                    250:                        else {
                    251:                                if(state & (SHIFT_PRESSED))
                    252:                                        return(keyval[i].Shift);
                    253:                        }
                    254:                        return(keyval[i].Key);
                    255:                }
                    256:        }
                    257:        return(0);
                    258: }
                    259: 
                    260: int win32_keyboardio(int isgetch)
                    261: {
                    262:        INPUT_RECORD input;
                    263:        DWORD num=0;
                    264:        HANDLE h;
                    265:        static WORD lastch;
                    266: 
                    267:        if((h=GetStdHandle(STD_INPUT_HANDLE)) == INVALID_HANDLE_VALUE)
                    268:                return(0);
                    269: 
                    270:        while(1) {
                    271:                if(lastch) {
                    272:                        if(isgetch) {
                    273:                                BYTE ch;
                    274:                                ch=lastch&0xff;
                    275:                                lastch>>=8;
                    276:                                return(ch);
                    277:                        }
                    278:                        else
                    279:                                return(TRUE);
                    280:                }
                    281: 
                    282:                while(1) {
                    283:                        GetNumberOfConsoleInputEvents(h, &num);
                    284:                        if(num)
                    285:                                break;
                    286:                        if(mouse_trywait()) {
                    287:                                lastch=CIO_KEY_MOUSE;
                    288:                                break;
                    289:                        }
                    290:                        if(isgetch)
                    291:                                SLEEP(1);
                    292:                        else
                    293:                                return(FALSE);
                    294:                }
                    295: 
                    296:                if(lastch)
                    297:                        continue;
                    298: 
                    299:                if(!ReadConsoleInput(h, &input, 1, &num)
                    300:                                || !num || (input.EventType!=KEY_EVENT && input.EventType!=MOUSE_EVENT))
                    301:                        continue;
                    302: 
                    303:                switch(input.EventType) {
                    304:                        case KEY_EVENT:
                    305: 
                    306:                                dprintf("KEY_EVENT: KeyDown=%u"
                    307:                                        ,input.Event.KeyEvent.bKeyDown);
                    308:                                dprintf("           RepeatCount=%u"
                    309:                                        ,input.Event.KeyEvent.wRepeatCount);
                    310:                                dprintf("           VirtualKeyCode=0x%04hX"
                    311:                                        ,input.Event.KeyEvent.wVirtualKeyCode);
                    312:                                dprintf("           VirtualScanCode=0x%04hX"
                    313:                                        ,input.Event.KeyEvent.wVirtualScanCode);
                    314:                                dprintf("           uChar.AsciiChar=0x%02X (%u)"
                    315:                                        ,(BYTE)input.Event.KeyEvent.uChar.AsciiChar
                    316:                                        ,(BYTE)input.Event.KeyEvent.uChar.AsciiChar);
                    317:                                dprintf("           ControlKeyState=0x%08lX"
                    318:                                        ,input.Event.KeyEvent.dwControlKeyState); 
                    319: 
                    320:                                if(input.Event.KeyEvent.bKeyDown) {
                    321:                                        /* Is this an AltGr key? */
                    322:                                        if(((input.Event.KeyEvent.dwControlKeyState & (RIGHT_ALT_PRESSED|LEFT_CTRL_PRESSED)) == (RIGHT_ALT_PRESSED|LEFT_CTRL_PRESSED))
                    323:                                                        && (BYTE)input.Event.KeyEvent.uChar.AsciiChar) {
                    324:                                                lastch=(BYTE)input.Event.KeyEvent.uChar.AsciiChar;
                    325:                                        }
                    326:                                        /* Is this a modified char? */
                    327:                                        else if((input.Event.KeyEvent.dwControlKeyState & (RIGHT_ALT_PRESSED|LEFT_ALT_PRESSED|RIGHT_CTRL_PRESSED|LEFT_CTRL_PRESSED|ENHANCED_KEY))
                    328:                                                        || (input.Event.KeyEvent.wVirtualKeyCode >= VK_F1 && input.Event.KeyEvent.wVirtualKeyCode <= VK_F24)
                    329:                                                        || !input.Event.KeyEvent.uChar.AsciiChar) {
                    330:                                                lastch=win32_getchcode(input.Event.KeyEvent.wVirtualKeyCode, input.Event.KeyEvent.dwControlKeyState);
                    331:                                        }
                    332:                                        /* Must be a normal char then! */
                    333:                                        else {
                    334:                                                lastch=(BYTE)input.Event.KeyEvent.uChar.AsciiChar;
                    335:                                        }
                    336:                                } else if(input.Event.KeyEvent.wVirtualKeyCode == VK_MENU)
                    337:                                        lastch=(BYTE)input.Event.KeyEvent.uChar.AsciiChar;
                    338: 
                    339:                                break;
                    340:                        case MOUSE_EVENT:
                    341:                                if(domouse) {
                    342:                                        if(input.Event.MouseEvent.dwMousePosition.X+1 != LastX || input.Event.MouseEvent.dwMousePosition.Y+1 != LastY) {
                    343:                                                LastX=input.Event.MouseEvent.dwMousePosition.X+1;
                    344:                                                LastY=input.Event.MouseEvent.dwMousePosition.Y+1;
                    345:                                                ciomouse_gotevent(CIOLIB_MOUSE_MOVE,LastX,LastY);
                    346:                                        }
                    347:                                        if(last_state != input.Event.MouseEvent.dwButtonState) {
                    348:                                                switch(input.Event.MouseEvent.dwButtonState ^ last_state) {
                    349:                                                        case FROM_LEFT_1ST_BUTTON_PRESSED:
                    350:                                                                if(input.Event.MouseEvent.dwButtonState & FROM_LEFT_1ST_BUTTON_PRESSED)
                    351:                                                                        ciomouse_gotevent(CIOLIB_BUTTON_1_PRESS,input.Event.MouseEvent.dwMousePosition.X+1,input.Event.MouseEvent.dwMousePosition.Y+1);
                    352:                                                                else
                    353:                                                                        ciomouse_gotevent(CIOLIB_BUTTON_1_RELEASE,input.Event.MouseEvent.dwMousePosition.X+1,input.Event.MouseEvent.dwMousePosition.Y+1);
                    354:                                                                break;
                    355:                                                        case FROM_LEFT_2ND_BUTTON_PRESSED:
                    356:                                                                if(input.Event.MouseEvent.dwButtonState & FROM_LEFT_2ND_BUTTON_PRESSED)
                    357:                                                                        ciomouse_gotevent(CIOLIB_BUTTON_2_PRESS,input.Event.MouseEvent.dwMousePosition.X+1,input.Event.MouseEvent.dwMousePosition.Y+1);
                    358:                                                                else
                    359:                                                                        ciomouse_gotevent(CIOLIB_BUTTON_2_RELEASE,input.Event.MouseEvent.dwMousePosition.X+1,input.Event.MouseEvent.dwMousePosition.Y+1);
                    360:                                                                break;
                    361:                                                        case RIGHTMOST_BUTTON_PRESSED:
                    362:                                                                if(input.Event.MouseEvent.dwButtonState & RIGHTMOST_BUTTON_PRESSED)
                    363:                                                                        ciomouse_gotevent(CIOLIB_BUTTON_3_PRESS,input.Event.MouseEvent.dwMousePosition.X+1,input.Event.MouseEvent.dwMousePosition.Y+1);
                    364:                                                                else
                    365:                                                                        ciomouse_gotevent(CIOLIB_BUTTON_3_RELEASE,input.Event.MouseEvent.dwMousePosition.X+1,input.Event.MouseEvent.dwMousePosition.Y+1);
                    366:                                                                break;
                    367:                                                }
                    368:                                                last_state=input.Event.MouseEvent.dwButtonState;
                    369:                                        }
                    370:                                }
                    371:                }
                    372:        }
                    373: }
                    374: 
                    375: int win32_kbhit(void)
                    376: {
                    377:        return(win32_keyboardio(FALSE));
                    378: }
                    379: 
                    380: int win32_getch(void)
                    381: {
                    382:        int ret=win32_keyboardio(TRUE);
                    383:        dprintf("win32_getch = 0x%02X (%u)", (BYTE)ret, (BYTE)ret);
                    384:        return(ret);
                    385: }
                    386: 
                    387: int win32_getche(void)
                    388: {
                    389:        int ch;
                    390: 
                    391:        ch=win32_getch();
                    392:        if(ch)
                    393:                putch(ch);
                    394:        return(ch);
                    395: }
                    396: 
                    397: #ifndef ENABLE_EXTENDED_FLAGS
                    398: #define ENABLE_INSERT_MODE             0x0020
                    399: #define ENABLE_QUICK_EDIT_MODE 0x0040
                    400: #define ENABLE_EXTENDED_FLAGS  0x0080
                    401: #define ENABLE_AUTO_POSITION   0x0100
                    402: #endif
                    403: 
                    404: static DWORD   orig_in_conmode=0;
                    405: static DWORD   orig_out_conmode=0;
                    406: static void *  win32_suspendbuf=NULL;
                    407: 
                    408: void win32_suspend(void)
                    409: {
                    410:        HANDLE h;
                    411: 
                    412:        if((h=GetStdHandle(STD_INPUT_HANDLE)) != INVALID_HANDLE_VALUE)
                    413:                SetConsoleMode(h, orig_in_conmode);
                    414:        if((h=GetStdHandle(STD_OUTPUT_HANDLE)) != INVALID_HANDLE_VALUE)
                    415:                SetConsoleMode(h, orig_out_conmode);
                    416: }
                    417: 
                    418: void win32_resume(void)
                    419: {
                    420:        DWORD   conmode;
                    421:        HANDLE  h;
                    422: 
                    423:     conmode=orig_in_conmode;
                    424:     conmode&=~(ENABLE_PROCESSED_INPUT|ENABLE_QUICK_EDIT_MODE);
                    425:     conmode|=ENABLE_MOUSE_INPUT;
                    426:        if((h=GetStdHandle(STD_INPUT_HANDLE)) != INVALID_HANDLE_VALUE)
                    427:                SetConsoleMode(h, conmode);
                    428: 
                    429:     conmode=orig_out_conmode;
                    430:     conmode&=~ENABLE_PROCESSED_OUTPUT;
                    431:     conmode&=~ENABLE_WRAP_AT_EOL_OUTPUT;
                    432:        if((h=GetStdHandle(STD_OUTPUT_HANDLE)) != INVALID_HANDLE_VALUE)
                    433:                SetConsoleMode(h, conmode);
                    434: }
                    435: 
                    436: int win32_initciolib(long inmode)
                    437: {
                    438:        DWORD   conmode;
                    439:        int             i,j;
                    440:        HANDLE  h;
                    441:        CONSOLE_SCREEN_BUFFER_INFO      sbuff;
                    442: 
                    443:        if(!isatty(fileno(stdin))) {
                    444:                if(!AllocConsole())
                    445:                        return(0);
                    446:        }
                    447: 
                    448:        if((h=GetStdHandle(STD_INPUT_HANDLE))==INVALID_HANDLE_VALUE
                    449:                || !GetConsoleMode(h, &orig_in_conmode))
                    450:                return(0);
                    451:        conmode=orig_in_conmode;
                    452:        conmode&=~(ENABLE_PROCESSED_INPUT|ENABLE_QUICK_EDIT_MODE);
                    453:        conmode|=ENABLE_MOUSE_INPUT;
                    454:        if(!SetConsoleMode(h, conmode))
                    455:                return(0);
                    456: 
                    457:        if((h=GetStdHandle(STD_OUTPUT_HANDLE))==INVALID_HANDLE_VALUE
                    458:                || !GetConsoleMode(h, &orig_out_conmode))
                    459:                return(0);
                    460:        conmode=orig_out_conmode;
                    461:        conmode&=~ENABLE_PROCESSED_OUTPUT;
                    462:        conmode&=~ENABLE_WRAP_AT_EOL_OUTPUT;
                    463:        if(!SetConsoleMode(h, conmode))
                    464:                return(0);
                    465: 
                    466:        if(GetConsoleScreenBufferInfo(h, &sbuff)==0) {
                    467:                win32_textmode(C80);
                    468:        }
                    469:        else {
                    470:                /* Switch to closest mode to current screen size */
                    471:                i=sbuff.srWindow.Right-sbuff.srWindow.Left+1;
                    472:                j=sbuff.srWindow.Bottom-sbuff.srWindow.Top+1;
                    473:                if(i>=80) {
                    474:                        if(j<21)
                    475:                                win32_textmode(C80X14);
                    476:                        else if(j<25)
                    477:                                win32_textmode(C80X21);
                    478:                        else if(j<28)
                    479:                                win32_textmode(C80);
                    480:                        else if(j<43)
                    481:                                win32_textmode(C80X28);
                    482:                        else if(j<50)
                    483:                                win32_textmode(C80X43);
                    484:                        else if(j<60)
                    485:                                win32_textmode(C80X50);
                    486:                        else
                    487:                                win32_textmode(C80X60);
                    488:                }
                    489:                else {
                    490:                        if(j<21)
                    491:                                win32_textmode(C40X14);
                    492:                        else if(j<25)
                    493:                                win32_textmode(C40X21);
                    494:                        else if(j<28)
                    495:                                win32_textmode(C40);
                    496:                        else if(j<43)
                    497:                                win32_textmode(C40X28);
                    498:                        else if(j<50)
                    499:                                win32_textmode(C40X43);
                    500:                        else if(j<60)
                    501:                                win32_textmode(C40X50);
                    502:                        else
                    503:                                win32_textmode(C40X60);
                    504:                }
                    505:        }
                    506: 
                    507:        cio_api.mouse=1;
                    508:        return(1);
                    509: }
                    510: 
                    511: int win32_hidemouse(void)
                    512: {
                    513:        /* domouse=0; */
                    514:        return(0);
                    515: }
                    516: 
                    517: int win32_showmouse(void)
                    518: {
                    519:        /* domouse=1; */
                    520:        return(0);
                    521: }
                    522: 
                    523: void win32_textmode(int mode)
                    524: {
                    525:        int             i;
                    526:        HANDLE  h;
                    527:        COORD   sz;
                    528:        SMALL_RECT      rc;
                    529: 
                    530:        for(i=0;i<NUMMODES;i++) {
                    531:                if(vparams[i].mode==mode)
                    532:                        modeidx=i;
                    533:        }
                    534:        sz.X=vparams[modeidx].cols;
                    535:        sz.Y=vparams[modeidx].rows;
                    536:        rc.Left=0;
                    537:        rc.Right=vparams[modeidx].cols-1;
                    538:        rc.Top=0;
                    539:        rc.Bottom=vparams[modeidx].rows-1;
                    540: 
                    541:        if((h=GetStdHandle(STD_OUTPUT_HANDLE)) != INVALID_HANDLE_VALUE) {
                    542:                SetConsoleScreenBufferSize(h,sz);
                    543:                SetConsoleWindowInfo(h,TRUE,&rc);
                    544:                SetConsoleScreenBufferSize(h,sz);
                    545:        }
                    546: }
                    547: 
                    548: int win32_gettext(int left, int top, int right, int bottom, void* buf)
                    549: {
                    550:        CHAR_INFO *ci;
                    551:        int     x;
                    552:        int     y;
                    553:        COORD   bs;
                    554:        COORD   bc;
                    555:        HANDLE  h;
                    556:        SMALL_RECT      reg;
                    557:        unsigned char   *bu;
                    558: 
                    559:        bu=buf;
                    560:        bs.X=right-left+1;
                    561:        bs.Y=bottom-top+1;
                    562:        bc.X=0;
                    563:        bc.Y=0;
                    564:        reg.Left=left-1;
                    565:        reg.Right=right-1;
                    566:        reg.Top=top-1;
                    567:        reg.Bottom=bottom-1;
                    568:        ci=(CHAR_INFO *)alloca(sizeof(CHAR_INFO)*(bs.X*bs.Y));
                    569:        if((h=GetStdHandle(STD_OUTPUT_HANDLE)) != INVALID_HANDLE_VALUE)
                    570:                ReadConsoleOutput(h,ci,bs,bc,&reg);
                    571:        for(y=0;y<=(bottom-top);y++) {
                    572:                for(x=0;x<=(right-left);x++) {
                    573:                        bu[((y*bs.X)+x)*2]=ci[(y*bs.X)+x].Char.AsciiChar;
                    574:                        bu[(((y*bs.X)+x)*2)+1]=WintoDOSAttr(ci[(y*bs.X)+x].Attributes);
                    575:                }
                    576:        }
                    577:        return 1;
                    578: }
                    579: 
                    580: void win32_gettextinfo(struct text_info* info)
                    581: {
                    582:        info->currmode=vparams[modeidx].mode;
                    583:        info->curx=xpos;
                    584:        info->cury=ypos;
                    585:        info->attribute=currattr;
                    586:        info->screenheight=vparams[modeidx].rows;
                    587:        info->screenwidth=vparams[modeidx].cols;
                    588: }
                    589: 
                    590: void win32_gotoxy(int x, int y)
                    591: {
                    592:        COORD   cp;
                    593:        HANDLE  h;
                    594: 
                    595:        xpos=x;
                    596:        ypos=y;
                    597:        cp.X=x-1;
                    598:        cp.Y=y-1;
                    599:        if(!hold_update && (h=GetStdHandle(STD_OUTPUT_HANDLE)) != INVALID_HANDLE_VALUE)
                    600:                SetConsoleCursorPosition(h,cp);
                    601: }
                    602: 
                    603: void win32_highvideo(void)
                    604: {
                    605:        win32_textattr(currattr|0x08);
                    606: }
                    607: 
                    608: 
                    609: void win32_lowvideo(void)
                    610: {
                    611:        win32_textattr(currattr&0xf8);
                    612: }
                    613: 
                    614: 
                    615: void win32_normvideo(void)
                    616: {
                    617:        win32_textattr(7);
                    618: }
                    619: 
                    620: int win32_puttext(int left, int top, int right, int bottom, void* buf)
                    621: {
                    622:        CHAR_INFO *ci;
                    623:        int     x;
                    624:        int     y;
                    625:        HANDLE  h;
                    626:        COORD   bs;
                    627:        COORD   bc;
                    628:        SMALL_RECT      reg;
                    629:        unsigned char   *bu;
                    630: 
                    631:        bu=buf;
                    632:        bs.X=right-left+1;
                    633:        bs.Y=bottom-top+1;
                    634:        bc.X=0;
                    635:        bc.Y=0;
                    636:        reg.Left=left-1;
                    637:        reg.Right=right-1;
                    638:        reg.Top=top-1;
                    639:        reg.Bottom=bottom-1;
                    640:        ci=(CHAR_INFO *)alloca(sizeof(CHAR_INFO)*(bs.X*bs.Y));
                    641:        for(y=0;y<bs.Y;y++) {
                    642:                for(x=0;x<bs.X;x++) {
                    643:                        ci[(y*bs.X)+x].Char.AsciiChar=bu[((y*bs.X)+x)*2];
                    644:                        ci[(y*bs.X)+x].Attributes=DOStoWinAttr(bu[(((y*bs.X)+x)*2)+1]);
                    645:                }
                    646:        }
                    647:        if((h=GetStdHandle(STD_OUTPUT_HANDLE)) != INVALID_HANDLE_VALUE)
                    648:                WriteConsoleOutput(h,ci,bs,bc,&reg);
                    649:        return 1;
                    650: }
                    651: 
                    652: void win32_textattr(int newattr)
                    653: {
                    654:        /* SetConsoleTextAttribute(GetStdHandle(STD_OUTPUT_HANDLE),DOStoWinAttr(newattr)); */
                    655:        currattr=newattr;
                    656: }
                    657: 
                    658: 
                    659: void win32_textbackground(int newcolor)
                    660: {
                    661:        win32_textattr((currattr&0x0f)|((newcolor&0xf0)<<4));
                    662: }
                    663: 
                    664: 
                    665: void win32_textcolor(int newcolor)
                    666: {
                    667:        win32_textattr((currattr&0xf0)|((newcolor&0x0f)<<4));
                    668: }
                    669: 
                    670: void win32_setcursortype(int type)
                    671: {
                    672:        HANDLE h;
                    673:        CONSOLE_CURSOR_INFO     ci;
                    674: 
                    675:        switch(type) {
                    676:                case _NOCURSOR:
                    677:                        ci.bVisible=FALSE;
                    678:                        ci.dwSize=1;
                    679:                        break;
                    680:                
                    681:                case _SOLIDCURSOR:
                    682:                        ci.bVisible=TRUE;
                    683:                        ci.dwSize=99;
                    684:                        break;
                    685:                
                    686:                default:        /* Normal cursor */
                    687:                        ci.bVisible=TRUE;
                    688:                        ci.dwSize=13;
                    689:                        break;
                    690:        }
                    691:        if((h=GetStdHandle(STD_OUTPUT_HANDLE)) != INVALID_HANDLE_VALUE)
                    692:                SetConsoleCursorInfo(h,&ci);
                    693: }
                    694: 
                    695: int win32_wherex(void)
                    696: {
                    697:        return(xpos);
                    698: }
                    699: 
                    700: int win32_wherey(void)
                    701: {
                    702:        return(ypos);
                    703: }
                    704: 
                    705: int win32_putch(int ch)
                    706: {
                    707:        struct text_info ti;
                    708:        unsigned char buf[2];
                    709:        int i;
                    710: 
                    711:        buf[0]=ch;
                    712:        buf[1]=currattr;
                    713: 
                    714:        switch(ch) {
                    715:                case '\r':
                    716:                        gotoxy(1,wherey());
                    717:                        break;
                    718:                case '\n':
                    719:                        gettextinfo(&ti);
                    720:                        if(ti.cury==ti.winbottom-ti.wintop+1)
                    721:                                wscroll();
                    722:                        else
                    723:                                gotoxy(ti.curx,ti.cury+1);
                    724:                        break;
                    725:                case '\b':
                    726:                        gettextinfo(&ti);
                    727:                        if(ti.curx>1) {
                    728:                                buf[0]=' ';
                    729:                                gotoxy(ti.curx-1,ti.cury);
                    730:                                puttext(ti.winleft+ti.curx-2, ti.wintop+ti.cury-1,ti.winleft+ti.curx-2, ti.wintop+ti.cury-1,buf);
                    731:                        }
                    732:                        break;
                    733:                case 7:         /* Bell */
                    734:                        MessageBeep(MB_OK);
                    735:                        break;
                    736:                case '\t':
                    737:                        for(i=0;i<10;i++) {
                    738:                                if(cio_tabs[i]>wherex()) {
                    739:                                        while(wherex()<cio_tabs[i]) {
                    740:                                                putch(' ');
                    741:                                        }
                    742:                                        break;
                    743:                                }
                    744:                        }
                    745:                        if(i==10) {
                    746:                                putch('\r');
                    747:                                putch('\n');
                    748:                        }
                    749:                        break;
                    750:                default:
                    751:                        gettextinfo(&ti);
                    752:                        if(ti.cury==ti.winbottom-ti.wintop+1
                    753:                                        && ti.curx==ti.winright-ti.winleft+1) {
                    754:                                puttext(ti.winleft+ti.curx-1, ti.wintop+ti.cury-1,ti.winleft+ti.curx-1, ti.wintop+ti.cury-1,buf);
                    755:                                wscroll();
                    756:                                gotoxy(1,ti.cury);
                    757:                        }
                    758:                        else {
                    759:                                if(ti.curx==ti.winright-ti.winleft+1) {
                    760:                                        puttext(ti.winleft+ti.curx-1, ti.wintop+ti.cury-1,ti.winleft+ti.curx-1, ti.wintop+ti.cury-1,buf);
                    761:                                        gotoxy(1,ti.cury+1);
                    762:                                }
                    763:                                else {
                    764:                                        puttext(ti.winleft+ti.curx-1, ti.wintop+ti.cury-1,ti.winleft+ti.curx-1, ti.wintop+ti.cury-1,buf);
                    765:                                        gotoxy(ti.curx+1,ti.cury);
                    766:                                }
                    767:                        }
                    768:                        break;
                    769:        }
                    770:        return(ch);
                    771: }
                    772: 
                    773: void win32_settitle(const char *title)
                    774: {
                    775:        SetConsoleTitle(title);
                    776: }
                    777: 
                    778: void win32_copytext(const char *text, size_t buflen)
                    779: {
                    780:        HGLOBAL clipbuf;
                    781:        LPTSTR  clip;
                    782: 
                    783:        if(!OpenClipboard(NULL))
                    784:                return;
                    785:        EmptyClipboard();
                    786:        clipbuf=GlobalAlloc(GMEM_MOVEABLE, buflen+1);
                    787:        if(clipbuf==NULL) {
                    788:                CloseClipboard();
                    789:                return;
                    790:        }
                    791:        clip=GlobalLock(clipbuf);
                    792:        memcpy(clip, text, buflen);
                    793:        clip[buflen]=0;
                    794:        GlobalUnlock(clipbuf);
                    795:        SetClipboardData(CF_OEMTEXT, clipbuf);
                    796:        CloseClipboard();
                    797: }
                    798: 
                    799: char *win32_getcliptext(void)
                    800: {
                    801:        HGLOBAL clipbuf;
                    802:        LPTSTR  clip;
                    803:        char *ret;
                    804: 
                    805:        if(!IsClipboardFormatAvailable(CF_OEMTEXT))
                    806:                return(NULL);
                    807:        if(!OpenClipboard(NULL))
                    808:                return(NULL);
                    809:        clipbuf=GetClipboardData(CF_OEMTEXT);
                    810:        if(clipbuf!=NULL) {
                    811:                clip=GlobalLock(clipbuf);
                    812:                ret=(char *)malloc(strlen(clip)+1);
                    813:                if(ret != NULL)
                    814:                        strcpy(ret, clip);
                    815:                GlobalUnlock(clipbuf);
                    816:        }
                    817:        CloseClipboard();
                    818:        
                    819:        return(ret);
                    820: }
                    821: 
                    822: void win32_delay(long msec)
                    823: {
                    824:        SLEEP(msec);
                    825: }

unix.superglobalmegacorp.com

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