admin | bae64d8 | 2013-08-01 10:50:15 -0700 | [diff] [blame] | 1 | CASE 1 |
| 2 | NAME "Verifying 'SSH protocol' based slicing" |
| 3 | |
| 4 | STEP "Deleting flowspace using 'removeFlowSpace'" |
| 5 | STORE ON FlowVisor1 DO removeFlowSpace USING "all" IN removeflowspace_result |
| 6 | ASSERT removeflowspace_result EQUALS main.TRUE ONPASS "Removed FlowSpace Successfully" ONFAIL "Failed to remove FlowSpace" |
| 7 | |
| 8 | STEP "Showing connected devices using 'listDevices'" |
| 9 | STORE ON FlowVisor1 DO listDevices IN listdevices_result |
| 10 | ASSERT listdevices_result EQUALS main.TRUE ONPASS "Listed devices Successfully" ONFAIL "Failed to list the devices" |
| 11 | |
| 12 | STEP "Verifying hosts reachability through ICMP traffic" |
| 13 | STORE ON Mininet1 DO pingHost USING src AS 'h1',target AS 'h4' IN ping_result |
| 14 | ASSERT ping_result EQUALS main.TRUE ONPASS "NO PACKET LOSS, HOST IS REACHABLE" ONFAIL "PACKET LOST, HOST IS NOT REACHABLE" |
| 15 | |
| 16 | STEP "Showing the flowSpace USING 'listFlowSpace'" |
| 17 | STORE ON FlowVisor1 DO listFlowSpace IN listflowspace_result |
| 18 | STORE ON Mininet1 DO pingHost USING src AS 'h1',target AS 'h4' IN ping_result |
| 19 | ASSERT main.TRUE EQUALS main.TRUE ONPASS "Listed FlowSpace" ONFAIL "Failed to list the FlowSpace" |
| 20 | |
| 21 | STEP "Adding FlowSpace to create the slice of the Network" |
| 22 | INFO " Geeting the IP-Addresses of Hosts" |
| 23 | STORE ON Mininet1 DO getIPAddress USING 'h1' IN h1_ipaddress |
| 24 | STORE ON Mininet1 DO getIPAddress USING 'h4' IN h4_ipaddress |
| 25 | |
| 26 | INFO " Geeting the MAC-Addresses of Hosts" |
| 27 | STORE ON Mininet1 DO getMacAddress USING 'h1' IN h1_macaddress |
| 28 | STORE ON Mininet1 DO getMacAddress USING 'h4' IN h4_macaddress |
| 29 | |
| 30 | STORE ON FlowVisor1 DO addFlowSpace USING dl_src AS h1_macaddress,nw_dst AS h4_ipaddress IN addflowspace_result_1 |
| 31 | ASSERT addflowspace_result_1 EQUALS main.TRUE ONPASS "Added FlowSpace Successfully" ONFAIL "Failed to add FlowSpace" |
| 32 | |
| 33 | STORE ON FlowVisor1 DO addFlowSpace USING dl_src AS h4_macaddress,nw_dst AS h1_ipaddress IN addflowspace_result_2 |
| 34 | ASSERT addflowspace_result_2 EQUALS main.TRUE ONPASS "Added FlowSpace Successfully" ONFAIL "Failed to add FlowSpace" |
| 35 | |
| 36 | STORE ON FlowVisor1 DO addFlowSpace USING nw_src AS h1_ipaddress IN addflowspace_result_3 |
| 37 | STORE ON FlowVisor1 DO addFlowSpace USING nw_src AS h4_ipaddress IN addflowspace_result_3 |
| 38 | |
| 39 | STORE ON FlowVisor1 DO addFlowSpace USING nw_src AS h1_ipaddress, tp_dst AS '22' IN addflowspace_result_3 |
| 40 | ASSERT addflowspace_result_3 EQUALS main.TRUE ONPASS "Added FlowSpace Successfully" ONFAIL "Failed to add FlowSpace" |
| 41 | |
| 42 | STORE ON FlowVisor1 DO addFlowSpace USING nw_src AS h4_ipaddress,tp_dst AS '22' IN addflowspace_result_4 |
| 43 | ASSERT addflowspace_result_4 EQUALS main.TRUE ONPASS "Added FlowSpace Successfully" ONFAIL "Failed to add FlowSpace" |
| 44 | |
| 45 | STORE ON FlowVisor1 DO addFlowSpace USING nw_src AS h1_ipaddress,tp_src AS '22' IN addflowspace_result_5 |
| 46 | ASSERT addflowspace_result_5 EQUALS main.TRUE ONPASS "Added FlowSpace Successfully" ONFAIL "Failed to add FlowSpace" |
| 47 | |
| 48 | STORE ON FlowVisor1 DO addFlowSpace USING nw_src AS h4_ipaddress,tp_src AS '22' IN addflowspace_result_6 |
| 49 | ASSERT addflowspace_result_6 EQUALS main.TRUE ONPASS "Added FlowSpace Successfully" ONFAIL "Failed to add FlowSpace" |
| 50 | |
| 51 | INFO "Showing the flowSpace USING 'listFlowSpace'" |
| 52 | STORE ON FlowVisor1 DO listFlowSpace IN listflowspace_result |
| 53 | |
| 54 | STEP "Verifying hosts reachability through ICMP traffic and Connectivity through SSH service" |
| 55 | STORE ON Mininet1 DO pingHost USING src AS 'h1',target AS 'h4' IN ping_result |
| 56 | ASSERT ping_result EQUALS main.TRUE ONPASS "NO PACKET LOSS, HOST IS REACHABLE" ONFAIL "PACKET LOST, HOST IS NOT REACHABLE" |
| 57 | |
| 58 | STORE ON Mininet1 DO verifySSH USING user_name AS CASE['destination_username'],ip_address AS CASE['destination_host'], pwd AS CASE['destination_password'], port AS CASE['destination_port'] IN ssh_result |
| 59 | ASSERT ssh_result EQUALS main.TRUE ONPASS "Failed to connect remote host throgh SSH" ONFAIL "Remote host connected throgh SSH " |
| 60 | |
| 61 | |
| 62 | |
| 63 | |
| 64 | |