*** empty log message ***

Rev: ChangeLog:1.28
Rev: src/.cvsignore:1.12
Rev: src/sexp_test.c:1.1

ChangeLog

+Thu Jan  7 16:25:50 1999    <nisse@puck>
+
+	* sexp_streamed_parser.c: Added base 64 decoder.
+
+	* sexp.c (encode_base64): Bug fix (don't use several ++ in an
+	expression without sequence points).
+
+	* read_scan.h (TOKEN_NONE): New constant (used by the base64 decoder).
+
 Tue Jan  5 05:54:34 1999    <nisse@puck>
 
 	* keyexchange.c (kex_make_key): Fixed key expansion.

src/.cvsignore

@@ -24,5 +24,6 @@ lshd
 prime_table
 prime_table.h
 sexp_table.h
+sexp_test
 stamp-h
 stamp-h.in

src/.gitignore

@@ -24,5 +24,6 @@
 /prime_table
 /prime_table.h
 /sexp_table.h
+/sexp_test
 /stamp-h
 /stamp-h.in

src/sexp_test.c

+/* sexp_test.c
+ *
+ * Reads sexp on stdin, and writes them out again on stdout.
+ *
+ * $Id$
+ */
+
+/* lsh, an implementation of the ssh protocol
+ *
+ * Copyright (C) 1998 Niels Mller
+ *
+ * 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.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+ */
+
+#include "io.h"
+#include "sexp.h"
+#include "werror.h"
+#include "xalloc.h"
+
+#include <unistd.h>
+
+#include "sexp_test.c.x"
+
+/* CLASS:
+   (class
+     (name output_sexp)
+     (super sexp_handler)
+     (vars
+       (write object abstract_write)
+       (style . int)))
+*/
+
+static int do_output_sexp(struct sexp_handler *h, struct sexp *e)
+{
+  CAST(output_sexp, closure, h);
+
+  return A_WRITE(closure->write, sexp_format(e, closure->style));
+}
+
+/* CLASS:
+   (class
+     (name input_closed)
+     (super close_callback)
+     (vars
+       (status . "int *")
+       (output object write_buffer)))
+*/
+
+static int do_close(struct close_callback *c, int reason)
+{
+  CAST(input_closed, closure, c);
+
+  write_buffer_close(closure->output);  
+
+  *closure->status = (reason == CLOSE_EOF) ? EXIT_SUCCESS : EXIT_FAILURE;
+
+  return 4711;
+}
+
+#define BLOCK_SIZE 2000
+
+int main(int argc UNUSED, char **argv UNUSED)
+{
+  NEW(io_backend, backend);
+  NEW(output_sexp, out);
+  NEW(input_closed, close);
+  struct write_buffer *write;
+
+  int status = 17;
+  
+  init_backend(backend);
+  set_error_stream(STDERR_FILENO, 1);
+
+  write = io_write(backend, STDOUT_FILENO, BLOCK_SIZE, NULL)->buffer;
+
+  out->super.handler = do_output_sexp;
+  out->write = &write->super;
+  out->style = SEXP_ADVANCED;
+  
+  close->super.f = do_close;
+  close->output = write;
+  close->status = &status;
+  
+  io_read(backend, STDIN_FILENO,
+	  make_read_sexp(&out->super, BLOCK_SIZE, SEXP_TRANSPORT, 1),
+	  &close->super);
+
+  io_run(backend);
+
+  return status;
+}
+	  
+  
+