Database locked dialog added

wb/lib/wb/src/wb_erep.cpp

 /* 
- * Proview   $Id: wb_erep.cpp,v 1.48 2007-01-04 07:29:03 claes Exp $
+ * Proview   $Id: wb_erep.cpp,v 1.49 2007-01-17 10:29:26 claes Exp $
  * Copyright (C) 2005 SSAB Oxelösund AB.
  *
  * This program is free software; you can redistribute it and/or 
@@ -37,6 +37,7 @@
 #include "wb_dblock.h"
 #include "wb_ldh_msg.h"
 #include "co_msgwindow.h"
+#include "co_wow.h"
 
 extern "C" {
 #include "co_dcli.h"
@@ -678,13 +679,43 @@ void wb_erep::loadMeta( pwr_tStatus *status, char *db)
 
       sts = dcli_search_file( vname, found_file, DCLI_DIR_SEARCH_INIT);
       dcli_search_file( vname, found_file, DCLI_DIR_SEARCH_END);
+      if ( EVEN(sts)) {
+	MsgWindow::message( 'E', "Database not found", vname);
+      }
+      else {
+	int open_loadfile = 0;
+
 	if ( wb_dblock::is_locked(vname, uname)) {
+	  char msg[120];
+
+	  sprintf( msg, "Database %s is locked by user %s", vol_array[0], uname);
+	  MsgWindow::message( 'E', msg, msgw_ePop_No);
+
+	  if ( ! MsgWindow::has_window())
+	    exit(0);
 
-        MsgWindow::message( 'E', "Database is locked by user", uname, vname);
-	if ( MsgWindow::has_window())
+	  CoWow *wow = MsgWindow::get_wow();
+	  int res = wow->CreateModalDialog( "Database Locked", msg, "Exit", "Enter loadfile", "Remove lock", 
+					    "$pwr_exe/wtt_padlock.png");
+	  switch( res) {
+	  case wow_eModalDialogReturn_Button1:
+	  case wow_eModalDialogReturn_Deleted:
 	    exit(0);
+	  case wow_eModalDialogReturn_Button3:
+	    // Remove lock
+	    wb_dblock::dbunlock(vname);
+	    break;
+	  case wow_eModalDialogReturn_NYI:
+	  case wow_eModalDialogReturn_Button2:
+	    // Enter loadfile
+	    open_loadfile = 1;
+	    break;
+	  }
+
+	}
 
-        // Try to load dbs-file instead
+	if ( open_loadfile) {
+	  // Open dbs
 	  cdh_ToLower( vol_array[0], vol_array[0]);
 	  strcpy( vname, "$pwrp_load/");
 	  strcat( vname, vol_array[0]);
@@ -706,15 +737,13 @@ void wb_erep::loadMeta( pwr_tStatus *status, char *db)
 	  }
 	}
 	else {
-        if ( ODD(sts)) {
+	  // Open db
 	  wb_vrepdb *vrepdb = new wb_vrepdb( this, vname);
 	  vrepdb->name(vol_array[0]);
 	  addDb( &sts, vrepdb);
 	  MsgWindow::message( 'I', "Database opened", vname);
 	  vol_cnt++;
 	}
-        else
-          MsgWindow::message( 'E', "Database not found", vname);
       }
     }
   }
@@ -740,20 +769,35 @@ void wb_erep::loadMeta( pwr_tStatus *status, char *db)
 
     sts = dcli_search_file( vname, found_file, DCLI_DIR_SEARCH_INIT);
     dcli_search_file( vname, found_file, DCLI_DIR_SEARCH_END);
-    if ( wb_dblock::is_locked(vname, uname))
-      MsgWindow::message( 'E', "Database is locked by user", uname, vname);
-    else {
-      if ( ODD(sts)) {
-	wb_vrepdb *vrepdb = new wb_vrepdb( this, vname);
-        vrepdb->name("directory");
-        addDb( &sts, vrepdb);
-        MsgWindow::message( 'I', "Database opened", vname);
-      }
     if ( EVEN(sts)) {
       *status = LDH__PROJCONFIG;
       return;
     }
+    if ( wb_dblock::is_locked(vname, uname)) {
+      char msg[120];
+
+      sprintf( msg, "Database directory.db is locked by user %s", uname);
+      MsgWindow::message( 'E', msg, msgw_ePop_No);
+
+      CoWow *wow = MsgWindow::get_wow();
+      int res = wow->CreateModalDialog( "Database Locked", msg, "Exit", 0, "Remove lock", "$pwr_exe/wtt_padlock.png");
+      switch( res) {
+      case wow_eModalDialogReturn_NYI:
+      case wow_eModalDialogReturn_Button2:
+      case wow_eModalDialogReturn_Button1:
+      case wow_eModalDialogReturn_Deleted:
+	exit(0);
+      case wow_eModalDialogReturn_Button3:
+	// Remove lock
+	wb_dblock::dbunlock(vname);
+	break;
+      }    
     }
+
+    wb_vrepdb *vrepdb = new wb_vrepdb( this, vname);
+    vrepdb->name("directory");
+    addDb( &sts, vrepdb);
+    MsgWindow::message( 'I', "Database opened", vname);
   }
   if ( !vol_cnt)
     *status = LDH__PROJCONFIG;