/* bench_scp.c

 *

 * This file is part of the SSH Library

 *

 * Copyright (c) 2011 by Aris Adamantiadis

 *

 * The SSH Library is free software; you can redistribute it and/or modify

 * it under the terms of the GNU Lesser General Public License as published by

 * the Free Software Foundation; either version 2.1 of the License, or (at your

 * option) any later version.

 *

 * The SSH Library 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 Lesser General Public

 * License for more details.

 *

 * You should have received a copy of the GNU Lesser General Public License

 * along with the SSH Library; see the file COPYING.  If not, write to

 * the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,

 * MA 02111-1307, USA.

 */

#include "benchmarks.h"

#include <libssh/libssh.h>

#include <stdio.h>

#define SCPDIR "/tmp/"

#define SCPFILE "scpbenchmark"

/** @internal

 * @brief benchmarks a scp upload using an

 * existing SSH session.

 * @param[in] session Open SSH session

 * @param[in] args Parsed command line arguments

 * @param[out] bps The calculated bytes per second obtained via benchmark.

 * @return 0 on success, -1 on error.

 */

int benchmarks_scp_up (ssh_session session, struct argument_s *args,

    float *bps){

  unsigned long bytes;

  struct timestamp_struct ts;

  float ms=0.0;

  unsigned long total=0;

  ssh_scp scp;

  bytes = args->datasize * 1024 * 1024;

  scp = ssh_scp_new(session,SSH_SCP_WRITE,SCPDIR);

  if(scp == NULL)

    goto error;

  if(ssh_scp_init(scp)==SSH_ERROR)

    goto error;

  if(ssh_scp_push_file(scp,SCPFILE,bytes,0777) != SSH_OK)

    goto error;

  if(args->verbose>0)

    fprintf(stdout,"Starting upload of %lu bytes now\n",bytes);

  timestamp_init(&ts);

  while(total < bytes){

    unsigned long towrite = bytes - total;

    int w;

    if(towrite > args->chunksize)

      towrite = args->chunksize;

    w=ssh_scp_write(scp,buffer,towrite);

    if(w == SSH_ERROR)

      goto error;

    total += towrite;

  }

  ms=elapsed_time(&ts);

  *bps=8000 * (float)bytes / ms;

  if(args->verbose > 0)

    fprintf(stdout,"Upload took %f ms for %lu bytes, at %f bps\n",ms,

        bytes,*bps);

  ssh_scp_close(scp);

  ssh_scp_free(scp);

  return 0;

error:

  fprintf(stderr,"Error during scp upload : %s\n",ssh_get_error(session));

  if(scp){

    ssh_scp_close(scp);

    ssh_scp_free(scp);

  }

  return -1;

}

/** @internal

 * @brief benchmarks a scp download using an

 * existing SSH session.

 * @param[in] session Open SSH session

 * @param[in] args Parsed command line arguments

 * @param[out] bps The calculated bytes per second obtained via benchmark.

 * @return 0 on success, -1 on error.

 */

int benchmarks_scp_down (ssh_session session, struct argument_s *args,

    float *bps){

  unsigned long bytes;

  struct timestamp_struct ts;

  float ms=0.0;

  unsigned long total=0;

  ssh_scp scp;

  int r;

  size_t size;

  bytes = args->datasize * 1024 * 1024;

  scp = ssh_scp_new(session,SSH_SCP_READ,SCPDIR SCPFILE);

  if(scp == NULL)

    goto error;

  if(ssh_scp_init(scp)==SSH_ERROR)

    goto error;

  r=ssh_scp_pull_request(scp);

  if(r == SSH_SCP_REQUEST_NEWFILE){

    size=ssh_scp_request_get_size(scp);

    if(bytes > size){

      printf("Only %zd bytes available (on %lu requested).\n",size,bytes);

      bytes = size;

    }

    if(size > bytes){

      printf("File is %zd bytes (on %lu requested). Will cut the end\n",size,bytes);

    }

    if(args->verbose>0)

      fprintf(stdout,"Starting download of %lu bytes now\n",bytes);

    timestamp_init(&ts);

    ssh_scp_accept_request(scp);

    while(total < bytes){

      unsigned long toread = bytes - total;

      if(toread > args->chunksize)

        toread = args->chunksize;

      r=ssh_scp_read(scp,buffer,toread);

      if(r == SSH_ERROR || r == 0)

        goto error;

      total += r;

    }

    ms=elapsed_time(&ts);

    *bps=8000 * (float)bytes / ms;

    if(args->verbose > 0)

      fprintf(stdout,"download took %f ms for %lu bytes, at %f bps\n",ms,

          bytes,*bps);

  } else {

    fprintf(stderr,"Expected SSH_SCP_REQUEST_NEWFILE, got %d\n",r);

    goto error;

  }

  ssh_scp_close(scp);

  ssh_scp_free(scp);

  return 0;

error:

  fprintf(stderr,"Error during scp download : %s\n",ssh_get_error(session));

  if(scp){

    ssh_scp_close(scp);

    ssh_scp_free(scp);

  }

  return -1;

}