1 //===-- RegisterValue.cpp ---------------------------------------*- C++ -*-===//
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
7 //===----------------------------------------------------------------------===//
9 #include "lldb/Utility/RegisterValue.h"
11 #include "lldb/Utility/DataExtractor.h"
12 #include "lldb/Utility/Scalar.h"
13 #include "lldb/Utility/Status.h"
14 #include "lldb/Utility/Stream.h"
15 #include "lldb/Utility/StreamString.h"
16 #include "lldb/lldb-defines.h"
17 #include "lldb/lldb-private-types.h"
19 #include "llvm/ADT/ArrayRef.h"
20 #include "llvm/ADT/StringRef.h"
32 using namespace lldb_private;
34 bool RegisterValue::GetData(DataExtractor &data) const {
35 return data.SetData(GetBytes(), GetByteSize(), GetByteOrder()) > 0;
38 uint32_t RegisterValue::GetAsMemoryData(const RegisterInfo *reg_info, void *dst,
40 lldb::ByteOrder dst_byte_order,
41 Status &error) const {
42 if (reg_info == nullptr) {
43 error.SetErrorString("invalid register info argument.");
47 // ReadRegister should have already been called on this object prior to
49 if (GetType() == eTypeInvalid) {
50 // No value has been read into this object...
51 error.SetErrorStringWithFormat(
52 "invalid register value type for register %s", reg_info->name);
56 if (dst_len > kMaxRegisterByteSize) {
57 error.SetErrorString("destination is too big");
61 const uint32_t src_len = reg_info->byte_size;
63 // Extract the register data into a data extractor
64 DataExtractor reg_data;
65 if (!GetData(reg_data)) {
66 error.SetErrorString("invalid register value to copy into");
70 // Prepare a memory buffer that contains some or all of the register value
71 const uint32_t bytes_copied =
72 reg_data.CopyByteOrderedData(0, // src offset
73 src_len, // src length
75 dst_len, // dst length
76 dst_byte_order); // dst byte order
77 if (bytes_copied == 0)
78 error.SetErrorStringWithFormat(
79 "failed to copy data for register write of %s", reg_info->name);
84 uint32_t RegisterValue::SetFromMemoryData(const RegisterInfo *reg_info,
85 const void *src, uint32_t src_len,
86 lldb::ByteOrder src_byte_order,
88 if (reg_info == nullptr) {
89 error.SetErrorString("invalid register info argument.");
93 // Moving from addr into a register
95 // Case 1: src_len == dst_len
97 // |AABBCCDD| Address contents
98 // |AABBCCDD| Register contents
100 // Case 2: src_len > dst_len
102 // Status! (The register should always be big enough to hold the data)
104 // Case 3: src_len < dst_len
106 // |AABB| Address contents
107 // |AABB0000| Register contents [on little-endian hardware]
108 // |0000AABB| Register contents [on big-endian hardware]
109 if (src_len > kMaxRegisterByteSize) {
110 error.SetErrorStringWithFormat(
111 "register buffer is too small to receive %u bytes of data.", src_len);
115 const uint32_t dst_len = reg_info->byte_size;
117 if (src_len > dst_len) {
118 error.SetErrorStringWithFormat(
119 "%u bytes is too big to store in register %s (%u bytes)", src_len,
120 reg_info->name, dst_len);
124 // Use a data extractor to correctly copy and pad the bytes read into the
126 DataExtractor src_data(src, src_len, src_byte_order, 4);
128 error = SetValueFromData(reg_info, src_data, 0, true);
132 // If SetValueFromData succeeded, we must have copied all of src_len
136 bool RegisterValue::GetScalarValue(Scalar &scalar) const {
141 switch (buffer.length) {
145 scalar = *(const uint8_t *)buffer.bytes;
148 scalar = *reinterpret_cast<const uint16_t *>(buffer.bytes);
151 scalar = *reinterpret_cast<const uint32_t *>(buffer.bytes);
154 scalar = *reinterpret_cast<const uint64_t *>(buffer.bytes);
159 if (buffer.length % sizeof(uint64_t) == 0) {
160 const auto length_in_bits = buffer.length * 8;
161 const auto length_in_uint64 = buffer.length / sizeof(uint64_t);
163 llvm::APInt(length_in_bits,
164 llvm::ArrayRef<uint64_t>(
165 reinterpret_cast<const uint64_t *>(buffer.bytes),
179 case eTypeLongDouble:
186 void RegisterValue::Clear() { m_type = eTypeInvalid; }
188 RegisterValue::Type RegisterValue::SetType(const RegisterInfo *reg_info) {
189 // To change the type, we simply copy the data in again, using the new format
191 DataExtractor copy_data;
192 if (copy.CopyValue(*this) && copy.GetData(copy_data))
193 SetValueFromData(reg_info, copy_data, 0, true);
198 Status RegisterValue::SetValueFromData(const RegisterInfo *reg_info,
200 lldb::offset_t src_offset,
201 bool partial_data_ok) {
204 if (src.GetByteSize() == 0) {
205 error.SetErrorString("empty data.");
209 if (reg_info->byte_size == 0) {
210 error.SetErrorString("invalid register info.");
214 uint32_t src_len = src.GetByteSize() - src_offset;
216 if (!partial_data_ok && (src_len < reg_info->byte_size)) {
217 error.SetErrorString("not enough data.");
221 // Cap the data length if there is more than enough bytes for this register
223 if (src_len > reg_info->byte_size)
224 src_len = reg_info->byte_size;
226 // Zero out the value in case we get partial data...
227 memset(buffer.bytes, 0, sizeof(buffer.bytes));
231 m_type = eTypeInvalid;
232 switch (reg_info->encoding) {
233 case eEncodingInvalid:
237 if (reg_info->byte_size == 1)
238 SetUInt8(src.GetMaxU32(&src_offset, src_len));
239 else if (reg_info->byte_size <= 2)
240 SetUInt16(src.GetMaxU32(&src_offset, src_len));
241 else if (reg_info->byte_size <= 4)
242 SetUInt32(src.GetMaxU32(&src_offset, src_len));
243 else if (reg_info->byte_size <= 8)
244 SetUInt64(src.GetMaxU64(&src_offset, src_len));
245 else if (reg_info->byte_size <= 16) {
246 uint64_t data1 = src.GetU64(&src_offset);
247 uint64_t data2 = src.GetU64(&src_offset);
248 if (src.GetByteSize() == eByteOrderBig) {
255 SetUInt128(llvm::APInt(128, 2, int128.x));
258 case eEncodingIEEE754:
259 if (reg_info->byte_size == sizeof(float))
260 SetFloat(src.GetFloat(&src_offset));
261 else if (reg_info->byte_size == sizeof(double))
262 SetDouble(src.GetDouble(&src_offset));
263 else if (reg_info->byte_size == sizeof(long double))
264 SetLongDouble(src.GetLongDouble(&src_offset));
266 case eEncodingVector: {
268 buffer.length = reg_info->byte_size;
269 buffer.byte_order = src.GetByteOrder();
270 assert(buffer.length <= kMaxRegisterByteSize);
271 if (buffer.length > kMaxRegisterByteSize)
272 buffer.length = kMaxRegisterByteSize;
273 if (src.CopyByteOrderedData(
274 src_offset, // offset within "src" to start extracting data
275 src_len, // src length
276 buffer.bytes, // dst buffer
277 buffer.length, // dst length
278 buffer.byte_order) == 0) // dst byte order
280 error.SetErrorStringWithFormat(
281 "failed to copy data for register write of %s", reg_info->name);
287 if (m_type == eTypeInvalid)
288 error.SetErrorStringWithFormat(
289 "invalid register value type for register %s", reg_info->name);
293 // Helper function for RegisterValue::SetValueFromString()
294 static bool ParseVectorEncoding(const RegisterInfo *reg_info,
295 llvm::StringRef vector_str,
296 const uint32_t byte_size,
297 RegisterValue *reg_value) {
298 // Example: vector_str = "{0x2c 0x4b 0x2a 0x3e 0xd0 0x4f 0x2a 0x3e 0xac 0x4a
299 // 0x2a 0x3e 0x84 0x4f 0x2a 0x3e}".
300 vector_str = vector_str.trim();
301 vector_str.consume_front("{");
302 vector_str.consume_back("}");
303 vector_str = vector_str.trim();
307 // The first split should give us:
308 // ('0x2c', '0x4b 0x2a 0x3e 0xd0 0x4f 0x2a 0x3e 0xac 0x4a 0x2a 0x3e 0x84 0x4f
311 llvm::StringRef cdr = vector_str;
312 std::tie(car, cdr) = vector_str.split(Sep);
313 std::vector<uint8_t> bytes;
316 // Using radix auto-sensing by passing 0 as the radix. Keep on processing the
317 // vector elements as long as the parsing succeeds and the vector size is <
319 while (!car.getAsInteger(0, byte) && bytes.size() < byte_size) {
320 bytes.push_back(byte);
321 std::tie(car, cdr) = cdr.split(Sep);
324 // Check for vector of exact byte_size elements.
325 if (bytes.size() != byte_size)
328 reg_value->SetBytes(&(bytes.front()), byte_size, eByteOrderLittle);
332 static bool UInt64ValueIsValidForByteSize(uint64_t uval64,
333 size_t total_byte_size) {
334 if (total_byte_size > 8)
337 if (total_byte_size == 8)
341 (static_cast<uint64_t>(1) << static_cast<uint64_t>(total_byte_size * 8)) -
343 return uval64 <= max;
346 static bool SInt64ValueIsValidForByteSize(int64_t sval64,
347 size_t total_byte_size) {
348 if (total_byte_size > 8)
351 if (total_byte_size == 8)
354 const int64_t max = (static_cast<int64_t>(1)
355 << static_cast<uint64_t>(total_byte_size * 8 - 1)) -
357 const int64_t min = ~(max);
358 return min <= sval64 && sval64 <= max;
361 Status RegisterValue::SetValueFromString(const RegisterInfo *reg_info,
362 llvm::StringRef value_str) {
364 if (reg_info == nullptr) {
365 error.SetErrorString("Invalid register info argument.");
369 m_type = eTypeInvalid;
370 if (value_str.empty()) {
371 error.SetErrorString("Invalid c-string value string.");
374 const uint32_t byte_size = reg_info->byte_size;
380 long double ldbl_val;
381 switch (reg_info->encoding) {
382 case eEncodingInvalid:
383 error.SetErrorString("Invalid encoding.");
387 if (byte_size > sizeof(uint64_t)) {
388 error.SetErrorStringWithFormat(
389 "unsupported unsigned integer byte size: %u", byte_size);
392 if (value_str.getAsInteger(0, uval64)) {
393 error.SetErrorStringWithFormat(
394 "'%s' is not a valid unsigned integer string value",
395 value_str.str().c_str());
399 if (!UInt64ValueIsValidForByteSize(uval64, byte_size)) {
400 error.SetErrorStringWithFormat(
402 " is too large to fit in a %u byte unsigned integer value",
407 if (!SetUInt(uval64, reg_info->byte_size)) {
408 error.SetErrorStringWithFormat(
409 "unsupported unsigned integer byte size: %u", byte_size);
415 if (byte_size > sizeof(long long)) {
416 error.SetErrorStringWithFormat("unsupported signed integer byte size: %u",
421 if (value_str.getAsInteger(0, ival64)) {
422 error.SetErrorStringWithFormat(
423 "'%s' is not a valid signed integer string value",
424 value_str.str().c_str());
428 if (!SInt64ValueIsValidForByteSize(ival64, byte_size)) {
429 error.SetErrorStringWithFormat(
431 " is too large to fit in a %u byte signed integer value",
436 if (!SetUInt(ival64, reg_info->byte_size)) {
437 error.SetErrorStringWithFormat("unsupported signed integer byte size: %u",
443 case eEncodingIEEE754: {
444 std::string value_string = value_str;
445 if (byte_size == sizeof(float)) {
446 if (::sscanf(value_string.c_str(), "%f", &flt_val) != 1) {
447 error.SetErrorStringWithFormat("'%s' is not a valid float string value",
448 value_string.c_str());
453 } else if (byte_size == sizeof(double)) {
454 if (::sscanf(value_string.c_str(), "%lf", &dbl_val) != 1) {
455 error.SetErrorStringWithFormat("'%s' is not a valid float string value",
456 value_string.c_str());
460 m_type = eTypeDouble;
461 } else if (byte_size == sizeof(long double)) {
462 if (::sscanf(value_string.c_str(), "%Lf", &ldbl_val) != 1) {
463 error.SetErrorStringWithFormat("'%s' is not a valid float string value",
464 value_string.c_str());
468 m_type = eTypeLongDouble;
470 error.SetErrorStringWithFormat("unsupported float byte size: %u",
476 case eEncodingVector:
477 if (!ParseVectorEncoding(reg_info, value_str, byte_size, this))
478 error.SetErrorString("unrecognized vector encoding string value.");
485 bool RegisterValue::SignExtend(uint32_t sign_bitpos) {
495 return m_scalar.SignExtend(sign_bitpos);
498 case eTypeLongDouble:
505 bool RegisterValue::CopyValue(const RegisterValue &rhs) {
507 return rhs.m_type != eTypeInvalid;
520 case eTypeLongDouble:
521 m_scalar = rhs.m_scalar;
524 assert(rhs.buffer.length <= kMaxRegisterByteSize);
525 ::memcpy(buffer.bytes, rhs.buffer.bytes, kMaxRegisterByteSize);
526 buffer.length = rhs.buffer.length;
527 buffer.byte_order = rhs.buffer.byte_order;
533 uint16_t RegisterValue::GetAsUInt16(uint16_t fail_value,
534 bool *success_ptr) const {
543 return m_scalar.UShort(fail_value);
545 switch (buffer.length) {
550 return *reinterpret_cast<const uint16_t *>(buffer.bytes);
555 *success_ptr = false;
559 uint32_t RegisterValue::GetAsUInt32(uint32_t fail_value,
560 bool *success_ptr) const {
571 case eTypeLongDouble:
572 return m_scalar.UInt(fail_value);
574 switch (buffer.length) {
580 return *reinterpret_cast<const uint32_t *>(buffer.bytes);
585 *success_ptr = false;
589 uint64_t RegisterValue::GetAsUInt64(uint64_t fail_value,
590 bool *success_ptr) const {
602 case eTypeLongDouble:
603 return m_scalar.ULongLong(fail_value);
605 switch (buffer.length) {
609 return *(const uint8_t *)buffer.bytes;
611 return *reinterpret_cast<const uint16_t *>(buffer.bytes);
613 return *reinterpret_cast<const uint32_t *>(buffer.bytes);
615 return *reinterpret_cast<const uint64_t *>(buffer.bytes);
620 *success_ptr = false;
624 llvm::APInt RegisterValue::GetAsUInt128(const llvm::APInt &fail_value,
625 bool *success_ptr) const {
638 case eTypeLongDouble:
639 return m_scalar.UInt128(fail_value);
641 switch (buffer.length) {
649 return llvm::APInt(BITWIDTH_INT128, NUM_OF_WORDS_INT128,
650 (reinterpret_cast<const type128 *>(buffer.bytes))->x);
655 *success_ptr = false;
659 float RegisterValue::GetAsFloat(float fail_value, bool *success_ptr) const {
670 case eTypeLongDouble:
671 return m_scalar.Float(fail_value);
674 *success_ptr = false;
678 double RegisterValue::GetAsDouble(double fail_value, bool *success_ptr) const {
690 case eTypeLongDouble:
691 return m_scalar.Double(fail_value);
694 *success_ptr = false;
698 long double RegisterValue::GetAsLongDouble(long double fail_value,
699 bool *success_ptr) const {
711 case eTypeLongDouble:
712 return m_scalar.LongDouble();
715 *success_ptr = false;
719 const void *RegisterValue::GetBytes() const {
730 case eTypeLongDouble:
731 return m_scalar.GetBytes();
738 uint32_t RegisterValue::GetByteSize() const {
751 case eTypeLongDouble:
752 return m_scalar.GetByteSize();
754 return buffer.length;
759 bool RegisterValue::SetUInt(uint64_t uint, uint32_t byte_size) {
760 if (byte_size == 0) {
762 } else if (byte_size == 1) {
764 } else if (byte_size <= 2) {
766 } else if (byte_size <= 4) {
768 } else if (byte_size <= 8) {
770 } else if (byte_size <= 16) {
771 SetUInt128(llvm::APInt(128, uint));
777 void RegisterValue::SetBytes(const void *bytes, size_t length,
778 lldb::ByteOrder byte_order) {
779 // If this assertion fires off we need to increase the size of buffer.bytes,
780 // or make it something that is allocated on the heap. Since the data buffer
781 // is in a union, we can't make it a collection class like SmallVector...
782 if (bytes && length > 0) {
783 assert(length <= sizeof(buffer.bytes) &&
784 "Storing too many bytes in a RegisterValue.");
786 buffer.length = length;
787 memcpy(buffer.bytes, bytes, length);
788 buffer.byte_order = byte_order;
790 m_type = eTypeInvalid;
795 bool RegisterValue::operator==(const RegisterValue &rhs) const {
796 if (m_type == rhs.m_type) {
807 case eTypeLongDouble:
808 return m_scalar == rhs.m_scalar;
810 if (buffer.length != rhs.buffer.length)
813 uint8_t length = buffer.length;
814 if (length > kMaxRegisterByteSize)
815 length = kMaxRegisterByteSize;
816 return memcmp(buffer.bytes, rhs.buffer.bytes, length) == 0;
824 bool RegisterValue::operator!=(const RegisterValue &rhs) const {
825 return !(*this == rhs);
828 bool RegisterValue::ClearBit(uint32_t bit) {
838 if (bit < (GetByteSize() * 8)) {
839 return m_scalar.ClearBit(bit);
845 case eTypeLongDouble:
849 if (buffer.byte_order == eByteOrderBig ||
850 buffer.byte_order == eByteOrderLittle) {
852 if (buffer.byte_order == eByteOrderBig)
853 byte_idx = buffer.length - (bit / 8) - 1;
857 const uint32_t byte_bit = bit % 8;
858 if (byte_idx < buffer.length) {
859 buffer.bytes[byte_idx] &= ~(1u << byte_bit);
868 bool RegisterValue::SetBit(uint32_t bit) {
878 if (bit < (GetByteSize() * 8)) {
879 return m_scalar.SetBit(bit);
885 case eTypeLongDouble:
889 if (buffer.byte_order == eByteOrderBig ||
890 buffer.byte_order == eByteOrderLittle) {
892 if (buffer.byte_order == eByteOrderBig)
893 byte_idx = buffer.length - (bit / 8) - 1;
897 const uint32_t byte_bit = bit % 8;
898 if (byte_idx < buffer.length) {
899 buffer.bytes[byte_idx] |= (1u << byte_bit);