/* Copyright (c) 2000, 2019, Oracle and/or its affiliates. All rights reserved. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License, version 2.0, as published by the Free Software Foundation. This program is also distributed with certain software (including but not limited to OpenSSL) that is licensed under separate terms, as designated in a particular file or component or in included license documentation. The authors of MySQL hereby grant you an additional permission to link the program and your derivative works with the separately licensed software that they have included with MySQL. Without limiting anything contained in the foregoing, this file, which is part of C Driver for MySQL (Connector/C), is also subject to the Universal FOSS Exception, version 1.0, a copy of which can be found at http://oss.oracle.com/licenses/universal-foss-exception. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License, version 2.0, for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA */ /** @file This file is the net layer API for the MySQL client/server protocol. Write and read of logical packets to/from socket. Writes are cached into net_buffer_length big packets. Read packets are reallocated dynamicly when reading big packets. Each logical packet has the following pre-info: 3 byte length & 1 byte package-number. */ #include #include #include #include #include "my_byteorder.h" #include "my_compiler.h" #include "my_dbug.h" #include "my_io.h" #include "my_macros.h" #include "my_sys.h" #include "mysql.h" #include "mysql/service_mysql_alloc.h" #include "mysql_async.h" #include "mysql_com.h" #include "mysqld_error.h" #include "violite.h" using std::max; using std::min; #ifdef MYSQL_SERVER #include "sql/psi_memory_key.h" #else #define key_memory_NET_buff 0 #define key_memory_NET_compress_packet 0 #endif /* The following handles the differences when this is linked between the client and the server. This gives an error if a too big packet is found. The server can change this, but because the client can't normally do this the client should have a bigger max_allowed_packet. */ #ifdef MYSQL_SERVER /* The following variables/functions should really not be declared extern, but as it's hard to include sql_class.h here, we have to live with this for a while. */ extern void thd_increment_bytes_sent(size_t length); extern void thd_increment_bytes_received(size_t length); /* Additional instrumentation hooks for the server */ #include "mysql_com_server.h" #endif static bool net_write_buff(NET *, const uchar *, size_t); NET_EXTENSION *net_extension_init() { NET_EXTENSION *ext = static_cast(my_malloc( PSI_NOT_INSTRUMENTED, sizeof(NET_EXTENSION), MYF(MY_WME | MY_ZEROFILL))); ext->net_async_context = static_cast(my_malloc( PSI_NOT_INSTRUMENTED, sizeof(NET_ASYNC), MYF(MY_WME | MY_ZEROFILL))); ext->compress_ctx.algorithm = enum_compression_algorithm::MYSQL_UNCOMPRESSED; return ext; } void net_extension_free(NET *net) { NET_EXTENSION *ext = NET_EXTENSION_PTR(net); if (ext) { #ifndef MYSQL_SERVER if (ext->net_async_context) { my_free(ext->net_async_context); ext->net_async_context = nullptr; } mysql_compress_context_deinit(&ext->compress_ctx); my_free(ext); net->extension = 0; #endif } } /** Init with packet info. */ bool my_net_init(NET *net, Vio *vio) { DBUG_TRACE; net->vio = vio; my_net_local_init(net); /* Set some limits */ if (!(net->buff = (uchar *)my_malloc( key_memory_NET_buff, (size_t)net->max_packet + NET_HEADER_SIZE + COMP_HEADER_SIZE, MYF(MY_WME)))) return 1; net->buff_end = net->buff + net->max_packet; net->error = 0; net->return_status = 0; net->pkt_nr = net->compress_pkt_nr = 0; net->write_pos = net->read_pos = net->buff; net->last_error[0] = 0; net->compress = 0; net->reading_or_writing = 0; net->where_b = net->remain_in_buf = 0; net->last_errno = 0; #ifdef MYSQL_SERVER net->extension = nullptr; #else NET_EXTENSION *ext = net_extension_init(); ext->net_async_context->cur_pos = net->buff + net->where_b; ext->net_async_context->read_rows_is_first_read = true; ext->net_async_context->async_operation = NET_ASYNC_OP_IDLE; ext->net_async_context->async_send_command_status = NET_ASYNC_SEND_COMMAND_IDLE; ext->net_async_context->async_read_query_result_status = NET_ASYNC_READ_QUERY_RESULT_IDLE; ext->net_async_context->async_packet_read_state = NET_ASYNC_PACKET_READ_IDLE; ext->compress_ctx.algorithm = enum_compression_algorithm::MYSQL_UNCOMPRESSED; net->extension = ext; #endif if (vio) { /* For perl DBI/DBD. */ net->fd = vio_fd(vio); vio_fastsend(vio); } return 0; } void net_end(NET *net) { DBUG_TRACE; #ifdef MYSQL_SERVER NET_SERVER *server_extension = static_cast(net->extension); if (server_extension != nullptr) mysql_compress_context_deinit(&server_extension->compress_ctx); #else net_extension_free(net); #endif my_free(net->buff); net->buff = 0; } void net_claim_memory_ownership(NET *net) { my_claim(net->buff); } /** Realloc the packet buffer. */ bool net_realloc(NET *net, size_t length) { uchar *buff; size_t pkt_length; DBUG_TRACE; DBUG_PRINT("enter", ("length: %lu", (ulong)length)); if (length >= net->max_packet_size) { DBUG_PRINT("error", ("Packet too large. Max size: %lu", net->max_packet_size)); /* @todo: 1 and 2 codes are identical. */ net->error = 1; net->last_errno = ER_NET_PACKET_TOO_LARGE; #ifdef MYSQL_SERVER my_error(ER_NET_PACKET_TOO_LARGE, MYF(0)); #endif return 1; } pkt_length = (length + IO_SIZE - 1) & ~(IO_SIZE - 1); /* We must allocate some extra bytes for the end 0 and to be able to read big compressed blocks in net_read_packet() may actually read 4 bytes depending on build flags and platform. */ if (!(buff = (uchar *)my_realloc( key_memory_NET_buff, (char *)net->buff, pkt_length + NET_HEADER_SIZE + COMP_HEADER_SIZE, MYF(MY_WME)))) { /* @todo: 1 and 2 codes are identical. */ net->error = 1; net->last_errno = ER_OUT_OF_RESOURCES; /* In the server the error is reported by MY_WME flag. */ return 1; } #ifdef MYSQL_SERVER net->buff = net->write_pos = buff; #else size_t cur_pos_offset = NET_ASYNC_DATA(net)->cur_pos - net->buff; net->buff = net->write_pos = buff; NET_ASYNC_DATA(net)->cur_pos = net->buff + cur_pos_offset; #endif net->buff_end = buff + (net->max_packet = (ulong)pkt_length); return 0; } /** Clear (reinitialize) the NET structure for a new command. @remark Performs debug checking of the socket buffer to ensure that the protocol sequence is correct. @param net NET handler @param check_buffer Whether to check the socket buffer. */ void net_clear(NET *net, bool check_buffer MY_ATTRIBUTE((unused))) { DBUG_TRACE; /* Ensure the socket buffer is empty, except for an EOF (at least 1). */ DBUG_ASSERT(!check_buffer || (vio_pending(net->vio) <= 1)); /* Ready for new command */ net->pkt_nr = net->compress_pkt_nr = 0; net->write_pos = net->buff; } /** Flush write_buffer if not empty. */ bool net_flush(NET *net) { bool error = 0; DBUG_TRACE; if (net->buff != net->write_pos) { error = net_write_packet(net, net->buff, (size_t)(net->write_pos - net->buff)); net->write_pos = net->buff; } /* Sync packet number if using compression */ if (net->compress) net->pkt_nr = net->compress_pkt_nr; return error; } /** Whether a I/O operation should be retried later. @param net NET handler. @param retry_count Maximum number of interrupted operations. @retval true Operation should be retried. @retval false Operation should not be retried. Fatal error. */ static bool net_should_retry(NET *net, uint *retry_count MY_ATTRIBUTE((unused))) { bool retry; #ifndef MYSQL_SERVER /* In the client library, interrupted I/O operations are always retried. Otherwise, it's either a timeout or an unrecoverable error. */ retry = vio_should_retry(net->vio); #else /* In the server, interrupted I/O operations are retried up to a limit. In this scenario, pthread_kill can be used to wake up (interrupt) threads waiting for I/O. */ retry = vio_should_retry(net->vio) && ((*retry_count)++ < net->retry_count); #endif return retry; } /* clang-format off */ /** @page page_protocol_basic_packets MySQL Packets If a MySQL client or server wants to send data, it: - Splits the data into packets of size 224 bytes - Prepends to each chunk a packet header @section sect_protocol_basic_packets_packet Protocol::Packet Data between client and server is exchanged in packets of max 16MByte size.
Payload
TypeNameDescription
@ref a_protocol_type_int1 "int<3>" payload_length Length of the payload. The number of bytes in the packet beyond the initial 4 bytes that make up the packet header.
@ref a_protocol_type_int1 "int<1>" sequence_id @ref sect_protocol_basic_packets_sequence_id
@ref sect_protocol_basic_dt_string_var "string<var>" payload payload of the packet
Example: @todo: Reference COM_QUIT A COM_QUIT looks like this:
~~~~~~~~~~~~~~~~~~~~~ 01 00 00 00 01 ~~~~~~~~~~~~~~~~~~~~~ - length: 1 - sequence_id: x00 - payload: 0x01
@sa my_net_write(), net_write_command(), net_write_buff(), my_net_read(), net_send_ok() @section sect_protocol_basic_packets_sending_mt_16mb Sending More Than 16Mb If the payload is larger than or equal to 224-1 bytes the length is set to 224-1 (`ff ff ff`) and a additional packets are sent with the rest of the payload until the payload of a packet is less than 224-1 bytes. Sending a payload of 16 777 215 (224-1) bytes looks like: ~~~~~~~~~~~~~~~~ ff ff ff 00 ... 00 00 00 01 ~~~~~~~~~~~~~~~~ @section sect_protocol_basic_packets_sequence_id Sequence ID The sequence-id is incremented with each packet and may wrap around. It starts at 0 and is reset to 0 when a new command begins in the @ref page_protocol_command_phase. @section sect_protocol_basic_packets_describing_packets Describing Packets In this document we describe each packet by first defining its payload and provide an example showing each packet that is sent, including its packet header: 
  <packetname>
    <description>

    direction: client -> server
    response: <response>

    payload:
      <type>        <description>
Example: ~~~~~~~~~~~~~~~~~~~~~ 01 00 00 00 01 ~~~~~~~~~~~~~~~~~~~~~ @note Some packets have optional fields or a different layout depending on the @ref group_cs_capabilities_flags. If a field has a fixed value, its description shows it as a hex value in brackets like this: `[00]` */ /* clang-format on */ /***************************************************************************** ** Write something to server/client buffer *****************************************************************************/ /** Write a logical packet with packet header. Format: Packet length (3 bytes), packet number (1 byte) When compression is used, a 3 byte compression length is added. @note If compression is used, the original packet is modified! */ bool my_net_write(NET *net, const uchar *packet, size_t len) { uchar buff[NET_HEADER_SIZE]; DBUG_DUMP("net write", packet, len); if (unlikely(!net->vio)) /* nowhere to write */ return false; DBUG_EXECUTE_IF("simulate_net_write_failure", { my_error(ER_NET_ERROR_ON_WRITE, MYF(0)); return 1; };); /* turn off non blocking operations */ if (!vio_is_blocking(net->vio)) vio_set_blocking_flag(net->vio, true); /* Big packets are handled by splitting them in packets of MAX_PACKET_LENGTH length. The last packet is always a packet that is < MAX_PACKET_LENGTH. (The last packet may even have a length of 0) */ while (len >= MAX_PACKET_LENGTH) { const ulong z_size = MAX_PACKET_LENGTH; int3store(buff, z_size); buff[3] = (uchar)net->pkt_nr++; if (net_write_buff(net, buff, NET_HEADER_SIZE) || net_write_buff(net, packet, z_size)) { return 1; } packet += z_size; len -= z_size; } /* Write last packet */ int3store(buff, static_cast(len)); buff[3] = (uchar)net->pkt_nr++; if (net_write_buff(net, buff, NET_HEADER_SIZE)) { return 1; } #ifndef DEBUG_DATA_PACKETS DBUG_DUMP("packet_header", buff, NET_HEADER_SIZE); #endif return net_write_buff(net, packet, len); } static void reset_packet_write_state(NET *net) { DBUG_TRACE; NET_ASYNC *net_async = NET_ASYNC_DATA(net); if (net_async->async_write_vector) { if (net_async->async_write_vector != net_async->inline_async_write_vector) { my_free(net_async->async_write_vector); } net_async->async_write_vector = nullptr; } if (net_async->async_write_headers) { if (net_async->async_write_headers != net_async->inline_async_write_header) { my_free(net_async->async_write_headers); } net_async->async_write_headers = nullptr; } net_async->async_write_vector_size = 0; net_async->async_write_vector_current = 0; } /* Construct the proper buffers for our nonblocking write. What we do here is we make an iovector for the entire write (header, command, and payload). We then continually call writev on this vector, consuming parts from it as bytes are successfully written. Headers for the message are all stored inside one buffer, separate from the payload; this lets us avoid copying the entire query just to insert the headers every 2**24 bytes. The most common case is the query fits in a packet. In that case, we don't construct the iovector dynamically, instead using one we pre-allocated inside the net structure. This avoids allocations in the common path, but requires special casing with our iovec and header buffer. */ static int begin_packet_write_state(NET *net, uchar command, const uchar *packet, size_t packet_len, const uchar *optional_prefix, size_t prefix_len) { DBUG_TRACE; NET_ASYNC *net_async = NET_ASYNC_DATA(net); size_t total_len = packet_len + prefix_len; bool include_command = (command < COM_END); if (include_command) { ++total_len; } size_t packet_count = 1 + total_len / MAX_PACKET_LENGTH; reset_packet_write_state(net); struct io_vec *vec; uchar *headers; if (total_len < MAX_PACKET_LENGTH) { /* Most writes hit this case, ie, less than MAX_PACKET_LENGTH of query text. */ vec = net_async->inline_async_write_vector; headers = net_async->inline_async_write_header; } else { /* Large query, create the vector and header buffer dynamically. */ vec = (struct io_vec *)my_malloc( PSI_NOT_INSTRUMENTED, sizeof(struct io_vec) * packet_count * 2 + 1, MYF(MY_ZEROFILL)); if (!vec) { return 0; } headers = (uchar *)my_malloc(PSI_NOT_INSTRUMENTED, packet_count * (NET_HEADER_SIZE + 1), MYF(MY_ZEROFILL)); if (!headers) { my_free(vec); return 0; } } /* Regardless of where vec and headers come from, these are what we feed to writev and populate below. */ net_async->async_write_vector = vec; net_async->async_write_headers = headers; /* We sneak the command into the first header, so the special casing below about packet_num == 0 relates to that. This lets us avoid an extra allocation and copying the input buffers again. Every chunk of MAX_PACKET_LENGTH results in a header and a payload, so we have twice as many entries in the IO vector as we have packet_count. The first packet may be prefixed with a small amount of data, so that one actually might consume *three* iovec entries. */ for (size_t packet_num = 0; packet_num < packet_count; ++packet_num) { /* First packet, our header. */ uchar *buf = headers + packet_num * NET_HEADER_SIZE; if (packet_num > 0) { /* First packet stole one extra byte from the header buffer for the command number, so account for it here. */ ++buf; } size_t header_len = NET_HEADER_SIZE; size_t bytes_queued = 0; size_t packet_size = min(MAX_PACKET_LENGTH, total_len); int3store(buf, packet_size); buf[3] = (uchar)net->pkt_nr++; /* We sneak the command byte into the header, even though technically it is payload. This lets us avoid an allocation or separate one-byte entry in our iovec. */ if (packet_num == 0 && include_command) { buf[4] = command; ++header_len; /* Our command byte counts against the packet size. */ ++bytes_queued; } (*vec).iov_base = buf; (*vec).iov_len = header_len; ++vec; /* Second packet, our optional prefix (if any). */ if (packet_num == 0 && optional_prefix != NULL) { (*vec).iov_base = const_cast(optional_prefix); (*vec).iov_len = prefix_len; ++vec; bytes_queued += prefix_len; } /* Final packet, the payload itself. Send however many bytes from packet we have left, and advance our packet pointer. */ size_t remaining_bytes = packet_size - bytes_queued; (*vec).iov_base = const_cast(packet); (*vec).iov_len = remaining_bytes; bytes_queued += remaining_bytes; packet += remaining_bytes; total_len -= bytes_queued; ++vec; /* Make sure we sent entire packets. */ if (total_len > 0) { DBUG_ASSERT(packet_size == MAX_PACKET_LENGTH); } } /* Make sure we don't have anything left to send. */ DBUG_ASSERT(total_len == 0); net_async->async_write_vector_size = (vec - net_async->async_write_vector); net_async->async_write_vector_current = 0; return 1; } static net_async_status net_write_vector_nonblocking(NET *net, ssize_t *res) { NET_ASYNC *net_async = NET_ASYNC_DATA(net); struct io_vec *vec = net_async->async_write_vector + net_async->async_write_vector_current; DBUG_TRACE; while (net_async->async_write_vector_current != net_async->async_write_vector_size) { if (vio_is_blocking(net->vio)) { vio_set_blocking_flag(net->vio, false); } *res = vio_write(net->vio, (uchar *)vec->iov_base, vec->iov_len); if (*res < 0) { if (errno == SOCKET_EAGAIN || (SOCKET_EAGAIN != SOCKET_EWOULDBLOCK && errno == SOCKET_EWOULDBLOCK)) { /* In the unlikely event that there is a renegotiation and SSL_ERROR_WANT_READ is returned, set blocking state to read. */ if (static_cast(*res) == VIO_SOCKET_WANT_READ) { net_async->async_blocking_state = NET_NONBLOCKING_READ; } else { net_async->async_blocking_state = NET_NONBLOCKING_WRITE; } return NET_ASYNC_NOT_READY; } return NET_ASYNC_COMPLETE; } size_t bytes_written = static_cast(*res); vec->iov_len -= bytes_written; vec->iov_base = (char *)vec->iov_base + bytes_written; if (vec->iov_len != 0) break; ++net_async->async_write_vector_current; vec++; } if (net_async->async_write_vector_current == net_async->async_write_vector_size) { return NET_ASYNC_COMPLETE; } net_async->async_blocking_state = NET_NONBLOCKING_WRITE; return NET_ASYNC_NOT_READY; } /** Send a command to the server in asynchronous way. This function will first populate all headers in NET::async_write_headers, followed by payload in NET::async_write_vector. Once header and payload is populated in NET, were call net_write_vector_nonblocking to send the packets to server in an asynchronous way. */ net_async_status net_write_command_nonblocking(NET *net, uchar command, const uchar *prefix, size_t prefix_len, const uchar *packet, size_t packet_len, bool *res) { net_async_status status; NET_ASYNC *net_async = NET_ASYNC_DATA(net); ssize_t rc; DBUG_TRACE; DBUG_DUMP("net write prefix", prefix, prefix_len); DBUG_DUMP("net write pkt", packet, packet_len); if (unlikely(!net->vio)) { /* nowhere to write */ *res = false; goto done; } switch (net_async->async_operation) { case NET_ASYNC_OP_IDLE: if (!begin_packet_write_state(net, command, packet, packet_len, prefix, prefix_len)) { *res = false; goto done; } net_async->async_operation = NET_ASYNC_OP_WRITING; /* fallthrough */ case NET_ASYNC_OP_WRITING: status = net_write_vector_nonblocking(net, &rc); if (status == NET_ASYNC_COMPLETE) { if (rc < 0) { *res = true; } else { *res = false; } goto done; } return NET_ASYNC_NOT_READY; net_async->async_operation = NET_ASYNC_OP_COMPLETE; /* fallthrough */ case NET_ASYNC_OP_COMPLETE: *res = false; goto done; default: DBUG_ASSERT(false); *res = true; return NET_ASYNC_COMPLETE; } done: reset_packet_write_state(net); net_async->async_operation = NET_ASYNC_OP_IDLE; return NET_ASYNC_COMPLETE; } /* Non blocking version of my_net_write(). */ net_async_status my_net_write_nonblocking(NET *net, const uchar *packet, size_t len, bool *res) { return net_write_command_nonblocking(net, COM_END, packet, len, NULL, 0, res); } /** Send a command to the server. The reason for having both header and packet is so that libmysql can easy add a header to a special command (like prepared statements) without having to re-alloc the string. As the command is part of the first data packet, we have to do some data juggling to put the command in there, without having to create a new packet. This function will split big packets into sub-packets if needed. (Each sub packet can only be 2^24 bytes) @param net NET handler @param command Command in MySQL server (enum enum_server_command) @param header Header to write after command @param head_len Length of header @param packet Query or parameter to query @param len Length of packet @retval 0 ok @retval 1 error */ bool net_write_command(NET *net, uchar command, const uchar *header, size_t head_len, const uchar *packet, size_t len) { /* turn off non blocking operations */ if (!vio_is_blocking(net->vio)) vio_set_blocking_flag(net->vio, true); size_t length = len + 1 + head_len; /* 1 extra byte for command */ uchar buff[NET_HEADER_SIZE + 1]; uint header_size = NET_HEADER_SIZE + 1; DBUG_TRACE; DBUG_PRINT("enter", ("length: %lu", (ulong)len)); buff[4] = command; /* For first packet */ if (length >= MAX_PACKET_LENGTH) { /* Take into account that we have the command in the first header */ len = MAX_PACKET_LENGTH - 1 - head_len; do { int3store(buff, MAX_PACKET_LENGTH); buff[3] = (uchar)net->pkt_nr++; if (net_write_buff(net, buff, header_size) || net_write_buff(net, header, head_len) || net_write_buff(net, packet, len)) { return 1; } packet += len; length -= MAX_PACKET_LENGTH; len = MAX_PACKET_LENGTH; head_len = 0; header_size = NET_HEADER_SIZE; } while (length >= MAX_PACKET_LENGTH); len = length; /* Data left to be written */ } int3store(buff, static_cast(length)); buff[3] = (uchar)net->pkt_nr++; bool rc = net_write_buff(net, buff, header_size) || (head_len && net_write_buff(net, header, head_len)) || net_write_buff(net, packet, len) || net_flush(net); return rc; } /** Caching the data in a local buffer before sending it. Fill up net->buffer and send it to the client when full. If the rest of the to-be-sent-packet is bigger than buffer, send it in one big block (to avoid copying to internal buffer). If not, copy the rest of the data to the buffer and return without sending data. @param net Network handler @param packet Packet to send @param len Length of packet @note The cached buffer can be sent as it is with 'net_flush()'. In this code we have to be careful to not send a packet longer than MAX_PACKET_LENGTH to net_write_packet() if we are using the compressed protocol as we store the length of the compressed packet in 3 bytes. @retval 0 ok @retval 1 */ static bool net_write_buff(NET *net, const uchar *packet, size_t len) { ulong left_length; if (net->compress && net->max_packet > MAX_PACKET_LENGTH) left_length = (ulong)(MAX_PACKET_LENGTH - (net->write_pos - net->buff)); else left_length = (ulong)(net->buff_end - net->write_pos); #ifdef DEBUG_DATA_PACKETS DBUG_DUMP("data", packet, len); #endif if (len > left_length) { if (net->write_pos != net->buff) { /* Fill up already used packet and write it */ memcpy(net->write_pos, packet, left_length); if (net_write_packet(net, net->buff, (size_t)(net->write_pos - net->buff) + left_length)) return 1; net->write_pos = net->buff; packet += left_length; len -= left_length; } if (net->compress) { /* We can't have bigger packets than 16M with compression Because the uncompressed length is stored in 3 bytes */ left_length = MAX_PACKET_LENGTH; while (len > left_length) { if (net_write_packet(net, packet, left_length)) return 1; packet += left_length; len -= left_length; } } if (len > net->max_packet) return net_write_packet(net, packet, len); /* Send out rest of the blocks as full sized blocks */ } if (len > 0) memcpy(net->write_pos, packet, len); net->write_pos += len; return 0; } /** Write a determined number of bytes to a network handler. @param net NET handler. @param buf Buffer containing the data to be written. @param count The length, in bytes, of the buffer. @return true on error, false on success. */ static bool net_write_raw_loop(NET *net, const uchar *buf, size_t count) { unsigned int retry_count = 0; while (count) { size_t sentcnt = vio_write(net->vio, buf, count); /* VIO_SOCKET_ERROR (-1) indicates an error. */ if (sentcnt == VIO_SOCKET_ERROR) { /* A recoverable I/O error occurred? */ if (net_should_retry(net, &retry_count)) continue; else break; } count -= sentcnt; buf += sentcnt; #ifdef MYSQL_SERVER thd_increment_bytes_sent(sentcnt); #endif } /* On failure, propagate the error code. */ if (count) { /* Socket should be closed. */ net->error = 2; /* Interrupted by a timeout? */ if (vio_was_timeout(net->vio)) net->last_errno = ER_NET_WRITE_INTERRUPTED; else net->last_errno = ER_NET_ERROR_ON_WRITE; #ifdef MYSQL_SERVER my_error(net->last_errno, MYF(0)); #endif } return count != 0; } /* clang-format off */ /** @page page_protocol_basic_compression Compression Compression is: - its own protocol layer - transparent to the other MySQL protocol layers - compressing a string of bytes (which may even be a part of @ref sect_protocol_basic_packets_packet) It is enabled if: - the server announces ::CLIENT_COMPRESS or ::CLIENT_ZSTD_COMPRESSION_ALGORITHM in its @ref page_protocol_connection_phase_packets_protocol_handshake based on variable protocol_compression_algorithms and - the client does following: - if client flags match with server flags, then client announces the matching flag as part of @ref page_protocol_connection_phase_packets_protocol_handshake_response if matching flag is ::CLIENT_ZSTD_COMPRESSION_ALGORITHM then client sends extra 1 byte in @ref page_protocol_connection_phase_packets_protocol_handshake_response - if client flags do not match then connection fallsback to uncompressed mode. - Server finishes the @ref page_protocol_connection_phase with an @ref page_protocol_basic_ok_packet. @subpage page_protocol_basic_compression_packet */ /** @page page_protocol_basic_compression_packet Compressed Packet The compressed packet consists of a @ref sect_protocol_basic_compression_packet_header and a payload which is either a @ref sect_protocol_basic_compression_packet_compressed_payload or @ref sect_protocol_basic_compression_packet_uncompressed_payload. @sa ::compress_packet, ::CLIENT_COMPRESS @section sect_protocol_basic_compression_packet_header Compressed Packet Header
TypeNameDescription
@ref a_protocol_type_int3 "int<3>" length of compressed payload raw packet length minus the size of the compressed packet header (7 bytes) itself.
@ref a_protocol_type_int1 "int<1>" compressed sequence id Sequence ID of the compressed packets, reset in the same way as the @ref sect_protocol_basic_packets_packet, but incremented independently
@section sect_protocol_basic_compression_packet_compressed_payload Compressed Payload If the length of *length of payload before compression* is more than 0 the @ref sect_protocol_basic_compression_packet_header is followed by the compressed payload. It uses the *deflate* algorithm as described in [RFC 1951](http://tools.ietf.org/html/rfc1951.html) and implemented in [zlib](http://zlib.org/). The header of the compressed packet has the parameters of the `uncompress()` function in mind: ~~~~~~~~~~~~~ ZEXTERN int ZEXPORT uncompress OF((Bytef *dest, uLongf *destLen, const Bytef *source, uLong sourceLen)); ~~~~~~~~~~~~~ The payload can be anything from a piece of a MySQL Packet to several MySQL Packets. The client or server may bundle several MySQL packets, compress it and send it as one compressed packet. @subsection sect_protocol_basic_compression_packet_compressed_payload_single Example: One MySQL Packet A ::COM_QUERY for `select "012345678901234567890123456789012345"` without ::CLIENT_COMPRESS has a *payload length* of 46 bytes and looks like: ~~~~~~~~~~~~~ 2e 00 00 00 03 73 65 6c 65 63 74 20 22 30 31 32 .....select "012 33 34 35 36 37 38 39 30 31 32 33 34 35 36 37 38 3456789012345678 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 34 9012345678901234 35 22 5" ~~~~~~~~~~~~~ With ::CLIENT_COMPRESS the packet is: ~~~~~~~~~~~~~ 22 00 00 00 32 00 00 78 9c d3 63 60 60 60 2e 4e "...2..x..c```.N cd 49 4d 2e 51 50 32 30 34 32 36 31 35 33 b7 b0 .IM.QP20426153.. c4 cd 52 02 00 0c d1 0a 6c ..R.....l ~~~~~~~~~~~~~
comp-lengthseq-iduncomp-lenCompressed Payload
`22 00 00``00``32 00 00`compress("\x2e\x00\x00\x00\x03select ...")`
The compressed packet is 41 bytes long and splits into: ~~~~~~~~~~~~~~ raw packet length -> 41 compressed payload length = 22 00 00 -> 34 (41 - 7) sequence id = 00 -> 0 uncompressed payload length = 32 00 00 -> 50 ~~~~~~~~~~~~~~ @subsection sect_protocol_basic_compression_packet_compressed_payload_multi Example: Several MySQL Packets Executing `SELECT repeat("a", 50)` results in uncompressed ProtocolText::Resultset like: ~~~~~~~~~~~~~ 01 00 00 01 01 25 00 00 02 03 64 65 66 00 00 00 .....%....def... 0f 72 65 70 65 61 74 28 22 61 22 2c 20 35 30 29 .repeat("a", 50) 00 0c 08 00 32 00 00 00 fd 01 00 1f 00 00 05 00 ....2........... 00 03 fe 00 00 02 00 33 00 00 04 32 61 61 61 61 .......3...2aaaa 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 61 aaaaaaaaaaaaaaaa 61 61 61 61 61 61 61 61 61 61 61 61 61 61 05 00 aaaaaaaaaaaaaa.. 00 05 fe 00 00 02 00 ....... ~~~~~~~~~~~~~ which consists of 5 @ref sect_protocol_basic_packets_packet : - `01 00 00 01 01` - `25 00 00 02 03 64 65 66 00 00 00 0f 72 65 70 65 61 74 28 22 61 22 2c 20 35 30 29 00 0c 08 00 32 00 00 00 fd 01 00 1f 00 00` - `05 00 00 03 fe 00 00 02 00` - `33 00 00 04 32 61 61 61 61 ...` - `05 00 00 05 fe 00 00 02 00` If compression is enabled a compressed packet containing the compressed version of all 5 packets is sent to the client: ~~~~~~~~~~~~~ 4a 00 00 01 77 00 00 78 9c 63 64 60 60 64 54 65 J...w..x.cd``dTe 60 60 62 4e 49 4d 63 60 60 e0 2f 4a 2d 48 4d 2c ``bNIMc``./J-HM, d1 50 4a 54 d2 51 30 35 d0 64 e0 e1 60 30 02 8a .PJT.Q05.d..`0.. ff 65 64 90 67 60 60 65 60 60 fe 07 54 cc 60 cc .ed.g``e``..T.`. c0 c0 62 94 48 32 00 ea 67 05 eb 07 00 8d f9 1c ..b.H2..g....... 64 d ~~~~~~~~~~~~~ @note sending a MySQL Packet of the size 224-5 to 224-1 via compression leads to at least one extra compressed packet. If the uncompressed MySQL Packet is like ~~~~~~~~~~~~~~ fe ff ff 03 ... -- length = 2^24-2, sequence id = 3 ~~~~~~~~~~~~~~ compressing it would result in the *length of payload before compression* in the @ref sect_protocol_basic_compression_packet_header being: ~~~~~~~~~~~~~~ length of mysql packet payload: 2^24-2 length of mysql packet header: 4 length of payload before compression: 2^24+2 ~~~~~~~~~~~~~~ which can not be represented in one compressed packet. Instead two or more packets have to be sent. @section sect_protocol_basic_compression_packet_uncompressed_payload Uncompressed Payload For small packets it may be to costly to compress the packet: - compressing the packet may lead to more data and sending the data uncompressed - CPU overhead may be not worth to compress the data @par Tip Usually payloads less than 50 bytes (::MIN_COMPRESS_LENGTH) aren't compressed. To send an @ref sect_protocol_basic_compression_packet_uncompressed_payload : - set *length of payload before compression* in @ref sect_protocol_basic_compression_packet_header to 0 - The @ref sect_protocol_basic_compression_packet_compressed_payload contains the @ref sect_protocol_basic_compression_packet_uncompressed_payload instead. Sending a `SELECT 1` query as @ref sect_protocol_basic_compression_packet_uncompressed_payload to the server looks like: ~~~~~~~~~~~~~~ 0d 00 00 00 00 00 00 09 00 00 00 03 53 45 4c 45 ............SELE 43 54 20 31 CT 1 ~~~~~~~~~~~~~~ decodes into: ~~~~~~~~~~~~~~ raw packet length -> 20 compressed payload length = 0d 00 00 -> 13 (20 - 7) sequence id = 00 -> 0 uncompressed payload length = 00 00 00 -> uncompressed ~~~~~~~~~~~~~~ ... with the *uncompressed payload* starting right after the 7 byte header: ~~~~~~~~~~~~~~ 09 00 00 00 03 53 45 4c 45 43 54 20 31 -- SELECT 1 ~~~~~~~~~~~~~~ */ /* clang-format on */ /** Compress and encapsulate a packet into a compressed packet. @param net NET handler. @param packet The packet to compress. @param[in,out] length Length of the packet. See @ref sect_protocol_basic_compression_packet_header for a description of the header structure. @return Pointer to the (new) compressed packet. */ static uchar *compress_packet(NET *net, const uchar *packet, size_t *length) { uchar *compr_packet; size_t compr_length; const uint header_length = NET_HEADER_SIZE + COMP_HEADER_SIZE; compr_packet = (uchar *)my_malloc(key_memory_NET_compress_packet, *length + header_length, MYF(MY_WME)); if (compr_packet == NULL) return NULL; memcpy(compr_packet + header_length, packet, *length); mysql_compress_context *compress_ctx = nullptr; #ifdef MYSQL_SERVER NET_SERVER *server_extension = static_cast(net->extension); if (server_extension != nullptr) { compress_ctx = &server_extension->compress_ctx; } #else NET_EXTENSION *ext = NET_EXTENSION_PTR(net); if (ext != nullptr) compress_ctx = &ext->compress_ctx; #endif /* Compress the encapsulated packet. */ if (my_compress(compress_ctx, compr_packet + header_length, length, &compr_length)) { /* If the length of the compressed packet is larger than the original packet, the original packet is sent uncompressed. */ compr_length = 0; } /* Length of the compressed (original) packet. */ int3store(&compr_packet[NET_HEADER_SIZE], static_cast(compr_length)); /* Length of this packet. */ int3store(compr_packet, static_cast(*length)); /* Packet number. */ compr_packet[3] = (uchar)(net->compress_pkt_nr++); *length += header_length; return compr_packet; } /** Write a MySQL protocol packet to the network handler. @param net NET handler. @param packet The packet to write. @param length Length of the packet. @remark The packet might be encapsulated into a compressed packet. @return true on error, false on success. */ bool net_write_packet(NET *net, const uchar *packet, size_t length) { bool res; DBUG_TRACE; /* Socket can't be used */ if (net->error == 2) return true; net->reading_or_writing = 2; const bool do_compress = net->compress; if (do_compress) { if ((packet = compress_packet(net, packet, &length)) == NULL) { net->error = 2; net->last_errno = ER_OUT_OF_RESOURCES; /* In the server, allocation failure raises a error. */ net->reading_or_writing = 0; return true; } } #ifdef DEBUG_DATA_PACKETS DBUG_DUMP("data", packet, length); #endif res = net_write_raw_loop(net, packet, length); if (do_compress) my_free(const_cast(packet)); net->reading_or_writing = 0; return res; } /***************************************************************************** ** Read something from server/clinet *****************************************************************************/ /** Read a determined number of bytes from a network handler. @param net NET handler. @param count The number of bytes to read. @return true on error, false on success. */ static bool net_read_raw_loop(NET *net, size_t count) { bool eof = false; unsigned int retry_count = 0; uchar *buf = net->buff + net->where_b; while (count) { size_t recvcnt = vio_read(net->vio, buf, count); /* VIO_SOCKET_ERROR (-1) indicates an error. */ if (recvcnt == VIO_SOCKET_ERROR) { /* A recoverable I/O error occurred? */ if (net_should_retry(net, &retry_count)) continue; else break; } /* Zero indicates end of file. */ else if (!recvcnt) { eof = true; break; } count -= recvcnt; buf += recvcnt; #ifdef MYSQL_SERVER thd_increment_bytes_received(recvcnt); #endif } /* On failure, propagate the error code. */ if (count) { /* Socket should be closed. */ net->error = 2; /* Interrupted by a timeout? */ if (!eof && vio_was_timeout(net->vio)) net->last_errno = ER_NET_READ_INTERRUPTED; else net->last_errno = ER_NET_READ_ERROR; #ifdef MYSQL_SERVER my_error(net->last_errno, MYF(0)); /* First packet always wait for net_wait_timeout */ if (net->pkt_nr == 0 && vio_was_timeout(net->vio)) { net->last_errno = ER_NET_WAIT_ERROR; /* Socket should be closed after trying to write/send error. */ LogErr(INFORMATION_LEVEL, net->last_errno); } #endif } return count != 0; } /** Read the header of a packet. The MySQL protocol packet header consists of the length, in bytes, of the payload (packet data) and a serial number. @remark The encoded length is the length of the packet payload, which does not include the packet header. @remark The serial number is used to ensure that the packets are received in order. If the packet serial number does not match the expected value, a error is returned. @param net NET handler. @return true on error, false on success. */ static bool net_read_packet_header(NET *net) { uchar pkt_nr; size_t count = NET_HEADER_SIZE; bool rc; if (net->compress) count += COMP_HEADER_SIZE; #ifdef MYSQL_SERVER NET_SERVER *server_extension; server_extension = static_cast(net->extension); if (server_extension != NULL && server_extension->m_user_data != nullptr) { void *user_data = server_extension->m_user_data; DBUG_ASSERT(server_extension->m_before_header != NULL); DBUG_ASSERT(server_extension->m_after_header != NULL); server_extension->m_before_header(net, user_data, count); rc = net_read_raw_loop(net, count); server_extension->m_after_header(net, user_data, count, rc); } else #endif { rc = net_read_raw_loop(net, count); } if (rc) return true; DBUG_DUMP("packet_header", net->buff + net->where_b, NET_HEADER_SIZE); pkt_nr = net->buff[net->where_b + 3]; /* Verify packet serial number against the truncated packet counter. The local packet counter must be truncated since its not reset. */ if (pkt_nr != (uchar)net->pkt_nr) { /* Not a NET error on the client. XXX: why? */ #if defined(MYSQL_SERVER) my_error(ER_NET_PACKETS_OUT_OF_ORDER, MYF(0)); #elif defined(EXTRA_DEBUG) /* We don't make noise server side, since the client is expected to break the protocol for e.g. --send LOAD DATA .. LOCAL where the server expects the client to send a file, but the client may reply with a new command instead. */ my_message_local(ERROR_LEVEL, EE_PACKETS_OUT_OF_ORDER, (uint)pkt_nr, net->pkt_nr); DBUG_ASSERT(pkt_nr == net->pkt_nr); #endif return true; } net->pkt_nr++; return false; } /* Helper function to read up to count bytes from the network connection/ Returns packet_error (-1) on EOF or other errors, 0 if the read would block, and otherwise the number of bytes read (which may be less than the requested amount). When 0 is returned the async_blocking_state is set inside this function. With SSL, the async blocking state can also become NET_NONBLOCKING_WRITE (when renegotiation occurs). */ static ulong net_read_available(NET *net, size_t count) { size_t recvcnt; DBUG_TRACE; NET_ASYNC *net_async = NET_ASYNC_DATA(net); if (net_async->cur_pos + count > net->buff + net->max_packet) { if (net_realloc(net, net->max_packet + count)) { return packet_error; } } if (vio_is_blocking(net->vio)) { vio_set_blocking_flag(net->vio, false); } recvcnt = vio_read(net->vio, net_async->cur_pos, count); /* When OpenSSL is used in non-blocking mode, it is possible that an SSL_ERROR_WANT_READ or SSL_ERROR_WANT_WRITE error is returned after a SSL_read() operation (if a renegotiation takes place). We are treating this case here and signaling correctly the next expected operation in the async_blocking_state. */ if (recvcnt == VIO_SOCKET_WANT_READ) { net_async->async_blocking_state = NET_NONBLOCKING_READ; return 0; } else if (recvcnt == VIO_SOCKET_WANT_WRITE) { net_async->async_blocking_state = NET_NONBLOCKING_WRITE; return 0; } /* Call would block, just return with socket_errno set */ if ((recvcnt == VIO_SOCKET_ERROR) && (socket_errno == SOCKET_EAGAIN || (SOCKET_EAGAIN != SOCKET_EWOULDBLOCK && socket_errno == SOCKET_EWOULDBLOCK))) { net_async->async_blocking_state = NET_NONBLOCKING_READ; return 0; } /* Not EOF and not an error? Return the bytes read.*/ if (recvcnt != 0 && recvcnt != VIO_SOCKET_ERROR) { net_async->cur_pos += recvcnt; #ifdef MYSQL_SERVER thd_increment_bytes_received(recvcnt); #endif return recvcnt; } /* EOF or hard failure; socket should be closed. */ net->error = 2; net->last_errno = ER_NET_READ_ERROR; return packet_error; } /* Read actual data from the packet */ static net_async_status net_read_data_nonblocking(NET *net, size_t count, bool *err_ptr) { DBUG_TRACE; NET_ASYNC *net_async = NET_ASYNC_DATA(net); size_t bytes_read = 0; ulong rc; switch (net_async->async_operation) { case NET_ASYNC_OP_IDLE: net_async->async_bytes_wanted = count; net_async->async_operation = NET_ASYNC_OP_READING; net_async->cur_pos = net->buff + net->where_b; /* fallthrough */ case NET_ASYNC_OP_READING: rc = net_read_available(net, net_async->async_bytes_wanted); if (rc == packet_error) { *err_ptr = rc; net_async->async_operation = NET_ASYNC_OP_IDLE; return NET_ASYNC_COMPLETE; } bytes_read = (size_t)rc; net_async->async_bytes_wanted -= bytes_read; if (net_async->async_bytes_wanted != 0) { DBUG_PRINT("partial read", ("wanted/remaining: %zu, %zu", count, net_async->async_bytes_wanted)); return NET_ASYNC_NOT_READY; } net_async->async_operation = NET_ASYNC_OP_COMPLETE; /* fallthrough */ case NET_ASYNC_OP_COMPLETE: net_async->async_bytes_wanted = 0; net_async->async_operation = NET_ASYNC_OP_IDLE; *err_ptr = false; DBUG_PRINT("read complete", ("read: %zu", count)); return NET_ASYNC_COMPLETE; default: /* error, sure wish we could log something here */ DBUG_ASSERT(false); net_async->async_bytes_wanted = 0; net_async->async_operation = NET_ASYNC_OP_IDLE; *err_ptr = true; return NET_ASYNC_COMPLETE; } } static net_async_status net_read_packet_header_nonblocking(NET *net, bool *err_ptr) { DBUG_TRACE; uchar pkt_nr; if (net_read_data_nonblocking(net, NET_HEADER_SIZE, err_ptr) == NET_ASYNC_NOT_READY) { return NET_ASYNC_NOT_READY; } if (*err_ptr) { return NET_ASYNC_COMPLETE; } DBUG_DUMP("packet_header", net->buff + net->where_b, NET_HEADER_SIZE); pkt_nr = net->buff[net->where_b + 3]; /* Verify packet serial number against the truncated packet counter. The local packet counter must be truncated since its not reset. */ if (pkt_nr != (uchar)net->pkt_nr) { /* Not a NET error on the client. XXX: why? */ #if defined(MYSQL_SERVER) my_error(ER_NET_PACKETS_OUT_OF_ORDER, MYF(0)); #elif defined(EXTRA_DEBUG) /* We don't make noise server side, since the client is expected to break the protocol for e.g. --send LOAD DATA .. LOCAL where the server expects the client to send a file, but the client may reply with a new command instead. */ fprintf(stderr, "Error: packets out of order (found %u, expected %u)\n", (uint)pkt_nr, net->pkt_nr); DBUG_ASSERT(pkt_nr == net->pkt_nr); #endif *err_ptr = true; return NET_ASYNC_COMPLETE; } net->pkt_nr++; *err_ptr = false; return NET_ASYNC_COMPLETE; } /* Read packet header followed by packet data in an asynchronous way. */ static net_async_status net_read_packet_nonblocking(NET *net, ulong *ret, ulong *complen) { DBUG_TRACE; NET_ASYNC *net_async = NET_ASYNC_DATA(net); size_t pkt_data_len; bool err; *complen = 0; switch (net_async->async_packet_read_state) { case NET_ASYNC_PACKET_READ_IDLE: net_async->async_packet_read_state = NET_ASYNC_PACKET_READ_HEADER; net->reading_or_writing = 0; /* fallthrough */ case NET_ASYNC_PACKET_READ_HEADER: if (net_read_packet_header_nonblocking(net, &err) == NET_ASYNC_NOT_READY) { return NET_ASYNC_NOT_READY; } /* Retrieve packet length and number. */ if (err) goto error; net->compress_pkt_nr = net->pkt_nr; /* The length of the packet that follows. */ net_async->async_packet_length = uint3korr(net->buff + net->where_b); DBUG_PRINT("info", ("async packet len: %zu", net_async->async_packet_length)); /* End of big multi-packet. */ if (!net_async->async_packet_length) goto end; pkt_data_len = max(static_cast(net_async->async_packet_length), *complen) + net->where_b; /* Expand packet buffer if necessary. */ if ((pkt_data_len >= net->max_packet) && net_realloc(net, pkt_data_len)) goto error; net_async->async_packet_read_state = NET_ASYNC_PACKET_READ_BODY; /* fallthrough */ case NET_ASYNC_PACKET_READ_BODY: if (net_read_data_nonblocking(net, net_async->async_packet_length, &err) == NET_ASYNC_NOT_READY) { return NET_ASYNC_NOT_READY; } if (err) goto error; net_async->async_packet_read_state = NET_ASYNC_PACKET_READ_COMPLETE; /* fallthrough */ case NET_ASYNC_PACKET_READ_COMPLETE: net_async->async_packet_read_state = NET_ASYNC_PACKET_READ_IDLE; break; } end: *ret = net_async->async_packet_length; net->read_pos = net->buff + net->where_b; #ifdef DEBUG_DATA_PACKETS DBUG_DUMP("async read output", net->read_pos, *ret); #endif net->read_pos[*ret] = 0; net->reading_or_writing = 0; return NET_ASYNC_COMPLETE; error: *ret = packet_error; net->reading_or_writing = 0; return NET_ASYNC_COMPLETE; } /** Read one (variable-length) MySQL protocol packet. A MySQL packet consists of a header and a payload. @remark Reads one packet to net->buff + net->where_b. @remark Long packets are handled by my_net_read(). @remark The network buffer is expanded if necessary. @return The length of the packet, or @c packet_error on error. */ static size_t net_read_packet(NET *net, size_t *complen) { size_t pkt_len, pkt_data_len; *complen = 0; net->reading_or_writing = 1; /* Retrieve packet length and number. */ if (net_read_packet_header(net)) goto error; net->compress_pkt_nr = net->pkt_nr; if (net->compress) { /* The right-hand expression must match the size of the buffer allocated in net_realloc(). */ DBUG_ASSERT(net->where_b + NET_HEADER_SIZE + 3 <= net->max_packet + NET_HEADER_SIZE + COMP_HEADER_SIZE); /* If the packet is compressed then complen > 0 and contains the number of bytes in the uncompressed packet. */ *complen = uint3korr(&(net->buff[net->where_b + NET_HEADER_SIZE])); } /* The length of the packet that follows. */ pkt_len = uint3korr(net->buff + net->where_b); /* End of big multi-packet. */ if (!pkt_len) goto end; pkt_data_len = max(pkt_len, *complen) + net->where_b; /* Expand packet buffer if necessary. */ if ((pkt_data_len >= net->max_packet) && net_realloc(net, pkt_data_len)) goto error; /* Read the packet data (payload). */ if (net_read_raw_loop(net, pkt_len)) goto error; end: DBUG_DUMP("net read", net->buff + net->where_b, pkt_len); net->reading_or_writing = 0; return pkt_len; error: net->reading_or_writing = 0; return packet_error; } /* Non blocking version of my_net_read(). */ net_async_status my_net_read_nonblocking(NET *net, ulong *len_ptr, ulong *complen_ptr) { if (net_read_packet_nonblocking(net, len_ptr, complen_ptr) == NET_ASYNC_NOT_READY) { return NET_ASYNC_NOT_READY; } if (*len_ptr == packet_error) { return NET_ASYNC_COMPLETE; } DBUG_PRINT("info", ("chunk nb read: %lu", *len_ptr)); if (*len_ptr == MAX_PACKET_LENGTH) { return NET_ASYNC_NOT_READY; } else { return NET_ASYNC_COMPLETE; } } /** Read a packet from the client/server and return it without the internal package header. If the packet is the first packet of a multi-packet packet (which is indicated by the length of the packet = 0xffffff) then all sub packets are read and concatenated. If the packet was compressed, its uncompressed and the length of the uncompressed packet is returned. @return The function returns the length of the found packet or packet_error. net->read_pos points to the read data. */ ulong my_net_read(NET *net) { size_t len, complen; /* turn off non blocking operations */ if (!vio_is_blocking(net->vio)) vio_set_blocking_flag(net->vio, true); if (!net->compress) { len = net_read_packet(net, &complen); if (len == MAX_PACKET_LENGTH) { /* First packet of a multi-packet. Concatenate the packets */ ulong save_pos = net->where_b; size_t total_length = 0; do { net->where_b += len; total_length += len; len = net_read_packet(net, &complen); } while (len == MAX_PACKET_LENGTH); if (len != packet_error) len += total_length; net->where_b = save_pos; } net->read_pos = net->buff + net->where_b; if (len != packet_error) net->read_pos[len] = 0; /* Safeguard for mysql_use_result */ return static_cast(len); } else { /* We are using the compressed protocol */ size_t buf_length; ulong start_of_packet; ulong first_packet_offset; uint read_length, multi_byte_packet = 0; if (net->remain_in_buf) { buf_length = net->buf_length; /* Data left in old packet */ first_packet_offset = start_of_packet = (net->buf_length - net->remain_in_buf); /* Restore the character that was overwritten by the end 0 */ net->buff[start_of_packet] = net->save_char; } else { /* reuse buffer, as there is nothing in it that we need */ buf_length = start_of_packet = first_packet_offset = 0; } for (;;) { size_t packet_len; if (buf_length - start_of_packet >= NET_HEADER_SIZE) { read_length = uint3korr(net->buff + start_of_packet); if (!read_length) { /* End of multi-byte packet */ start_of_packet += NET_HEADER_SIZE; break; } if (read_length + NET_HEADER_SIZE <= buf_length - start_of_packet) { if (multi_byte_packet) { /* It's never the buffer on the first loop iteration that will have multi_byte_packet on. Thus there shall never be a non-zero first_packet_offset here. */ DBUG_ASSERT(first_packet_offset == 0); /* Remove packet header for second packet */ memmove(net->buff + start_of_packet, net->buff + start_of_packet + NET_HEADER_SIZE, buf_length - start_of_packet - NET_HEADER_SIZE); start_of_packet += read_length; buf_length -= NET_HEADER_SIZE; } else start_of_packet += read_length + NET_HEADER_SIZE; if (read_length != MAX_PACKET_LENGTH) /* last package */ { multi_byte_packet = 0; /* No last zero len packet */ break; } multi_byte_packet = NET_HEADER_SIZE; /* Move data down to read next data packet after current one */ if (first_packet_offset) { memmove(net->buff, net->buff + first_packet_offset, buf_length - first_packet_offset); buf_length -= first_packet_offset; start_of_packet -= first_packet_offset; first_packet_offset = 0; } continue; } } /* Move data down to read next data packet after current one */ if (first_packet_offset) { memmove(net->buff, net->buff + first_packet_offset, buf_length - first_packet_offset); buf_length -= first_packet_offset; start_of_packet -= first_packet_offset; first_packet_offset = 0; } net->where_b = buf_length; if ((packet_len = net_read_packet(net, &complen)) == packet_error) { return packet_error; } mysql_compress_context *mysql_compress_ctx = nullptr; #ifdef MYSQL_SERVER NET_SERVER *server_extension = static_cast(net->extension); if (server_extension != nullptr) { mysql_compress_ctx = &server_extension->compress_ctx; } #else NET_EXTENSION *ext = NET_EXTENSION_PTR(net); if (ext != nullptr) mysql_compress_ctx = &ext->compress_ctx; #endif if (my_uncompress(mysql_compress_ctx, net->buff + net->where_b, packet_len, &complen)) { net->error = 2; /* caller will close socket */ net->last_errno = ER_NET_UNCOMPRESS_ERROR; #ifdef MYSQL_SERVER my_error(ER_NET_UNCOMPRESS_ERROR, MYF(0)); #endif return packet_error; } buf_length += complen; } net->read_pos = net->buff + first_packet_offset + NET_HEADER_SIZE; net->buf_length = buf_length; net->remain_in_buf = (ulong)(buf_length - start_of_packet); len = ((ulong)(start_of_packet - first_packet_offset) - NET_HEADER_SIZE - multi_byte_packet); /* Save byte to restore when processing remaining buffer. Skip ahead when the packet is a zero packet terminated (in case of multiple of 0xffffff). */ if (net->remain_in_buf) net->save_char = net->read_pos[len + multi_byte_packet]; net->read_pos[len] = '\0'; // Safeguard for mysql_use_result. } return static_cast(len); } void my_net_set_read_timeout(NET *net, uint timeout) { DBUG_TRACE; DBUG_PRINT("enter", ("timeout: %d", timeout)); net->read_timeout = timeout; if (net->vio) vio_timeout(net->vio, 0, timeout); } void my_net_set_write_timeout(NET *net, uint timeout) { DBUG_TRACE; DBUG_PRINT("enter", ("timeout: %d", timeout)); net->write_timeout = timeout; if (net->vio) vio_timeout(net->vio, 1, timeout); } void my_net_set_retry_count(NET *net, uint retry_count) { DBUG_TRACE; DBUG_PRINT("enter", ("retry_count: %d", retry_count)); net->retry_count = retry_count; if (net->vio) net->vio->retry_count = retry_count; }