1 /* 2 * COarse-grain LOck-stepping Virtual Machines for Non-stop Service (COLO) 3 * (a.k.a. Fault Tolerance or Continuous Replication) 4 * 5 * Copyright (c) 2016 HUAWEI TECHNOLOGIES CO., LTD. 6 * Copyright (c) 2016 FUJITSU LIMITED 7 * Copyright (c) 2016 Intel Corporation 8 * 9 * Author: Zhang Chen <zhangchen.fnst@cn.fujitsu.com> 10 * 11 * This work is licensed under the terms of the GNU GPL, version 2 or 12 * later. See the COPYING file in the top-level directory. 13 */ 14 15 #include "qemu/osdep.h" 16 #include "trace.h" 17 #include "colo.h" 18 #include "util.h" 19 20 uint32_t connection_key_hash(const void *opaque) 21 { 22 const ConnectionKey *key = opaque; 23 uint32_t a, b, c; 24 25 /* Jenkins hash */ 26 a = b = c = JHASH_INITVAL + sizeof(*key); 27 a += key->src.s_addr; 28 b += key->dst.s_addr; 29 c += (key->src_port | key->dst_port << 16); 30 __jhash_mix(a, b, c); 31 32 a += key->ip_proto; 33 __jhash_final(a, b, c); 34 35 return c; 36 } 37 38 int connection_key_equal(const void *key1, const void *key2) 39 { 40 return memcmp(key1, key2, sizeof(ConnectionKey)) == 0; 41 } 42 43 int parse_packet_early(Packet *pkt) 44 { 45 int network_length; 46 static const uint8_t vlan[] = {0x81, 0x00}; 47 uint8_t *data = pkt->data + pkt->vnet_hdr_len; 48 uint16_t l3_proto; 49 ssize_t l2hdr_len = eth_get_l2_hdr_length(data); 50 51 if (pkt->size < ETH_HLEN + pkt->vnet_hdr_len) { 52 trace_colo_proxy_main("pkt->size < ETH_HLEN"); 53 return 1; 54 } 55 56 /* 57 * TODO: support vlan. 58 */ 59 if (!memcmp(&data[12], vlan, sizeof(vlan))) { 60 trace_colo_proxy_main("COLO-proxy don't support vlan"); 61 return 1; 62 } 63 64 pkt->network_header = data + l2hdr_len; 65 66 const struct iovec l2vec = { 67 .iov_base = (void *) data, 68 .iov_len = l2hdr_len 69 }; 70 l3_proto = eth_get_l3_proto(&l2vec, 1, l2hdr_len); 71 72 if (l3_proto != ETH_P_IP) { 73 return 1; 74 } 75 76 network_length = pkt->ip->ip_hl * 4; 77 if (pkt->size < l2hdr_len + network_length + pkt->vnet_hdr_len) { 78 trace_colo_proxy_main("pkt->size < network_header + network_length"); 79 return 1; 80 } 81 pkt->transport_header = pkt->network_header + network_length; 82 83 return 0; 84 } 85 86 void extract_ip_and_port(uint32_t tmp_ports, ConnectionKey *key, Packet *pkt) 87 { 88 key->src = pkt->ip->ip_src; 89 key->dst = pkt->ip->ip_dst; 90 key->src_port = ntohs(tmp_ports >> 16); 91 key->dst_port = ntohs(tmp_ports & 0xffff); 92 } 93 94 void fill_connection_key(Packet *pkt, ConnectionKey *key) 95 { 96 uint32_t tmp_ports; 97 98 memset(key, 0, sizeof(*key)); 99 key->ip_proto = pkt->ip->ip_p; 100 101 switch (key->ip_proto) { 102 case IPPROTO_TCP: 103 case IPPROTO_UDP: 104 case IPPROTO_DCCP: 105 case IPPROTO_ESP: 106 case IPPROTO_SCTP: 107 case IPPROTO_UDPLITE: 108 tmp_ports = *(uint32_t *)(pkt->transport_header); 109 extract_ip_and_port(tmp_ports, key, pkt); 110 break; 111 case IPPROTO_AH: 112 tmp_ports = *(uint32_t *)(pkt->transport_header + 4); 113 extract_ip_and_port(tmp_ports, key, pkt); 114 break; 115 default: 116 break; 117 } 118 } 119 120 void reverse_connection_key(ConnectionKey *key) 121 { 122 struct in_addr tmp_ip; 123 uint16_t tmp_port; 124 125 tmp_ip = key->src; 126 key->src = key->dst; 127 key->dst = tmp_ip; 128 129 tmp_port = key->src_port; 130 key->src_port = key->dst_port; 131 key->dst_port = tmp_port; 132 } 133 134 Connection *connection_new(ConnectionKey *key) 135 { 136 Connection *conn = g_slice_new0(Connection); 137 138 conn->ip_proto = key->ip_proto; 139 conn->processing = false; 140 conn->tcp_state = TCPS_CLOSED; 141 g_queue_init(&conn->primary_list); 142 g_queue_init(&conn->secondary_list); 143 144 return conn; 145 } 146 147 void connection_destroy(void *opaque) 148 { 149 Connection *conn = opaque; 150 151 g_queue_foreach(&conn->primary_list, packet_destroy, NULL); 152 g_queue_clear(&conn->primary_list); 153 g_queue_foreach(&conn->secondary_list, packet_destroy, NULL); 154 g_queue_clear(&conn->secondary_list); 155 g_slice_free(Connection, conn); 156 } 157 158 Packet *packet_new(const void *data, int size, int vnet_hdr_len) 159 { 160 Packet *pkt = g_slice_new(Packet); 161 162 pkt->data = g_memdup(data, size); 163 pkt->size = size; 164 pkt->creation_ms = qemu_clock_get_ms(QEMU_CLOCK_HOST); 165 pkt->vnet_hdr_len = vnet_hdr_len; 166 pkt->tcp_seq = 0; 167 pkt->tcp_ack = 0; 168 pkt->seq_end = 0; 169 pkt->header_size = 0; 170 pkt->payload_size = 0; 171 pkt->offset = 0; 172 pkt->flags = 0; 173 174 return pkt; 175 } 176 177 void packet_destroy(void *opaque, void *user_data) 178 { 179 Packet *pkt = opaque; 180 181 g_free(pkt->data); 182 g_slice_free(Packet, pkt); 183 } 184 185 void packet_destroy_partial(void *opaque, void *user_data) 186 { 187 Packet *pkt = opaque; 188 189 g_slice_free(Packet, pkt); 190 } 191 192 /* 193 * Clear hashtable, stop this hash growing really huge 194 */ 195 void connection_hashtable_reset(GHashTable *connection_track_table) 196 { 197 g_hash_table_remove_all(connection_track_table); 198 } 199 200 /* if not found, create a new connection and add to hash table */ 201 Connection *connection_get(GHashTable *connection_track_table, 202 ConnectionKey *key, 203 GQueue *conn_list) 204 { 205 Connection *conn = g_hash_table_lookup(connection_track_table, key); 206 207 if (conn == NULL) { 208 ConnectionKey *new_key = g_memdup(key, sizeof(*key)); 209 210 conn = connection_new(key); 211 212 if (g_hash_table_size(connection_track_table) > HASHTABLE_MAX_SIZE) { 213 trace_colo_proxy_main("colo proxy connection hashtable full," 214 " clear it"); 215 connection_hashtable_reset(connection_track_table); 216 /* 217 * clear the conn_list 218 */ 219 while (!g_queue_is_empty(conn_list)) { 220 connection_destroy(g_queue_pop_head(conn_list)); 221 } 222 } 223 224 g_hash_table_insert(connection_track_table, new_key, conn); 225 } 226 227 return conn; 228 } 229 230 bool connection_has_tracked(GHashTable *connection_track_table, 231 ConnectionKey *key) 232 { 233 Connection *conn = g_hash_table_lookup(connection_track_table, key); 234 235 return conn ? true : false; 236 } 237