diff --git a/notes b/notes index cd9ee7da..78b0a63a 100644 --- a/notes +++ b/notes @@ -500,13 +500,14 @@ pcs cluster setup --name m3-anvil-01 m3-a01n01 m3-a01n02 pcs cluster start --all pcs stonith create virsh_node1 fence_virsh pcmk_host_list="m3-a01n01" ipaddr="192.168.122.1" passwd="secret" login="root" delay="15" port="m3-a01n01" op monitor interval="60" pcs stonith create virsh_node2 fence_virsh pcmk_host_list="m3-a01n02" ipaddr="192.168.122.1" passwd="secret" login="root" port="m3-a01n02" op monitor interval="60" +pcs property set stonith-enabled=true pcs resource create hypervisor systemd:libvirtd op monitor interval=60 pcs resource clone hypervisor clone-max=2 notify="false" -pcs resource create drbd systemd:drbd op monitor interval=60 -pcs resource clone drbd clone-max=2 notify="false" +pcs resource create test_server ocf:alteeve:server name="test_server" op monitor interval="60" +# Test stonith_admin --fence m3-a01n02 --verbose; crm_error $? @@ -1094,8 +1095,4 @@ sleep 30 pcs stonith create fence-virsh fence_virsh ipaddr=192.168.100.1 login=root passwd=christine pcmk_host_map="amy:rhel8-1;anna:rhel8-2;clara:rhel8-3;fanny:rhel8-4" -pcs property set stonith-enabled=true -pcs resource create dlm ocf:pacemaker:controld op monitor interval=60s on-fail=fence clone meta interleave=true clone-node-max=1 ordered=true -pcs resource create lvmlock ocf:heartbeat:lvmlockd op monitor interval=60s on-fail=fence clone meta interleave=true -pcs constraint order start dlm-clone then lvmlock-clone -pcs constraint colocation add lvmlock-clone with dlm-clone + diff --git a/ocf/alteeve/server b/ocf/alteeve/server index db77c137..63199228 100755 --- a/ocf/alteeve/server +++ b/ocf/alteeve/server @@ -132,6 +132,14 @@ if ($anvil->data->{environment}{PCMK_debug}) # Get any command line switches. $anvil->Get->switches; + +# Something for the logs +if ((not $anvil->data->{switches}{metadaata}) and (not $anvil->data->{switches}{'meta-data'})) +{ + $anvil->Log->entry({source => $THIS_FILE, line => __LINE__, 'print' => 1, level => 3, key => "log_0298"}); +} + + ### TEST: to be removed later if ($anvil->data->{switches}{test1}) { @@ -140,7 +148,7 @@ if ($anvil->data->{switches}{test1}) $anvil->data->{environment}{OCF_RESKEY_CRM_meta_on_node} = "el8-a01n01.digimer.ca"; $anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_source} = "el8-a01n01.digimer.ca"; $anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_target} = "el8-a01n02.digimer.ca"; - print "Running test 1; Migrate: [".$anvil->data->{environment}{OCF_RESKEY_name}."] from: [".$anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_source}."] to: [".$anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_target}."]\n"; + #print "Running test 1; Migrate: [".$anvil->data->{environment}{OCF_RESKEY_name}."] from: [".$anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_source}."] to: [".$anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_target}."]\n"; } if ($anvil->data->{switches}{test2}) { @@ -149,26 +157,21 @@ if ($anvil->data->{switches}{test2}) $anvil->data->{environment}{OCF_RESKEY_CRM_meta_on_node} = "el8-a01n02.digimer.ca"; $anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_source} = "el8-a01n02.digimer.ca"; $anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_target} = "el8-a01n01.digimer.ca"; - print "Running test 2; Migrate: [".$anvil->data->{environment}{OCF_RESKEY_name}."] from: [".$anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_source}."] to: [".$anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_target}."]\n"; + #print "Running test 2; Migrate: [".$anvil->data->{environment}{OCF_RESKEY_name}."] from: [".$anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_source}."] to: [".$anvil->data->{environment}{OCF_RESKEY_CRM_meta_migrate_target}."]\n"; } if ($anvil->data->{switches}{test3}) { - $anvil->data->{switches}{start} = "#!set!#"; $anvil->data->{environment}{OCF_RESKEY_name} = "test_server"; $anvil->data->{environment}{OCF_RESKEY_CRM_meta_on_node} = "el8-a01n01.digimer.ca"; - print "Running test 3; Boot: [".$anvil->data->{environment}{OCF_RESKEY_name}."] locally.\n"; + #print "Running test 3; Boot: [".$anvil->data->{environment}{OCF_RESKEY_name}."] locally.\n"; } if ($anvil->data->{switches}{test4}) { - $anvil->data->{switches}{stop} = "#!set!#"; $anvil->data->{environment}{OCF_RESKEY_name} = "test_server"; $anvil->data->{environment}{OCF_RESKEY_CRM_meta_on_node} = "el8-a01n01.digimer.ca"; - print "Running test 3; Shut down: [".$anvil->data->{environment}{OCF_RESKEY_name}."] locally.\n"; + #print "Running test 3; Shut down: [".$anvil->data->{environment}{OCF_RESKEY_name}."] locally.\n"; } -# Something for the logs -$anvil->Log->entry({source => $THIS_FILE, line => __LINE__, 'print' => 1, level => 2, key => "log_0298"}); - # This is for debugging. if (($anvil->data->{switches}{monitor}) or ($anvil->data->{switches}{status}) or @@ -963,7 +966,6 @@ sub migrate_server last; } } - die; } # Validate everything, as if we were about to boot