lbbs/src/io.c

/***************************************************************************
                            io.c  -  description
                             -------------------
    begin                : Mon Oct 18 2004
    copyright            : (C) 2004 by Leaflet
    email                : leaflet@leafok.com
 ***************************************************************************/

/***************************************************************************
 *                                                                         *
 *   This program is free software; you can redistribute it and/or modify  *
 *   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 ***************************************************************************/

#include "io.h"
#include "common.h"
#include <stdio.h>
#include <stdarg.h>

int
outc(char c)
{
  int retval;

  retval = printf("%c",c);

  return retval;
}

int
prints(const char * format, ...)
{
  va_list args;
  int retval;

  va_start (args, format);
  retval = vfprintf (stdout, format, args);
  va_end (args);

  return retval;
}

int
iflush()
{
  int retval;
  
  retval = fflush (stdout);
  
  return retval;
}

int
igetch ()
{
  char c, tmp[256];
  static char buf[256];
  int out = 0, loop = 1, in_esc = 0, in_ascii = 0, i = 0, j;
  static int len =0 , pos = 0;

  if (pos >= len)
  {
    len = s_receive (socket_client, buf, 255, "");
    pos = 0;

    //For debug
    //for (j = 0; j < len; j++)
    //  log_std ("[%d]\n", buf[j]);
  }

  while (pos < len)
    {
      c = buf[pos++];

      if (c == '\0')
      {
        out = c;
        break;
      }

      if (c == ESC_KEY)
        {
          if (in_esc == 0)
            {
              in_esc = 1;
              in_ascii = 1;
              i = 0;
              continue;
            }
          else
            {
              out = ESC_KEY;
              in_esc = 0;
              break;
            }
        }

      in_esc = 0;

      if (in_ascii)
        {
          tmp[i++] = c;
          if (c == 'm')
            {
              in_ascii = 0;
              continue;
            }
          if (i == 2 && c >= 'A' && c <= 'D')
            {
              in_ascii = 0;
              switch (c)
                {
                case 'A':
                  out = KEY_UP;
                  break;
                case 'B':
                  out = KEY_DOWN;
                  break;
                case 'C':
                  out = KEY_RIGHT;
                  break;
                case 'D':
                  out = KEY_LEFT;
                  break;
                }
              break;
            }
          if (i == 3 && tmp[0] == 91 && tmp[2] == 126)
            {
              in_ascii = 0;
              switch (tmp[1])
                {
                case 49:
                  out = KEY_HOME;
                  break;
                case 52:
                  out = KEY_END;
                  break;
                case 53:
                  out = KEY_PGUP;
                  break;
                case 54:
                  out = KEY_PGDOWN;
                  break;
                }
              break;
            }
          continue;
        }

      out = ((int)c + 256) % 256;
      break;
    }

  //for debug
  //log_std ("[%d]\n", out);

  return out;
}
1	sysadm	1.1	/***************************************************************************
2			io.c - description
3			-------------------
4			begin : Mon Oct 18 2004
5			copyright : (C) 2004 by Leaflet
6			email : leaflet@leafok.com
7			***************************************************************************/
8
9			/***************************************************************************
10			* *
11			* This program is free software; you can redistribute it and/or modify *
12			* it under the terms of the GNU General Public License as published by *
13			* the Free Software Foundation; either version 2 of the License, or *
14			* (at your option) any later version. *
15			* *
16			***************************************************************************/
17
18			#include "io.h"
19			#include "common.h"
20			#include <stdio.h>
21			#include <stdarg.h>
22
23			int
24			outc(char c)
25			{
26			int retval;
27
28			retval = printf("%c",c);
29
30			return retval;
31			}
32
33			int
34			prints(const char * format, ...)
35			{
36			va_list args;
37			int retval;
38
39			va_start (args, format);
40			retval = vfprintf (stdout, format, args);
41			va_end (args);
42
43			return retval;
44			}
45
46			int
47			iflush()
48			{
49			int retval;
50
51			retval = fflush (stdout);
52
53			return retval;
54			}
55
56			int
57			igetch ()
58			{
59			char c, tmp[256];
60			static char buf[256];
61	sysadm	1.2	int out = 0, loop = 1, in_esc = 0, in_ascii = 0, i = 0, j;
62	sysadm	1.1	static int len =0 , pos = 0;
63
64			if (pos >= len)
65			{
66			len = s_receive (socket_client, buf, 255, "");
67			pos = 0;
68	sysadm	1.2
69			//For debug
70			//for (j = 0; j < len; j++)
71			// log_std ("[%d]\n", buf[j]);
72	sysadm	1.1	}
73
74			while (pos < len)
75			{
76			c = buf[pos++];
77
78			if (c == '\0')
79			{
80			out = c;
81			break;
82			}
83
84			if (c == ESC_KEY)
85			{
86			if (in_esc == 0)
87			{
88			in_esc = 1;
89			in_ascii = 1;
90			i = 0;
91			continue;
92			}
93			else
94			{
95			out = ESC_KEY;
96			in_esc = 0;
97			break;
98			}
99			}
100
101			in_esc = 0;
102
103			if (in_ascii)
104			{
105			tmp[i++] = c;
106			if (c == 'm')
107			{
108			in_ascii = 0;
109			continue;
110			}
111			if (i == 2 && c >= 'A' && c <= 'D')
112			{
113			in_ascii = 0;
114			switch (c)
115			{
116			case 'A':
117			out = KEY_UP;
118			break;
119			case 'B':
120			out = KEY_DOWN;
121			break;
122			case 'C':
123	sysadm	1.2	out = KEY_RIGHT;
124			break;
125			case 'D':
126	sysadm	1.1	out = KEY_LEFT;
127			break;
128	sysadm	1.2	}
129			break;
130			}
131			if (i == 3 && tmp[0] == 91 && tmp[2] == 126)
132			{
133			in_ascii = 0;
134			switch (tmp[1])
135			{
136			case 49:
137			out = KEY_HOME;
138			break;
139			case 52:
140			out = KEY_END;
141			break;
142			case 53:
143			out = KEY_PGUP;
144			break;
145			case 54:
146			out = KEY_PGDOWN;
147	sysadm	1.1	break;
148			}
149			break;
150			}
151			continue;
152			}
153
154			out = ((int)c + 256) % 256;
155			break;
156			}
157
158			//for debug
159			//log_std ("[%d]\n", out);
160
161			return out;
162			}
webmaster@leafok.com	ViewVC Help
Powered by ViewVC 1.3.0-beta1