lustre/tests/sendfile.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
  19  *
  20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  21  * CA 95054 USA or visit www.sun.com if you need additional information or
  22  * have any questions.
  23  *
  24  * GPL HEADER END
  25  */
  26 /*
  27  * Copyright (c) 2008, 2010, Oracle and/or its affiliates. All rights reserved.
  28  * Use is subject to license terms.
  29  */
  30 /*
  31  * This file is part of Lustre, http://www.lustre.org/
  32  * Lustre is a trademark of Sun Microsystems, Inc.
  33  */
  34
  35 #include <stdio.h>
  36 #include <unistd.h>
  37 #include <fcntl.h>
  38 #include <stdlib.h>
  39 #include <errno.h>
  40 #include <time.h>
  41 #include <sys/types.h>
  42 #include <sys/socket.h>
  43 #include <sys/sendfile.h>
  44 #include <sys/stat.h>
  45 #include <sys/socket.h>
  46
  47 #include <lustre/lustreapi.h>
  48
  49 #define syserr(str) { perror(str); exit(-1); }
  50
  51 int main(int argc, char *argv[])
  52 {
  53         char *sfile, *tfile;
  54         struct stat stbuf;
  55         int size;
  56         unsigned long bufsize = 1024 * 1024;
  57         int infd, outfd;
  58         int sd[2];
  59         int rc;
  60         char *buf;
  61         char cmd[1024];
  62         loff_t pos;
  63
  64         if (argc < 3) {
  65                 fprintf(stderr, "%s <source file> <dest file>\n", argv[0]);
  66                 exit(-1);
  67         }
  68
  69         sfile = argv[1];
  70         tfile = argv[2];
  71
  72         if (stat(sfile, &stbuf) < 0) {
  73                 if (errno == ENOENT) {
  74                         /* assume doing non-object file testing */
  75                         infd = open(sfile, O_LOV_DELAY_CREATE|O_CREAT|O_RDWR,
  76                                     0644);
  77                         if (infd < 0)
  78                                 syserr("open source file:");
  79
  80                         size = random() % (1 * 1024 * 1024) + 1024;
  81                         if (ftruncate(infd, (off_t)size) < 0)
  82                                 syserr("truncate file error:");
  83                 } else {
  84                         syserr("stat file: ");
  85                 }
  86         } else if (S_ISREG(stbuf.st_mode)) {
  87                 size = (int)stbuf.st_size;
  88                 infd = open(sfile, O_RDONLY, 0644);
  89                 if (infd < 0)
  90                         syserr("Open an existing file error:");
  91         } else {
  92                 fprintf(stderr, "%s is not a regular file\n", sfile);
  93                 exit(-1);
  94         }
  95
  96         outfd = open(tfile, O_WRONLY|O_TRUNC|O_CREAT, 0666);
  97         if (outfd < 0)
  98                 syserr("open dest file:");
  99
 100         rc = socketpair(AF_LOCAL, SOCK_STREAM, 0, sd);
 101         if (rc < 0)
 102                 syserr("socketpair");
 103
 104         rc = fcntl(sd[0], F_SETFL, O_NONBLOCK);
 105         if (rc < 0)
 106                 syserr("fcntl");
 107
 108         rc = setsockopt(sd[0], SOL_SOCKET, SO_SNDBUF,
 109                         &bufsize, sizeof(bufsize));
 110         if (rc)
 111                 syserr("setsockopt");
 112
 113         srandom(time(NULL));
 114
 115         pos = 0;
 116         while (size > 0) {
 117                 int rc2;
 118                 size_t seg_size;
 119
 120                 seg_size = random() % bufsize + 1;
 121                 if (seg_size > size)
 122                         seg_size = size;
 123
 124                 while (seg_size) {
 125                         rc = sendfile(sd[0], infd, &pos, seg_size);
 126                         if (rc < 0)
 127                                 syserr("sendfile:");
 128
 129                         seg_size -= rc;
 130                         size -= rc;
 131                         if (size == 0)
 132                                 close(sd[0]);
 133
 134                         buf = malloc(rc);
 135                         if (read(sd[1], buf, rc) < 0)
 136                                 syserr("read from socket:");
 137
 138                         rc2 = write(outfd, buf, rc);
 139                         if (rc2 != rc)
 140                                 syserr("write dest file error:");
 141                         free(buf);
 142                 }
 143         }
 144         close(sd[1]), close(infd), close(outfd);
 145
 146         snprintf(cmd, sizeof(cmd), "cmp %s %s\n", sfile, tfile);
 147         return system(cmd);
 148 }