From b667cfccd6972036c11147493cd66d281ecad8fd Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?= <grubba@grubba.org> Date: Thu, 14 Oct 1999 22:52:01 +0200 Subject: [PATCH] First version Rev: src/modules/files/sendfiletest.pike:1.1 --- .gitattributes | 1 + src/modules/files/sendfiletest.pike | 37 +++++++++++++++++++++++++++++ 2 files changed, 38 insertions(+) create mode 100644 src/modules/files/sendfiletest.pike diff --git a/.gitattributes b/.gitattributes index 1c7c6a093c..fd97dd4fc1 100644 --- a/.gitattributes +++ b/.gitattributes @@ -399,6 +399,7 @@ testfont binary /src/modules/files/file.c foreign_ident /src/modules/files/file.h foreign_ident /src/modules/files/sendfile.c foreign_ident +/src/modules/files/sendfiletest.pike foreign_ident /src/modules/files/socket.c foreign_ident /src/modules/files/socktest.pike foreign_ident /src/modules/files/termios.c foreign_ident diff --git a/src/modules/files/sendfiletest.pike b/src/modules/files/sendfiletest.pike new file mode 100644 index 0000000000..4658817f65 --- /dev/null +++ b/src/modules/files/sendfiletest.pike @@ -0,0 +1,37 @@ +#!/usr/local/bin/pike + +/* $Id: sendfiletest.pike,v 1.1 1999/10/14 20:52:01 grubba Exp $ */ + +void done(int sent) +{ + rm("conftest.Makefile"); + exit(0); +} + +int main(int argc, array(string) argv) +{ + object from = Stdio.File(); + object to = Stdio.File(); + + if (!from->open("Makefile", "r")) { + werror("Failed to open \"Makefile\" for reading!\n"); + exit(1); + } + if (!from->open("conftest.Makefile", "cwt")) { + werror("Failed to open \"conftest.Makefile\" for writing!\n"); + exit(1); + } + mixed err = catch { + if (!Stdio.sendfile(0, from, 0, -1, 0, to, done)) { + werror("Stdio,sendfile() failed!\n"); + exit(1); + } + return(-1); + }; + catch { + werror("Stdio.sendfile() failed!\n" + "%s\n", + describe_backtrace(err)); + }; + exit(1); +} -- GitLab