exit.c

数据挖掘经典的hierarchial clustering algorithm

/*
  ========================================================================
  DEVise Data Visualization Software
  (c) Copyright 1992-1996
  By the DEVise Development Group
  Madison, Wisconsin
  All Rights Reserved.
  ========================================================================

  Under no circumstances is this software to be copied, distributed,
  or altered in any way without prior permission from the DEVise
  Development Group.
*/

/*
  $Id: Exit.c,v 1.12 1996/12/20 16:49:27 wenger Exp $

  $Log: Exit.c,v $
  Revision 1.12  1996/12/20 16:49:27  wenger
  Conditionaled out RTree code for libcs and attrproj.

  Revision 1.11  1996/12/15 06:52:31  donjerko
  Added the initialization and shutdown for RTree code.

  Revision 1.10  1996/11/26 09:29:59  beyer
  The exit code now removes the temp directory for its process.
  This could be more portable -- right now it just calls 'rm -fr'.

  Revision 1.9  1996/09/04 21:24:48  wenger
  'Size' in mapping now controls the size of Dali images; improved Dali
  interface (prevents Dali from getting 'bad window' errors, allows Devise
  to kill off the Dali server); added devise.dali script to automatically
  start Dali server along with Devise; fixed bug 037 (core dump if X is
  mapped to a constant); improved diagnostics for bad command-line arguments.

  Revision 1.8  1996/05/20 18:44:59  jussi
  Merged with ClientServer library code.

  Revision 1.7  1996/05/20 17:47:37  jussi
  Had to undo some previous changes.

  Revision 1.6  1996/05/09 18:12:11  kmurli
  No change to this makefile.

  Revision 1.5  1996/04/22 21:10:42  jussi
  Error message printed to console includes file name and line
  number.

  Revision 1.4  1996/04/16 19:45:35  jussi
  Added DoAbort() method and DOASSERT macro.

  Revision 1.3  1996/01/11 21:51:14  jussi
  Replaced libc.h with stdlib.h. Added copyright notice.

  Revision 1.2  1995/09/05 21:12:45  jussi
  Added/updated CVS header.
*/

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>

#include "Exit.h"
#if !defined(LIBCS) && !defined(ATTRPROJ)
#include "Init.h"
#include "Control.h"
#include "DaliIfc.h"
#endif

#if !defined(LIBCS) && !defined(ATTRPROJ)
#include "RTreeCommon.h"
#endif

void Exit::DoExit(int code)
{
#if !defined(LIBCS) && !defined(ATTRPROJ)
  shutdown_system(VolumeName, RTreeFile, VolumeSize);
#endif

#if !defined(LIBCS) && !defined(ATTRPROJ)
  if (Init::DoAbort()) {
    fflush(stdout);
    fflush(stderr);
    abort();
  }

  if (Init::DaliQuit()) {
    (void) DaliIfc::Quit(Init::DaliServer());
  }
#endif

  // hack to get rid of temp directory - this could probably be written
  // a bit more portably, but oh well.
  char *tmpDir =  getenv("DEVISE_TMP");
  if (!tmpDir)
    tmpDir = "tmp";
  pid_t pid = getpid();
  char buf[512];
  DOASSERT(strlen(tmpDir) + 25 <= 512, "String space too small");
  sprintf(buf, "rm -fr %s/DEVise_%ld", tmpDir, (long)pid);
  system(buf);

  exit(code);
}

void Exit::DoAbort(char *reason, char *file, int line)
{
  char fulltext[256];
  sprintf(fulltext, "%s (%s:%d)", reason, file, line);

  fprintf(stderr, "An internal error has occurred. The reason is:\n");
  fprintf(stderr, "  %s\n", fulltext);

#if !defined(LIBCS) && !defined(ATTRPROJ)
  ControlPanel::Instance()->DoAbort(fulltext);

  if (Init::DaliQuit()) {
    (void) DaliIfc::Quit(Init::DaliServer());
  }
#endif

  DoExit(2);
}