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
Ctrl (char c)
{
  return (c - 'A' + 1);
}

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

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

  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_LEFT;
                  break;
                case 'D':
                  out = KEY_RIGHT;
                  break;
                }
              break;
            }
          continue;
        }

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

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

  return out;
}
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	Ctrl (char c)
58	{
59	return (c - 'A' + 1);
60	}
61
62	int
63	igetch ()
64	{
65	char c, tmp[256];
66	static char buf[256];
67	int out = 0, loop = 1, in_esc = 0, in_ascii = 0, i = 0;
68	static int len =0 , pos = 0;
69
70	if (pos >= len)
71	{
72	len = s_receive (socket_client, buf, 255, "");
73	pos = 0;
74	}
75
76	while (pos < len)
77	{
78	c = buf[pos++];
79
80	if (c == '\0')
81	{
82	out = c;
83	break;
84	}
85
86	if (c == ESC_KEY)
87	{
88	if (in_esc == 0)
89	{
90	in_esc = 1;
91	in_ascii = 1;
92	i = 0;
93	continue;
94	}
95	else
96	{
97	out = ESC_KEY;
98	in_esc = 0;
99	break;
100	}
101	}
102
103	in_esc = 0;
104
105	if (in_ascii)
106	{
107	tmp[i++] = c;
108	if (c == 'm')
109	{
110	in_ascii = 0;
111	continue;
112	}
113	if (i == 2 && c >= 'A' && c <= 'D')
114	{
115	in_ascii = 0;
116	switch (c)
117	{
118	case 'A':
119	out = KEY_UP;
120	break;
121	case 'B':
122	out = KEY_DOWN;
123	break;
124	case 'C':
125	out = KEY_LEFT;
126	break;
127	case 'D':
128	out = KEY_RIGHT;
129	break;
130	}
131	break;
132	}
133	continue;
134	}
135
136	out = ((int)c + 256) % 256;
137	break;
138	}
139
140	//for debug
141	//log_std ("[%d]\n", out);
142
143	return out;
144	}
webmaster@leafok.com	ViewVC Help
Powered by ViewVC 1.3.0-beta1