lbbs/src/netio.c

/***************************************************************************
                          netio.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 "common.h"
#include <string.h>
#include <sys/socket.h>

char
s_getc (int socket)
{
  char c;
  if (recv (socket, &c, 1, 0) > 0)
    return c;
  else
    return '\0';
}

int
s_putc (int socket, char c)
{
  int ret;

  ret = send (socket, &c, 1, 0);

  return ret;
}

int
s_receive (int socket, char *buffer, int buffer_length, char end_str[])
{
  char buf_str[2048];
  int buf_read, total_read;
  int buf_len = 2047;

  if (buf_len + 1 > buffer_length)
    buf_len = buffer_length - 1;

  total_read = 0;
  strcpy (buffer, "");
  while ((buf_read = recv (socket, buf_str, buf_len, 0)) > 0)
    {
      buf_str[buf_read] = '\0';
      total_read += buf_read;
      strcat (buffer, buf_str);

      buf_len = buffer_length - total_read - 1;
      if (buf_len + 1 > buffer_length)
        buf_len = buffer_length - 1;

      if (strcmp ((buffer + total_read - strlen (end_str)), end_str) == 0)
        break;
      //different line-end symbol in different OS
      if (strcmp (end_str, "\r") == 0)
        {
          if (strcmp ((buffer + total_read - 2), "\r\n") == 0)
            break;
        }
    }

  return total_read;
}

int
s_send (int socket, const char *in_str)
{
  int ret;

  if (in_str != NULL && strlen (in_str) > 0)
    {
      ret = send (socket, in_str, strlen (in_str), 0);
    }

  return ret;
}

// from Maple-hightman
// added by flyriver, 2001.3.3
int
telnetopt (int fd, char *buf, int max)
{
  unsigned char c, d, e;
  int pp = 0;
  unsigned char tmp[30];

  while (pp < max)
    {
      c = buf[pp++];
      if (c == 255)
        {
          d = buf[pp++];
          e = buf[pp++];
          iflush ();
          if ((d == 253) && (e == 3 || e == 24))
            {
              tmp[0] = 255;
              tmp[1] = 251;
              tmp[2] = e;
              write (fd, tmp, 3);
              continue;
            }
          if ((d == 251 || d == 252) && (e == 1 || e == 3 || e == 24))
            {
              tmp[0] = 255;
              tmp[1] = 253;
              tmp[2] = e;
              write (fd, tmp, 3);
              continue;
            }
          if (d == 251 || d == 252)
            {
              tmp[0] = 255;
              tmp[1] = 254;
              tmp[2] = e;
              write (fd, tmp, 3);
              continue;
            }
          if (d == 253 || d == 254)
            {
              tmp[0] = 255;
              tmp[1] = 252;
              tmp[2] = e;
              write (fd, tmp, 3);
              continue;
            }
          if (d == 250)
            {
              while (e != 240 && pp < max)
                e = buf[pp++];
              tmp[0] = 255;
              tmp[1] = 250;
              tmp[2] = 24;
              tmp[3] = 0;
              tmp[4] = 65;
              tmp[5] = 78;
              tmp[6] = 83;
              tmp[7] = 73;
              tmp[8] = 255;
              tmp[9] = 240;
              write (fd, tmp, 10);
            }
        }
      else
        outc (c);
    }
  iflush ();
  return 0;
}
1	sysadm	1.1	/***************************************************************************
2			netio.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 "common.h"
19	sysadm	1.3	#include <string.h>
20			#include <sys/socket.h>
21	sysadm	1.1
22			char
23	sysadm	1.4	s_getc (int socket)
24	sysadm	1.1	{
25			char c;
26	sysadm	1.4	if (recv (socket, &c, 1, 0) > 0)
27	sysadm	1.1	return c;
28			else
29			return '\0';
30			}
31
32			int
33	sysadm	1.4	s_putc (int socket, char c)
34	sysadm	1.2	{
35			int ret;
36	sysadm	1.4
37	sysadm	1.2	ret = send (socket, &c, 1, 0);
38	sysadm	1.4
39	sysadm	1.2	return ret;
40			}
41
42			int
43	sysadm	1.4	s_receive (int socket, char *buffer, int buffer_length, char end_str[])
44	sysadm	1.1	{
45			char buf_str[2048];
46	sysadm	1.4	int buf_read, total_read;
47	sysadm	1.1	int buf_len = 2047;
48
49	sysadm	1.4	if (buf_len + 1 > buffer_length)
50			buf_len = buffer_length - 1;
51	sysadm	1.1
52			total_read = 0;
53	sysadm	1.4	strcpy (buffer, "");
54			while ((buf_read = recv (socket, buf_str, buf_len, 0)) > 0)
55	sysadm	1.1	{
56	sysadm	1.4	buf_str[buf_read] = '\0';
57			total_read += buf_read;
58			strcat (buffer, buf_str);
59
60			buf_len = buffer_length - total_read - 1;
61			if (buf_len + 1 > buffer_length)
62			buf_len = buffer_length - 1;
63
64			if (strcmp ((buffer + total_read - strlen (end_str)), end_str) == 0)
65			break;
66			//different line-end symbol in different OS
67			if (strcmp (end_str, "\r") == 0)
68			{
69			if (strcmp ((buffer + total_read - 2), "\r\n") == 0)
70			break;
71			}
72	sysadm	1.1	}
73
74			return total_read;
75			}
76
77			int
78	sysadm	1.4	s_send (int socket, const char *in_str)
79	sysadm	1.1	{
80	sysadm	1.2	int ret;
81
82	sysadm	1.4	if (in_str != NULL && strlen (in_str) > 0)
83			{
84			ret = send (socket, in_str, strlen (in_str), 0);
85			}
86
87	sysadm	1.2	return ret;
88	sysadm	1.1	}
89	sysadm	1.5
90			// from Maple-hightman
91			// added by flyriver, 2001.3.3
92			int
93			telnetopt (int fd, char *buf, int max)
94			{
95			unsigned char c, d, e;
96			int pp = 0;
97			unsigned char tmp[30];
98
99			while (pp < max)
100			{
101			c = buf[pp++];
102			if (c == 255)
103			{
104			d = buf[pp++];
105			e = buf[pp++];
106			iflush ();
107			if ((d == 253) && (e == 3 \|\| e == 24))
108			{
109			tmp[0] = 255;
110			tmp[1] = 251;
111			tmp[2] = e;
112			write (fd, tmp, 3);
113			continue;
114			}
115			if ((d == 251 \|\| d == 252) && (e == 1 \|\| e == 3 \|\| e == 24))
116			{
117			tmp[0] = 255;
118			tmp[1] = 253;
119			tmp[2] = e;
120			write (fd, tmp, 3);
121			continue;
122			}
123			if (d == 251 \|\| d == 252)
124			{
125			tmp[0] = 255;
126			tmp[1] = 254;
127			tmp[2] = e;
128			write (fd, tmp, 3);
129			continue;
130			}
131			if (d == 253 \|\| d == 254)
132			{
133			tmp[0] = 255;
134			tmp[1] = 252;
135			tmp[2] = e;
136			write (fd, tmp, 3);
137			continue;
138			}
139			if (d == 250)
140			{
141			while (e != 240 && pp < max)
142			e = buf[pp++];
143			tmp[0] = 255;
144			tmp[1] = 250;
145			tmp[2] = 24;
146			tmp[3] = 0;
147			tmp[4] = 65;
148			tmp[5] = 78;
149			tmp[6] = 83;
150			tmp[7] = 73;
151			tmp[8] = 255;
152			tmp[9] = 240;
153			write (fd, tmp, 10);
154			}
155			}
156			else
157			outc (c);
158			}
159			iflush ();
160			return 0;
161			}
webmaster@leafok.com	ViewVC Help
Powered by ViewVC 1.3.0-beta1