root/trunk/FRII/app/ds-chooser.cc

/*
 * This file is part of the FamilyRelations II source distribution.
 *
 * FamilyRelations II is part of the FamilyJewels package for comparative
 * sequence analysis: http://family.caltech.edu/.
 *
 * Contact author: C. Titus Brown, titus@caltech.edu.
 *
 * This program and all associated source code files are Copyright (C) 2003,
 * 2004 the California Institute of Technology, Pasadena, CA, 91125 USA.  It
 * is under the Lesser GNU Public License; please see the included
 * LICENSE.txt file for more information, or contact Titus directly.
 *
 */

// Show a chooser & let the user select an analysis to load from a
// Cartwheel server.

#include <iostream>
#include <unistd.h>
#include <string>

#include <FL/Fl_Preferences.H>

#include "load_canal.hh"
#include "load_sister.hh"

int main(int argc, char * argv[])
{
  // set defaults

  int ch;
  char * server = "woodward.caltech.edu";
  int port = 80;
  char * location = "/canal/services/canal_svc/";
  char * username = "admin";
  char * password = "admin";
  bool password_was_set = false;

  //
  // parse command line arguments.
  //

  while(1) {
    ch = getopt(argc, argv, "?hs:i:u:p:");

    if (ch == -1) {
      break;
    }
    switch(ch) {
    case 's':                   // server
      server = optarg;
      break;
    case 'i':                   // port
      port = atoi(optarg);
      break;
    case 'u':                   // user
      username = optarg;
      break;
    case 'p':                   // password
      password = optarg;
      password_was_set = true;
      break;
    case '?':
    case 'h':
    default:
      printf("\nUsage:\n\t%s [ -s server ] [ -i port ] [ -u user ] [ -p password ]\n\n", argv[0]);
      exit(-1);
    }
  }

  //
  // Load in password by server/location/port, if specified, using the
  // preferences system.
  //

  Fl_Preferences p(Fl_Preferences::USER, "family.caltech.edu", "FRII");

  char path[500], * value = NULL;
  sprintf(path, "%s@%s,%d", username, server, port);

  if (password_was_set) {
    p.set(path, password);
    p.flush();
  } else {
    printf("(Using stored or default password for user '%s'.)\n", username);
  }
  p.get(path, value, password);

  //
  // OK, now run the various things.
  //

  sister::init();
  canal::init();
  init_chooser();

  printf("Connecting to remote Cartwheel server\n\n");
  printf("\thttp://%s:%d%s\n\n", server, port, location);
  printf("as user '%s'...\n\n", username);

  // connect to the remote Cartwheel server.
  try {
    canal::xmlrpcAPI * api = new canal::xmlrpcAPI(server, port, location);

    api->authenticate(username, value);
  
    if (api->is_authenticated()) {
      printf("Successful!  Starting chooser.\n");
    } else {
      printf("ERROR!  Cannot log in with given username; exiting.\n");
      exit(-1);
    }

    // build a chooser & let that run everything.
    canal_chooser(api);

  } catch (canal::exception& e) {
    std::cerr << "canal API error: " << e.msg << std::endl;
  }

  free(value);

  exit(0);
}