// ------------------------------- //
// -------- Start of File -------- //
// ------------------------------- //
// ----------------------------------------------------------- // 
// C++ Source Code File Name: server.cpp
// C++ Compiler Used: MSVC, BCC32, GCC, HPUX aCC, SOLARIS CC
// Produced By: DataReel Software Development Team
// File Creation Date: 09/20/1999
// Date Last Modified: 06/17/2016
// Copyright (c) 2001-2024 DataReel Software Development
// ----------------------------------------------------------- // 
// ------------- Program Description and Details ------------- // 
// ----------------------------------------------------------- // 
/*
This 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.
 
This 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 this library; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  
USA

The program is used to test gxSerialCommServer class.
*/
// ----------------------------------------------------------- // 
#include "gxdlcode.h"

#if defined (__USE_ANSI_CPP__) // Use the ANSI Standard C++ library
#include <iostream>
using namespace std; // Use unqualified names for Standard C++ library
#else // Use the old iostream library by default
#include <iostream.h>
#endif // __USE_ANSI_CPP__

#include <stdlib.h>
#include <string.h>
#include "scomserv.h"

int ReadBlock(gxSerialCommServer *server, gxBlockHeader &gx)
{
  cout << "Reading a raw block of data" << "\n" << flush;
  __ULWORD__ block_size = (__ULWORD__)gx.block_length;

  char *buf = new char[block_size];
  if(server->ReadBlock(buf, gx) != 0) {
    delete[] buf;
    return 1;
  }

  cout.write(buf, block_size);
  cout << server->BytesRead() << " bytes received." << "\n" << flush;
  
  delete[] buf;
  return 0;
}

int AnswerRequest(gxSerialCommServer *server, gxBlockHeader &gx)
{
  cout << "Client has requested a block" << "\n" << flush;
 
  char *test_block = "The quick brown fox jumps over the lazy dog \
0123456789\n";

  __ULWORD__ block_size = (__ULWORD__)gx.block_length;
  char *buf = new char[block_size];
  if(server->ReadBlock(buf, gx) != 0) {
    delete[] buf;
    return 1;
  }

  cout << "Client has requested block: ";
  cout.write(buf, block_size);
  cout << "\n" << flush;
  delete[] buf;

  cout << "Answering request" << "\n" << flush;

  if(server->WriteBlock((char *)test_block, strlen(test_block)) != 0)
    return 1;

  return 0;
}

int ChangeBlock(gxSerialCommServer *server, gxBlockHeader &gx)
{
  cout << "Received a change block request" << "\n" << flush;
 
  __ULWORD__ block_size = (__ULWORD__)gx.block_length;
  char *buf = new char[block_size];
  if(server->ReadBlock(buf, gx) != 0) {
    delete[] buf;
    return 1;
  }

  cout << "Client requested that block \"";
  cout.write(buf, block_size);
  cout << "\" be changed to:" << "\n" << flush;
  delete[] buf;

  gxBlockHeader block_header;
  if(server->ReadHeader(block_header) != 0) return 1;

  char *block = new char[(__ULWORD__)block_header.block_length];
  if(server->ReadBlock((char *)block, block_header) != 0) {
    delete[] block;
    return 1;
  }

  cout << "Bytes = " << block_header.block_length << "\n" << flush;
  cout.write(block, block_header.block_length);
  cout.flush();

  delete[] block;
  return 0;
}

int AddBlock(gxSerialCommServer *server, gxBlockHeader &gx)
{
  cout << "Received an add block request" << "\n" << flush;
  __ULWORD__ block_size = (__ULWORD__)gx.block_length;

  char *block = new char[block_size];
  if(server->ReadBlock(block, gx) != 0) {
    delete[] block;
    return 1;
  }

  cout << "Client has requested the following block be added:" << "\n" 
       << flush;
  cout.write(block, block_size);
  cout.flush();
  delete[] block;
  
  return 0;
}

int DeleteBlock(gxSerialCommServer *server, gxBlockHeader &gx)
{
  cout << "Received a delete block request" << "\n" << flush;
  
  __ULWORD__ block_size = (__ULWORD__)gx.block_length;
  char *buf = new char[block_size];
  if(server->ReadBlock(buf, gx) != 0) {
    delete[] buf;
    return 1;
  }

  cout << "Client has requested block \"";
  cout.write(buf, block_size);
  cout << "\" be deleted" << "\n" << flush;
  delete[] buf;
  
  return 0;
}

int main(int argc, char **argv)
{
  if(argc < 2) {
    cout << "GX Serial port server" << "\n" << flush;
    cout << "Usage: " << argv[0] << " device name [baud rate]" << "\n" 
	 << flush;
    return 1;
  }

  gxSerialCommServer server;

  int baud_rate = 9600;
  if(argc > 2 && atoi(argv[2])) baud_rate = atoi(argv[2]);

  cout << "Initializing the GX serial port server..." << "\n" << flush;
  int rv = server.InitCommServer(argv[1], baud_rate);

  if(rv != gxSerialComm::scomm_NO_ERROR) {
    cout << server.SerialCommExceptionMessage() << "\n" << flush;
    return 1;
  }

  cout << "Opening GX serial port server on " << argv[1] << "\n" << flush;
    
  while(1) { // Block until the next read. 
    // Wait for a block header
    gxBlockHeader gx;
    if(server.ReadHeader(gx) != 0) {
      cout << server.SerialCommExceptionMessage() << "\n" << flush;
      return 1;
    }

    cout << "Client connecting on " << argv[1] << "\n" << flush;

    // Read the status byte to determine what to do with this block
    __ULWORD__ block_status = gx.block_status;
    __SBYTE__ status = (__SBYTE__)((block_status & 0xFF00)>>8);

    switch(status) { 
      // Process each block of data
      case gxAcknowledgeBlock:
	cout << "Received an acknowledge block command" << "\n" << flush;
	cout << "Sending acknowledgment" << "\n" << flush;
	if(server.WriteAckBlock() != 0)
	  cout << server.SerialCommExceptionMessage() << "\n" << flush;	  
	break;

      case gxAddRemoteBlock:
	if(AddBlock(&server, gx) != 0) 
	  cout << server.SerialCommExceptionMessage() << "\n" << flush;
	break;

      case gxChangeRemoteBlock:
	if(ChangeBlock(&server, gx) != 0) 
	  cout << server.SerialCommExceptionMessage() << "\n" << flush;
	break;

      case gxRequestBlock:
	if(AnswerRequest(&server, gx) != 0) 
	  cout << server.SerialCommExceptionMessage() << "\n" << flush;
	break;

      case gxDeleteRemoteBlock:
	if(DeleteBlock(&server, gx) != 0) 
	  cout << server.SerialCommExceptionMessage() << "\n" << flush;
	break;

      case gxSendBlock :  
	if(ReadBlock(&server, gx) != 0) 
	  cout << server.SerialCommExceptionMessage() << "\n" << flush;
	break;

      case gxCloseConnection : 
	cout << "Client sent a close connection command" << "\n" << flush;
	break;

      case gxKillServer:
	cout << "Client shutdown the server" << "\n" << flush;
	server.Close();
	return 0;
	
      default:
	cout << "Received bad block command from client" << "\n" << flush;
	break;
    }
  }

  server.Close();
  cout << "Exiting..." << "\n" << flush;
  return 0;
}
// ----------------------------------------------------------- // 
// ------------------------------- //
// --------- End of File --------- //
// ------------------------------- //