File: | include/llvm/Support/Error.h |
Warning: | line 201, column 5 Potential leak of memory pointed to by 'Payload._M_t._M_head_impl' |
Press '?' to see keyboard shortcuts
Keyboard shortcuts:
1 | //===-- ABISysV_ppc64.cpp ---------------------------------------*- C++ -*-===// | |||
2 | // | |||
3 | // The LLVM Compiler Infrastructure | |||
4 | // | |||
5 | // This file is distributed under the University of Illinois Open Source | |||
6 | // License. See LICENSE.TXT for details. | |||
7 | // | |||
8 | //===----------------------------------------------------------------------===// | |||
9 | ||||
10 | #include "ABISysV_ppc64.h" | |||
11 | ||||
12 | // C Includes | |||
13 | // C++ Includes | |||
14 | // Other libraries and framework includes | |||
15 | #include "llvm/ADT/STLExtras.h" | |||
16 | #include "llvm/ADT/Triple.h" | |||
17 | ||||
18 | // Project includes | |||
19 | #include "Utility/PPC64LE_DWARF_Registers.h" | |||
20 | #include "Utility/PPC64_DWARF_Registers.h" | |||
21 | #include "lldb/Core/Module.h" | |||
22 | #include "lldb/Core/PluginManager.h" | |||
23 | #include "lldb/Core/Value.h" | |||
24 | #include "lldb/Core/ValueObjectConstResult.h" | |||
25 | #include "lldb/Core/ValueObjectMemory.h" | |||
26 | #include "lldb/Core/ValueObjectRegister.h" | |||
27 | #include "lldb/Symbol/ClangASTContext.h" | |||
28 | #include "lldb/Symbol/UnwindPlan.h" | |||
29 | #include "lldb/Target/Process.h" | |||
30 | #include "lldb/Target/RegisterContext.h" | |||
31 | #include "lldb/Target/StackFrame.h" | |||
32 | #include "lldb/Target/Target.h" | |||
33 | #include "lldb/Target/Thread.h" | |||
34 | #include "lldb/Utility/ConstString.h" | |||
35 | #include "lldb/Utility/DataExtractor.h" | |||
36 | #include "lldb/Utility/Log.h" | |||
37 | #include "lldb/Utility/RegisterValue.h" | |||
38 | #include "lldb/Utility/Status.h" | |||
39 | ||||
40 | #include "clang/AST/ASTContext.h" | |||
41 | #include "clang/AST/Attr.h" | |||
42 | #include "clang/AST/Decl.h" | |||
43 | ||||
44 | #define DECLARE_REGISTER_INFOS_PPC64_STRUCT | |||
45 | #include "Plugins/Process/Utility/RegisterInfos_ppc64.h" | |||
46 | #undef DECLARE_REGISTER_INFOS_PPC64_STRUCT | |||
47 | ||||
48 | #define DECLARE_REGISTER_INFOS_PPC64LE_STRUCT | |||
49 | #include "Plugins/Process/Utility/RegisterInfos_ppc64le.h" | |||
50 | #undef DECLARE_REGISTER_INFOS_PPC64LE_STRUCT | |||
51 | ||||
52 | using namespace lldb; | |||
53 | using namespace lldb_private; | |||
54 | ||||
55 | const lldb_private::RegisterInfo * | |||
56 | ABISysV_ppc64::GetRegisterInfoArray(uint32_t &count) { | |||
57 | if (GetByteOrder() == lldb::eByteOrderLittle) { | |||
58 | count = llvm::array_lengthof(g_register_infos_ppc64le); | |||
59 | return g_register_infos_ppc64le; | |||
60 | } else { | |||
61 | count = llvm::array_lengthof(g_register_infos_ppc64); | |||
62 | return g_register_infos_ppc64; | |||
63 | } | |||
64 | } | |||
65 | ||||
66 | size_t ABISysV_ppc64::GetRedZoneSize() const { return 224; } | |||
67 | ||||
68 | lldb::ByteOrder ABISysV_ppc64::GetByteOrder() const { | |||
69 | return GetProcessSP()->GetByteOrder(); | |||
70 | } | |||
71 | ||||
72 | //------------------------------------------------------------------ | |||
73 | // Static Functions | |||
74 | //------------------------------------------------------------------ | |||
75 | ||||
76 | ABISP | |||
77 | ABISysV_ppc64::CreateInstance(lldb::ProcessSP process_sp, | |||
78 | const ArchSpec &arch) { | |||
79 | if (arch.GetTriple().getArch() == llvm::Triple::ppc64 || | |||
80 | arch.GetTriple().getArch() == llvm::Triple::ppc64le) { | |||
81 | return ABISP(new ABISysV_ppc64(process_sp)); | |||
82 | } | |||
83 | return ABISP(); | |||
84 | } | |||
85 | ||||
86 | bool ABISysV_ppc64::PrepareTrivialCall(Thread &thread, addr_t sp, | |||
87 | addr_t func_addr, addr_t return_addr, | |||
88 | llvm::ArrayRef<addr_t> args) const { | |||
89 | Log *log(lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_EXPRESSIONS(1u << 8))); | |||
90 | ||||
91 | if (log) { | |||
92 | StreamString s; | |||
93 | s.Printf("ABISysV_ppc64::PrepareTrivialCall (tid = 0x%" PRIx64"l" "x" | |||
94 | ", sp = 0x%" PRIx64"l" "x" ", func_addr = 0x%" PRIx64"l" "x" | |||
95 | ", return_addr = 0x%" PRIx64"l" "x", | |||
96 | thread.GetID(), (uint64_t)sp, (uint64_t)func_addr, | |||
97 | (uint64_t)return_addr); | |||
98 | ||||
99 | for (size_t i = 0; i < args.size(); ++i) | |||
100 | s.Printf(", arg%" PRIu64"l" "u" " = 0x%" PRIx64"l" "x", static_cast<uint64_t>(i + 1), | |||
101 | args[i]); | |||
102 | s.PutCString(")"); | |||
103 | log->PutString(s.GetString()); | |||
104 | } | |||
105 | ||||
106 | RegisterContext *reg_ctx = thread.GetRegisterContext().get(); | |||
107 | if (!reg_ctx) | |||
108 | return false; | |||
109 | ||||
110 | const RegisterInfo *reg_info = nullptr; | |||
111 | ||||
112 | if (args.size() > 8) // TODO handle more than 8 arguments | |||
113 | return false; | |||
114 | ||||
115 | for (size_t i = 0; i < args.size(); ++i) { | |||
116 | reg_info = reg_ctx->GetRegisterInfo(eRegisterKindGeneric, | |||
117 | LLDB_REGNUM_GENERIC_ARG15 + i); | |||
118 | if (log) | |||
119 | log->Printf("About to write arg%" PRIu64"l" "u" " (0x%" PRIx64"l" "x" ") into %s", | |||
120 | static_cast<uint64_t>(i + 1), args[i], reg_info->name); | |||
121 | if (!reg_ctx->WriteRegisterFromUnsigned(reg_info, args[i])) | |||
122 | return false; | |||
123 | } | |||
124 | ||||
125 | // First, align the SP | |||
126 | ||||
127 | if (log) | |||
128 | log->Printf("16-byte aligning SP: 0x%" PRIx64"l" "x" " to 0x%" PRIx64"l" "x", | |||
129 | (uint64_t)sp, (uint64_t)(sp & ~0xfull)); | |||
130 | ||||
131 | sp &= ~(0xfull); // 16-byte alignment | |||
132 | ||||
133 | sp -= 544; // allocate frame to save TOC, RA and SP. | |||
134 | ||||
135 | Status error; | |||
136 | uint64_t reg_value; | |||
137 | const RegisterInfo *pc_reg_info = | |||
138 | reg_ctx->GetRegisterInfo(eRegisterKindGeneric, LLDB_REGNUM_GENERIC_PC0); | |||
139 | const RegisterInfo *sp_reg_info = | |||
140 | reg_ctx->GetRegisterInfo(eRegisterKindGeneric, LLDB_REGNUM_GENERIC_SP1); | |||
141 | ProcessSP process_sp(thread.GetProcess()); | |||
142 | const RegisterInfo *lr_reg_info = | |||
143 | reg_ctx->GetRegisterInfo(eRegisterKindGeneric, LLDB_REGNUM_GENERIC_RA3); | |||
144 | const RegisterInfo *r2_reg_info = reg_ctx->GetRegisterInfoAtIndex(2); | |||
145 | const RegisterInfo *r12_reg_info = reg_ctx->GetRegisterInfoAtIndex(12); | |||
146 | ||||
147 | // Save return address onto the stack. | |||
148 | if (log) | |||
149 | log->Printf("Pushing the return address onto the stack: 0x%" PRIx64"l" "x" | |||
150 | "(+16): 0x%" PRIx64"l" "x", | |||
151 | (uint64_t)sp, (uint64_t)return_addr); | |||
152 | if (!process_sp->WritePointerToMemory(sp + 16, return_addr, error)) | |||
153 | return false; | |||
154 | ||||
155 | // Write the return address to link register. | |||
156 | if (log) | |||
157 | log->Printf("Writing LR: 0x%" PRIx64"l" "x", (uint64_t)return_addr); | |||
158 | if (!reg_ctx->WriteRegisterFromUnsigned(lr_reg_info, return_addr)) | |||
159 | return false; | |||
160 | ||||
161 | // Write target address to %r12 register. | |||
162 | if (log) | |||
163 | log->Printf("Writing R12: 0x%" PRIx64"l" "x", (uint64_t)func_addr); | |||
164 | if (!reg_ctx->WriteRegisterFromUnsigned(r12_reg_info, func_addr)) | |||
165 | return false; | |||
166 | ||||
167 | // Read TOC pointer value. | |||
168 | reg_value = reg_ctx->ReadRegisterAsUnsigned(r2_reg_info, 0); | |||
169 | ||||
170 | // Write TOC pointer onto the stack. | |||
171 | uint64_t stack_offset; | |||
172 | if (GetByteOrder() == lldb::eByteOrderLittle) | |||
173 | stack_offset = 24; | |||
174 | else | |||
175 | stack_offset = 40; | |||
176 | ||||
177 | if (log) | |||
178 | log->Printf("Writing R2 (TOC) at SP(0x%" PRIx64"l" "x" ")+%d: 0x%" PRIx64"l" "x", | |||
179 | (uint64_t)(sp + stack_offset), (int)stack_offset, | |||
180 | (uint64_t)reg_value); | |||
181 | if (!process_sp->WritePointerToMemory(sp + stack_offset, reg_value, error)) | |||
182 | return false; | |||
183 | ||||
184 | // Read the current SP value. | |||
185 | reg_value = reg_ctx->ReadRegisterAsUnsigned(sp_reg_info, 0); | |||
186 | ||||
187 | // Save current SP onto the stack. | |||
188 | if (log) | |||
189 | log->Printf("Writing SP at SP(0x%" PRIx64"l" "x" ")+0: 0x%" PRIx64"l" "x", (uint64_t)sp, | |||
190 | (uint64_t)reg_value); | |||
191 | if (!process_sp->WritePointerToMemory(sp, reg_value, error)) | |||
192 | return false; | |||
193 | ||||
194 | // %r1 is set to the actual stack value. | |||
195 | if (log) | |||
196 | log->Printf("Writing SP: 0x%" PRIx64"l" "x", (uint64_t)sp); | |||
197 | ||||
198 | if (!reg_ctx->WriteRegisterFromUnsigned(sp_reg_info, sp)) | |||
199 | return false; | |||
200 | ||||
201 | // %pc is set to the address of the called function. | |||
202 | ||||
203 | if (log) | |||
204 | log->Printf("Writing IP: 0x%" PRIx64"l" "x", (uint64_t)func_addr); | |||
205 | ||||
206 | if (!reg_ctx->WriteRegisterFromUnsigned(pc_reg_info, func_addr)) | |||
207 | return false; | |||
208 | ||||
209 | return true; | |||
210 | } | |||
211 | ||||
212 | static bool ReadIntegerArgument(Scalar &scalar, unsigned int bit_width, | |||
213 | bool is_signed, Thread &thread, | |||
214 | uint32_t *argument_register_ids, | |||
215 | unsigned int ¤t_argument_register, | |||
216 | addr_t ¤t_stack_argument) { | |||
217 | if (bit_width > 64) | |||
218 | return false; // Scalar can't hold large integer arguments | |||
219 | ||||
220 | if (current_argument_register < 6) { | |||
221 | scalar = thread.GetRegisterContext()->ReadRegisterAsUnsigned( | |||
222 | argument_register_ids[current_argument_register], 0); | |||
223 | current_argument_register++; | |||
224 | if (is_signed) | |||
225 | scalar.SignExtend(bit_width); | |||
226 | } else { | |||
227 | uint32_t byte_size = (bit_width + (8 - 1)) / 8; | |||
228 | Status error; | |||
229 | if (thread.GetProcess()->ReadScalarIntegerFromMemory( | |||
230 | current_stack_argument, byte_size, is_signed, scalar, error)) { | |||
231 | current_stack_argument += byte_size; | |||
232 | return true; | |||
233 | } | |||
234 | return false; | |||
235 | } | |||
236 | return true; | |||
237 | } | |||
238 | ||||
239 | bool ABISysV_ppc64::GetArgumentValues(Thread &thread, ValueList &values) const { | |||
240 | unsigned int num_values = values.GetSize(); | |||
241 | unsigned int value_index; | |||
242 | ||||
243 | // Extract the register context so we can read arguments from registers | |||
244 | ||||
245 | RegisterContext *reg_ctx = thread.GetRegisterContext().get(); | |||
246 | ||||
247 | if (!reg_ctx) | |||
248 | return false; | |||
249 | ||||
250 | // Get the pointer to the first stack argument so we have a place to start | |||
251 | // when reading data | |||
252 | ||||
253 | addr_t sp = reg_ctx->GetSP(0); | |||
254 | ||||
255 | if (!sp) | |||
256 | return false; | |||
257 | ||||
258 | uint64_t stack_offset; | |||
259 | if (GetByteOrder() == lldb::eByteOrderLittle) | |||
260 | stack_offset = 32; | |||
261 | else | |||
262 | stack_offset = 48; | |||
263 | ||||
264 | // jump over return address. | |||
265 | addr_t current_stack_argument = sp + stack_offset; | |||
266 | uint32_t argument_register_ids[8]; | |||
267 | ||||
268 | for (size_t i = 0; i < 8; ++i) { | |||
269 | argument_register_ids[i] = | |||
270 | reg_ctx | |||
271 | ->GetRegisterInfo(eRegisterKindGeneric, | |||
272 | LLDB_REGNUM_GENERIC_ARG15 + i) | |||
273 | ->kinds[eRegisterKindLLDB]; | |||
274 | } | |||
275 | ||||
276 | unsigned int current_argument_register = 0; | |||
277 | ||||
278 | for (value_index = 0; value_index < num_values; ++value_index) { | |||
279 | Value *value = values.GetValueAtIndex(value_index); | |||
280 | ||||
281 | if (!value) | |||
282 | return false; | |||
283 | ||||
284 | // We currently only support extracting values with Clang QualTypes. Do we | |||
285 | // care about others? | |||
286 | CompilerType compiler_type = value->GetCompilerType(); | |||
287 | if (!compiler_type) | |||
288 | return false; | |||
289 | bool is_signed; | |||
290 | ||||
291 | if (compiler_type.IsIntegerOrEnumerationType(is_signed)) { | |||
292 | ReadIntegerArgument(value->GetScalar(), compiler_type.GetBitSize(&thread), | |||
293 | is_signed, thread, argument_register_ids, | |||
294 | current_argument_register, current_stack_argument); | |||
295 | } else if (compiler_type.IsPointerType()) { | |||
296 | ReadIntegerArgument(value->GetScalar(), compiler_type.GetBitSize(&thread), | |||
297 | false, thread, argument_register_ids, | |||
298 | current_argument_register, current_stack_argument); | |||
299 | } | |||
300 | } | |||
301 | ||||
302 | return true; | |||
303 | } | |||
304 | ||||
305 | Status ABISysV_ppc64::SetReturnValueObject(lldb::StackFrameSP &frame_sp, | |||
306 | lldb::ValueObjectSP &new_value_sp) { | |||
307 | Status error; | |||
308 | if (!new_value_sp) { | |||
309 | error.SetErrorString("Empty value object for return value."); | |||
310 | return error; | |||
311 | } | |||
312 | ||||
313 | CompilerType compiler_type = new_value_sp->GetCompilerType(); | |||
314 | if (!compiler_type) { | |||
315 | error.SetErrorString("Null clang type for return value."); | |||
316 | return error; | |||
317 | } | |||
318 | ||||
319 | Thread *thread = frame_sp->GetThread().get(); | |||
320 | ||||
321 | bool is_signed; | |||
322 | uint32_t count; | |||
323 | bool is_complex; | |||
324 | ||||
325 | RegisterContext *reg_ctx = thread->GetRegisterContext().get(); | |||
326 | ||||
327 | bool set_it_simple = false; | |||
328 | if (compiler_type.IsIntegerOrEnumerationType(is_signed) || | |||
329 | compiler_type.IsPointerType()) { | |||
330 | const RegisterInfo *reg_info = reg_ctx->GetRegisterInfoByName("r3", 0); | |||
331 | ||||
332 | DataExtractor data; | |||
333 | Status data_error; | |||
334 | size_t num_bytes = new_value_sp->GetData(data, data_error); | |||
335 | if (data_error.Fail()) { | |||
336 | error.SetErrorStringWithFormat( | |||
337 | "Couldn't convert return value to raw data: %s", | |||
338 | data_error.AsCString()); | |||
339 | return error; | |||
340 | } | |||
341 | lldb::offset_t offset = 0; | |||
342 | if (num_bytes <= 8) { | |||
343 | uint64_t raw_value = data.GetMaxU64(&offset, num_bytes); | |||
344 | ||||
345 | if (reg_ctx->WriteRegisterFromUnsigned(reg_info, raw_value)) | |||
346 | set_it_simple = true; | |||
347 | } else { | |||
348 | error.SetErrorString("We don't support returning longer than 64 bit " | |||
349 | "integer values at present."); | |||
350 | } | |||
351 | } else if (compiler_type.IsFloatingPointType(count, is_complex)) { | |||
352 | if (is_complex) | |||
353 | error.SetErrorString( | |||
354 | "We don't support returning complex values at present"); | |||
355 | else { | |||
356 | size_t bit_width = compiler_type.GetBitSize(frame_sp.get()); | |||
357 | if (bit_width <= 64) { | |||
358 | DataExtractor data; | |||
359 | Status data_error; | |||
360 | size_t num_bytes = new_value_sp->GetData(data, data_error); | |||
361 | if (data_error.Fail()) { | |||
362 | error.SetErrorStringWithFormat( | |||
363 | "Couldn't convert return value to raw data: %s", | |||
364 | data_error.AsCString()); | |||
365 | return error; | |||
366 | } | |||
367 | ||||
368 | unsigned char buffer[16]; | |||
369 | ByteOrder byte_order = data.GetByteOrder(); | |||
370 | ||||
371 | data.CopyByteOrderedData(0, num_bytes, buffer, 16, byte_order); | |||
372 | set_it_simple = true; | |||
373 | } else { | |||
374 | // FIXME - don't know how to do 80 bit long doubles yet. | |||
375 | error.SetErrorString( | |||
376 | "We don't support returning float values > 64 bits at present"); | |||
377 | } | |||
378 | } | |||
379 | } | |||
380 | ||||
381 | if (!set_it_simple) { | |||
382 | // Okay we've got a structure or something that doesn't fit in a simple | |||
383 | // register. We should figure out where it really goes, but we don't | |||
384 | // support this yet. | |||
385 | error.SetErrorString("We only support setting simple integer and float " | |||
386 | "return types at present."); | |||
387 | } | |||
388 | ||||
389 | return error; | |||
390 | } | |||
391 | ||||
392 | // | |||
393 | // ReturnValueExtractor | |||
394 | // | |||
395 | ||||
396 | namespace { | |||
397 | ||||
398 | #define LOG_PREFIX "ReturnValueExtractor: " | |||
399 | ||||
400 | class ReturnValueExtractor { | |||
401 | // This class represents a register, from which data may be extracted. | |||
402 | // | |||
403 | // It may be constructed by directly specifying its index (where 0 is the | |||
404 | // first register used to return values) or by specifying the offset of a | |||
405 | // given struct field, in which case the appropriated register index will be | |||
406 | // calculated. | |||
407 | class Register { | |||
408 | public: | |||
409 | enum Type { | |||
410 | GPR, // General Purpose Register | |||
411 | FPR // Floating Point Register | |||
412 | }; | |||
413 | ||||
414 | // main constructor | |||
415 | // | |||
416 | // offs - field offset in struct | |||
417 | Register(Type ty, uint32_t index, uint32_t offs, RegisterContext *reg_ctx, | |||
418 | ByteOrder byte_order) | |||
419 | : m_index(index), m_offs(offs % sizeof(uint64_t)), | |||
420 | m_avail(sizeof(uint64_t) - m_offs), m_type(ty), m_reg_ctx(reg_ctx), | |||
421 | m_byte_order(byte_order) {} | |||
422 | ||||
423 | // explicit index, no offset | |||
424 | Register(Type ty, uint32_t index, RegisterContext *reg_ctx, | |||
425 | ByteOrder byte_order) | |||
426 | : Register(ty, index, 0, reg_ctx, byte_order) {} | |||
427 | ||||
428 | // GPR, calculate index from offs | |||
429 | Register(uint32_t offs, RegisterContext *reg_ctx, ByteOrder byte_order) | |||
430 | : Register(GPR, offs / sizeof(uint64_t), offs, reg_ctx, byte_order) {} | |||
431 | ||||
432 | uint32_t Index() const { return m_index; } | |||
433 | ||||
434 | // register offset where data is located | |||
435 | uint32_t Offs() const { return m_offs; } | |||
436 | ||||
437 | // available bytes in this register | |||
438 | uint32_t Avail() const { return m_avail; } | |||
439 | ||||
440 | bool IsValid() const { | |||
441 | if (m_index > 7) { | |||
442 | LLDB_LOG(m_log, LOG_PREFIXdo { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "No more than 8 registers should be used to return values" ); } while (0) | |||
443 | "No more than 8 registers should be used to return values")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "No more than 8 registers should be used to return values" ); } while (0); | |||
444 | return false; | |||
445 | } | |||
446 | return true; | |||
447 | } | |||
448 | ||||
449 | std::string GetName() const { | |||
450 | if (m_type == GPR) | |||
451 | return ("r" + llvm::Twine(m_index + 3)).str(); | |||
452 | else | |||
453 | return ("f" + llvm::Twine(m_index + 1)).str(); | |||
454 | } | |||
455 | ||||
456 | // get raw register data | |||
457 | bool GetRawData(uint64_t &raw_data) { | |||
458 | const RegisterInfo *reg_info = | |||
459 | m_reg_ctx->GetRegisterInfoByName(GetName()); | |||
460 | if (!reg_info) { | |||
461 | LLDB_LOG(m_log, LOG_PREFIX "Failed to get RegisterInfo")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Failed to get RegisterInfo"); } while (0); | |||
462 | return false; | |||
463 | } | |||
464 | ||||
465 | RegisterValue reg_val; | |||
466 | if (!m_reg_ctx->ReadRegister(reg_info, reg_val)) { | |||
467 | LLDB_LOG(m_log, LOG_PREFIX "ReadRegister() failed")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "ReadRegister() failed"); } while (0); | |||
468 | return false; | |||
469 | } | |||
470 | ||||
471 | Status error; | |||
472 | uint32_t rc = reg_val.GetAsMemoryData( | |||
473 | reg_info, &raw_data, sizeof(raw_data), m_byte_order, error); | |||
474 | if (rc != sizeof(raw_data)) { | |||
475 | LLDB_LOG(m_log, LOG_PREFIX "GetAsMemoryData() failed")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "GetAsMemoryData() failed"); } while ( 0); | |||
476 | return false; | |||
477 | } | |||
478 | ||||
479 | return true; | |||
480 | } | |||
481 | ||||
482 | private: | |||
483 | uint32_t m_index; | |||
484 | uint32_t m_offs; | |||
485 | uint32_t m_avail; | |||
486 | Type m_type; | |||
487 | RegisterContext *m_reg_ctx; | |||
488 | ByteOrder m_byte_order; | |||
489 | Log *m_log = | |||
490 | lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_EXPRESSIONS(1u << 8)); | |||
491 | }; | |||
492 | ||||
493 | Register GetGPR(uint32_t index) const { | |||
494 | return Register(Register::GPR, index, m_reg_ctx, m_byte_order); | |||
495 | } | |||
496 | ||||
497 | Register GetFPR(uint32_t index) const { | |||
498 | return Register(Register::FPR, index, m_reg_ctx, m_byte_order); | |||
499 | } | |||
500 | ||||
501 | Register GetGPRByOffs(uint32_t offs) const { | |||
502 | return Register(offs, m_reg_ctx, m_byte_order); | |||
503 | } | |||
504 | ||||
505 | public: | |||
506 | // factory | |||
507 | static llvm::Expected<ReturnValueExtractor> Create(Thread &thread, | |||
508 | CompilerType &type) { | |||
509 | RegisterContext *reg_ctx = thread.GetRegisterContext().get(); | |||
510 | if (!reg_ctx) | |||
511 | return llvm::make_error<llvm::StringError>( | |||
512 | LOG_PREFIX "Failed to get RegisterContext", | |||
513 | llvm::inconvertibleErrorCode()); | |||
514 | ||||
515 | ProcessSP process_sp = thread.GetProcess(); | |||
516 | if (!process_sp) | |||
517 | return llvm::make_error<llvm::StringError>( | |||
518 | LOG_PREFIX "GetProcess() failed", llvm::inconvertibleErrorCode()); | |||
519 | ||||
520 | return ReturnValueExtractor(thread, type, reg_ctx, process_sp); | |||
521 | } | |||
522 | ||||
523 | // main method: get value of the type specified at construction time | |||
524 | ValueObjectSP GetValue() { | |||
525 | const uint32_t type_flags = m_type.GetTypeInfo(); | |||
526 | ||||
527 | // call the appropriate type handler | |||
528 | ValueSP value_sp; | |||
529 | ValueObjectSP valobj_sp; | |||
530 | if (type_flags & eTypeIsScalar) { | |||
531 | if (type_flags & eTypeIsInteger) { | |||
532 | value_sp = GetIntegerValue(0); | |||
533 | } else if (type_flags & eTypeIsFloat) { | |||
534 | if (type_flags & eTypeIsComplex) { | |||
535 | LLDB_LOG(m_log, LOG_PREFIX "Complex numbers are not supported yet")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Complex numbers are not supported yet" ); } while (0); | |||
536 | return ValueObjectSP(); | |||
537 | } else { | |||
538 | value_sp = GetFloatValue(m_type, 0); | |||
539 | } | |||
540 | } | |||
541 | } else if (type_flags & eTypeIsPointer) { | |||
542 | value_sp = GetPointerValue(0); | |||
543 | } | |||
544 | ||||
545 | if (value_sp) { | |||
546 | valobj_sp = ValueObjectConstResult::Create( | |||
547 | m_thread.GetStackFrameAtIndex(0).get(), *value_sp, ConstString("")); | |||
548 | } else if (type_flags & eTypeIsVector) { | |||
549 | valobj_sp = GetVectorValueObject(); | |||
550 | } else if (type_flags & eTypeIsStructUnion || type_flags & eTypeIsClass) { | |||
551 | valobj_sp = GetStructValueObject(); | |||
552 | } | |||
553 | ||||
554 | return valobj_sp; | |||
555 | } | |||
556 | ||||
557 | private: | |||
558 | // data | |||
559 | Thread &m_thread; | |||
560 | CompilerType &m_type; | |||
561 | uint64_t m_byte_size; | |||
562 | std::unique_ptr<DataBufferHeap> m_data_ap; | |||
563 | int32_t m_src_offs = 0; | |||
564 | int32_t m_dst_offs = 0; | |||
565 | bool m_packed = false; | |||
566 | Log *m_log = lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_EXPRESSIONS(1u << 8)); | |||
567 | RegisterContext *m_reg_ctx; | |||
568 | ProcessSP m_process_sp; | |||
569 | ByteOrder m_byte_order; | |||
570 | uint32_t m_addr_size; | |||
571 | ||||
572 | // methods | |||
573 | ||||
574 | // constructor | |||
575 | ReturnValueExtractor(Thread &thread, CompilerType &type, | |||
576 | RegisterContext *reg_ctx, ProcessSP process_sp) | |||
577 | : m_thread(thread), m_type(type), | |||
578 | m_byte_size(m_type.GetByteSize(nullptr)), | |||
579 | m_data_ap(new DataBufferHeap(m_byte_size, 0)), m_reg_ctx(reg_ctx), | |||
580 | m_process_sp(process_sp), m_byte_order(process_sp->GetByteOrder()), | |||
581 | m_addr_size( | |||
582 | process_sp->GetTarget().GetArchitecture().GetAddressByteSize()) {} | |||
583 | ||||
584 | // build a new scalar value | |||
585 | ValueSP NewScalarValue(CompilerType &type) { | |||
586 | ValueSP value_sp(new Value); | |||
587 | value_sp->SetCompilerType(type); | |||
588 | value_sp->SetValueType(Value::eValueTypeScalar); | |||
589 | return value_sp; | |||
590 | } | |||
591 | ||||
592 | // get an integer value in the specified register | |||
593 | ValueSP GetIntegerValue(uint32_t reg_index) { | |||
594 | uint64_t raw_value; | |||
595 | auto reg = GetGPR(reg_index); | |||
596 | if (!reg.GetRawData(raw_value)) | |||
597 | return ValueSP(); | |||
598 | ||||
599 | // build value from data | |||
600 | ValueSP value_sp(NewScalarValue(m_type)); | |||
601 | ||||
602 | uint32_t type_flags = m_type.GetTypeInfo(); | |||
603 | bool is_signed = (type_flags & eTypeIsSigned) != 0; | |||
604 | ||||
605 | switch (m_byte_size) { | |||
606 | case sizeof(uint64_t): | |||
607 | if (is_signed) | |||
608 | value_sp->GetScalar() = (int64_t)(raw_value); | |||
609 | else | |||
610 | value_sp->GetScalar() = (uint64_t)(raw_value); | |||
611 | break; | |||
612 | ||||
613 | case sizeof(uint32_t): | |||
614 | if (is_signed) | |||
615 | value_sp->GetScalar() = (int32_t)(raw_value & UINT32_MAX(4294967295U)); | |||
616 | else | |||
617 | value_sp->GetScalar() = (uint32_t)(raw_value & UINT32_MAX(4294967295U)); | |||
618 | break; | |||
619 | ||||
620 | case sizeof(uint16_t): | |||
621 | if (is_signed) | |||
622 | value_sp->GetScalar() = (int16_t)(raw_value & UINT16_MAX(65535)); | |||
623 | else | |||
624 | value_sp->GetScalar() = (uint16_t)(raw_value & UINT16_MAX(65535)); | |||
625 | break; | |||
626 | ||||
627 | case sizeof(uint8_t): | |||
628 | if (is_signed) | |||
629 | value_sp->GetScalar() = (int8_t)(raw_value & UINT8_MAX(255)); | |||
630 | else | |||
631 | value_sp->GetScalar() = (uint8_t)(raw_value & UINT8_MAX(255)); | |||
632 | break; | |||
633 | ||||
634 | default: | |||
635 | llvm_unreachable("Invalid integer size")::llvm::llvm_unreachable_internal("Invalid integer size", "/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , 635); | |||
636 | } | |||
637 | ||||
638 | return value_sp; | |||
639 | } | |||
640 | ||||
641 | // get a floating point value on the specified register | |||
642 | ValueSP GetFloatValue(CompilerType &type, uint32_t reg_index) { | |||
643 | uint64_t raw_data; | |||
644 | auto reg = GetFPR(reg_index); | |||
645 | if (!reg.GetRawData(raw_data)) | |||
646 | return ValueSP(); | |||
647 | ||||
648 | // build value from data | |||
649 | ValueSP value_sp(NewScalarValue(type)); | |||
650 | ||||
651 | DataExtractor de(&raw_data, sizeof(raw_data), m_byte_order, m_addr_size); | |||
652 | ||||
653 | offset_t offset = 0; | |||
654 | size_t byte_size = type.GetByteSize(nullptr); | |||
655 | switch (byte_size) { | |||
656 | case sizeof(float): | |||
657 | value_sp->GetScalar() = (float)de.GetDouble(&offset); | |||
658 | break; | |||
659 | ||||
660 | case sizeof(double): | |||
661 | value_sp->GetScalar() = de.GetDouble(&offset); | |||
662 | break; | |||
663 | ||||
664 | default: | |||
665 | llvm_unreachable("Invalid floating point size")::llvm::llvm_unreachable_internal("Invalid floating point size" , "/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , 665); | |||
666 | } | |||
667 | ||||
668 | return value_sp; | |||
669 | } | |||
670 | ||||
671 | // get pointer value from register | |||
672 | ValueSP GetPointerValue(uint32_t reg_index) { | |||
673 | uint64_t raw_data; | |||
674 | auto reg = GetGPR(reg_index); | |||
675 | if (!reg.GetRawData(raw_data)) | |||
676 | return ValueSP(); | |||
677 | ||||
678 | // build value from raw data | |||
679 | ValueSP value_sp(NewScalarValue(m_type)); | |||
680 | value_sp->GetScalar() = raw_data; | |||
681 | return value_sp; | |||
682 | } | |||
683 | ||||
684 | // build the ValueObject from our data buffer | |||
685 | ValueObjectSP BuildValueObject() { | |||
686 | DataExtractor de(DataBufferSP(m_data_ap.release()), m_byte_order, | |||
687 | m_addr_size); | |||
688 | return ValueObjectConstResult::Create(&m_thread, m_type, ConstString(""), | |||
689 | de); | |||
690 | } | |||
691 | ||||
692 | // get a vector return value | |||
693 | ValueObjectSP GetVectorValueObject() { | |||
694 | const uint32_t MAX_VRS = 2; | |||
695 | ||||
696 | // get first V register used to return values | |||
697 | const RegisterInfo *vr[MAX_VRS]; | |||
698 | vr[0] = m_reg_ctx->GetRegisterInfoByName("vr2"); | |||
699 | if (!vr[0]) { | |||
700 | LLDB_LOG(m_log, LOG_PREFIX "Failed to get vr2 RegisterInfo")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Failed to get vr2 RegisterInfo"); } while (0); | |||
701 | return ValueObjectSP(); | |||
702 | } | |||
703 | ||||
704 | const uint32_t vr_size = vr[0]->byte_size; | |||
705 | size_t vrs = 1; | |||
706 | if (m_byte_size > 2 * vr_size) { | |||
707 | LLDB_LOG(do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Returning vectors that don't fit in 2 VR regs is not supported" ); } while (0) | |||
708 | m_log, LOG_PREFIXdo { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Returning vectors that don't fit in 2 VR regs is not supported" ); } while (0) | |||
709 | "Returning vectors that don't fit in 2 VR regs is not supported")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Returning vectors that don't fit in 2 VR regs is not supported" ); } while (0); | |||
710 | return ValueObjectSP(); | |||
711 | } | |||
712 | ||||
713 | // load vr3, if needed | |||
714 | if (m_byte_size > vr_size) { | |||
715 | vrs++; | |||
716 | vr[1] = m_reg_ctx->GetRegisterInfoByName("vr3"); | |||
717 | if (!vr[1]) { | |||
718 | LLDB_LOG(m_log, LOG_PREFIX "Failed to get vr3 RegisterInfo")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Failed to get vr3 RegisterInfo"); } while (0); | |||
719 | return ValueObjectSP(); | |||
720 | } | |||
721 | } | |||
722 | ||||
723 | // Get the whole contents of vector registers and let the logic here | |||
724 | // arrange the data properly. | |||
725 | ||||
726 | RegisterValue vr_val[MAX_VRS]; | |||
727 | Status error; | |||
728 | std::unique_ptr<DataBufferHeap> vr_data( | |||
729 | new DataBufferHeap(vrs * vr_size, 0)); | |||
730 | ||||
731 | for (uint32_t i = 0; i < vrs; i++) { | |||
732 | if (!m_reg_ctx->ReadRegister(vr[i], vr_val[i])) { | |||
733 | LLDB_LOG(m_log, LOG_PREFIX "Failed to read vector register contents")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Failed to read vector register contents" ); } while (0); | |||
734 | return ValueObjectSP(); | |||
735 | } | |||
736 | if (!vr_val[i].GetAsMemoryData(vr[i], vr_data->GetBytes() + i * vr_size, | |||
737 | vr_size, m_byte_order, error)) { | |||
738 | LLDB_LOG(m_log, LOG_PREFIX "Failed to extract vector register bytes")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Failed to extract vector register bytes" ); } while (0); | |||
739 | return ValueObjectSP(); | |||
740 | } | |||
741 | } | |||
742 | ||||
743 | // The compiler generated code seems to always put the vector elements at | |||
744 | // the end of the vector register, in case they don't occupy all of it. | |||
745 | // This offset variable handles this. | |||
746 | uint32_t offs = 0; | |||
747 | if (m_byte_size < vr_size) | |||
748 | offs = vr_size - m_byte_size; | |||
749 | ||||
750 | // copy extracted data to our buffer | |||
751 | memcpy(m_data_ap->GetBytes(), vr_data->GetBytes() + offs, m_byte_size); | |||
752 | return BuildValueObject(); | |||
753 | } | |||
754 | ||||
755 | // get a struct return value | |||
756 | ValueObjectSP GetStructValueObject() { | |||
757 | // case 1: get from stack | |||
758 | if (m_byte_size > 2 * sizeof(uint64_t)) { | |||
759 | uint64_t addr; | |||
760 | auto reg = GetGPR(0); | |||
761 | if (!reg.GetRawData(addr)) | |||
762 | return ValueObjectSP(); | |||
763 | ||||
764 | Status error; | |||
765 | size_t rc = m_process_sp->ReadMemory(addr, m_data_ap->GetBytes(), | |||
766 | m_byte_size, error); | |||
767 | if (rc != m_byte_size) { | |||
768 | LLDB_LOG(m_log, LOG_PREFIX "Failed to read memory pointed by r3")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Failed to read memory pointed by r3") ; } while (0); | |||
769 | return ValueObjectSP(); | |||
770 | } | |||
771 | return BuildValueObject(); | |||
772 | } | |||
773 | ||||
774 | // get number of children | |||
775 | const bool omit_empty_base_classes = true; | |||
776 | uint32_t n = m_type.GetNumChildren(omit_empty_base_classes); | |||
777 | if (!n) { | |||
778 | LLDB_LOG(m_log, LOG_PREFIX "No children found in struct")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "No children found in struct"); } while (0); | |||
779 | return ValueObjectSP(); | |||
780 | } | |||
781 | ||||
782 | // case 2: homogeneous double or float aggregate | |||
783 | CompilerType elem_type; | |||
784 | if (m_type.IsHomogeneousAggregate(&elem_type)) { | |||
785 | uint32_t type_flags = elem_type.GetTypeInfo(); | |||
786 | uint64_t elem_size = elem_type.GetByteSize(nullptr); | |||
787 | if (type_flags & eTypeIsComplex || !(type_flags & eTypeIsFloat)) { | |||
788 | LLDB_LOG(m_log,do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Unexpected type found in homogeneous aggregate" ); } while (0) | |||
789 | LOG_PREFIX "Unexpected type found in homogeneous aggregate")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Unexpected type found in homogeneous aggregate" ); } while (0); | |||
790 | return ValueObjectSP(); | |||
791 | } | |||
792 | ||||
793 | for (uint32_t i = 0; i < n; i++) { | |||
794 | ValueSP val_sp = GetFloatValue(elem_type, i); | |||
795 | if (!val_sp) | |||
796 | return ValueObjectSP(); | |||
797 | ||||
798 | // copy to buffer | |||
799 | Status error; | |||
800 | size_t rc = val_sp->GetScalar().GetAsMemoryData( | |||
801 | m_data_ap->GetBytes() + m_dst_offs, elem_size, m_byte_order, error); | |||
802 | if (rc != elem_size) { | |||
803 | LLDB_LOG(m_log, LOG_PREFIX "Failed to get float data")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Failed to get float data"); } while ( 0); | |||
804 | return ValueObjectSP(); | |||
805 | } | |||
806 | m_dst_offs += elem_size; | |||
807 | } | |||
808 | return BuildValueObject(); | |||
809 | } | |||
810 | ||||
811 | // case 3: get from GPRs | |||
812 | ||||
813 | // first, check if this is a packed struct or not | |||
814 | ClangASTContext *ast = | |||
815 | llvm::dyn_cast<ClangASTContext>(m_type.GetTypeSystem()); | |||
816 | if (ast) { | |||
817 | clang::RecordDecl *record_decl = ClangASTContext::GetAsRecordDecl(m_type); | |||
818 | ||||
819 | if (record_decl) { | |||
820 | auto attrs = record_decl->attrs(); | |||
821 | for (const auto &attr : attrs) { | |||
822 | if (attr->getKind() == clang::attr::Packed) { | |||
823 | m_packed = true; | |||
824 | break; | |||
825 | } | |||
826 | } | |||
827 | } | |||
828 | } | |||
829 | ||||
830 | LLDB_LOG(m_log, LOG_PREFIX "{0} struct",do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "{0} struct", m_packed ? "packed" : "not packed" ); } while (0) | |||
831 | m_packed ? "packed" : "not packed")do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "{0} struct", m_packed ? "packed" : "not packed" ); } while (0); | |||
832 | ||||
833 | for (uint32_t i = 0; i < n; i++) { | |||
834 | std::string name; | |||
835 | uint32_t size; | |||
836 | GetChildType(i, name, size); | |||
837 | // NOTE: the offset returned by GetChildCompilerTypeAtIndex() | |||
838 | // can't be used because it never considers alignment bytes | |||
839 | // between struct fields. | |||
840 | LLDB_LOG(m_log, LOG_PREFIX "field={0}, size={1}", name, size)do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "field={0}, size={1}", name, size); } while (0); | |||
841 | if (!ExtractField(size)) | |||
842 | return ValueObjectSP(); | |||
843 | } | |||
844 | ||||
845 | return BuildValueObject(); | |||
846 | } | |||
847 | ||||
848 | // extract 'size' bytes at 'offs' from GPRs | |||
849 | bool ExtractFromRegs(int32_t offs, uint32_t size, void *buf) { | |||
850 | while (size) { | |||
851 | auto reg = GetGPRByOffs(offs); | |||
852 | if (!reg.IsValid()) | |||
853 | return false; | |||
854 | ||||
855 | uint32_t n = std::min(reg.Avail(), size); | |||
856 | uint64_t raw_data; | |||
857 | ||||
858 | if (!reg.GetRawData(raw_data)) | |||
859 | return false; | |||
860 | ||||
861 | memcpy(buf, (char *)&raw_data + reg.Offs(), n); | |||
862 | offs += n; | |||
863 | size -= n; | |||
864 | buf = (char *)buf + n; | |||
865 | } | |||
866 | return true; | |||
867 | } | |||
868 | ||||
869 | // extract one field from GPRs and put it in our buffer | |||
870 | bool ExtractField(uint32_t size) { | |||
871 | auto reg = GetGPRByOffs(m_src_offs); | |||
872 | if (!reg.IsValid()) | |||
873 | return false; | |||
874 | ||||
875 | // handle padding | |||
876 | if (!m_packed) { | |||
877 | uint32_t n = m_src_offs % size; | |||
878 | ||||
879 | // not 'size' bytes aligned | |||
880 | if (n) { | |||
881 | LLDB_LOG(m_log,do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Extracting {0} alignment bytes at offset {1}" , n, m_src_offs); } while (0) | |||
882 | LOG_PREFIX "Extracting {0} alignment bytes at offset {1}", n,do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Extracting {0} alignment bytes at offset {1}" , n, m_src_offs); } while (0) | |||
883 | m_src_offs)do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Extracting {0} alignment bytes at offset {1}" , n, m_src_offs); } while (0); | |||
884 | // get alignment bytes | |||
885 | if (!ExtractFromRegs(m_src_offs, n, m_data_ap->GetBytes() + m_dst_offs)) | |||
886 | return false; | |||
887 | m_src_offs += n; | |||
888 | m_dst_offs += n; | |||
889 | } | |||
890 | } | |||
891 | ||||
892 | // get field | |||
893 | LLDB_LOG(m_log, LOG_PREFIX "Extracting {0} field bytes at offset {1}", size,do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Extracting {0} field bytes at offset {1}" , size, m_src_offs); } while (0) | |||
894 | m_src_offs)do { ::lldb_private::Log *log_private = (m_log); if (log_private ) log_private->Format("/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, LOG_PREFIX "Extracting {0} field bytes at offset {1}" , size, m_src_offs); } while (0); | |||
895 | if (!ExtractFromRegs(m_src_offs, size, m_data_ap->GetBytes() + m_dst_offs)) | |||
896 | return false; | |||
897 | m_src_offs += size; | |||
898 | m_dst_offs += size; | |||
899 | return true; | |||
900 | } | |||
901 | ||||
902 | // get child | |||
903 | CompilerType GetChildType(uint32_t i, std::string &name, uint32_t &size) { | |||
904 | // GetChild constant inputs | |||
905 | const bool transparent_pointers = false; | |||
906 | const bool omit_empty_base_classes = true; | |||
907 | const bool ignore_array_bounds = false; | |||
908 | // GetChild output params | |||
909 | int32_t child_offs; | |||
910 | uint32_t child_bitfield_bit_size; | |||
911 | uint32_t child_bitfield_bit_offset; | |||
912 | bool child_is_base_class; | |||
913 | bool child_is_deref_of_parent; | |||
914 | ValueObject *valobj = nullptr; | |||
915 | uint64_t language_flags; | |||
916 | ExecutionContext exe_ctx; | |||
917 | m_thread.CalculateExecutionContext(exe_ctx); | |||
918 | ||||
919 | return m_type.GetChildCompilerTypeAtIndex( | |||
920 | &exe_ctx, i, transparent_pointers, omit_empty_base_classes, | |||
921 | ignore_array_bounds, name, size, child_offs, child_bitfield_bit_size, | |||
922 | child_bitfield_bit_offset, child_is_base_class, | |||
923 | child_is_deref_of_parent, valobj, language_flags); | |||
924 | } | |||
925 | }; | |||
926 | ||||
927 | #undef LOG_PREFIX | |||
928 | ||||
929 | } // anonymous namespace | |||
930 | ||||
931 | ValueObjectSP | |||
932 | ABISysV_ppc64::GetReturnValueObjectSimple(Thread &thread, | |||
933 | CompilerType &type) const { | |||
934 | if (!type) | |||
935 | return ValueObjectSP(); | |||
936 | ||||
937 | auto exp_extractor = ReturnValueExtractor::Create(thread, type); | |||
938 | if (!exp_extractor) { | |||
939 | Log *log = lldb_private::GetLogIfAllCategoriesSet(LIBLLDB_LOG_EXPRESSIONS(1u << 8)); | |||
940 | LLDB_LOG_ERROR(log, exp_extractor.takeError(),do { ::lldb_private::Log *log_private = (log); ::llvm::Error error_private = (exp_extractor.takeError()); if (log_private && error_private ) { log_private->FormatError(::std::move(error_private), "/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, "Extracting return value failed: {0}"); } else :: llvm::consumeError(::std::move(error_private)); } while (0) | |||
941 | "Extracting return value failed: {0}")do { ::lldb_private::Log *log_private = (log); ::llvm::Error error_private = (exp_extractor.takeError()); if (log_private && error_private ) { log_private->FormatError(::std::move(error_private), "/build/llvm-toolchain-snapshot-8~svn345461/tools/lldb/source/Plugins/ABI/SysV-ppc64/ABISysV_ppc64.cpp" , __func__, "Extracting return value failed: {0}"); } else :: llvm::consumeError(::std::move(error_private)); } while (0); | |||
942 | return ValueObjectSP(); | |||
943 | } | |||
944 | ||||
945 | return exp_extractor.get().GetValue(); | |||
946 | } | |||
947 | ||||
948 | ValueObjectSP ABISysV_ppc64::GetReturnValueObjectImpl( | |||
949 | Thread &thread, CompilerType &return_compiler_type) const { | |||
950 | return GetReturnValueObjectSimple(thread, return_compiler_type); | |||
| ||||
951 | } | |||
952 | ||||
953 | bool ABISysV_ppc64::CreateFunctionEntryUnwindPlan(UnwindPlan &unwind_plan) { | |||
954 | unwind_plan.Clear(); | |||
955 | unwind_plan.SetRegisterKind(eRegisterKindDWARF); | |||
956 | ||||
957 | uint32_t lr_reg_num; | |||
958 | uint32_t sp_reg_num; | |||
959 | uint32_t pc_reg_num; | |||
960 | ||||
961 | if (GetByteOrder() == lldb::eByteOrderLittle) { | |||
962 | lr_reg_num = ppc64le_dwarf::dwarf_lr_ppc64le; | |||
963 | sp_reg_num = ppc64le_dwarf::dwarf_r1_ppc64le; | |||
964 | pc_reg_num = ppc64le_dwarf::dwarf_pc_ppc64le; | |||
965 | } else { | |||
966 | lr_reg_num = ppc64_dwarf::dwarf_lr_ppc64; | |||
967 | sp_reg_num = ppc64_dwarf::dwarf_r1_ppc64; | |||
968 | pc_reg_num = ppc64_dwarf::dwarf_pc_ppc64; | |||
969 | } | |||
970 | ||||
971 | UnwindPlan::RowSP row(new UnwindPlan::Row); | |||
972 | ||||
973 | // Our Call Frame Address is the stack pointer value | |||
974 | row->GetCFAValue().SetIsRegisterPlusOffset(sp_reg_num, 0); | |||
975 | ||||
976 | // The previous PC is in the LR | |||
977 | row->SetRegisterLocationToRegister(pc_reg_num, lr_reg_num, true); | |||
978 | unwind_plan.AppendRow(row); | |||
979 | ||||
980 | // All other registers are the same. | |||
981 | ||||
982 | unwind_plan.SetSourceName("ppc64 at-func-entry default"); | |||
983 | unwind_plan.SetSourcedFromCompiler(eLazyBoolNo); | |||
984 | ||||
985 | return true; | |||
986 | } | |||
987 | ||||
988 | bool ABISysV_ppc64::CreateDefaultUnwindPlan(UnwindPlan &unwind_plan) { | |||
989 | unwind_plan.Clear(); | |||
990 | unwind_plan.SetRegisterKind(eRegisterKindDWARF); | |||
991 | ||||
992 | uint32_t sp_reg_num; | |||
993 | uint32_t pc_reg_num; | |||
994 | uint32_t cr_reg_num; | |||
995 | ||||
996 | if (GetByteOrder() == lldb::eByteOrderLittle) { | |||
997 | sp_reg_num = ppc64le_dwarf::dwarf_r1_ppc64le; | |||
998 | pc_reg_num = ppc64le_dwarf::dwarf_lr_ppc64le; | |||
999 | cr_reg_num = ppc64le_dwarf::dwarf_cr_ppc64le; | |||
1000 | } else { | |||
1001 | sp_reg_num = ppc64_dwarf::dwarf_r1_ppc64; | |||
1002 | pc_reg_num = ppc64_dwarf::dwarf_lr_ppc64; | |||
1003 | cr_reg_num = ppc64_dwarf::dwarf_cr_ppc64; | |||
1004 | } | |||
1005 | ||||
1006 | UnwindPlan::RowSP row(new UnwindPlan::Row); | |||
1007 | const int32_t ptr_size = 8; | |||
1008 | row->GetCFAValue().SetIsRegisterDereferenced(sp_reg_num); | |||
1009 | ||||
1010 | row->SetRegisterLocationToAtCFAPlusOffset(pc_reg_num, ptr_size * 2, true); | |||
1011 | row->SetRegisterLocationToIsCFAPlusOffset(sp_reg_num, 0, true); | |||
1012 | row->SetRegisterLocationToAtCFAPlusOffset(cr_reg_num, ptr_size, true); | |||
1013 | ||||
1014 | unwind_plan.AppendRow(row); | |||
1015 | unwind_plan.SetSourceName("ppc64 default unwind plan"); | |||
1016 | unwind_plan.SetSourcedFromCompiler(eLazyBoolNo); | |||
1017 | unwind_plan.SetUnwindPlanValidAtAllInstructions(eLazyBoolNo); | |||
1018 | unwind_plan.SetReturnAddressRegister(pc_reg_num); | |||
1019 | return true; | |||
1020 | } | |||
1021 | ||||
1022 | bool ABISysV_ppc64::RegisterIsVolatile(const RegisterInfo *reg_info) { | |||
1023 | return !RegisterIsCalleeSaved(reg_info); | |||
1024 | } | |||
1025 | ||||
1026 | // See "Register Usage" in the | |||
1027 | // "System V Application Binary Interface" | |||
1028 | // "64-bit PowerPC ELF Application Binary Interface Supplement" current version | |||
1029 | // is 2 released 2015 at | |||
1030 | // https://members.openpowerfoundation.org/document/dl/576 | |||
1031 | bool ABISysV_ppc64::RegisterIsCalleeSaved(const RegisterInfo *reg_info) { | |||
1032 | if (reg_info) { | |||
1033 | // Preserved registers are : | |||
1034 | // r1,r2,r13-r31 | |||
1035 | // cr2-cr4 (partially preserved) | |||
1036 | // f14-f31 (not yet) | |||
1037 | // v20-v31 (not yet) | |||
1038 | // vrsave (not yet) | |||
1039 | ||||
1040 | const char *name = reg_info->name; | |||
1041 | if (name[0] == 'r') { | |||
1042 | if ((name[1] == '1' || name[1] == '2') && name[2] == '\0') | |||
1043 | return true; | |||
1044 | if (name[1] == '1' && name[2] > '2') | |||
1045 | return true; | |||
1046 | if ((name[1] == '2' || name[1] == '3') && name[2] != '\0') | |||
1047 | return true; | |||
1048 | } | |||
1049 | ||||
1050 | if (name[0] == 'f' && name[1] >= '0' && name[2] <= '9') { | |||
1051 | if (name[2] == '\0') | |||
1052 | return false; | |||
1053 | if (name[1] == '1' && name[2] >= '4') | |||
1054 | return true; | |||
1055 | if ((name[1] == '2' || name[1] == '3') && name[2] != '\0') | |||
1056 | return true; | |||
1057 | } | |||
1058 | ||||
1059 | if (name[0] == 's' && name[1] == 'p' && name[2] == '\0') // sp | |||
1060 | return true; | |||
1061 | if (name[0] == 'f' && name[1] == 'p' && name[2] == '\0') // fp | |||
1062 | return false; | |||
1063 | if (name[0] == 'p' && name[1] == 'c' && name[2] == '\0') // pc | |||
1064 | return true; | |||
1065 | } | |||
1066 | return false; | |||
1067 | } | |||
1068 | ||||
1069 | void ABISysV_ppc64::Initialize() { | |||
1070 | PluginManager::RegisterPlugin( | |||
1071 | GetPluginNameStatic(), "System V ABI for ppc64 targets", CreateInstance); | |||
1072 | } | |||
1073 | ||||
1074 | void ABISysV_ppc64::Terminate() { | |||
1075 | PluginManager::UnregisterPlugin(CreateInstance); | |||
1076 | } | |||
1077 | ||||
1078 | lldb_private::ConstString ABISysV_ppc64::GetPluginNameStatic() { | |||
1079 | static ConstString g_name("sysv-ppc64"); | |||
1080 | return g_name; | |||
1081 | } | |||
1082 | ||||
1083 | //------------------------------------------------------------------ | |||
1084 | // PluginInterface protocol | |||
1085 | //------------------------------------------------------------------ | |||
1086 | ||||
1087 | lldb_private::ConstString ABISysV_ppc64::GetPluginName() { | |||
1088 | return GetPluginNameStatic(); | |||
1089 | } | |||
1090 | ||||
1091 | uint32_t ABISysV_ppc64::GetPluginVersion() { return 1; } |
1 | //===- llvm/Support/Error.h - Recoverable error handling --------*- C++ -*-===// | |||
2 | // | |||
3 | // The LLVM Compiler Infrastructure | |||
4 | // | |||
5 | // This file is distributed under the University of Illinois Open Source | |||
6 | // License. See LICENSE.TXT for details. | |||
7 | // | |||
8 | //===----------------------------------------------------------------------===// | |||
9 | // | |||
10 | // This file defines an API used to report recoverable errors. | |||
11 | // | |||
12 | //===----------------------------------------------------------------------===// | |||
13 | ||||
14 | #ifndef LLVM_SUPPORT_ERROR_H | |||
15 | #define LLVM_SUPPORT_ERROR_H | |||
16 | ||||
17 | #include "llvm-c/Error.h" | |||
18 | #include "llvm/ADT/STLExtras.h" | |||
19 | #include "llvm/ADT/SmallVector.h" | |||
20 | #include "llvm/ADT/StringExtras.h" | |||
21 | #include "llvm/ADT/Twine.h" | |||
22 | #include "llvm/Config/abi-breaking.h" | |||
23 | #include "llvm/Support/AlignOf.h" | |||
24 | #include "llvm/Support/Compiler.h" | |||
25 | #include "llvm/Support/Debug.h" | |||
26 | #include "llvm/Support/ErrorHandling.h" | |||
27 | #include "llvm/Support/ErrorOr.h" | |||
28 | #include "llvm/Support/Format.h" | |||
29 | #include "llvm/Support/raw_ostream.h" | |||
30 | #include <algorithm> | |||
31 | #include <cassert> | |||
32 | #include <cstdint> | |||
33 | #include <cstdlib> | |||
34 | #include <functional> | |||
35 | #include <memory> | |||
36 | #include <new> | |||
37 | #include <string> | |||
38 | #include <system_error> | |||
39 | #include <type_traits> | |||
40 | #include <utility> | |||
41 | #include <vector> | |||
42 | ||||
43 | namespace llvm { | |||
44 | ||||
45 | class ErrorSuccess; | |||
46 | ||||
47 | /// Base class for error info classes. Do not extend this directly: Extend | |||
48 | /// the ErrorInfo template subclass instead. | |||
49 | class ErrorInfoBase { | |||
50 | public: | |||
51 | virtual ~ErrorInfoBase() = default; | |||
52 | ||||
53 | /// Print an error message to an output stream. | |||
54 | virtual void log(raw_ostream &OS) const = 0; | |||
55 | ||||
56 | /// Return the error message as a string. | |||
57 | virtual std::string message() const { | |||
58 | std::string Msg; | |||
59 | raw_string_ostream OS(Msg); | |||
60 | log(OS); | |||
61 | return OS.str(); | |||
62 | } | |||
63 | ||||
64 | /// Convert this error to a std::error_code. | |||
65 | /// | |||
66 | /// This is a temporary crutch to enable interaction with code still | |||
67 | /// using std::error_code. It will be removed in the future. | |||
68 | virtual std::error_code convertToErrorCode() const = 0; | |||
69 | ||||
70 | // Returns the class ID for this type. | |||
71 | static const void *classID() { return &ID; } | |||
72 | ||||
73 | // Returns the class ID for the dynamic type of this ErrorInfoBase instance. | |||
74 | virtual const void *dynamicClassID() const = 0; | |||
75 | ||||
76 | // Check whether this instance is a subclass of the class identified by | |||
77 | // ClassID. | |||
78 | virtual bool isA(const void *const ClassID) const { | |||
79 | return ClassID == classID(); | |||
80 | } | |||
81 | ||||
82 | // Check whether this instance is a subclass of ErrorInfoT. | |||
83 | template <typename ErrorInfoT> bool isA() const { | |||
84 | return isA(ErrorInfoT::classID()); | |||
85 | } | |||
86 | ||||
87 | private: | |||
88 | virtual void anchor(); | |||
89 | ||||
90 | static char ID; | |||
91 | }; | |||
92 | ||||
93 | /// Lightweight error class with error context and mandatory checking. | |||
94 | /// | |||
95 | /// Instances of this class wrap a ErrorInfoBase pointer. Failure states | |||
96 | /// are represented by setting the pointer to a ErrorInfoBase subclass | |||
97 | /// instance containing information describing the failure. Success is | |||
98 | /// represented by a null pointer value. | |||
99 | /// | |||
100 | /// Instances of Error also contains a 'Checked' flag, which must be set | |||
101 | /// before the destructor is called, otherwise the destructor will trigger a | |||
102 | /// runtime error. This enforces at runtime the requirement that all Error | |||
103 | /// instances be checked or returned to the caller. | |||
104 | /// | |||
105 | /// There are two ways to set the checked flag, depending on what state the | |||
106 | /// Error instance is in. For Error instances indicating success, it | |||
107 | /// is sufficient to invoke the boolean conversion operator. E.g.: | |||
108 | /// | |||
109 | /// @code{.cpp} | |||
110 | /// Error foo(<...>); | |||
111 | /// | |||
112 | /// if (auto E = foo(<...>)) | |||
113 | /// return E; // <- Return E if it is in the error state. | |||
114 | /// // We have verified that E was in the success state. It can now be safely | |||
115 | /// // destroyed. | |||
116 | /// @endcode | |||
117 | /// | |||
118 | /// A success value *can not* be dropped. For example, just calling 'foo(<...>)' | |||
119 | /// without testing the return value will raise a runtime error, even if foo | |||
120 | /// returns success. | |||
121 | /// | |||
122 | /// For Error instances representing failure, you must use either the | |||
123 | /// handleErrors or handleAllErrors function with a typed handler. E.g.: | |||
124 | /// | |||
125 | /// @code{.cpp} | |||
126 | /// class MyErrorInfo : public ErrorInfo<MyErrorInfo> { | |||
127 | /// // Custom error info. | |||
128 | /// }; | |||
129 | /// | |||
130 | /// Error foo(<...>) { return make_error<MyErrorInfo>(...); } | |||
131 | /// | |||
132 | /// auto E = foo(<...>); // <- foo returns failure with MyErrorInfo. | |||
133 | /// auto NewE = | |||
134 | /// handleErrors(E, | |||
135 | /// [](const MyErrorInfo &M) { | |||
136 | /// // Deal with the error. | |||
137 | /// }, | |||
138 | /// [](std::unique_ptr<OtherError> M) -> Error { | |||
139 | /// if (canHandle(*M)) { | |||
140 | /// // handle error. | |||
141 | /// return Error::success(); | |||
142 | /// } | |||
143 | /// // Couldn't handle this error instance. Pass it up the stack. | |||
144 | /// return Error(std::move(M)); | |||
145 | /// ); | |||
146 | /// // Note - we must check or return NewE in case any of the handlers | |||
147 | /// // returned a new error. | |||
148 | /// @endcode | |||
149 | /// | |||
150 | /// The handleAllErrors function is identical to handleErrors, except | |||
151 | /// that it has a void return type, and requires all errors to be handled and | |||
152 | /// no new errors be returned. It prevents errors (assuming they can all be | |||
153 | /// handled) from having to be bubbled all the way to the top-level. | |||
154 | /// | |||
155 | /// *All* Error instances must be checked before destruction, even if | |||
156 | /// they're moved-assigned or constructed from Success values that have already | |||
157 | /// been checked. This enforces checking through all levels of the call stack. | |||
158 | class LLVM_NODISCARD[[clang::warn_unused_result]] Error { | |||
159 | // Both ErrorList and FileError need to be able to yank ErrorInfoBase | |||
160 | // pointers out of this class to add to the error list. | |||
161 | friend class ErrorList; | |||
162 | friend class FileError; | |||
163 | ||||
164 | // handleErrors needs to be able to set the Checked flag. | |||
165 | template <typename... HandlerTs> | |||
166 | friend Error handleErrors(Error E, HandlerTs &&... Handlers); | |||
167 | ||||
168 | // Expected<T> needs to be able to steal the payload when constructed from an | |||
169 | // error. | |||
170 | template <typename T> friend class Expected; | |||
171 | ||||
172 | // wrap needs to be able to steal the payload. | |||
173 | friend LLVMErrorRef wrap(Error); | |||
174 | ||||
175 | protected: | |||
176 | /// Create a success value. Prefer using 'Error::success()' for readability | |||
177 | Error() { | |||
178 | setPtr(nullptr); | |||
179 | setChecked(false); | |||
180 | } | |||
181 | ||||
182 | public: | |||
183 | /// Create a success value. | |||
184 | static ErrorSuccess success(); | |||
185 | ||||
186 | // Errors are not copy-constructable. | |||
187 | Error(const Error &Other) = delete; | |||
188 | ||||
189 | /// Move-construct an error value. The newly constructed error is considered | |||
190 | /// unchecked, even if the source error had been checked. The original error | |||
191 | /// becomes a checked Success value, regardless of its original state. | |||
192 | Error(Error &&Other) { | |||
193 | setChecked(true); | |||
194 | *this = std::move(Other); | |||
195 | } | |||
196 | ||||
197 | /// Create an error value. Prefer using the 'make_error' function, but | |||
198 | /// this constructor can be useful when "re-throwing" errors from handlers. | |||
199 | Error(std::unique_ptr<ErrorInfoBase> Payload) { | |||
200 | setPtr(Payload.release()); | |||
201 | setChecked(false); | |||
| ||||
202 | } | |||
203 | ||||
204 | // Errors are not copy-assignable. | |||
205 | Error &operator=(const Error &Other) = delete; | |||
206 | ||||
207 | /// Move-assign an error value. The current error must represent success, you | |||
208 | /// you cannot overwrite an unhandled error. The current error is then | |||
209 | /// considered unchecked. The source error becomes a checked success value, | |||
210 | /// regardless of its original state. | |||
211 | Error &operator=(Error &&Other) { | |||
212 | // Don't allow overwriting of unchecked values. | |||
213 | assertIsChecked(); | |||
214 | setPtr(Other.getPtr()); | |||
215 | ||||
216 | // This Error is unchecked, even if the source error was checked. | |||
217 | setChecked(false); | |||
218 | ||||
219 | // Null out Other's payload and set its checked bit. | |||
220 | Other.setPtr(nullptr); | |||
221 | Other.setChecked(true); | |||
222 | ||||
223 | return *this; | |||
224 | } | |||
225 | ||||
226 | /// Destroy a Error. Fails with a call to abort() if the error is | |||
227 | /// unchecked. | |||
228 | ~Error() { | |||
229 | assertIsChecked(); | |||
230 | delete getPtr(); | |||
231 | } | |||
232 | ||||
233 | /// Bool conversion. Returns true if this Error is in a failure state, | |||
234 | /// and false if it is in an accept state. If the error is in a Success state | |||
235 | /// it will be considered checked. | |||
236 | explicit operator bool() { | |||
237 | setChecked(getPtr() == nullptr); | |||
238 | return getPtr() != nullptr; | |||
239 | } | |||
240 | ||||
241 | /// Check whether one error is a subclass of another. | |||
242 | template <typename ErrT> bool isA() const { | |||
243 | return getPtr() && getPtr()->isA(ErrT::classID()); | |||
244 | } | |||
245 | ||||
246 | /// Returns the dynamic class id of this error, or null if this is a success | |||
247 | /// value. | |||
248 | const void* dynamicClassID() const { | |||
249 | if (!getPtr()) | |||
250 | return nullptr; | |||
251 | return getPtr()->dynamicClassID(); | |||
252 | } | |||
253 | ||||
254 | private: | |||
255 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
256 | // assertIsChecked() happens very frequently, but under normal circumstances | |||
257 | // is supposed to be a no-op. So we want it to be inlined, but having a bunch | |||
258 | // of debug prints can cause the function to be too large for inlining. So | |||
259 | // it's important that we define this function out of line so that it can't be | |||
260 | // inlined. | |||
261 | LLVM_ATTRIBUTE_NORETURN__attribute__((noreturn)) | |||
262 | void fatalUncheckedError() const; | |||
263 | #endif | |||
264 | ||||
265 | void assertIsChecked() { | |||
266 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
267 | if (LLVM_UNLIKELY(!getChecked() || getPtr())__builtin_expect((bool)(!getChecked() || getPtr()), false)) | |||
268 | fatalUncheckedError(); | |||
269 | #endif | |||
270 | } | |||
271 | ||||
272 | ErrorInfoBase *getPtr() const { | |||
273 | return reinterpret_cast<ErrorInfoBase*>( | |||
274 | reinterpret_cast<uintptr_t>(Payload) & | |||
275 | ~static_cast<uintptr_t>(0x1)); | |||
276 | } | |||
277 | ||||
278 | void setPtr(ErrorInfoBase *EI) { | |||
279 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
280 | Payload = reinterpret_cast<ErrorInfoBase*>( | |||
281 | (reinterpret_cast<uintptr_t>(EI) & | |||
282 | ~static_cast<uintptr_t>(0x1)) | | |||
283 | (reinterpret_cast<uintptr_t>(Payload) & 0x1)); | |||
284 | #else | |||
285 | Payload = EI; | |||
286 | #endif | |||
287 | } | |||
288 | ||||
289 | bool getChecked() const { | |||
290 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
291 | return (reinterpret_cast<uintptr_t>(Payload) & 0x1) == 0; | |||
292 | #else | |||
293 | return true; | |||
294 | #endif | |||
295 | } | |||
296 | ||||
297 | void setChecked(bool V) { | |||
298 | Payload = reinterpret_cast<ErrorInfoBase*>( | |||
299 | (reinterpret_cast<uintptr_t>(Payload) & | |||
300 | ~static_cast<uintptr_t>(0x1)) | | |||
301 | (V ? 0 : 1)); | |||
302 | } | |||
303 | ||||
304 | std::unique_ptr<ErrorInfoBase> takePayload() { | |||
305 | std::unique_ptr<ErrorInfoBase> Tmp(getPtr()); | |||
306 | setPtr(nullptr); | |||
307 | setChecked(true); | |||
308 | return Tmp; | |||
309 | } | |||
310 | ||||
311 | friend raw_ostream &operator<<(raw_ostream &OS, const Error &E) { | |||
312 | if (auto P = E.getPtr()) | |||
313 | P->log(OS); | |||
314 | else | |||
315 | OS << "success"; | |||
316 | return OS; | |||
317 | } | |||
318 | ||||
319 | ErrorInfoBase *Payload = nullptr; | |||
320 | }; | |||
321 | ||||
322 | /// Subclass of Error for the sole purpose of identifying the success path in | |||
323 | /// the type system. This allows to catch invalid conversion to Expected<T> at | |||
324 | /// compile time. | |||
325 | class ErrorSuccess final : public Error {}; | |||
326 | ||||
327 | inline ErrorSuccess Error::success() { return ErrorSuccess(); } | |||
328 | ||||
329 | /// Make a Error instance representing failure using the given error info | |||
330 | /// type. | |||
331 | template <typename ErrT, typename... ArgTs> Error make_error(ArgTs &&... Args) { | |||
332 | return Error(llvm::make_unique<ErrT>(std::forward<ArgTs>(Args)...)); | |||
333 | } | |||
334 | ||||
335 | /// Base class for user error types. Users should declare their error types | |||
336 | /// like: | |||
337 | /// | |||
338 | /// class MyError : public ErrorInfo<MyError> { | |||
339 | /// .... | |||
340 | /// }; | |||
341 | /// | |||
342 | /// This class provides an implementation of the ErrorInfoBase::kind | |||
343 | /// method, which is used by the Error RTTI system. | |||
344 | template <typename ThisErrT, typename ParentErrT = ErrorInfoBase> | |||
345 | class ErrorInfo : public ParentErrT { | |||
346 | public: | |||
347 | using ParentErrT::ParentErrT; // inherit constructors | |||
348 | ||||
349 | static const void *classID() { return &ThisErrT::ID; } | |||
350 | ||||
351 | const void *dynamicClassID() const override { return &ThisErrT::ID; } | |||
352 | ||||
353 | bool isA(const void *const ClassID) const override { | |||
354 | return ClassID == classID() || ParentErrT::isA(ClassID); | |||
355 | } | |||
356 | }; | |||
357 | ||||
358 | /// Special ErrorInfo subclass representing a list of ErrorInfos. | |||
359 | /// Instances of this class are constructed by joinError. | |||
360 | class ErrorList final : public ErrorInfo<ErrorList> { | |||
361 | // handleErrors needs to be able to iterate the payload list of an | |||
362 | // ErrorList. | |||
363 | template <typename... HandlerTs> | |||
364 | friend Error handleErrors(Error E, HandlerTs &&... Handlers); | |||
365 | ||||
366 | // joinErrors is implemented in terms of join. | |||
367 | friend Error joinErrors(Error, Error); | |||
368 | ||||
369 | public: | |||
370 | void log(raw_ostream &OS) const override { | |||
371 | OS << "Multiple errors:\n"; | |||
372 | for (auto &ErrPayload : Payloads) { | |||
373 | ErrPayload->log(OS); | |||
374 | OS << "\n"; | |||
375 | } | |||
376 | } | |||
377 | ||||
378 | std::error_code convertToErrorCode() const override; | |||
379 | ||||
380 | // Used by ErrorInfo::classID. | |||
381 | static char ID; | |||
382 | ||||
383 | private: | |||
384 | ErrorList(std::unique_ptr<ErrorInfoBase> Payload1, | |||
385 | std::unique_ptr<ErrorInfoBase> Payload2) { | |||
386 | assert(!Payload1->isA<ErrorList>() && !Payload2->isA<ErrorList>() &&((!Payload1->isA<ErrorList>() && !Payload2-> isA<ErrorList>() && "ErrorList constructor payloads should be singleton errors" ) ? static_cast<void> (0) : __assert_fail ("!Payload1->isA<ErrorList>() && !Payload2->isA<ErrorList>() && \"ErrorList constructor payloads should be singleton errors\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 387, __PRETTY_FUNCTION__)) | |||
387 | "ErrorList constructor payloads should be singleton errors")((!Payload1->isA<ErrorList>() && !Payload2-> isA<ErrorList>() && "ErrorList constructor payloads should be singleton errors" ) ? static_cast<void> (0) : __assert_fail ("!Payload1->isA<ErrorList>() && !Payload2->isA<ErrorList>() && \"ErrorList constructor payloads should be singleton errors\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 387, __PRETTY_FUNCTION__)); | |||
388 | Payloads.push_back(std::move(Payload1)); | |||
389 | Payloads.push_back(std::move(Payload2)); | |||
390 | } | |||
391 | ||||
392 | static Error join(Error E1, Error E2) { | |||
393 | if (!E1) | |||
394 | return E2; | |||
395 | if (!E2) | |||
396 | return E1; | |||
397 | if (E1.isA<ErrorList>()) { | |||
398 | auto &E1List = static_cast<ErrorList &>(*E1.getPtr()); | |||
399 | if (E2.isA<ErrorList>()) { | |||
400 | auto E2Payload = E2.takePayload(); | |||
401 | auto &E2List = static_cast<ErrorList &>(*E2Payload); | |||
402 | for (auto &Payload : E2List.Payloads) | |||
403 | E1List.Payloads.push_back(std::move(Payload)); | |||
404 | } else | |||
405 | E1List.Payloads.push_back(E2.takePayload()); | |||
406 | ||||
407 | return E1; | |||
408 | } | |||
409 | if (E2.isA<ErrorList>()) { | |||
410 | auto &E2List = static_cast<ErrorList &>(*E2.getPtr()); | |||
411 | E2List.Payloads.insert(E2List.Payloads.begin(), E1.takePayload()); | |||
412 | return E2; | |||
413 | } | |||
414 | return Error(std::unique_ptr<ErrorList>( | |||
415 | new ErrorList(E1.takePayload(), E2.takePayload()))); | |||
416 | } | |||
417 | ||||
418 | std::vector<std::unique_ptr<ErrorInfoBase>> Payloads; | |||
419 | }; | |||
420 | ||||
421 | /// Concatenate errors. The resulting Error is unchecked, and contains the | |||
422 | /// ErrorInfo(s), if any, contained in E1, followed by the | |||
423 | /// ErrorInfo(s), if any, contained in E2. | |||
424 | inline Error joinErrors(Error E1, Error E2) { | |||
425 | return ErrorList::join(std::move(E1), std::move(E2)); | |||
426 | } | |||
427 | ||||
428 | /// Tagged union holding either a T or a Error. | |||
429 | /// | |||
430 | /// This class parallels ErrorOr, but replaces error_code with Error. Since | |||
431 | /// Error cannot be copied, this class replaces getError() with | |||
432 | /// takeError(). It also adds an bool errorIsA<ErrT>() method for testing the | |||
433 | /// error class type. | |||
434 | template <class T> class LLVM_NODISCARD[[clang::warn_unused_result]] Expected { | |||
435 | template <class T1> friend class ExpectedAsOutParameter; | |||
436 | template <class OtherT> friend class Expected; | |||
437 | ||||
438 | static const bool isRef = std::is_reference<T>::value; | |||
439 | ||||
440 | using wrap = std::reference_wrapper<typename std::remove_reference<T>::type>; | |||
441 | ||||
442 | using error_type = std::unique_ptr<ErrorInfoBase>; | |||
443 | ||||
444 | public: | |||
445 | using storage_type = typename std::conditional<isRef, wrap, T>::type; | |||
446 | using value_type = T; | |||
447 | ||||
448 | private: | |||
449 | using reference = typename std::remove_reference<T>::type &; | |||
450 | using const_reference = const typename std::remove_reference<T>::type &; | |||
451 | using pointer = typename std::remove_reference<T>::type *; | |||
452 | using const_pointer = const typename std::remove_reference<T>::type *; | |||
453 | ||||
454 | public: | |||
455 | /// Create an Expected<T> error value from the given Error. | |||
456 | Expected(Error Err) | |||
457 | : HasError(true) | |||
458 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
459 | // Expected is unchecked upon construction in Debug builds. | |||
460 | , Unchecked(true) | |||
461 | #endif | |||
462 | { | |||
463 | assert(Err && "Cannot create Expected<T> from Error success value.")((Err && "Cannot create Expected<T> from Error success value." ) ? static_cast<void> (0) : __assert_fail ("Err && \"Cannot create Expected<T> from Error success value.\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 463, __PRETTY_FUNCTION__)); | |||
464 | new (getErrorStorage()) error_type(Err.takePayload()); | |||
465 | } | |||
466 | ||||
467 | /// Forbid to convert from Error::success() implicitly, this avoids having | |||
468 | /// Expected<T> foo() { return Error::success(); } which compiles otherwise | |||
469 | /// but triggers the assertion above. | |||
470 | Expected(ErrorSuccess) = delete; | |||
471 | ||||
472 | /// Create an Expected<T> success value from the given OtherT value, which | |||
473 | /// must be convertible to T. | |||
474 | template <typename OtherT> | |||
475 | Expected(OtherT &&Val, | |||
476 | typename std::enable_if<std::is_convertible<OtherT, T>::value>::type | |||
477 | * = nullptr) | |||
478 | : HasError(false) | |||
479 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
480 | // Expected is unchecked upon construction in Debug builds. | |||
481 | , Unchecked(true) | |||
482 | #endif | |||
483 | { | |||
484 | new (getStorage()) storage_type(std::forward<OtherT>(Val)); | |||
485 | } | |||
486 | ||||
487 | /// Move construct an Expected<T> value. | |||
488 | Expected(Expected &&Other) { moveConstruct(std::move(Other)); } | |||
489 | ||||
490 | /// Move construct an Expected<T> value from an Expected<OtherT>, where OtherT | |||
491 | /// must be convertible to T. | |||
492 | template <class OtherT> | |||
493 | Expected(Expected<OtherT> &&Other, | |||
494 | typename std::enable_if<std::is_convertible<OtherT, T>::value>::type | |||
495 | * = nullptr) { | |||
496 | moveConstruct(std::move(Other)); | |||
497 | } | |||
498 | ||||
499 | /// Move construct an Expected<T> value from an Expected<OtherT>, where OtherT | |||
500 | /// isn't convertible to T. | |||
501 | template <class OtherT> | |||
502 | explicit Expected( | |||
503 | Expected<OtherT> &&Other, | |||
504 | typename std::enable_if<!std::is_convertible<OtherT, T>::value>::type * = | |||
505 | nullptr) { | |||
506 | moveConstruct(std::move(Other)); | |||
507 | } | |||
508 | ||||
509 | /// Move-assign from another Expected<T>. | |||
510 | Expected &operator=(Expected &&Other) { | |||
511 | moveAssign(std::move(Other)); | |||
512 | return *this; | |||
513 | } | |||
514 | ||||
515 | /// Destroy an Expected<T>. | |||
516 | ~Expected() { | |||
517 | assertIsChecked(); | |||
518 | if (!HasError) | |||
519 | getStorage()->~storage_type(); | |||
520 | else | |||
521 | getErrorStorage()->~error_type(); | |||
522 | } | |||
523 | ||||
524 | /// Return false if there is an error. | |||
525 | explicit operator bool() { | |||
526 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
527 | Unchecked = HasError; | |||
528 | #endif | |||
529 | return !HasError; | |||
530 | } | |||
531 | ||||
532 | /// Returns a reference to the stored T value. | |||
533 | reference get() { | |||
534 | assertIsChecked(); | |||
535 | return *getStorage(); | |||
536 | } | |||
537 | ||||
538 | /// Returns a const reference to the stored T value. | |||
539 | const_reference get() const { | |||
540 | assertIsChecked(); | |||
541 | return const_cast<Expected<T> *>(this)->get(); | |||
542 | } | |||
543 | ||||
544 | /// Check that this Expected<T> is an error of type ErrT. | |||
545 | template <typename ErrT> bool errorIsA() const { | |||
546 | return HasError && (*getErrorStorage())->template isA<ErrT>(); | |||
547 | } | |||
548 | ||||
549 | /// Take ownership of the stored error. | |||
550 | /// After calling this the Expected<T> is in an indeterminate state that can | |||
551 | /// only be safely destructed. No further calls (beside the destructor) should | |||
552 | /// be made on the Expected<T> vaule. | |||
553 | Error takeError() { | |||
554 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
555 | Unchecked = false; | |||
556 | #endif | |||
557 | return HasError ? Error(std::move(*getErrorStorage())) : Error::success(); | |||
558 | } | |||
559 | ||||
560 | /// Returns a pointer to the stored T value. | |||
561 | pointer operator->() { | |||
562 | assertIsChecked(); | |||
563 | return toPointer(getStorage()); | |||
564 | } | |||
565 | ||||
566 | /// Returns a const pointer to the stored T value. | |||
567 | const_pointer operator->() const { | |||
568 | assertIsChecked(); | |||
569 | return toPointer(getStorage()); | |||
570 | } | |||
571 | ||||
572 | /// Returns a reference to the stored T value. | |||
573 | reference operator*() { | |||
574 | assertIsChecked(); | |||
575 | return *getStorage(); | |||
576 | } | |||
577 | ||||
578 | /// Returns a const reference to the stored T value. | |||
579 | const_reference operator*() const { | |||
580 | assertIsChecked(); | |||
581 | return *getStorage(); | |||
582 | } | |||
583 | ||||
584 | private: | |||
585 | template <class T1> | |||
586 | static bool compareThisIfSameType(const T1 &a, const T1 &b) { | |||
587 | return &a == &b; | |||
588 | } | |||
589 | ||||
590 | template <class T1, class T2> | |||
591 | static bool compareThisIfSameType(const T1 &a, const T2 &b) { | |||
592 | return false; | |||
593 | } | |||
594 | ||||
595 | template <class OtherT> void moveConstruct(Expected<OtherT> &&Other) { | |||
596 | HasError = Other.HasError; | |||
597 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
598 | Unchecked = true; | |||
599 | Other.Unchecked = false; | |||
600 | #endif | |||
601 | ||||
602 | if (!HasError) | |||
603 | new (getStorage()) storage_type(std::move(*Other.getStorage())); | |||
604 | else | |||
605 | new (getErrorStorage()) error_type(std::move(*Other.getErrorStorage())); | |||
606 | } | |||
607 | ||||
608 | template <class OtherT> void moveAssign(Expected<OtherT> &&Other) { | |||
609 | assertIsChecked(); | |||
610 | ||||
611 | if (compareThisIfSameType(*this, Other)) | |||
612 | return; | |||
613 | ||||
614 | this->~Expected(); | |||
615 | new (this) Expected(std::move(Other)); | |||
616 | } | |||
617 | ||||
618 | pointer toPointer(pointer Val) { return Val; } | |||
619 | ||||
620 | const_pointer toPointer(const_pointer Val) const { return Val; } | |||
621 | ||||
622 | pointer toPointer(wrap *Val) { return &Val->get(); } | |||
623 | ||||
624 | const_pointer toPointer(const wrap *Val) const { return &Val->get(); } | |||
625 | ||||
626 | storage_type *getStorage() { | |||
627 | assert(!HasError && "Cannot get value when an error exists!")((!HasError && "Cannot get value when an error exists!" ) ? static_cast<void> (0) : __assert_fail ("!HasError && \"Cannot get value when an error exists!\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 627, __PRETTY_FUNCTION__)); | |||
628 | return reinterpret_cast<storage_type *>(TStorage.buffer); | |||
629 | } | |||
630 | ||||
631 | const storage_type *getStorage() const { | |||
632 | assert(!HasError && "Cannot get value when an error exists!")((!HasError && "Cannot get value when an error exists!" ) ? static_cast<void> (0) : __assert_fail ("!HasError && \"Cannot get value when an error exists!\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 632, __PRETTY_FUNCTION__)); | |||
633 | return reinterpret_cast<const storage_type *>(TStorage.buffer); | |||
634 | } | |||
635 | ||||
636 | error_type *getErrorStorage() { | |||
637 | assert(HasError && "Cannot get error when a value exists!")((HasError && "Cannot get error when a value exists!" ) ? static_cast<void> (0) : __assert_fail ("HasError && \"Cannot get error when a value exists!\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 637, __PRETTY_FUNCTION__)); | |||
638 | return reinterpret_cast<error_type *>(ErrorStorage.buffer); | |||
639 | } | |||
640 | ||||
641 | const error_type *getErrorStorage() const { | |||
642 | assert(HasError && "Cannot get error when a value exists!")((HasError && "Cannot get error when a value exists!" ) ? static_cast<void> (0) : __assert_fail ("HasError && \"Cannot get error when a value exists!\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 642, __PRETTY_FUNCTION__)); | |||
643 | return reinterpret_cast<const error_type *>(ErrorStorage.buffer); | |||
644 | } | |||
645 | ||||
646 | // Used by ExpectedAsOutParameter to reset the checked flag. | |||
647 | void setUnchecked() { | |||
648 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
649 | Unchecked = true; | |||
650 | #endif | |||
651 | } | |||
652 | ||||
653 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
654 | LLVM_ATTRIBUTE_NORETURN__attribute__((noreturn)) | |||
655 | LLVM_ATTRIBUTE_NOINLINE__attribute__((noinline)) | |||
656 | void fatalUncheckedExpected() const { | |||
657 | dbgs() << "Expected<T> must be checked before access or destruction.\n"; | |||
658 | if (HasError) { | |||
659 | dbgs() << "Unchecked Expected<T> contained error:\n"; | |||
660 | (*getErrorStorage())->log(dbgs()); | |||
661 | } else | |||
662 | dbgs() << "Expected<T> value was in success state. (Note: Expected<T> " | |||
663 | "values in success mode must still be checked prior to being " | |||
664 | "destroyed).\n"; | |||
665 | abort(); | |||
666 | } | |||
667 | #endif | |||
668 | ||||
669 | void assertIsChecked() { | |||
670 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
671 | if (LLVM_UNLIKELY(Unchecked)__builtin_expect((bool)(Unchecked), false)) | |||
672 | fatalUncheckedExpected(); | |||
673 | #endif | |||
674 | } | |||
675 | ||||
676 | union { | |||
677 | AlignedCharArrayUnion<storage_type> TStorage; | |||
678 | AlignedCharArrayUnion<error_type> ErrorStorage; | |||
679 | }; | |||
680 | bool HasError : 1; | |||
681 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 | |||
682 | bool Unchecked : 1; | |||
683 | #endif | |||
684 | }; | |||
685 | ||||
686 | /// Report a serious error, calling any installed error handler. See | |||
687 | /// ErrorHandling.h. | |||
688 | LLVM_ATTRIBUTE_NORETURN__attribute__((noreturn)) void report_fatal_error(Error Err, | |||
689 | bool gen_crash_diag = true); | |||
690 | ||||
691 | /// Report a fatal error if Err is a failure value. | |||
692 | /// | |||
693 | /// This function can be used to wrap calls to fallible functions ONLY when it | |||
694 | /// is known that the Error will always be a success value. E.g. | |||
695 | /// | |||
696 | /// @code{.cpp} | |||
697 | /// // foo only attempts the fallible operation if DoFallibleOperation is | |||
698 | /// // true. If DoFallibleOperation is false then foo always returns | |||
699 | /// // Error::success(). | |||
700 | /// Error foo(bool DoFallibleOperation); | |||
701 | /// | |||
702 | /// cantFail(foo(false)); | |||
703 | /// @endcode | |||
704 | inline void cantFail(Error Err, const char *Msg = nullptr) { | |||
705 | if (Err) { | |||
706 | if (!Msg) | |||
707 | Msg = "Failure value returned from cantFail wrapped call"; | |||
708 | llvm_unreachable(Msg)::llvm::llvm_unreachable_internal(Msg, "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 708); | |||
709 | } | |||
710 | } | |||
711 | ||||
712 | /// Report a fatal error if ValOrErr is a failure value, otherwise unwraps and | |||
713 | /// returns the contained value. | |||
714 | /// | |||
715 | /// This function can be used to wrap calls to fallible functions ONLY when it | |||
716 | /// is known that the Error will always be a success value. E.g. | |||
717 | /// | |||
718 | /// @code{.cpp} | |||
719 | /// // foo only attempts the fallible operation if DoFallibleOperation is | |||
720 | /// // true. If DoFallibleOperation is false then foo always returns an int. | |||
721 | /// Expected<int> foo(bool DoFallibleOperation); | |||
722 | /// | |||
723 | /// int X = cantFail(foo(false)); | |||
724 | /// @endcode | |||
725 | template <typename T> | |||
726 | T cantFail(Expected<T> ValOrErr, const char *Msg = nullptr) { | |||
727 | if (ValOrErr) | |||
728 | return std::move(*ValOrErr); | |||
729 | else { | |||
730 | if (!Msg) | |||
731 | Msg = "Failure value returned from cantFail wrapped call"; | |||
732 | llvm_unreachable(Msg)::llvm::llvm_unreachable_internal(Msg, "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 732); | |||
733 | } | |||
734 | } | |||
735 | ||||
736 | /// Report a fatal error if ValOrErr is a failure value, otherwise unwraps and | |||
737 | /// returns the contained reference. | |||
738 | /// | |||
739 | /// This function can be used to wrap calls to fallible functions ONLY when it | |||
740 | /// is known that the Error will always be a success value. E.g. | |||
741 | /// | |||
742 | /// @code{.cpp} | |||
743 | /// // foo only attempts the fallible operation if DoFallibleOperation is | |||
744 | /// // true. If DoFallibleOperation is false then foo always returns a Bar&. | |||
745 | /// Expected<Bar&> foo(bool DoFallibleOperation); | |||
746 | /// | |||
747 | /// Bar &X = cantFail(foo(false)); | |||
748 | /// @endcode | |||
749 | template <typename T> | |||
750 | T& cantFail(Expected<T&> ValOrErr, const char *Msg = nullptr) { | |||
751 | if (ValOrErr) | |||
752 | return *ValOrErr; | |||
753 | else { | |||
754 | if (!Msg) | |||
755 | Msg = "Failure value returned from cantFail wrapped call"; | |||
756 | llvm_unreachable(Msg)::llvm::llvm_unreachable_internal(Msg, "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 756); | |||
757 | } | |||
758 | } | |||
759 | ||||
760 | /// Helper for testing applicability of, and applying, handlers for | |||
761 | /// ErrorInfo types. | |||
762 | template <typename HandlerT> | |||
763 | class ErrorHandlerTraits | |||
764 | : public ErrorHandlerTraits<decltype( | |||
765 | &std::remove_reference<HandlerT>::type::operator())> {}; | |||
766 | ||||
767 | // Specialization functions of the form 'Error (const ErrT&)'. | |||
768 | template <typename ErrT> class ErrorHandlerTraits<Error (&)(ErrT &)> { | |||
769 | public: | |||
770 | static bool appliesTo(const ErrorInfoBase &E) { | |||
771 | return E.template isA<ErrT>(); | |||
772 | } | |||
773 | ||||
774 | template <typename HandlerT> | |||
775 | static Error apply(HandlerT &&H, std::unique_ptr<ErrorInfoBase> E) { | |||
776 | assert(appliesTo(*E) && "Applying incorrect handler")((appliesTo(*E) && "Applying incorrect handler") ? static_cast <void> (0) : __assert_fail ("appliesTo(*E) && \"Applying incorrect handler\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 776, __PRETTY_FUNCTION__)); | |||
777 | return H(static_cast<ErrT &>(*E)); | |||
778 | } | |||
779 | }; | |||
780 | ||||
781 | // Specialization functions of the form 'void (const ErrT&)'. | |||
782 | template <typename ErrT> class ErrorHandlerTraits<void (&)(ErrT &)> { | |||
783 | public: | |||
784 | static bool appliesTo(const ErrorInfoBase &E) { | |||
785 | return E.template isA<ErrT>(); | |||
786 | } | |||
787 | ||||
788 | template <typename HandlerT> | |||
789 | static Error apply(HandlerT &&H, std::unique_ptr<ErrorInfoBase> E) { | |||
790 | assert(appliesTo(*E) && "Applying incorrect handler")((appliesTo(*E) && "Applying incorrect handler") ? static_cast <void> (0) : __assert_fail ("appliesTo(*E) && \"Applying incorrect handler\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 790, __PRETTY_FUNCTION__)); | |||
791 | H(static_cast<ErrT &>(*E)); | |||
792 | return Error::success(); | |||
793 | } | |||
794 | }; | |||
795 | ||||
796 | /// Specialization for functions of the form 'Error (std::unique_ptr<ErrT>)'. | |||
797 | template <typename ErrT> | |||
798 | class ErrorHandlerTraits<Error (&)(std::unique_ptr<ErrT>)> { | |||
799 | public: | |||
800 | static bool appliesTo(const ErrorInfoBase &E) { | |||
801 | return E.template isA<ErrT>(); | |||
802 | } | |||
803 | ||||
804 | template <typename HandlerT> | |||
805 | static Error apply(HandlerT &&H, std::unique_ptr<ErrorInfoBase> E) { | |||
806 | assert(appliesTo(*E) && "Applying incorrect handler")((appliesTo(*E) && "Applying incorrect handler") ? static_cast <void> (0) : __assert_fail ("appliesTo(*E) && \"Applying incorrect handler\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 806, __PRETTY_FUNCTION__)); | |||
807 | std::unique_ptr<ErrT> SubE(static_cast<ErrT *>(E.release())); | |||
808 | return H(std::move(SubE)); | |||
809 | } | |||
810 | }; | |||
811 | ||||
812 | /// Specialization for functions of the form 'void (std::unique_ptr<ErrT>)'. | |||
813 | template <typename ErrT> | |||
814 | class ErrorHandlerTraits<void (&)(std::unique_ptr<ErrT>)> { | |||
815 | public: | |||
816 | static bool appliesTo(const ErrorInfoBase &E) { | |||
817 | return E.template isA<ErrT>(); | |||
818 | } | |||
819 | ||||
820 | template <typename HandlerT> | |||
821 | static Error apply(HandlerT &&H, std::unique_ptr<ErrorInfoBase> E) { | |||
822 | assert(appliesTo(*E) && "Applying incorrect handler")((appliesTo(*E) && "Applying incorrect handler") ? static_cast <void> (0) : __assert_fail ("appliesTo(*E) && \"Applying incorrect handler\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 822, __PRETTY_FUNCTION__)); | |||
823 | std::unique_ptr<ErrT> SubE(static_cast<ErrT *>(E.release())); | |||
824 | H(std::move(SubE)); | |||
825 | return Error::success(); | |||
826 | } | |||
827 | }; | |||
828 | ||||
829 | // Specialization for member functions of the form 'RetT (const ErrT&)'. | |||
830 | template <typename C, typename RetT, typename ErrT> | |||
831 | class ErrorHandlerTraits<RetT (C::*)(ErrT &)> | |||
832 | : public ErrorHandlerTraits<RetT (&)(ErrT &)> {}; | |||
833 | ||||
834 | // Specialization for member functions of the form 'RetT (const ErrT&) const'. | |||
835 | template <typename C, typename RetT, typename ErrT> | |||
836 | class ErrorHandlerTraits<RetT (C::*)(ErrT &) const> | |||
837 | : public ErrorHandlerTraits<RetT (&)(ErrT &)> {}; | |||
838 | ||||
839 | // Specialization for member functions of the form 'RetT (const ErrT&)'. | |||
840 | template <typename C, typename RetT, typename ErrT> | |||
841 | class ErrorHandlerTraits<RetT (C::*)(const ErrT &)> | |||
842 | : public ErrorHandlerTraits<RetT (&)(ErrT &)> {}; | |||
843 | ||||
844 | // Specialization for member functions of the form 'RetT (const ErrT&) const'. | |||
845 | template <typename C, typename RetT, typename ErrT> | |||
846 | class ErrorHandlerTraits<RetT (C::*)(const ErrT &) const> | |||
847 | : public ErrorHandlerTraits<RetT (&)(ErrT &)> {}; | |||
848 | ||||
849 | /// Specialization for member functions of the form | |||
850 | /// 'RetT (std::unique_ptr<ErrT>)'. | |||
851 | template <typename C, typename RetT, typename ErrT> | |||
852 | class ErrorHandlerTraits<RetT (C::*)(std::unique_ptr<ErrT>)> | |||
853 | : public ErrorHandlerTraits<RetT (&)(std::unique_ptr<ErrT>)> {}; | |||
854 | ||||
855 | /// Specialization for member functions of the form | |||
856 | /// 'RetT (std::unique_ptr<ErrT>) const'. | |||
857 | template <typename C, typename RetT, typename ErrT> | |||
858 | class ErrorHandlerTraits<RetT (C::*)(std::unique_ptr<ErrT>) const> | |||
859 | : public ErrorHandlerTraits<RetT (&)(std::unique_ptr<ErrT>)> {}; | |||
860 | ||||
861 | inline Error handleErrorImpl(std::unique_ptr<ErrorInfoBase> Payload) { | |||
862 | return Error(std::move(Payload)); | |||
863 | } | |||
864 | ||||
865 | template <typename HandlerT, typename... HandlerTs> | |||
866 | Error handleErrorImpl(std::unique_ptr<ErrorInfoBase> Payload, | |||
867 | HandlerT &&Handler, HandlerTs &&... Handlers) { | |||
868 | if (ErrorHandlerTraits<HandlerT>::appliesTo(*Payload)) | |||
869 | return ErrorHandlerTraits<HandlerT>::apply(std::forward<HandlerT>(Handler), | |||
870 | std::move(Payload)); | |||
871 | return handleErrorImpl(std::move(Payload), | |||
872 | std::forward<HandlerTs>(Handlers)...); | |||
873 | } | |||
874 | ||||
875 | /// Pass the ErrorInfo(s) contained in E to their respective handlers. Any | |||
876 | /// unhandled errors (or Errors returned by handlers) are re-concatenated and | |||
877 | /// returned. | |||
878 | /// Because this function returns an error, its result must also be checked | |||
879 | /// or returned. If you intend to handle all errors use handleAllErrors | |||
880 | /// (which returns void, and will abort() on unhandled errors) instead. | |||
881 | template <typename... HandlerTs> | |||
882 | Error handleErrors(Error E, HandlerTs &&... Hs) { | |||
883 | if (!E) | |||
884 | return Error::success(); | |||
885 | ||||
886 | std::unique_ptr<ErrorInfoBase> Payload = E.takePayload(); | |||
887 | ||||
888 | if (Payload->isA<ErrorList>()) { | |||
889 | ErrorList &List = static_cast<ErrorList &>(*Payload); | |||
890 | Error R; | |||
891 | for (auto &P : List.Payloads) | |||
892 | R = ErrorList::join( | |||
893 | std::move(R), | |||
894 | handleErrorImpl(std::move(P), std::forward<HandlerTs>(Hs)...)); | |||
895 | return R; | |||
896 | } | |||
897 | ||||
898 | return handleErrorImpl(std::move(Payload), std::forward<HandlerTs>(Hs)...); | |||
899 | } | |||
900 | ||||
901 | /// Behaves the same as handleErrors, except that by contract all errors | |||
902 | /// *must* be handled by the given handlers (i.e. there must be no remaining | |||
903 | /// errors after running the handlers, or llvm_unreachable is called). | |||
904 | template <typename... HandlerTs> | |||
905 | void handleAllErrors(Error E, HandlerTs &&... Handlers) { | |||
906 | cantFail(handleErrors(std::move(E), std::forward<HandlerTs>(Handlers)...)); | |||
907 | } | |||
908 | ||||
909 | /// Check that E is a non-error, then drop it. | |||
910 | /// If E is an error, llvm_unreachable will be called. | |||
911 | inline void handleAllErrors(Error E) { | |||
912 | cantFail(std::move(E)); | |||
913 | } | |||
914 | ||||
915 | /// Handle any errors (if present) in an Expected<T>, then try a recovery path. | |||
916 | /// | |||
917 | /// If the incoming value is a success value it is returned unmodified. If it | |||
918 | /// is a failure value then it the contained error is passed to handleErrors. | |||
919 | /// If handleErrors is able to handle the error then the RecoveryPath functor | |||
920 | /// is called to supply the final result. If handleErrors is not able to | |||
921 | /// handle all errors then the unhandled errors are returned. | |||
922 | /// | |||
923 | /// This utility enables the follow pattern: | |||
924 | /// | |||
925 | /// @code{.cpp} | |||
926 | /// enum FooStrategy { Aggressive, Conservative }; | |||
927 | /// Expected<Foo> foo(FooStrategy S); | |||
928 | /// | |||
929 | /// auto ResultOrErr = | |||
930 | /// handleExpected( | |||
931 | /// foo(Aggressive), | |||
932 | /// []() { return foo(Conservative); }, | |||
933 | /// [](AggressiveStrategyError&) { | |||
934 | /// // Implicitly conusme this - we'll recover by using a conservative | |||
935 | /// // strategy. | |||
936 | /// }); | |||
937 | /// | |||
938 | /// @endcode | |||
939 | template <typename T, typename RecoveryFtor, typename... HandlerTs> | |||
940 | Expected<T> handleExpected(Expected<T> ValOrErr, RecoveryFtor &&RecoveryPath, | |||
941 | HandlerTs &&... Handlers) { | |||
942 | if (ValOrErr) | |||
943 | return ValOrErr; | |||
944 | ||||
945 | if (auto Err = handleErrors(ValOrErr.takeError(), | |||
946 | std::forward<HandlerTs>(Handlers)...)) | |||
947 | return std::move(Err); | |||
948 | ||||
949 | return RecoveryPath(); | |||
950 | } | |||
951 | ||||
952 | /// Log all errors (if any) in E to OS. If there are any errors, ErrorBanner | |||
953 | /// will be printed before the first one is logged. A newline will be printed | |||
954 | /// after each error. | |||
955 | /// | |||
956 | /// This is useful in the base level of your program to allow clean termination | |||
957 | /// (allowing clean deallocation of resources, etc.), while reporting error | |||
958 | /// information to the user. | |||
959 | void logAllUnhandledErrors(Error E, raw_ostream &OS, Twine ErrorBanner); | |||
960 | ||||
961 | /// Write all error messages (if any) in E to a string. The newline character | |||
962 | /// is used to separate error messages. | |||
963 | inline std::string toString(Error E) { | |||
964 | SmallVector<std::string, 2> Errors; | |||
965 | handleAllErrors(std::move(E), [&Errors](const ErrorInfoBase &EI) { | |||
966 | Errors.push_back(EI.message()); | |||
967 | }); | |||
968 | return join(Errors.begin(), Errors.end(), "\n"); | |||
969 | } | |||
970 | ||||
971 | /// Consume a Error without doing anything. This method should be used | |||
972 | /// only where an error can be considered a reasonable and expected return | |||
973 | /// value. | |||
974 | /// | |||
975 | /// Uses of this method are potentially indicative of design problems: If it's | |||
976 | /// legitimate to do nothing while processing an "error", the error-producer | |||
977 | /// might be more clearly refactored to return an Optional<T>. | |||
978 | inline void consumeError(Error Err) { | |||
979 | handleAllErrors(std::move(Err), [](const ErrorInfoBase &) {}); | |||
980 | } | |||
981 | ||||
982 | /// Helper for converting an Error to a bool. | |||
983 | /// | |||
984 | /// This method returns true if Err is in an error state, or false if it is | |||
985 | /// in a success state. Puts Err in a checked state in both cases (unlike | |||
986 | /// Error::operator bool(), which only does this for success states). | |||
987 | inline bool errorToBool(Error Err) { | |||
988 | bool IsError = static_cast<bool>(Err); | |||
989 | if (IsError) | |||
990 | consumeError(std::move(Err)); | |||
991 | return IsError; | |||
992 | } | |||
993 | ||||
994 | /// Helper for Errors used as out-parameters. | |||
995 | /// | |||
996 | /// This helper is for use with the Error-as-out-parameter idiom, where an error | |||
997 | /// is passed to a function or method by reference, rather than being returned. | |||
998 | /// In such cases it is helpful to set the checked bit on entry to the function | |||
999 | /// so that the error can be written to (unchecked Errors abort on assignment) | |||
1000 | /// and clear the checked bit on exit so that clients cannot accidentally forget | |||
1001 | /// to check the result. This helper performs these actions automatically using | |||
1002 | /// RAII: | |||
1003 | /// | |||
1004 | /// @code{.cpp} | |||
1005 | /// Result foo(Error &Err) { | |||
1006 | /// ErrorAsOutParameter ErrAsOutParam(&Err); // 'Checked' flag set | |||
1007 | /// // <body of foo> | |||
1008 | /// // <- 'Checked' flag auto-cleared when ErrAsOutParam is destructed. | |||
1009 | /// } | |||
1010 | /// @endcode | |||
1011 | /// | |||
1012 | /// ErrorAsOutParameter takes an Error* rather than Error& so that it can be | |||
1013 | /// used with optional Errors (Error pointers that are allowed to be null). If | |||
1014 | /// ErrorAsOutParameter took an Error reference, an instance would have to be | |||
1015 | /// created inside every condition that verified that Error was non-null. By | |||
1016 | /// taking an Error pointer we can just create one instance at the top of the | |||
1017 | /// function. | |||
1018 | class ErrorAsOutParameter { | |||
1019 | public: | |||
1020 | ErrorAsOutParameter(Error *Err) : Err(Err) { | |||
1021 | // Raise the checked bit if Err is success. | |||
1022 | if (Err) | |||
1023 | (void)!!*Err; | |||
1024 | } | |||
1025 | ||||
1026 | ~ErrorAsOutParameter() { | |||
1027 | // Clear the checked bit. | |||
1028 | if (Err && !*Err) | |||
1029 | *Err = Error::success(); | |||
1030 | } | |||
1031 | ||||
1032 | private: | |||
1033 | Error *Err; | |||
1034 | }; | |||
1035 | ||||
1036 | /// Helper for Expected<T>s used as out-parameters. | |||
1037 | /// | |||
1038 | /// See ErrorAsOutParameter. | |||
1039 | template <typename T> | |||
1040 | class ExpectedAsOutParameter { | |||
1041 | public: | |||
1042 | ExpectedAsOutParameter(Expected<T> *ValOrErr) | |||
1043 | : ValOrErr(ValOrErr) { | |||
1044 | if (ValOrErr) | |||
1045 | (void)!!*ValOrErr; | |||
1046 | } | |||
1047 | ||||
1048 | ~ExpectedAsOutParameter() { | |||
1049 | if (ValOrErr) | |||
1050 | ValOrErr->setUnchecked(); | |||
1051 | } | |||
1052 | ||||
1053 | private: | |||
1054 | Expected<T> *ValOrErr; | |||
1055 | }; | |||
1056 | ||||
1057 | /// This class wraps a std::error_code in a Error. | |||
1058 | /// | |||
1059 | /// This is useful if you're writing an interface that returns a Error | |||
1060 | /// (or Expected) and you want to call code that still returns | |||
1061 | /// std::error_codes. | |||
1062 | class ECError : public ErrorInfo<ECError> { | |||
1063 | friend Error errorCodeToError(std::error_code); | |||
1064 | ||||
1065 | public: | |||
1066 | void setErrorCode(std::error_code EC) { this->EC = EC; } | |||
1067 | std::error_code convertToErrorCode() const override { return EC; } | |||
1068 | void log(raw_ostream &OS) const override { OS << EC.message(); } | |||
1069 | ||||
1070 | // Used by ErrorInfo::classID. | |||
1071 | static char ID; | |||
1072 | ||||
1073 | protected: | |||
1074 | ECError() = default; | |||
1075 | ECError(std::error_code EC) : EC(EC) {} | |||
1076 | ||||
1077 | std::error_code EC; | |||
1078 | }; | |||
1079 | ||||
1080 | /// The value returned by this function can be returned from convertToErrorCode | |||
1081 | /// for Error values where no sensible translation to std::error_code exists. | |||
1082 | /// It should only be used in this situation, and should never be used where a | |||
1083 | /// sensible conversion to std::error_code is available, as attempts to convert | |||
1084 | /// to/from this error will result in a fatal error. (i.e. it is a programmatic | |||
1085 | ///error to try to convert such a value). | |||
1086 | std::error_code inconvertibleErrorCode(); | |||
1087 | ||||
1088 | /// Helper for converting an std::error_code to a Error. | |||
1089 | Error errorCodeToError(std::error_code EC); | |||
1090 | ||||
1091 | /// Helper for converting an ECError to a std::error_code. | |||
1092 | /// | |||
1093 | /// This method requires that Err be Error() or an ECError, otherwise it | |||
1094 | /// will trigger a call to abort(). | |||
1095 | std::error_code errorToErrorCode(Error Err); | |||
1096 | ||||
1097 | /// Convert an ErrorOr<T> to an Expected<T>. | |||
1098 | template <typename T> Expected<T> errorOrToExpected(ErrorOr<T> &&EO) { | |||
1099 | if (auto EC = EO.getError()) | |||
1100 | return errorCodeToError(EC); | |||
1101 | return std::move(*EO); | |||
1102 | } | |||
1103 | ||||
1104 | /// Convert an Expected<T> to an ErrorOr<T>. | |||
1105 | template <typename T> ErrorOr<T> expectedToErrorOr(Expected<T> &&E) { | |||
1106 | if (auto Err = E.takeError()) | |||
1107 | return errorToErrorCode(std::move(Err)); | |||
1108 | return std::move(*E); | |||
1109 | } | |||
1110 | ||||
1111 | /// This class wraps a string in an Error. | |||
1112 | /// | |||
1113 | /// StringError is useful in cases where the client is not expected to be able | |||
1114 | /// to consume the specific error message programmatically (for example, if the | |||
1115 | /// error message is to be presented to the user). | |||
1116 | /// | |||
1117 | /// StringError can also be used when additional information is to be printed | |||
1118 | /// along with a error_code message. Depending on the constructor called, this | |||
1119 | /// class can either display: | |||
1120 | /// 1. the error_code message (ECError behavior) | |||
1121 | /// 2. a string | |||
1122 | /// 3. the error_code message and a string | |||
1123 | /// | |||
1124 | /// These behaviors are useful when subtyping is required; for example, when a | |||
1125 | /// specific library needs an explicit error type. In the example below, | |||
1126 | /// PDBError is derived from StringError: | |||
1127 | /// | |||
1128 | /// @code{.cpp} | |||
1129 | /// Expected<int> foo() { | |||
1130 | /// return llvm::make_error<PDBError>(pdb_error_code::dia_failed_loading, | |||
1131 | /// "Additional information"); | |||
1132 | /// } | |||
1133 | /// @endcode | |||
1134 | /// | |||
1135 | class StringError : public ErrorInfo<StringError> { | |||
1136 | public: | |||
1137 | static char ID; | |||
1138 | ||||
1139 | // Prints EC + S and converts to EC | |||
1140 | StringError(std::error_code EC, const Twine &S = Twine()); | |||
1141 | ||||
1142 | // Prints S and converts to EC | |||
1143 | StringError(const Twine &S, std::error_code EC); | |||
1144 | ||||
1145 | void log(raw_ostream &OS) const override; | |||
1146 | std::error_code convertToErrorCode() const override; | |||
1147 | ||||
1148 | const std::string &getMessage() const { return Msg; } | |||
1149 | ||||
1150 | private: | |||
1151 | std::string Msg; | |||
1152 | std::error_code EC; | |||
1153 | const bool PrintMsgOnly = false; | |||
1154 | }; | |||
1155 | ||||
1156 | /// Create formatted StringError object. | |||
1157 | template <typename... Ts> | |||
1158 | Error createStringError(std::error_code EC, char const *Fmt, | |||
1159 | const Ts &... Vals) { | |||
1160 | std::string Buffer; | |||
1161 | raw_string_ostream Stream(Buffer); | |||
1162 | Stream << format(Fmt, Vals...); | |||
1163 | return make_error<StringError>(Stream.str(), EC); | |||
1164 | } | |||
1165 | ||||
1166 | Error createStringError(std::error_code EC, char const *Msg); | |||
1167 | ||||
1168 | /// This class wraps a filename and another Error. | |||
1169 | /// | |||
1170 | /// In some cases, an error needs to live along a 'source' name, in order to | |||
1171 | /// show more detailed information to the user. | |||
1172 | class FileError final : public ErrorInfo<FileError> { | |||
1173 | ||||
1174 | friend Error createFileError(std::string, Error); | |||
1175 | ||||
1176 | public: | |||
1177 | void log(raw_ostream &OS) const override { | |||
1178 | assert(Err && !FileName.empty() && "Trying to log after takeError().")((Err && !FileName.empty() && "Trying to log after takeError()." ) ? static_cast<void> (0) : __assert_fail ("Err && !FileName.empty() && \"Trying to log after takeError().\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 1178, __PRETTY_FUNCTION__)); | |||
1179 | OS << "'" << FileName << "': "; | |||
1180 | Err->log(OS); | |||
1181 | } | |||
1182 | ||||
1183 | Error takeError() { return Error(std::move(Err)); } | |||
1184 | ||||
1185 | std::error_code convertToErrorCode() const override; | |||
1186 | ||||
1187 | // Used by ErrorInfo::classID. | |||
1188 | static char ID; | |||
1189 | ||||
1190 | private: | |||
1191 | FileError(std::string F, std::unique_ptr<ErrorInfoBase> E) { | |||
1192 | assert(E && "Cannot create FileError from Error success value.")((E && "Cannot create FileError from Error success value." ) ? static_cast<void> (0) : __assert_fail ("E && \"Cannot create FileError from Error success value.\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 1192, __PRETTY_FUNCTION__)); | |||
1193 | assert(!F.empty() &&((!F.empty() && "The file name provided to FileError must not be empty." ) ? static_cast<void> (0) : __assert_fail ("!F.empty() && \"The file name provided to FileError must not be empty.\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 1194, __PRETTY_FUNCTION__)) | |||
1194 | "The file name provided to FileError must not be empty.")((!F.empty() && "The file name provided to FileError must not be empty." ) ? static_cast<void> (0) : __assert_fail ("!F.empty() && \"The file name provided to FileError must not be empty.\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/Support/Error.h" , 1194, __PRETTY_FUNCTION__)); | |||
1195 | FileName = F; | |||
1196 | Err = std::move(E); | |||
1197 | } | |||
1198 | ||||
1199 | static Error build(std::string F, Error E) { | |||
1200 | return Error(std::unique_ptr<FileError>(new FileError(F, E.takePayload()))); | |||
1201 | } | |||
1202 | ||||
1203 | std::string FileName; | |||
1204 | std::unique_ptr<ErrorInfoBase> Err; | |||
1205 | }; | |||
1206 | ||||
1207 | /// Concatenate a source file path and/or name with an Error. The resulting | |||
1208 | /// Error is unchecked. | |||
1209 | inline Error createFileError(std::string F, Error E) { | |||
1210 | return FileError::build(F, std::move(E)); | |||
1211 | } | |||
1212 | ||||
1213 | Error createFileError(std::string F, ErrorSuccess) = delete; | |||
1214 | ||||
1215 | /// Helper for check-and-exit error handling. | |||
1216 | /// | |||
1217 | /// For tool use only. NOT FOR USE IN LIBRARY CODE. | |||
1218 | /// | |||
1219 | class ExitOnError { | |||
1220 | public: | |||
1221 | /// Create an error on exit helper. | |||
1222 | ExitOnError(std::string Banner = "", int DefaultErrorExitCode = 1) | |||
1223 | : Banner(std::move(Banner)), | |||
1224 | GetExitCode([=](const Error &) { return DefaultErrorExitCode; }) {} | |||
1225 | ||||
1226 | /// Set the banner string for any errors caught by operator(). | |||
1227 | void setBanner(std::string Banner) { this->Banner = std::move(Banner); } | |||
1228 | ||||
1229 | /// Set the exit-code mapper function. | |||
1230 | void setExitCodeMapper(std::function<int(const Error &)> GetExitCode) { | |||
1231 | this->GetExitCode = std::move(GetExitCode); | |||
1232 | } | |||
1233 | ||||
1234 | /// Check Err. If it's in a failure state log the error(s) and exit. | |||
1235 | void operator()(Error Err) const { checkError(std::move(Err)); } | |||
1236 | ||||
1237 | /// Check E. If it's in a success state then return the contained value. If | |||
1238 | /// it's in a failure state log the error(s) and exit. | |||
1239 | template <typename T> T operator()(Expected<T> &&E) const { | |||
1240 | checkError(E.takeError()); | |||
1241 | return std::move(*E); | |||
1242 | } | |||
1243 | ||||
1244 | /// Check E. If it's in a success state then return the contained reference. If | |||
1245 | /// it's in a failure state log the error(s) and exit. | |||
1246 | template <typename T> T& operator()(Expected<T&> &&E) const { | |||
1247 | checkError(E.takeError()); | |||
1248 | return *E; | |||
1249 | } | |||
1250 | ||||
1251 | private: | |||
1252 | void checkError(Error Err) const { | |||
1253 | if (Err) { | |||
1254 | int ExitCode = GetExitCode(Err); | |||
1255 | logAllUnhandledErrors(std::move(Err), errs(), Banner); | |||
1256 | exit(ExitCode); | |||
1257 | } | |||
1258 | } | |||
1259 | ||||
1260 | std::string Banner; | |||
1261 | std::function<int(const Error &)> GetExitCode; | |||
1262 | }; | |||
1263 | ||||
1264 | /// Conversion from Error to LLVMErrorRef for C error bindings. | |||
1265 | inline LLVMErrorRef wrap(Error Err) { | |||
1266 | return reinterpret_cast<LLVMErrorRef>(Err.takePayload().release()); | |||
1267 | } | |||
1268 | ||||
1269 | /// Conversion from LLVMErrorRef to Error for C error bindings. | |||
1270 | inline Error unwrap(LLVMErrorRef ErrRef) { | |||
1271 | return Error(std::unique_ptr<ErrorInfoBase>( | |||
1272 | reinterpret_cast<ErrorInfoBase *>(ErrRef))); | |||
1273 | } | |||
1274 | ||||
1275 | } // end namespace llvm | |||
1276 | ||||
1277 | #endif // LLVM_SUPPORT_ERROR_H |
1 | //===- llvm/ADT/STLExtras.h - Useful STL related functions ------*- C++ -*-===// |
2 | // |
3 | // The LLVM Compiler Infrastructure |
4 | // |
5 | // This file is distributed under the University of Illinois Open Source |
6 | // License. See LICENSE.TXT for details. |
7 | // |
8 | //===----------------------------------------------------------------------===// |
9 | // |
10 | // This file contains some templates that are useful if you are working with the |
11 | // STL at all. |
12 | // |
13 | // No library is required when using these functions. |
14 | // |
15 | //===----------------------------------------------------------------------===// |
16 | |
17 | #ifndef LLVM_ADT_STLEXTRAS_H |
18 | #define LLVM_ADT_STLEXTRAS_H |
19 | |
20 | #include "llvm/ADT/Optional.h" |
21 | #include "llvm/ADT/SmallVector.h" |
22 | #include "llvm/ADT/iterator.h" |
23 | #include "llvm/ADT/iterator_range.h" |
24 | #include "llvm/Config/abi-breaking.h" |
25 | #include "llvm/Support/ErrorHandling.h" |
26 | #include <algorithm> |
27 | #include <cassert> |
28 | #include <cstddef> |
29 | #include <cstdint> |
30 | #include <cstdlib> |
31 | #include <functional> |
32 | #include <initializer_list> |
33 | #include <iterator> |
34 | #include <limits> |
35 | #include <memory> |
36 | #include <tuple> |
37 | #include <type_traits> |
38 | #include <utility> |
39 | |
40 | #ifdef EXPENSIVE_CHECKS |
41 | #include <random> // for std::mt19937 |
42 | #endif |
43 | |
44 | namespace llvm { |
45 | |
46 | // Only used by compiler if both template types are the same. Useful when |
47 | // using SFINAE to test for the existence of member functions. |
48 | template <typename T, T> struct SameType; |
49 | |
50 | namespace detail { |
51 | |
52 | template <typename RangeT> |
53 | using IterOfRange = decltype(std::begin(std::declval<RangeT &>())); |
54 | |
55 | template <typename RangeT> |
56 | using ValueOfRange = typename std::remove_reference<decltype( |
57 | *std::begin(std::declval<RangeT &>()))>::type; |
58 | |
59 | } // end namespace detail |
60 | |
61 | //===----------------------------------------------------------------------===// |
62 | // Extra additions to <type_traits> |
63 | //===----------------------------------------------------------------------===// |
64 | |
65 | template <typename T> |
66 | struct negation : std::integral_constant<bool, !bool(T::value)> {}; |
67 | |
68 | template <typename...> struct conjunction : std::true_type {}; |
69 | template <typename B1> struct conjunction<B1> : B1 {}; |
70 | template <typename B1, typename... Bn> |
71 | struct conjunction<B1, Bn...> |
72 | : std::conditional<bool(B1::value), conjunction<Bn...>, B1>::type {}; |
73 | |
74 | //===----------------------------------------------------------------------===// |
75 | // Extra additions to <functional> |
76 | //===----------------------------------------------------------------------===// |
77 | |
78 | template <class Ty> struct identity { |
79 | using argument_type = Ty; |
80 | |
81 | Ty &operator()(Ty &self) const { |
82 | return self; |
83 | } |
84 | const Ty &operator()(const Ty &self) const { |
85 | return self; |
86 | } |
87 | }; |
88 | |
89 | template <class Ty> struct less_ptr { |
90 | bool operator()(const Ty* left, const Ty* right) const { |
91 | return *left < *right; |
92 | } |
93 | }; |
94 | |
95 | template <class Ty> struct greater_ptr { |
96 | bool operator()(const Ty* left, const Ty* right) const { |
97 | return *right < *left; |
98 | } |
99 | }; |
100 | |
101 | /// An efficient, type-erasing, non-owning reference to a callable. This is |
102 | /// intended for use as the type of a function parameter that is not used |
103 | /// after the function in question returns. |
104 | /// |
105 | /// This class does not own the callable, so it is not in general safe to store |
106 | /// a function_ref. |
107 | template<typename Fn> class function_ref; |
108 | |
109 | template<typename Ret, typename ...Params> |
110 | class function_ref<Ret(Params...)> { |
111 | Ret (*callback)(intptr_t callable, Params ...params) = nullptr; |
112 | intptr_t callable; |
113 | |
114 | template<typename Callable> |
115 | static Ret callback_fn(intptr_t callable, Params ...params) { |
116 | return (*reinterpret_cast<Callable*>(callable))( |
117 | std::forward<Params>(params)...); |
118 | } |
119 | |
120 | public: |
121 | function_ref() = default; |
122 | function_ref(std::nullptr_t) {} |
123 | |
124 | template <typename Callable> |
125 | function_ref(Callable &&callable, |
126 | typename std::enable_if< |
127 | !std::is_same<typename std::remove_reference<Callable>::type, |
128 | function_ref>::value>::type * = nullptr) |
129 | : callback(callback_fn<typename std::remove_reference<Callable>::type>), |
130 | callable(reinterpret_cast<intptr_t>(&callable)) {} |
131 | |
132 | Ret operator()(Params ...params) const { |
133 | return callback(callable, std::forward<Params>(params)...); |
134 | } |
135 | |
136 | operator bool() const { return callback; } |
137 | }; |
138 | |
139 | // deleter - Very very very simple method that is used to invoke operator |
140 | // delete on something. It is used like this: |
141 | // |
142 | // for_each(V.begin(), B.end(), deleter<Interval>); |
143 | template <class T> |
144 | inline void deleter(T *Ptr) { |
145 | delete Ptr; |
146 | } |
147 | |
148 | //===----------------------------------------------------------------------===// |
149 | // Extra additions to <iterator> |
150 | //===----------------------------------------------------------------------===// |
151 | |
152 | namespace adl_detail { |
153 | |
154 | using std::begin; |
155 | |
156 | template <typename ContainerTy> |
157 | auto adl_begin(ContainerTy &&container) |
158 | -> decltype(begin(std::forward<ContainerTy>(container))) { |
159 | return begin(std::forward<ContainerTy>(container)); |
160 | } |
161 | |
162 | using std::end; |
163 | |
164 | template <typename ContainerTy> |
165 | auto adl_end(ContainerTy &&container) |
166 | -> decltype(end(std::forward<ContainerTy>(container))) { |
167 | return end(std::forward<ContainerTy>(container)); |
168 | } |
169 | |
170 | using std::swap; |
171 | |
172 | template <typename T> |
173 | void adl_swap(T &&lhs, T &&rhs) noexcept(noexcept(swap(std::declval<T>(), |
174 | std::declval<T>()))) { |
175 | swap(std::forward<T>(lhs), std::forward<T>(rhs)); |
176 | } |
177 | |
178 | } // end namespace adl_detail |
179 | |
180 | template <typename ContainerTy> |
181 | auto adl_begin(ContainerTy &&container) |
182 | -> decltype(adl_detail::adl_begin(std::forward<ContainerTy>(container))) { |
183 | return adl_detail::adl_begin(std::forward<ContainerTy>(container)); |
184 | } |
185 | |
186 | template <typename ContainerTy> |
187 | auto adl_end(ContainerTy &&container) |
188 | -> decltype(adl_detail::adl_end(std::forward<ContainerTy>(container))) { |
189 | return adl_detail::adl_end(std::forward<ContainerTy>(container)); |
190 | } |
191 | |
192 | template <typename T> |
193 | void adl_swap(T &&lhs, T &&rhs) noexcept( |
194 | noexcept(adl_detail::adl_swap(std::declval<T>(), std::declval<T>()))) { |
195 | adl_detail::adl_swap(std::forward<T>(lhs), std::forward<T>(rhs)); |
196 | } |
197 | |
198 | // mapped_iterator - This is a simple iterator adapter that causes a function to |
199 | // be applied whenever operator* is invoked on the iterator. |
200 | |
201 | template <typename ItTy, typename FuncTy, |
202 | typename FuncReturnTy = |
203 | decltype(std::declval<FuncTy>()(*std::declval<ItTy>()))> |
204 | class mapped_iterator |
205 | : public iterator_adaptor_base< |
206 | mapped_iterator<ItTy, FuncTy>, ItTy, |
207 | typename std::iterator_traits<ItTy>::iterator_category, |
208 | typename std::remove_reference<FuncReturnTy>::type> { |
209 | public: |
210 | mapped_iterator(ItTy U, FuncTy F) |
211 | : mapped_iterator::iterator_adaptor_base(std::move(U)), F(std::move(F)) {} |
212 | |
213 | ItTy getCurrent() { return this->I; } |
214 | |
215 | FuncReturnTy operator*() { return F(*this->I); } |
216 | |
217 | private: |
218 | FuncTy F; |
219 | }; |
220 | |
221 | // map_iterator - Provide a convenient way to create mapped_iterators, just like |
222 | // make_pair is useful for creating pairs... |
223 | template <class ItTy, class FuncTy> |
224 | inline mapped_iterator<ItTy, FuncTy> map_iterator(ItTy I, FuncTy F) { |
225 | return mapped_iterator<ItTy, FuncTy>(std::move(I), std::move(F)); |
226 | } |
227 | |
228 | /// Helper to determine if type T has a member called rbegin(). |
229 | template <typename Ty> class has_rbegin_impl { |
230 | using yes = char[1]; |
231 | using no = char[2]; |
232 | |
233 | template <typename Inner> |
234 | static yes& test(Inner *I, decltype(I->rbegin()) * = nullptr); |
235 | |
236 | template <typename> |
237 | static no& test(...); |
238 | |
239 | public: |
240 | static const bool value = sizeof(test<Ty>(nullptr)) == sizeof(yes); |
241 | }; |
242 | |
243 | /// Metafunction to determine if T& or T has a member called rbegin(). |
244 | template <typename Ty> |
245 | struct has_rbegin : has_rbegin_impl<typename std::remove_reference<Ty>::type> { |
246 | }; |
247 | |
248 | // Returns an iterator_range over the given container which iterates in reverse. |
249 | // Note that the container must have rbegin()/rend() methods for this to work. |
250 | template <typename ContainerTy> |
251 | auto reverse(ContainerTy &&C, |
252 | typename std::enable_if<has_rbegin<ContainerTy>::value>::type * = |
253 | nullptr) -> decltype(make_range(C.rbegin(), C.rend())) { |
254 | return make_range(C.rbegin(), C.rend()); |
255 | } |
256 | |
257 | // Returns a std::reverse_iterator wrapped around the given iterator. |
258 | template <typename IteratorTy> |
259 | std::reverse_iterator<IteratorTy> make_reverse_iterator(IteratorTy It) { |
260 | return std::reverse_iterator<IteratorTy>(It); |
261 | } |
262 | |
263 | // Returns an iterator_range over the given container which iterates in reverse. |
264 | // Note that the container must have begin()/end() methods which return |
265 | // bidirectional iterators for this to work. |
266 | template <typename ContainerTy> |
267 | auto reverse( |
268 | ContainerTy &&C, |
269 | typename std::enable_if<!has_rbegin<ContainerTy>::value>::type * = nullptr) |
270 | -> decltype(make_range(llvm::make_reverse_iterator(std::end(C)), |
271 | llvm::make_reverse_iterator(std::begin(C)))) { |
272 | return make_range(llvm::make_reverse_iterator(std::end(C)), |
273 | llvm::make_reverse_iterator(std::begin(C))); |
274 | } |
275 | |
276 | /// An iterator adaptor that filters the elements of given inner iterators. |
277 | /// |
278 | /// The predicate parameter should be a callable object that accepts the wrapped |
279 | /// iterator's reference type and returns a bool. When incrementing or |
280 | /// decrementing the iterator, it will call the predicate on each element and |
281 | /// skip any where it returns false. |
282 | /// |
283 | /// \code |
284 | /// int A[] = { 1, 2, 3, 4 }; |
285 | /// auto R = make_filter_range(A, [](int N) { return N % 2 == 1; }); |
286 | /// // R contains { 1, 3 }. |
287 | /// \endcode |
288 | /// |
289 | /// Note: filter_iterator_base implements support for forward iteration. |
290 | /// filter_iterator_impl exists to provide support for bidirectional iteration, |
291 | /// conditional on whether the wrapped iterator supports it. |
292 | template <typename WrappedIteratorT, typename PredicateT, typename IterTag> |
293 | class filter_iterator_base |
294 | : public iterator_adaptor_base< |
295 | filter_iterator_base<WrappedIteratorT, PredicateT, IterTag>, |
296 | WrappedIteratorT, |
297 | typename std::common_type< |
298 | IterTag, typename std::iterator_traits< |
299 | WrappedIteratorT>::iterator_category>::type> { |
300 | using BaseT = iterator_adaptor_base< |
301 | filter_iterator_base<WrappedIteratorT, PredicateT, IterTag>, |
302 | WrappedIteratorT, |
303 | typename std::common_type< |
304 | IterTag, typename std::iterator_traits< |
305 | WrappedIteratorT>::iterator_category>::type>; |
306 | |
307 | protected: |
308 | WrappedIteratorT End; |
309 | PredicateT Pred; |
310 | |
311 | void findNextValid() { |
312 | while (this->I != End && !Pred(*this->I)) |
313 | BaseT::operator++(); |
314 | } |
315 | |
316 | // Construct the iterator. The begin iterator needs to know where the end |
317 | // is, so that it can properly stop when it gets there. The end iterator only |
318 | // needs the predicate to support bidirectional iteration. |
319 | filter_iterator_base(WrappedIteratorT Begin, WrappedIteratorT End, |
320 | PredicateT Pred) |
321 | : BaseT(Begin), End(End), Pred(Pred) { |
322 | findNextValid(); |
323 | } |
324 | |
325 | public: |
326 | using BaseT::operator++; |
327 | |
328 | filter_iterator_base &operator++() { |
329 | BaseT::operator++(); |
330 | findNextValid(); |
331 | return *this; |
332 | } |
333 | }; |
334 | |
335 | /// Specialization of filter_iterator_base for forward iteration only. |
336 | template <typename WrappedIteratorT, typename PredicateT, |
337 | typename IterTag = std::forward_iterator_tag> |
338 | class filter_iterator_impl |
339 | : public filter_iterator_base<WrappedIteratorT, PredicateT, IterTag> { |
340 | using BaseT = filter_iterator_base<WrappedIteratorT, PredicateT, IterTag>; |
341 | |
342 | public: |
343 | filter_iterator_impl(WrappedIteratorT Begin, WrappedIteratorT End, |
344 | PredicateT Pred) |
345 | : BaseT(Begin, End, Pred) {} |
346 | }; |
347 | |
348 | /// Specialization of filter_iterator_base for bidirectional iteration. |
349 | template <typename WrappedIteratorT, typename PredicateT> |
350 | class filter_iterator_impl<WrappedIteratorT, PredicateT, |
351 | std::bidirectional_iterator_tag> |
352 | : public filter_iterator_base<WrappedIteratorT, PredicateT, |
353 | std::bidirectional_iterator_tag> { |
354 | using BaseT = filter_iterator_base<WrappedIteratorT, PredicateT, |
355 | std::bidirectional_iterator_tag>; |
356 | void findPrevValid() { |
357 | while (!this->Pred(*this->I)) |
358 | BaseT::operator--(); |
359 | } |
360 | |
361 | public: |
362 | using BaseT::operator--; |
363 | |
364 | filter_iterator_impl(WrappedIteratorT Begin, WrappedIteratorT End, |
365 | PredicateT Pred) |
366 | : BaseT(Begin, End, Pred) {} |
367 | |
368 | filter_iterator_impl &operator--() { |
369 | BaseT::operator--(); |
370 | findPrevValid(); |
371 | return *this; |
372 | } |
373 | }; |
374 | |
375 | namespace detail { |
376 | |
377 | template <bool is_bidirectional> struct fwd_or_bidi_tag_impl { |
378 | using type = std::forward_iterator_tag; |
379 | }; |
380 | |
381 | template <> struct fwd_or_bidi_tag_impl<true> { |
382 | using type = std::bidirectional_iterator_tag; |
383 | }; |
384 | |
385 | /// Helper which sets its type member to forward_iterator_tag if the category |
386 | /// of \p IterT does not derive from bidirectional_iterator_tag, and to |
387 | /// bidirectional_iterator_tag otherwise. |
388 | template <typename IterT> struct fwd_or_bidi_tag { |
389 | using type = typename fwd_or_bidi_tag_impl<std::is_base_of< |
390 | std::bidirectional_iterator_tag, |
391 | typename std::iterator_traits<IterT>::iterator_category>::value>::type; |
392 | }; |
393 | |
394 | } // namespace detail |
395 | |
396 | /// Defines filter_iterator to a suitable specialization of |
397 | /// filter_iterator_impl, based on the underlying iterator's category. |
398 | template <typename WrappedIteratorT, typename PredicateT> |
399 | using filter_iterator = filter_iterator_impl< |
400 | WrappedIteratorT, PredicateT, |
401 | typename detail::fwd_or_bidi_tag<WrappedIteratorT>::type>; |
402 | |
403 | /// Convenience function that takes a range of elements and a predicate, |
404 | /// and return a new filter_iterator range. |
405 | /// |
406 | /// FIXME: Currently if RangeT && is a rvalue reference to a temporary, the |
407 | /// lifetime of that temporary is not kept by the returned range object, and the |
408 | /// temporary is going to be dropped on the floor after the make_iterator_range |
409 | /// full expression that contains this function call. |
410 | template <typename RangeT, typename PredicateT> |
411 | iterator_range<filter_iterator<detail::IterOfRange<RangeT>, PredicateT>> |
412 | make_filter_range(RangeT &&Range, PredicateT Pred) { |
413 | using FilterIteratorT = |
414 | filter_iterator<detail::IterOfRange<RangeT>, PredicateT>; |
415 | return make_range( |
416 | FilterIteratorT(std::begin(std::forward<RangeT>(Range)), |
417 | std::end(std::forward<RangeT>(Range)), Pred), |
418 | FilterIteratorT(std::end(std::forward<RangeT>(Range)), |
419 | std::end(std::forward<RangeT>(Range)), Pred)); |
420 | } |
421 | |
422 | /// A pseudo-iterator adaptor that is designed to implement "early increment" |
423 | /// style loops. |
424 | /// |
425 | /// This is *not a normal iterator* and should almost never be used directly. It |
426 | /// is intended primarily to be used with range based for loops and some range |
427 | /// algorithms. |
428 | /// |
429 | /// The iterator isn't quite an `OutputIterator` or an `InputIterator` but |
430 | /// somewhere between them. The constraints of these iterators are: |
431 | /// |
432 | /// - On construction or after being incremented, it is comparable and |
433 | /// dereferencable. It is *not* incrementable. |
434 | /// - After being dereferenced, it is neither comparable nor dereferencable, it |
435 | /// is only incrementable. |
436 | /// |
437 | /// This means you can only dereference the iterator once, and you can only |
438 | /// increment it once between dereferences. |
439 | template <typename WrappedIteratorT> |
440 | class early_inc_iterator_impl |
441 | : public iterator_adaptor_base<early_inc_iterator_impl<WrappedIteratorT>, |
442 | WrappedIteratorT, std::input_iterator_tag> { |
443 | using BaseT = |
444 | iterator_adaptor_base<early_inc_iterator_impl<WrappedIteratorT>, |
445 | WrappedIteratorT, std::input_iterator_tag>; |
446 | |
447 | using PointerT = typename std::iterator_traits<WrappedIteratorT>::pointer; |
448 | |
449 | protected: |
450 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 |
451 | bool IsEarlyIncremented = false; |
452 | #endif |
453 | |
454 | public: |
455 | early_inc_iterator_impl(WrappedIteratorT I) : BaseT(I) {} |
456 | |
457 | using BaseT::operator*; |
458 | typename BaseT::reference operator*() { |
459 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 |
460 | assert(!IsEarlyIncremented && "Cannot dereference twice!")((!IsEarlyIncremented && "Cannot dereference twice!") ? static_cast<void> (0) : __assert_fail ("!IsEarlyIncremented && \"Cannot dereference twice!\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/ADT/STLExtras.h" , 460, __PRETTY_FUNCTION__)); |
461 | IsEarlyIncremented = true; |
462 | #endif |
463 | return *(this->I)++; |
464 | } |
465 | |
466 | using BaseT::operator++; |
467 | early_inc_iterator_impl &operator++() { |
468 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 |
469 | assert(IsEarlyIncremented && "Cannot increment before dereferencing!")((IsEarlyIncremented && "Cannot increment before dereferencing!" ) ? static_cast<void> (0) : __assert_fail ("IsEarlyIncremented && \"Cannot increment before dereferencing!\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/ADT/STLExtras.h" , 469, __PRETTY_FUNCTION__)); |
470 | IsEarlyIncremented = false; |
471 | #endif |
472 | return *this; |
473 | } |
474 | |
475 | using BaseT::operator==; |
476 | bool operator==(const early_inc_iterator_impl &RHS) const { |
477 | #if LLVM_ENABLE_ABI_BREAKING_CHECKS1 |
478 | assert(!IsEarlyIncremented && "Cannot compare after dereferencing!")((!IsEarlyIncremented && "Cannot compare after dereferencing!" ) ? static_cast<void> (0) : __assert_fail ("!IsEarlyIncremented && \"Cannot compare after dereferencing!\"" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/ADT/STLExtras.h" , 478, __PRETTY_FUNCTION__)); |
479 | #endif |
480 | return BaseT::operator==(RHS); |
481 | } |
482 | }; |
483 | |
484 | /// Make a range that does early increment to allow mutation of the underlying |
485 | /// range without disrupting iteration. |
486 | /// |
487 | /// The underlying iterator will be incremented immediately after it is |
488 | /// dereferenced, allowing deletion of the current node or insertion of nodes to |
489 | /// not disrupt iteration provided they do not invalidate the *next* iterator -- |
490 | /// the current iterator can be invalidated. |
491 | /// |
492 | /// This requires a very exact pattern of use that is only really suitable to |
493 | /// range based for loops and other range algorithms that explicitly guarantee |
494 | /// to dereference exactly once each element, and to increment exactly once each |
495 | /// element. |
496 | template <typename RangeT> |
497 | iterator_range<early_inc_iterator_impl<detail::IterOfRange<RangeT>>> |
498 | make_early_inc_range(RangeT &&Range) { |
499 | using EarlyIncIteratorT = |
500 | early_inc_iterator_impl<detail::IterOfRange<RangeT>>; |
501 | return make_range(EarlyIncIteratorT(std::begin(std::forward<RangeT>(Range))), |
502 | EarlyIncIteratorT(std::end(std::forward<RangeT>(Range)))); |
503 | } |
504 | |
505 | // forward declarations required by zip_shortest/zip_first |
506 | template <typename R, typename UnaryPredicate> |
507 | bool all_of(R &&range, UnaryPredicate P); |
508 | |
509 | template <size_t... I> struct index_sequence; |
510 | |
511 | template <class... Ts> struct index_sequence_for; |
512 | |
513 | namespace detail { |
514 | |
515 | using std::declval; |
516 | |
517 | // We have to alias this since inlining the actual type at the usage site |
518 | // in the parameter list of iterator_facade_base<> below ICEs MSVC 2017. |
519 | template<typename... Iters> struct ZipTupleType { |
520 | using type = std::tuple<decltype(*declval<Iters>())...>; |
521 | }; |
522 | |
523 | template <typename ZipType, typename... Iters> |
524 | using zip_traits = iterator_facade_base< |
525 | ZipType, typename std::common_type<std::bidirectional_iterator_tag, |
526 | typename std::iterator_traits< |
527 | Iters>::iterator_category...>::type, |
528 | // ^ TODO: Implement random access methods. |
529 | typename ZipTupleType<Iters...>::type, |
530 | typename std::iterator_traits<typename std::tuple_element< |
531 | 0, std::tuple<Iters...>>::type>::difference_type, |
532 | // ^ FIXME: This follows boost::make_zip_iterator's assumption that all |
533 | // inner iterators have the same difference_type. It would fail if, for |
534 | // instance, the second field's difference_type were non-numeric while the |
535 | // first is. |
536 | typename ZipTupleType<Iters...>::type *, |
537 | typename ZipTupleType<Iters...>::type>; |
538 | |
539 | template <typename ZipType, typename... Iters> |
540 | struct zip_common : public zip_traits<ZipType, Iters...> { |
541 | using Base = zip_traits<ZipType, Iters...>; |
542 | using value_type = typename Base::value_type; |
543 | |
544 | std::tuple<Iters...> iterators; |
545 | |
546 | protected: |
547 | template <size_t... Ns> value_type deref(index_sequence<Ns...>) const { |
548 | return value_type(*std::get<Ns>(iterators)...); |
549 | } |
550 | |
551 | template <size_t... Ns> |
552 | decltype(iterators) tup_inc(index_sequence<Ns...>) const { |
553 | return std::tuple<Iters...>(std::next(std::get<Ns>(iterators))...); |
554 | } |
555 | |
556 | template <size_t... Ns> |
557 | decltype(iterators) tup_dec(index_sequence<Ns...>) const { |
558 | return std::tuple<Iters...>(std::prev(std::get<Ns>(iterators))...); |
559 | } |
560 | |
561 | public: |
562 | zip_common(Iters &&... ts) : iterators(std::forward<Iters>(ts)...) {} |
563 | |
564 | value_type operator*() { return deref(index_sequence_for<Iters...>{}); } |
565 | |
566 | const value_type operator*() const { |
567 | return deref(index_sequence_for<Iters...>{}); |
568 | } |
569 | |
570 | ZipType &operator++() { |
571 | iterators = tup_inc(index_sequence_for<Iters...>{}); |
572 | return *reinterpret_cast<ZipType *>(this); |
573 | } |
574 | |
575 | ZipType &operator--() { |
576 | static_assert(Base::IsBidirectional, |
577 | "All inner iterators must be at least bidirectional."); |
578 | iterators = tup_dec(index_sequence_for<Iters...>{}); |
579 | return *reinterpret_cast<ZipType *>(this); |
580 | } |
581 | }; |
582 | |
583 | template <typename... Iters> |
584 | struct zip_first : public zip_common<zip_first<Iters...>, Iters...> { |
585 | using Base = zip_common<zip_first<Iters...>, Iters...>; |
586 | |
587 | bool operator==(const zip_first<Iters...> &other) const { |
588 | return std::get<0>(this->iterators) == std::get<0>(other.iterators); |
589 | } |
590 | |
591 | zip_first(Iters &&... ts) : Base(std::forward<Iters>(ts)...) {} |
592 | }; |
593 | |
594 | template <typename... Iters> |
595 | class zip_shortest : public zip_common<zip_shortest<Iters...>, Iters...> { |
596 | template <size_t... Ns> |
597 | bool test(const zip_shortest<Iters...> &other, index_sequence<Ns...>) const { |
598 | return all_of(std::initializer_list<bool>{std::get<Ns>(this->iterators) != |
599 | std::get<Ns>(other.iterators)...}, |
600 | identity<bool>{}); |
601 | } |
602 | |
603 | public: |
604 | using Base = zip_common<zip_shortest<Iters...>, Iters...>; |
605 | |
606 | zip_shortest(Iters &&... ts) : Base(std::forward<Iters>(ts)...) {} |
607 | |
608 | bool operator==(const zip_shortest<Iters...> &other) const { |
609 | return !test(other, index_sequence_for<Iters...>{}); |
610 | } |
611 | }; |
612 | |
613 | template <template <typename...> class ItType, typename... Args> class zippy { |
614 | public: |
615 | using iterator = ItType<decltype(std::begin(std::declval<Args>()))...>; |
616 | using iterator_category = typename iterator::iterator_category; |
617 | using value_type = typename iterator::value_type; |
618 | using difference_type = typename iterator::difference_type; |
619 | using pointer = typename iterator::pointer; |
620 | using reference = typename iterator::reference; |
621 | |
622 | private: |
623 | std::tuple<Args...> ts; |
624 | |
625 | template <size_t... Ns> iterator begin_impl(index_sequence<Ns...>) const { |
626 | return iterator(std::begin(std::get<Ns>(ts))...); |
627 | } |
628 | template <size_t... Ns> iterator end_impl(index_sequence<Ns...>) const { |
629 | return iterator(std::end(std::get<Ns>(ts))...); |
630 | } |
631 | |
632 | public: |
633 | zippy(Args &&... ts_) : ts(std::forward<Args>(ts_)...) {} |
634 | |
635 | iterator begin() const { return begin_impl(index_sequence_for<Args...>{}); } |
636 | iterator end() const { return end_impl(index_sequence_for<Args...>{}); } |
637 | }; |
638 | |
639 | } // end namespace detail |
640 | |
641 | /// zip iterator for two or more iteratable types. |
642 | template <typename T, typename U, typename... Args> |
643 | detail::zippy<detail::zip_shortest, T, U, Args...> zip(T &&t, U &&u, |
644 | Args &&... args) { |
645 | return detail::zippy<detail::zip_shortest, T, U, Args...>( |
646 | std::forward<T>(t), std::forward<U>(u), std::forward<Args>(args)...); |
647 | } |
648 | |
649 | /// zip iterator that, for the sake of efficiency, assumes the first iteratee to |
650 | /// be the shortest. |
651 | template <typename T, typename U, typename... Args> |
652 | detail::zippy<detail::zip_first, T, U, Args...> zip_first(T &&t, U &&u, |
653 | Args &&... args) { |
654 | return detail::zippy<detail::zip_first, T, U, Args...>( |
655 | std::forward<T>(t), std::forward<U>(u), std::forward<Args>(args)...); |
656 | } |
657 | |
658 | /// Iterator wrapper that concatenates sequences together. |
659 | /// |
660 | /// This can concatenate different iterators, even with different types, into |
661 | /// a single iterator provided the value types of all the concatenated |
662 | /// iterators expose `reference` and `pointer` types that can be converted to |
663 | /// `ValueT &` and `ValueT *` respectively. It doesn't support more |
664 | /// interesting/customized pointer or reference types. |
665 | /// |
666 | /// Currently this only supports forward or higher iterator categories as |
667 | /// inputs and always exposes a forward iterator interface. |
668 | template <typename ValueT, typename... IterTs> |
669 | class concat_iterator |
670 | : public iterator_facade_base<concat_iterator<ValueT, IterTs...>, |
671 | std::forward_iterator_tag, ValueT> { |
672 | using BaseT = typename concat_iterator::iterator_facade_base; |
673 | |
674 | /// We store both the current and end iterators for each concatenated |
675 | /// sequence in a tuple of pairs. |
676 | /// |
677 | /// Note that something like iterator_range seems nice at first here, but the |
678 | /// range properties are of little benefit and end up getting in the way |
679 | /// because we need to do mutation on the current iterators. |
680 | std::tuple<IterTs...> Begins; |
681 | std::tuple<IterTs...> Ends; |
682 | |
683 | /// Attempts to increment a specific iterator. |
684 | /// |
685 | /// Returns true if it was able to increment the iterator. Returns false if |
686 | /// the iterator is already at the end iterator. |
687 | template <size_t Index> bool incrementHelper() { |
688 | auto &Begin = std::get<Index>(Begins); |
689 | auto &End = std::get<Index>(Ends); |
690 | if (Begin == End) |
691 | return false; |
692 | |
693 | ++Begin; |
694 | return true; |
695 | } |
696 | |
697 | /// Increments the first non-end iterator. |
698 | /// |
699 | /// It is an error to call this with all iterators at the end. |
700 | template <size_t... Ns> void increment(index_sequence<Ns...>) { |
701 | // Build a sequence of functions to increment each iterator if possible. |
702 | bool (concat_iterator::*IncrementHelperFns[])() = { |
703 | &concat_iterator::incrementHelper<Ns>...}; |
704 | |
705 | // Loop over them, and stop as soon as we succeed at incrementing one. |
706 | for (auto &IncrementHelperFn : IncrementHelperFns) |
707 | if ((this->*IncrementHelperFn)()) |
708 | return; |
709 | |
710 | llvm_unreachable("Attempted to increment an end concat iterator!")::llvm::llvm_unreachable_internal("Attempted to increment an end concat iterator!" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/ADT/STLExtras.h" , 710); |
711 | } |
712 | |
713 | /// Returns null if the specified iterator is at the end. Otherwise, |
714 | /// dereferences the iterator and returns the address of the resulting |
715 | /// reference. |
716 | template <size_t Index> ValueT *getHelper() const { |
717 | auto &Begin = std::get<Index>(Begins); |
718 | auto &End = std::get<Index>(Ends); |
719 | if (Begin == End) |
720 | return nullptr; |
721 | |
722 | return &*Begin; |
723 | } |
724 | |
725 | /// Finds the first non-end iterator, dereferences, and returns the resulting |
726 | /// reference. |
727 | /// |
728 | /// It is an error to call this with all iterators at the end. |
729 | template <size_t... Ns> ValueT &get(index_sequence<Ns...>) const { |
730 | // Build a sequence of functions to get from iterator if possible. |
731 | ValueT *(concat_iterator::*GetHelperFns[])() const = { |
732 | &concat_iterator::getHelper<Ns>...}; |
733 | |
734 | // Loop over them, and return the first result we find. |
735 | for (auto &GetHelperFn : GetHelperFns) |
736 | if (ValueT *P = (this->*GetHelperFn)()) |
737 | return *P; |
738 | |
739 | llvm_unreachable("Attempted to get a pointer from an end concat iterator!")::llvm::llvm_unreachable_internal("Attempted to get a pointer from an end concat iterator!" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/ADT/STLExtras.h" , 739); |
740 | } |
741 | |
742 | public: |
743 | /// Constructs an iterator from a squence of ranges. |
744 | /// |
745 | /// We need the full range to know how to switch between each of the |
746 | /// iterators. |
747 | template <typename... RangeTs> |
748 | explicit concat_iterator(RangeTs &&... Ranges) |
749 | : Begins(std::begin(Ranges)...), Ends(std::end(Ranges)...) {} |
750 | |
751 | using BaseT::operator++; |
752 | |
753 | concat_iterator &operator++() { |
754 | increment(index_sequence_for<IterTs...>()); |
755 | return *this; |
756 | } |
757 | |
758 | ValueT &operator*() const { return get(index_sequence_for<IterTs...>()); } |
759 | |
760 | bool operator==(const concat_iterator &RHS) const { |
761 | return Begins == RHS.Begins && Ends == RHS.Ends; |
762 | } |
763 | }; |
764 | |
765 | namespace detail { |
766 | |
767 | /// Helper to store a sequence of ranges being concatenated and access them. |
768 | /// |
769 | /// This is designed to facilitate providing actual storage when temporaries |
770 | /// are passed into the constructor such that we can use it as part of range |
771 | /// based for loops. |
772 | template <typename ValueT, typename... RangeTs> class concat_range { |
773 | public: |
774 | using iterator = |
775 | concat_iterator<ValueT, |
776 | decltype(std::begin(std::declval<RangeTs &>()))...>; |
777 | |
778 | private: |
779 | std::tuple<RangeTs...> Ranges; |
780 | |
781 | template <size_t... Ns> iterator begin_impl(index_sequence<Ns...>) { |
782 | return iterator(std::get<Ns>(Ranges)...); |
783 | } |
784 | template <size_t... Ns> iterator end_impl(index_sequence<Ns...>) { |
785 | return iterator(make_range(std::end(std::get<Ns>(Ranges)), |
786 | std::end(std::get<Ns>(Ranges)))...); |
787 | } |
788 | |
789 | public: |
790 | concat_range(RangeTs &&... Ranges) |
791 | : Ranges(std::forward<RangeTs>(Ranges)...) {} |
792 | |
793 | iterator begin() { return begin_impl(index_sequence_for<RangeTs...>{}); } |
794 | iterator end() { return end_impl(index_sequence_for<RangeTs...>{}); } |
795 | }; |
796 | |
797 | } // end namespace detail |
798 | |
799 | /// Concatenated range across two or more ranges. |
800 | /// |
801 | /// The desired value type must be explicitly specified. |
802 | template <typename ValueT, typename... RangeTs> |
803 | detail::concat_range<ValueT, RangeTs...> concat(RangeTs &&... Ranges) { |
804 | static_assert(sizeof...(RangeTs) > 1, |
805 | "Need more than one range to concatenate!"); |
806 | return detail::concat_range<ValueT, RangeTs...>( |
807 | std::forward<RangeTs>(Ranges)...); |
808 | } |
809 | |
810 | //===----------------------------------------------------------------------===// |
811 | // Extra additions to <utility> |
812 | //===----------------------------------------------------------------------===// |
813 | |
814 | /// Function object to check whether the first component of a std::pair |
815 | /// compares less than the first component of another std::pair. |
816 | struct less_first { |
817 | template <typename T> bool operator()(const T &lhs, const T &rhs) const { |
818 | return lhs.first < rhs.first; |
819 | } |
820 | }; |
821 | |
822 | /// Function object to check whether the second component of a std::pair |
823 | /// compares less than the second component of another std::pair. |
824 | struct less_second { |
825 | template <typename T> bool operator()(const T &lhs, const T &rhs) const { |
826 | return lhs.second < rhs.second; |
827 | } |
828 | }; |
829 | |
830 | /// \brief Function object to apply a binary function to the first component of |
831 | /// a std::pair. |
832 | template<typename FuncTy> |
833 | struct on_first { |
834 | FuncTy func; |
835 | |
836 | template <typename T> |
837 | auto operator()(const T &lhs, const T &rhs) const |
838 | -> decltype(func(lhs.first, rhs.first)) { |
839 | return func(lhs.first, rhs.first); |
840 | } |
841 | }; |
842 | |
843 | // A subset of N3658. More stuff can be added as-needed. |
844 | |
845 | /// Represents a compile-time sequence of integers. |
846 | template <class T, T... I> struct integer_sequence { |
847 | using value_type = T; |
848 | |
849 | static constexpr size_t size() { return sizeof...(I); } |
850 | }; |
851 | |
852 | /// Alias for the common case of a sequence of size_ts. |
853 | template <size_t... I> |
854 | struct index_sequence : integer_sequence<std::size_t, I...> {}; |
855 | |
856 | template <std::size_t N, std::size_t... I> |
857 | struct build_index_impl : build_index_impl<N - 1, N - 1, I...> {}; |
858 | template <std::size_t... I> |
859 | struct build_index_impl<0, I...> : index_sequence<I...> {}; |
860 | |
861 | /// Creates a compile-time integer sequence for a parameter pack. |
862 | template <class... Ts> |
863 | struct index_sequence_for : build_index_impl<sizeof...(Ts)> {}; |
864 | |
865 | /// Utility type to build an inheritance chain that makes it easy to rank |
866 | /// overload candidates. |
867 | template <int N> struct rank : rank<N - 1> {}; |
868 | template <> struct rank<0> {}; |
869 | |
870 | /// traits class for checking whether type T is one of any of the given |
871 | /// types in the variadic list. |
872 | template <typename T, typename... Ts> struct is_one_of { |
873 | static const bool value = false; |
874 | }; |
875 | |
876 | template <typename T, typename U, typename... Ts> |
877 | struct is_one_of<T, U, Ts...> { |
878 | static const bool value = |
879 | std::is_same<T, U>::value || is_one_of<T, Ts...>::value; |
880 | }; |
881 | |
882 | /// traits class for checking whether type T is a base class for all |
883 | /// the given types in the variadic list. |
884 | template <typename T, typename... Ts> struct are_base_of { |
885 | static const bool value = true; |
886 | }; |
887 | |
888 | template <typename T, typename U, typename... Ts> |
889 | struct are_base_of<T, U, Ts...> { |
890 | static const bool value = |
891 | std::is_base_of<T, U>::value && are_base_of<T, Ts...>::value; |
892 | }; |
893 | |
894 | //===----------------------------------------------------------------------===// |
895 | // Extra additions for arrays |
896 | //===----------------------------------------------------------------------===// |
897 | |
898 | /// Find the length of an array. |
899 | template <class T, std::size_t N> |
900 | constexpr inline size_t array_lengthof(T (&)[N]) { |
901 | return N; |
902 | } |
903 | |
904 | /// Adapt std::less<T> for array_pod_sort. |
905 | template<typename T> |
906 | inline int array_pod_sort_comparator(const void *P1, const void *P2) { |
907 | if (std::less<T>()(*reinterpret_cast<const T*>(P1), |
908 | *reinterpret_cast<const T*>(P2))) |
909 | return -1; |
910 | if (std::less<T>()(*reinterpret_cast<const T*>(P2), |
911 | *reinterpret_cast<const T*>(P1))) |
912 | return 1; |
913 | return 0; |
914 | } |
915 | |
916 | /// get_array_pod_sort_comparator - This is an internal helper function used to |
917 | /// get type deduction of T right. |
918 | template<typename T> |
919 | inline int (*get_array_pod_sort_comparator(const T &)) |
920 | (const void*, const void*) { |
921 | return array_pod_sort_comparator<T>; |
922 | } |
923 | |
924 | /// array_pod_sort - This sorts an array with the specified start and end |
925 | /// extent. This is just like std::sort, except that it calls qsort instead of |
926 | /// using an inlined template. qsort is slightly slower than std::sort, but |
927 | /// most sorts are not performance critical in LLVM and std::sort has to be |
928 | /// template instantiated for each type, leading to significant measured code |
929 | /// bloat. This function should generally be used instead of std::sort where |
930 | /// possible. |
931 | /// |
932 | /// This function assumes that you have simple POD-like types that can be |
933 | /// compared with std::less and can be moved with memcpy. If this isn't true, |
934 | /// you should use std::sort. |
935 | /// |
936 | /// NOTE: If qsort_r were portable, we could allow a custom comparator and |
937 | /// default to std::less. |
938 | template<class IteratorTy> |
939 | inline void array_pod_sort(IteratorTy Start, IteratorTy End) { |
940 | // Don't inefficiently call qsort with one element or trigger undefined |
941 | // behavior with an empty sequence. |
942 | auto NElts = End - Start; |
943 | if (NElts <= 1) return; |
944 | #ifdef EXPENSIVE_CHECKS |
945 | std::mt19937 Generator(std::random_device{}()); |
946 | std::shuffle(Start, End, Generator); |
947 | #endif |
948 | qsort(&*Start, NElts, sizeof(*Start), get_array_pod_sort_comparator(*Start)); |
949 | } |
950 | |
951 | template <class IteratorTy> |
952 | inline void array_pod_sort( |
953 | IteratorTy Start, IteratorTy End, |
954 | int (*Compare)( |
955 | const typename std::iterator_traits<IteratorTy>::value_type *, |
956 | const typename std::iterator_traits<IteratorTy>::value_type *)) { |
957 | // Don't inefficiently call qsort with one element or trigger undefined |
958 | // behavior with an empty sequence. |
959 | auto NElts = End - Start; |
960 | if (NElts <= 1) return; |
961 | #ifdef EXPENSIVE_CHECKS |
962 | std::mt19937 Generator(std::random_device{}()); |
963 | std::shuffle(Start, End, Generator); |
964 | #endif |
965 | qsort(&*Start, NElts, sizeof(*Start), |
966 | reinterpret_cast<int (*)(const void *, const void *)>(Compare)); |
967 | } |
968 | |
969 | // Provide wrappers to std::sort which shuffle the elements before sorting |
970 | // to help uncover non-deterministic behavior (PR35135). |
971 | template <typename IteratorTy> |
972 | inline void sort(IteratorTy Start, IteratorTy End) { |
973 | #ifdef EXPENSIVE_CHECKS |
974 | std::mt19937 Generator(std::random_device{}()); |
975 | std::shuffle(Start, End, Generator); |
976 | #endif |
977 | std::sort(Start, End); |
978 | } |
979 | |
980 | template <typename Container> inline void sort(Container &&C) { |
981 | llvm::sort(adl_begin(C), adl_end(C)); |
982 | } |
983 | |
984 | template <typename IteratorTy, typename Compare> |
985 | inline void sort(IteratorTy Start, IteratorTy End, Compare Comp) { |
986 | #ifdef EXPENSIVE_CHECKS |
987 | std::mt19937 Generator(std::random_device{}()); |
988 | std::shuffle(Start, End, Generator); |
989 | #endif |
990 | std::sort(Start, End, Comp); |
991 | } |
992 | |
993 | template <typename Container, typename Compare> |
994 | inline void sort(Container &&C, Compare Comp) { |
995 | llvm::sort(adl_begin(C), adl_end(C), Comp); |
996 | } |
997 | |
998 | //===----------------------------------------------------------------------===// |
999 | // Extra additions to <algorithm> |
1000 | //===----------------------------------------------------------------------===// |
1001 | |
1002 | /// For a container of pointers, deletes the pointers and then clears the |
1003 | /// container. |
1004 | template<typename Container> |
1005 | void DeleteContainerPointers(Container &C) { |
1006 | for (auto V : C) |
1007 | delete V; |
1008 | C.clear(); |
1009 | } |
1010 | |
1011 | /// In a container of pairs (usually a map) whose second element is a pointer, |
1012 | /// deletes the second elements and then clears the container. |
1013 | template<typename Container> |
1014 | void DeleteContainerSeconds(Container &C) { |
1015 | for (auto &V : C) |
1016 | delete V.second; |
1017 | C.clear(); |
1018 | } |
1019 | |
1020 | /// Get the size of a range. This is a wrapper function around std::distance |
1021 | /// which is only enabled when the operation is O(1). |
1022 | template <typename R> |
1023 | auto size(R &&Range, typename std::enable_if< |
1024 | std::is_same<typename std::iterator_traits<decltype( |
1025 | Range.begin())>::iterator_category, |
1026 | std::random_access_iterator_tag>::value, |
1027 | void>::type * = nullptr) |
1028 | -> decltype(std::distance(Range.begin(), Range.end())) { |
1029 | return std::distance(Range.begin(), Range.end()); |
1030 | } |
1031 | |
1032 | /// Provide wrappers to std::for_each which take ranges instead of having to |
1033 | /// pass begin/end explicitly. |
1034 | template <typename R, typename UnaryPredicate> |
1035 | UnaryPredicate for_each(R &&Range, UnaryPredicate P) { |
1036 | return std::for_each(adl_begin(Range), adl_end(Range), P); |
1037 | } |
1038 | |
1039 | /// Provide wrappers to std::all_of which take ranges instead of having to pass |
1040 | /// begin/end explicitly. |
1041 | template <typename R, typename UnaryPredicate> |
1042 | bool all_of(R &&Range, UnaryPredicate P) { |
1043 | return std::all_of(adl_begin(Range), adl_end(Range), P); |
1044 | } |
1045 | |
1046 | /// Provide wrappers to std::any_of which take ranges instead of having to pass |
1047 | /// begin/end explicitly. |
1048 | template <typename R, typename UnaryPredicate> |
1049 | bool any_of(R &&Range, UnaryPredicate P) { |
1050 | return std::any_of(adl_begin(Range), adl_end(Range), P); |
1051 | } |
1052 | |
1053 | /// Provide wrappers to std::none_of which take ranges instead of having to pass |
1054 | /// begin/end explicitly. |
1055 | template <typename R, typename UnaryPredicate> |
1056 | bool none_of(R &&Range, UnaryPredicate P) { |
1057 | return std::none_of(adl_begin(Range), adl_end(Range), P); |
1058 | } |
1059 | |
1060 | /// Provide wrappers to std::find which take ranges instead of having to pass |
1061 | /// begin/end explicitly. |
1062 | template <typename R, typename T> |
1063 | auto find(R &&Range, const T &Val) -> decltype(adl_begin(Range)) { |
1064 | return std::find(adl_begin(Range), adl_end(Range), Val); |
1065 | } |
1066 | |
1067 | /// Provide wrappers to std::find_if which take ranges instead of having to pass |
1068 | /// begin/end explicitly. |
1069 | template <typename R, typename UnaryPredicate> |
1070 | auto find_if(R &&Range, UnaryPredicate P) -> decltype(adl_begin(Range)) { |
1071 | return std::find_if(adl_begin(Range), adl_end(Range), P); |
1072 | } |
1073 | |
1074 | template <typename R, typename UnaryPredicate> |
1075 | auto find_if_not(R &&Range, UnaryPredicate P) -> decltype(adl_begin(Range)) { |
1076 | return std::find_if_not(adl_begin(Range), adl_end(Range), P); |
1077 | } |
1078 | |
1079 | /// Provide wrappers to std::remove_if which take ranges instead of having to |
1080 | /// pass begin/end explicitly. |
1081 | template <typename R, typename UnaryPredicate> |
1082 | auto remove_if(R &&Range, UnaryPredicate P) -> decltype(adl_begin(Range)) { |
1083 | return std::remove_if(adl_begin(Range), adl_end(Range), P); |
1084 | } |
1085 | |
1086 | /// Provide wrappers to std::copy_if which take ranges instead of having to |
1087 | /// pass begin/end explicitly. |
1088 | template <typename R, typename OutputIt, typename UnaryPredicate> |
1089 | OutputIt copy_if(R &&Range, OutputIt Out, UnaryPredicate P) { |
1090 | return std::copy_if(adl_begin(Range), adl_end(Range), Out, P); |
1091 | } |
1092 | |
1093 | template <typename R, typename OutputIt> |
1094 | OutputIt copy(R &&Range, OutputIt Out) { |
1095 | return std::copy(adl_begin(Range), adl_end(Range), Out); |
1096 | } |
1097 | |
1098 | /// Wrapper function around std::find to detect if an element exists |
1099 | /// in a container. |
1100 | template <typename R, typename E> |
1101 | bool is_contained(R &&Range, const E &Element) { |
1102 | return std::find(adl_begin(Range), adl_end(Range), Element) != adl_end(Range); |
1103 | } |
1104 | |
1105 | /// Wrapper function around std::count to count the number of times an element |
1106 | /// \p Element occurs in the given range \p Range. |
1107 | template <typename R, typename E> |
1108 | auto count(R &&Range, const E &Element) -> |
1109 | typename std::iterator_traits<decltype(adl_begin(Range))>::difference_type { |
1110 | return std::count(adl_begin(Range), adl_end(Range), Element); |
1111 | } |
1112 | |
1113 | /// Wrapper function around std::count_if to count the number of times an |
1114 | /// element satisfying a given predicate occurs in a range. |
1115 | template <typename R, typename UnaryPredicate> |
1116 | auto count_if(R &&Range, UnaryPredicate P) -> |
1117 | typename std::iterator_traits<decltype(adl_begin(Range))>::difference_type { |
1118 | return std::count_if(adl_begin(Range), adl_end(Range), P); |
1119 | } |
1120 | |
1121 | /// Wrapper function around std::transform to apply a function to a range and |
1122 | /// store the result elsewhere. |
1123 | template <typename R, typename OutputIt, typename UnaryPredicate> |
1124 | OutputIt transform(R &&Range, OutputIt d_first, UnaryPredicate P) { |
1125 | return std::transform(adl_begin(Range), adl_end(Range), d_first, P); |
1126 | } |
1127 | |
1128 | /// Provide wrappers to std::partition which take ranges instead of having to |
1129 | /// pass begin/end explicitly. |
1130 | template <typename R, typename UnaryPredicate> |
1131 | auto partition(R &&Range, UnaryPredicate P) -> decltype(adl_begin(Range)) { |
1132 | return std::partition(adl_begin(Range), adl_end(Range), P); |
1133 | } |
1134 | |
1135 | /// Provide wrappers to std::lower_bound which take ranges instead of having to |
1136 | /// pass begin/end explicitly. |
1137 | template <typename R, typename ForwardIt> |
1138 | auto lower_bound(R &&Range, ForwardIt I) -> decltype(adl_begin(Range)) { |
1139 | return std::lower_bound(adl_begin(Range), adl_end(Range), I); |
1140 | } |
1141 | |
1142 | template <typename R, typename ForwardIt, typename Compare> |
1143 | auto lower_bound(R &&Range, ForwardIt I, Compare C) |
1144 | -> decltype(adl_begin(Range)) { |
1145 | return std::lower_bound(adl_begin(Range), adl_end(Range), I, C); |
1146 | } |
1147 | |
1148 | /// Provide wrappers to std::upper_bound which take ranges instead of having to |
1149 | /// pass begin/end explicitly. |
1150 | template <typename R, typename ForwardIt> |
1151 | auto upper_bound(R &&Range, ForwardIt I) -> decltype(adl_begin(Range)) { |
1152 | return std::upper_bound(adl_begin(Range), adl_end(Range), I); |
1153 | } |
1154 | |
1155 | template <typename R, typename ForwardIt, typename Compare> |
1156 | auto upper_bound(R &&Range, ForwardIt I, Compare C) |
1157 | -> decltype(adl_begin(Range)) { |
1158 | return std::upper_bound(adl_begin(Range), adl_end(Range), I, C); |
1159 | } |
1160 | /// Wrapper function around std::equal to detect if all elements |
1161 | /// in a container are same. |
1162 | template <typename R> |
1163 | bool is_splat(R &&Range) { |
1164 | size_t range_size = size(Range); |
1165 | return range_size != 0 && (range_size == 1 || |
1166 | std::equal(adl_begin(Range) + 1, adl_end(Range), adl_begin(Range))); |
1167 | } |
1168 | |
1169 | /// Given a range of type R, iterate the entire range and return a |
1170 | /// SmallVector with elements of the vector. This is useful, for example, |
1171 | /// when you want to iterate a range and then sort the results. |
1172 | template <unsigned Size, typename R> |
1173 | SmallVector<typename std::remove_const<detail::ValueOfRange<R>>::type, Size> |
1174 | to_vector(R &&Range) { |
1175 | return {adl_begin(Range), adl_end(Range)}; |
1176 | } |
1177 | |
1178 | /// Provide a container algorithm similar to C++ Library Fundamentals v2's |
1179 | /// `erase_if` which is equivalent to: |
1180 | /// |
1181 | /// C.erase(remove_if(C, pred), C.end()); |
1182 | /// |
1183 | /// This version works for any container with an erase method call accepting |
1184 | /// two iterators. |
1185 | template <typename Container, typename UnaryPredicate> |
1186 | void erase_if(Container &C, UnaryPredicate P) { |
1187 | C.erase(remove_if(C, P), C.end()); |
1188 | } |
1189 | |
1190 | //===----------------------------------------------------------------------===// |
1191 | // Extra additions to <memory> |
1192 | //===----------------------------------------------------------------------===// |
1193 | |
1194 | // Implement make_unique according to N3656. |
1195 | |
1196 | /// Constructs a `new T()` with the given args and returns a |
1197 | /// `unique_ptr<T>` which owns the object. |
1198 | /// |
1199 | /// Example: |
1200 | /// |
1201 | /// auto p = make_unique<int>(); |
1202 | /// auto p = make_unique<std::tuple<int, int>>(0, 1); |
1203 | template <class T, class... Args> |
1204 | typename std::enable_if<!std::is_array<T>::value, std::unique_ptr<T>>::type |
1205 | make_unique(Args &&... args) { |
1206 | return std::unique_ptr<T>(new T(std::forward<Args>(args)...)); |
1207 | } |
1208 | |
1209 | /// Constructs a `new T[n]` with the given args and returns a |
1210 | /// `unique_ptr<T[]>` which owns the object. |
1211 | /// |
1212 | /// \param n size of the new array. |
1213 | /// |
1214 | /// Example: |
1215 | /// |
1216 | /// auto p = make_unique<int[]>(2); // value-initializes the array with 0's. |
1217 | template <class T> |
1218 | typename std::enable_if<std::is_array<T>::value && std::extent<T>::value == 0, |
1219 | std::unique_ptr<T>>::type |
1220 | make_unique(size_t n) { |
1221 | return std::unique_ptr<T>(new typename std::remove_extent<T>::type[n]()); |
1222 | } |
1223 | |
1224 | /// This function isn't used and is only here to provide better compile errors. |
1225 | template <class T, class... Args> |
1226 | typename std::enable_if<std::extent<T>::value != 0>::type |
1227 | make_unique(Args &&...) = delete; |
1228 | |
1229 | struct FreeDeleter { |
1230 | void operator()(void* v) { |
1231 | ::free(v); |
1232 | } |
1233 | }; |
1234 | |
1235 | template<typename First, typename Second> |
1236 | struct pair_hash { |
1237 | size_t operator()(const std::pair<First, Second> &P) const { |
1238 | return std::hash<First>()(P.first) * 31 + std::hash<Second>()(P.second); |
1239 | } |
1240 | }; |
1241 | |
1242 | /// A functor like C++14's std::less<void> in its absence. |
1243 | struct less { |
1244 | template <typename A, typename B> bool operator()(A &&a, B &&b) const { |
1245 | return std::forward<A>(a) < std::forward<B>(b); |
1246 | } |
1247 | }; |
1248 | |
1249 | /// A functor like C++14's std::equal<void> in its absence. |
1250 | struct equal { |
1251 | template <typename A, typename B> bool operator()(A &&a, B &&b) const { |
1252 | return std::forward<A>(a) == std::forward<B>(b); |
1253 | } |
1254 | }; |
1255 | |
1256 | /// Binary functor that adapts to any other binary functor after dereferencing |
1257 | /// operands. |
1258 | template <typename T> struct deref { |
1259 | T func; |
1260 | |
1261 | // Could be further improved to cope with non-derivable functors and |
1262 | // non-binary functors (should be a variadic template member function |
1263 | // operator()). |
1264 | template <typename A, typename B> |
1265 | auto operator()(A &lhs, B &rhs) const -> decltype(func(*lhs, *rhs)) { |
1266 | assert(lhs)((lhs) ? static_cast<void> (0) : __assert_fail ("lhs", "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/ADT/STLExtras.h" , 1266, __PRETTY_FUNCTION__)); |
1267 | assert(rhs)((rhs) ? static_cast<void> (0) : __assert_fail ("rhs", "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/ADT/STLExtras.h" , 1267, __PRETTY_FUNCTION__)); |
1268 | return func(*lhs, *rhs); |
1269 | } |
1270 | }; |
1271 | |
1272 | namespace detail { |
1273 | |
1274 | template <typename R> class enumerator_iter; |
1275 | |
1276 | template <typename R> struct result_pair { |
1277 | friend class enumerator_iter<R>; |
1278 | |
1279 | result_pair() = default; |
1280 | result_pair(std::size_t Index, IterOfRange<R> Iter) |
1281 | : Index(Index), Iter(Iter) {} |
1282 | |
1283 | result_pair<R> &operator=(const result_pair<R> &Other) { |
1284 | Index = Other.Index; |
1285 | Iter = Other.Iter; |
1286 | return *this; |
1287 | } |
1288 | |
1289 | std::size_t index() const { return Index; } |
1290 | const ValueOfRange<R> &value() const { return *Iter; } |
1291 | ValueOfRange<R> &value() { return *Iter; } |
1292 | |
1293 | private: |
1294 | std::size_t Index = std::numeric_limits<std::size_t>::max(); |
1295 | IterOfRange<R> Iter; |
1296 | }; |
1297 | |
1298 | template <typename R> |
1299 | class enumerator_iter |
1300 | : public iterator_facade_base< |
1301 | enumerator_iter<R>, std::forward_iterator_tag, result_pair<R>, |
1302 | typename std::iterator_traits<IterOfRange<R>>::difference_type, |
1303 | typename std::iterator_traits<IterOfRange<R>>::pointer, |
1304 | typename std::iterator_traits<IterOfRange<R>>::reference> { |
1305 | using result_type = result_pair<R>; |
1306 | |
1307 | public: |
1308 | explicit enumerator_iter(IterOfRange<R> EndIter) |
1309 | : Result(std::numeric_limits<size_t>::max(), EndIter) {} |
1310 | |
1311 | enumerator_iter(std::size_t Index, IterOfRange<R> Iter) |
1312 | : Result(Index, Iter) {} |
1313 | |
1314 | result_type &operator*() { return Result; } |
1315 | const result_type &operator*() const { return Result; } |
1316 | |
1317 | enumerator_iter<R> &operator++() { |
1318 | assert(Result.Index != std::numeric_limits<size_t>::max())((Result.Index != std::numeric_limits<size_t>::max()) ? static_cast<void> (0) : __assert_fail ("Result.Index != std::numeric_limits<size_t>::max()" , "/build/llvm-toolchain-snapshot-8~svn345461/include/llvm/ADT/STLExtras.h" , 1318, __PRETTY_FUNCTION__)); |
1319 | ++Result.Iter; |
1320 | ++Result.Index; |
1321 | return *this; |
1322 | } |
1323 | |
1324 | bool operator==(const enumerator_iter<R> &RHS) const { |
1325 | // Don't compare indices here, only iterators. It's possible for an end |
1326 | // iterator to have different indices depending on whether it was created |
1327 | // by calling std::end() versus incrementing a valid iterator. |
1328 | return Result.Iter == RHS.Result.Iter; |
1329 | } |
1330 | |
1331 | enumerator_iter<R> &operator=(const enumerator_iter<R> &Other) { |
1332 | Result = Other.Result; |
1333 | return *this; |
1334 | } |
1335 | |
1336 | private: |
1337 | result_type Result; |
1338 | }; |
1339 | |
1340 | template <typename R> class enumerator { |
1341 | public: |
1342 | explicit enumerator(R &&Range) : TheRange(std::forward<R>(Range)) {} |
1343 | |
1344 | enumerator_iter<R> begin() { |
1345 | return enumerator_iter<R>(0, std::begin(TheRange)); |
1346 | } |
1347 | |
1348 | enumerator_iter<R> end() { |
1349 | return enumerator_iter<R>(std::end(TheRange)); |
1350 | } |
1351 | |
1352 | private: |
1353 | R TheRange; |
1354 | }; |
1355 | |
1356 | } // end namespace detail |
1357 | |
1358 | /// Given an input range, returns a new range whose values are are pair (A,B) |
1359 | /// such that A is the 0-based index of the item in the sequence, and B is |
1360 | /// the value from the original sequence. Example: |
1361 | /// |
1362 | /// std::vector<char> Items = {'A', 'B', 'C', 'D'}; |
1363 | /// for (auto X : enumerate(Items)) { |
1364 | /// printf("Item %d - %c\n", X.index(), X.value()); |
1365 | /// } |
1366 | /// |
1367 | /// Output: |
1368 | /// Item 0 - A |
1369 | /// Item 1 - B |
1370 | /// Item 2 - C |
1371 | /// Item 3 - D |
1372 | /// |
1373 | template <typename R> detail::enumerator<R> enumerate(R &&TheRange) { |
1374 | return detail::enumerator<R>(std::forward<R>(TheRange)); |
1375 | } |
1376 | |
1377 | namespace detail { |
1378 | |
1379 | template <typename F, typename Tuple, std::size_t... I> |
1380 | auto apply_tuple_impl(F &&f, Tuple &&t, index_sequence<I...>) |
1381 | -> decltype(std::forward<F>(f)(std::get<I>(std::forward<Tuple>(t))...)) { |
1382 | return std::forward<F>(f)(std::get<I>(std::forward<Tuple>(t))...); |
1383 | } |
1384 | |
1385 | } // end namespace detail |
1386 | |
1387 | /// Given an input tuple (a1, a2, ..., an), pass the arguments of the |
1388 | /// tuple variadically to f as if by calling f(a1, a2, ..., an) and |
1389 | /// return the result. |
1390 | template <typename F, typename Tuple> |
1391 | auto apply_tuple(F &&f, Tuple &&t) -> decltype(detail::apply_tuple_impl( |
1392 | std::forward<F>(f), std::forward<Tuple>(t), |
1393 | build_index_impl< |
1394 | std::tuple_size<typename std::decay<Tuple>::type>::value>{})) { |
1395 | using Indices = build_index_impl< |
1396 | std::tuple_size<typename std::decay<Tuple>::type>::value>; |
1397 | |
1398 | return detail::apply_tuple_impl(std::forward<F>(f), std::forward<Tuple>(t), |
1399 | Indices{}); |
1400 | } |
1401 | |
1402 | } // end namespace llvm |
1403 | |
1404 | #endif // LLVM_ADT_STLEXTRAS_H |