v2p for sybase

Author: Marcin Przepiorowski

bin/dx_v2p.pl

@@ -75,7 +75,7 @@
   'all' => (\my $all),
   'version' => \(my $print_version),
   'configfile|c=s' => \(my $config_file)
-);
+) or pod2usage(-verbose => 1, -input=>\*DATA);
 
 
 
@@ -93,8 +93,8 @@
   exit (1);
 }
 
-if ( ! ( defined($type) && defined($sourcename) && defined($targetDirectory) && defined($dbname) && defined($environment) && defined($timestamp) && defined($envinst)  ) ) {
-  print "Options -type, -sourcename, -targetDirectory, -dbname, -environment, -timestamp and -envinst are required. \n";
+if ( ! ( defined($type) && defined($sourcename)  && defined($dbname) && defined($environment) && defined($timestamp) && defined($envinst)  ) ) {
+  print "Options -type, -sourcename, -dbname, -environment, -timestamp and -envinst are required. \n";
   pod2usage(-verbose => 1,  -input=>\*DATA);
   exit (1);
 }
@@ -106,6 +106,13 @@
 }
 
 
+if ( ( ( $type eq 'oracle') || ( $type eq 'mssql') ) && (! defined($targetDirectory)) ) {
+  print "Option targetDirectory is required. \n";
+  pod2usage(-verbose => 1,  -input=>\*DATA);
+  exit (1);  
+}
+
+
 # this array will have all engines to go through (if -d is specified it will be only one engine)
 my $engine_list = Toolkit_helpers::get_engine_list($all, $dx_host, $engine_obj); 
 
@@ -166,13 +173,15 @@
   }
 
   $db->setName($dbname, $dbname);
-  if ( $db->setFileSystemLayout($targetDirectory,$archiveDirectory,$dataDirectory,$externalDirectory,$scriptDirectory,$tempDirectory) ) {
-    print "Problem with export file system layout. Is targetDiretory and dataDirectory set ?\n";
-    exit(1);
-  }
 
 
   if ( $type eq 'oracle' ) {
+
+    if ( $db->setFileSystemLayout($targetDirectory,$archiveDirectory,$dataDirectory,$externalDirectory,$scriptDirectory,$tempDirectory) ) {
+      print "Problem with export file system layout. Is targetDiretory and dataDirectory set ?\n";
+      exit(1);
+    }
+
     if ( defined($template) ) {
       if ( $db->setTemplate($template) ) {
         print  "Template $template not found. V2P process won't be created\n";
@@ -208,6 +217,12 @@
 
   } 
   elsif ($type eq 'mssql') {
+
+    if ( $db->setFileSystemLayout($targetDirectory,$archiveDirectory,$dataDirectory,$externalDirectory,$scriptDirectory,$tempDirectory) ) {
+      print "Problem with export file system layout. Is targetDiretory and dataDirectory set ?\n";
+      exit(1);
+    }
+    
     if (defined($norecovery)) {
       $db->setNoRecovery();
     }
@@ -235,18 +250,24 @@ =head1 SYNOPSIS
             -sourcename src_name  
             -dbname db_name 
             -environment environment_name 
-            -type oracle|mssql 
-            -envinst OracleHome/MSSQLinstance
-            -targetDirectory target_directory 
-          [ -timestamp LATEST_SNAPSHOT|LATEST_POINT|time_stamp]
-          [ -template template_name] 
-          [ -mapfile mapping_file]  
-          [ -instname SID] 
-          [ -uniqname db_unique_name] 
-          [ -archiveDirectory arch_directory] 
-          [ -dataDirectory data_dir]
-          [ -externalDirectory external_dir] 
-          [ -tempDirectory temp_dir]
+            -type oracle|mssql|sybase 
+            -envinst OracleHome/MSSQLinstance/SybaseInstance
+          [ -targetDirectory target_directory ] 
+          [ -timestamp LATEST_SNAPSHOT|LATEST_POINT|time_stamp ]
+          [ -template template_name ] 
+          [ -mapfile mapping_file ]  
+          [ -norecovery ]
+          [ -noopen ]
+          [ -instname SID ] 
+          [ -uniqname db_unique_name ] 
+          [ -archiveDirectory arch_directory ] 
+          [ -dataDirectory data_dir ]
+          [ -externalDirectory external_dir ] 
+          [ -tempDirectory temp_dir ]
+          [ -dspconnections=n ]
+          [ -dspusecompression ]
+          [ -dspuseencryption ]
+          [ -concurrentfiles=n ]
           [ -help] 
           [ -debug]
 
@@ -277,13 +298,13 @@ =head2 V2P arguments
 Type (oracle|mssql)
 
 =item B<-sourcename>
-dSource/VDB Name
+dSource/VDB Name of database being move to physical
 
 =item B<-targetDirectory>
-Target directory 
+Target directory (mandatory for an Oracle and MS SQL)
 
 =item B<-dbname>
-Target database name
+Physical database name
 
 =item B<-timestamp>
 Time stamp for export format (YYYY-MM-DD HH24:MI:SS) or LATEST_POINT or LATEST_SNAPSHOT
@@ -319,6 +340,25 @@ =head2 V2P arguments
 =item B<-temp>
 Temp directory
 
+=item B<-norecovery>
+Do not run recovery (for MS SQL and Sybase only)
+
+=item B<-noopen>
+Do not open a database after migration (for an Oracle only)
+
+=item B<-dspconnections=n>
+Set number of DSP connections (for an Oracle only)
+
+=item B<-dspusecompression>
+Enable DSP compression (for an Oracle only)
+
+=item B<-dspuseencryption>
+Enable DSP encryption (for an Oracle only)
+
+=item B<-concurrentfiles=n>
+Set number of concurrent files being copy (for an Oracle only)
+
+
 =back
 
 
@@ -344,14 +384,21 @@ =head1 EXAMPLES
  Job JOB-231 finised with state: COMPLETED
  V2P job finished with COMPLETED status.
 
-MS SQL V2P proces
+MS SQL V2P process
 
  dx_v2p -d Landshark43 -sourcename autotest -environment WINDOWSTARGET -type mssql -envinst MSSQL2012 -dbname v2p -targetDirectory "c:\temp"
  Starting provisioning job - JOB-832
  0 - 1 - 5 - 10 - 20 - 80 - 100
  Job JOB-832 finised with state: COMPLETED
  V2P job finished with COMPLETED status.
 
+Sybase V2P process ( database SYBV2P has to be precreated with for load option )
+
+ dx_v2p -d Landshark51 -type sybase -timestamp LATEST_SNAPSHOT -sourcename testsys -dbname SYBV2P -environment LINUXTARGET -envinst LINUXTARGET
+ Starting provisioning job - JOB-5025
+ 0 - 8 - 9 - 30 - 60 - 90 - 92 - 100
+ Job JOB-5025 finished with state: COMPLETED
+ V2P finished..
 
 =cut
 

lib/SybaseVDB_obj.pm

@@ -11,7 +11,7 @@
 # See the License for the specific language governing permissions and
 # limitations under the License.
 #
-# Copyright (c) 2015,2016 by Delphix. All rights reserved.
+# Copyright (c) 2015,2017 by Delphix. All rights reserved.
 #
 # Program Name : OracleVDB_obj.pm
 # Description  : Delphix Engine Database objects
@@ -511,6 +511,54 @@ sub createVDB {
 }
 
 
+# Procedure v2p
+# parameters: 
+# - env - new DB environment
+# - inst - new DB instance
+# Start job for v2p Sybase VBD 
+# all above parameters are required. Additional parameters should by set by setXXXX procedures before this one is called
+# Return job number if provisioning has been started, otherwise return undef 
+
+sub v2p {
+    my $self = shift; 
+
+    my $env = shift;
+    my $inst = shift;
+
+    logger($self->{_debug}, "Entering SybaseVDB_obj::v2p",1);
+
+
+    if ( $self->setEnvironment($env) ) {
+        print "Environment $env not found. VDB won't be created\n";
+        return undef;
+    }
+
+    if ( $self->setHome($inst) ) {
+        print "Instance $inst in environment $env not found. VDB won't be created\n";
+        return undef;
+    }
+
+    if ( $self->setHost() ) {
+        print "Host is not set. VDB won't be created\n";
+        return undef;
+    }
+
+    if ( ! defined($self->{"NEWDB"}->{"container"}->{"name"} ) ) {
+        print "Set name using setName procedure before calling create VDB. VDB won't be created\n";
+        return undef;
+    }
+
+    $self->{"NEWDB"}->{"type"} = "ASEExportParameters";
+
+
+    delete $self->{"NEWDB"}->{"truncateLogOnCheckpoint"};
+    delete $self->{"NEWDB"}->{"container"};
+    delete $self->{"NEWDB"}->{"source"};
+    my $operation = 'resources/json/delphix/database/export';
+    my $json_data = $self->getJSON();
+    return $self->runJobOperation($operation,$json_data);
+
+}