1*4882a593Smuzhiyun /*
2*4882a593Smuzhiyun zreadline.c - line reading stuff for lrzsz
3*4882a593Smuzhiyun Copyright (C) until 1998 Chuck Forsberg (OMEN Technology Inc)
4*4882a593Smuzhiyun Copyright (C) 1994 Matt Porter
5*4882a593Smuzhiyun Copyright (C) 1996, 1997 Uwe Ohse
6*4882a593Smuzhiyun
7*4882a593Smuzhiyun This program is free software; you can redistribute it and/or modify
8*4882a593Smuzhiyun it under the terms of the GNU General Public License as published by
9*4882a593Smuzhiyun the Free Software Foundation; either version 2, or (at your option)
10*4882a593Smuzhiyun any later version.
11*4882a593Smuzhiyun
12*4882a593Smuzhiyun This program is distributed in the hope that it will be useful,
13*4882a593Smuzhiyun but WITHOUT ANY WARRANTY; without even the implied warranty of
14*4882a593Smuzhiyun MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15*4882a593Smuzhiyun GNU General Public License for more details.
16*4882a593Smuzhiyun
17*4882a593Smuzhiyun You should have received a copy of the GNU General Public License
18*4882a593Smuzhiyun along with this program; if not, write to the Free Software
19*4882a593Smuzhiyun Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
20*4882a593Smuzhiyun 02111-1307, USA.
21*4882a593Smuzhiyun
22*4882a593Smuzhiyun originally written by Chuck Forsberg
23*4882a593Smuzhiyun */
24*4882a593Smuzhiyun /* once part of lrz.c, taken out to be useful to lsz.c too */
25*4882a593Smuzhiyun
26*4882a593Smuzhiyun #include "zglobal.h"
27*4882a593Smuzhiyun
28*4882a593Smuzhiyun #include <stdlib.h>
29*4882a593Smuzhiyun #include <stdio.h>
30*4882a593Smuzhiyun //#include <signal.h>
31*4882a593Smuzhiyun //#include <ctype.h>
32*4882a593Smuzhiyun #include <errno.h>
33*4882a593Smuzhiyun
34*4882a593Smuzhiyun //#include "error.h"
35*4882a593Smuzhiyun
36*4882a593Smuzhiyun
37*4882a593Smuzhiyun /* Ward Christensen / CP/M parameters - Don't change these! */
38*4882a593Smuzhiyun #define TIMEOUT (-2)
39*4882a593Smuzhiyun
40*4882a593Smuzhiyun static size_t readline_readnum;
41*4882a593Smuzhiyun static int readline_fd;
42*4882a593Smuzhiyun static char *readline_buffer;
43*4882a593Smuzhiyun int readline_left=0;
44*4882a593Smuzhiyun char *readline_ptr;
45*4882a593Smuzhiyun extern int read_data(int tout_in_100ms, char *buf, int size);
46*4882a593Smuzhiyun
47*4882a593Smuzhiyun RETSIGTYPE
zreadline_alarm_handler(int dummy LRZSZ_ATTRIB_UNUSED)48*4882a593Smuzhiyun zreadline_alarm_handler(int dummy LRZSZ_ATTRIB_UNUSED)
49*4882a593Smuzhiyun {
50*4882a593Smuzhiyun /* doesn't need to do anything */
51*4882a593Smuzhiyun }
52*4882a593Smuzhiyun
53*4882a593Smuzhiyun /*
54*4882a593Smuzhiyun * This version of readline is reasonably well suited for
55*4882a593Smuzhiyun * reading many characters.
56*4882a593Smuzhiyun *
57*4882a593Smuzhiyun * timeout is in tenths of seconds
58*4882a593Smuzhiyun */
59*4882a593Smuzhiyun int
readline_internal(unsigned int timeout)60*4882a593Smuzhiyun readline_internal(unsigned int timeout)
61*4882a593Smuzhiyun {
62*4882a593Smuzhiyun unsigned int n=0;
63*4882a593Smuzhiyun
64*4882a593Smuzhiyun if (!no_timeout)
65*4882a593Smuzhiyun {
66*4882a593Smuzhiyun n = timeout/10;
67*4882a593Smuzhiyun if (n < 2 && timeout!=1)
68*4882a593Smuzhiyun n = 3;
69*4882a593Smuzhiyun else if (n==0)
70*4882a593Smuzhiyun n=1;
71*4882a593Smuzhiyun if (Verbose > 5)
72*4882a593Smuzhiyun vstringf("Calling read: alarm=%d Readnum=%d ",
73*4882a593Smuzhiyun n, (u32)readline_readnum);
74*4882a593Smuzhiyun //signal(SIGALRM, zreadline_alarm_handler);
75*4882a593Smuzhiyun //alarm(n);
76*4882a593Smuzhiyun }
77*4882a593Smuzhiyun else if (Verbose > 5)
78*4882a593Smuzhiyun vstringf("Calling read: Readnum=%d ",
79*4882a593Smuzhiyun (u32)readline_readnum);
80*4882a593Smuzhiyun
81*4882a593Smuzhiyun readline_ptr=readline_buffer;
82*4882a593Smuzhiyun readline_left=read_data(n*10, readline_ptr, readline_readnum);
83*4882a593Smuzhiyun if (!no_timeout)
84*4882a593Smuzhiyun ;//alarm(0);
85*4882a593Smuzhiyun if (readline_left>0 && bytes_per_error) {
86*4882a593Smuzhiyun static long ct=0;
87*4882a593Smuzhiyun static int mod=1;
88*4882a593Smuzhiyun ct+=readline_left;
89*4882a593Smuzhiyun while (ct>bytes_per_error) {
90*4882a593Smuzhiyun readline_ptr[ct % bytes_per_error]^=mod;
91*4882a593Smuzhiyun ct-=bytes_per_error;
92*4882a593Smuzhiyun mod++;
93*4882a593Smuzhiyun if (mod==256)
94*4882a593Smuzhiyun mod=1;
95*4882a593Smuzhiyun }
96*4882a593Smuzhiyun }
97*4882a593Smuzhiyun if (Verbose > 5) {
98*4882a593Smuzhiyun vstringf("Read returned %d bytes\n", readline_left);
99*4882a593Smuzhiyun //if (readline_left==-1)
100*4882a593Smuzhiyun // vstringf("errno=%d:%s\n", errno,strerror(errno));
101*4882a593Smuzhiyun if (Verbose > 9 && readline_left>0) {
102*4882a593Smuzhiyun int i,j;
103*4882a593Smuzhiyun j=readline_left > 48 ? 48 : readline_left;
104*4882a593Smuzhiyun vstring(" ");
105*4882a593Smuzhiyun for (i=0;i<j;i++) {
106*4882a593Smuzhiyun if (i%24==0 && i)
107*4882a593Smuzhiyun vstring("\n ");
108*4882a593Smuzhiyun vstringf("%02x ", readline_ptr[i] & 0377);
109*4882a593Smuzhiyun }
110*4882a593Smuzhiyun vstringf("\n");
111*4882a593Smuzhiyun }
112*4882a593Smuzhiyun }
113*4882a593Smuzhiyun if (readline_left < 1)
114*4882a593Smuzhiyun return TIMEOUT;
115*4882a593Smuzhiyun --readline_left;
116*4882a593Smuzhiyun return (*readline_ptr++ & 0377);
117*4882a593Smuzhiyun }
118*4882a593Smuzhiyun
119*4882a593Smuzhiyun
120*4882a593Smuzhiyun
121*4882a593Smuzhiyun void
readline_setup(int fd,size_t readnum,size_t bufsize)122*4882a593Smuzhiyun readline_setup(int fd, size_t readnum, size_t bufsize)
123*4882a593Smuzhiyun {
124*4882a593Smuzhiyun readline_fd=fd;
125*4882a593Smuzhiyun readline_readnum=readnum;
126*4882a593Smuzhiyun readline_buffer=malloc(bufsize > readnum ? bufsize : readnum);
127*4882a593Smuzhiyun //if (!readline_buffer)
128*4882a593Smuzhiyun // error(1,0,_("out of memory"));
129*4882a593Smuzhiyun }
130*4882a593Smuzhiyun
131*4882a593Smuzhiyun void
readline_purge(void)132*4882a593Smuzhiyun readline_purge(void)
133*4882a593Smuzhiyun {
134*4882a593Smuzhiyun readline_left=0;
135*4882a593Smuzhiyun return;
136*4882a593Smuzhiyun }
137*4882a593Smuzhiyun
138