Qshell Interpreter (qsh) - FTP Directory Listing - IBM

126 Qshell Interpreter (qsh)
/* 4. This program has been tested on AIX 4.1.5 and */
/* Linux 2.0.29. */
/* */
/**********************************************************************/
/* Remove the comments from the following line to use iconv(). */
/* #define USE_ICONV 1 */
/**********************************************************************/
/* Includes */
/**********************************************************************/
#include /* perror() */
#include /* socket(), bind(), etc. */
#include /* sockaddr_in, INADDR_ANY, etc. */
#include /* close(), read(), write() etc. */
#include /* exit() */
#include /* exit(), memset() */
#include /* ioctl() */
#include /* errno and values */
#include /* strlen() */
#include /* inet_addr() */
#include /* gethostbyname() */
#include /* getpwuid() */
#include /* sigaction(), etc. */
#ifdef _AIX
#include /* select() */
#include /* bzero() for FD_ZERO */
#endif
#ifdef __linux__
#include /* FD_SET(), select */
#endif
#ifdef USE_ICONV
#include /* iconv(), etc. */
#endif
/**********************************************************************/
/* Constants */
/**********************************************************************/
#define QSH_PORT 6042
#define DEFAULT_BUF 4096
/**********************************************************************/
/* Types */
/**********************************************************************/
typedef unsigned char uchar;
/**********************************************************************/
/* Global Variables */
/**********************************************************************/
char *sysname; /* Long host name of server system */
#ifdef USE_ICONV
iconv_t ecd; /* Conversion descriptor for ASCII to EBCDIC */
iconv_t acd; /* Conversion descriptor for EBCDIC to ASCII */
#else
/* EBCDIC to ASCII translation table */
static uchar AsciiTable[256] =
{
0x00,0x01,0x02,0x03,0x20,0x09,0x20,0x7f, /* 00-07 */
0x20,0x20,0x20,0x0b,0x0c,0x0d,0x0e,0x0f, /* 08-0f */
0x10,0x11,0x12,0x13,0x20,0x0a,0x08,0x20, /* 10-17 */
0x18,0x19,0x20,0x20,0x20,0x1d,0x1e,0x1f, /* 18-1f */
0x20,0x20,0x1c,0x20,0x20,0x0a,0x17,0x1b, /* 20-27 */
0x20,0x20,0x20,0x20,0x20,0x05,0x06,0x07, /* 28-2f */
0x20,0x20,0x16,0x20,0x20,0x20,0x20,0x04, /* 30-37 */
0x20,0x20,0x20,0x20,0x14,0x15,0x20,0x1a, /* 38-3f */
0x20,0x20,0x83,0x84,0x85,0xa0,0xc6,0x86, /* 40-47 */
0x87,0xa4,0xbd,0x2e,0x3c,0x28,0x2b,0x7c, /* 48-4f */
0x26,0x82,0x88,0x89,0x8a,0xa1,0x8c,0x8b, /* 50-57 */
0x8d,0xe1,0x21,0x24,0x2a,0x29,0x3b,0xaa, /* 58-5f */
0x2d,0x2f,0xb6,0x8e,0xb7,0xb5,0xc7,0x8f, /* 60-67 */
0x80,0xa5,0xdd,0x2c,0x25,0x5f,0x3e,0x3f, /* 68-6f */
0x9b,0x90,0xd2,0xd3,0xd4,0xd6,0xd7,0xd8, /* 70-77 */