YAMLIO: Encode ambiguous hex strings explicitly
[oota-llvm.git] / lib / Support / YAMLTraits.cpp
1 //===- lib/Support/YAMLTraits.cpp -----------------------------------------===//
2 //
3 //                             The LLVM Linker
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 "llvm/Support/YAMLTraits.h"
11 #include "llvm/ADT/Twine.h"
12 #include "llvm/Support/Casting.h"
13 #include "llvm/Support/ErrorHandling.h"
14 #include "llvm/Support/Format.h"
15 #include "llvm/Support/YAMLParser.h"
16 #include "llvm/Support/raw_ostream.h"
17 #include <cctype>
18 #include <cstring>
19 using namespace llvm;
20 using namespace yaml;
21
22 //===----------------------------------------------------------------------===//
23 //  IO
24 //===----------------------------------------------------------------------===//
25
26 IO::IO(void *Context) : Ctxt(Context) {
27 }
28
29 IO::~IO() {
30 }
31
32 void *IO::getContext() {
33   return Ctxt;
34 }
35
36 void IO::setContext(void *Context) {
37   Ctxt = Context;
38 }
39
40 //===----------------------------------------------------------------------===//
41 //  Input
42 //===----------------------------------------------------------------------===//
43
44 Input::Input(StringRef InputContent,
45              void *Ctxt,
46              SourceMgr::DiagHandlerTy DiagHandler,
47              void *DiagHandlerCtxt)
48   : IO(Ctxt),
49     Strm(new Stream(InputContent, SrcMgr)),
50     CurrentNode(nullptr) {
51   if (DiagHandler)
52     SrcMgr.setDiagHandler(DiagHandler, DiagHandlerCtxt);
53   DocIterator = Strm->begin();
54 }
55
56 Input::~Input() {
57 }
58
59 error_code Input::error() {
60   return EC;
61 }
62
63 // Pin the vtables to this file.
64 void Input::HNode::anchor() {}
65 void Input::EmptyHNode::anchor() {}
66 void Input::ScalarHNode::anchor() {}
67
68 bool Input::outputting() {
69   return false;
70 }
71
72 bool Input::setCurrentDocument() {
73   if (DocIterator != Strm->end()) {
74     Node *N = DocIterator->getRoot();
75     if (!N) {
76       assert(Strm->failed() && "Root is NULL iff parsing failed");
77       EC = make_error_code(errc::invalid_argument);
78       return false;
79     }
80
81     if (isa<NullNode>(N)) {
82       // Empty files are allowed and ignored
83       ++DocIterator;
84       return setCurrentDocument();
85     }
86     TopNode.reset(this->createHNodes(N));
87     CurrentNode = TopNode.get();
88     return true;
89   }
90   return false;
91 }
92
93 void Input::nextDocument() {
94   ++DocIterator;
95 }
96
97 bool Input::mapTag(StringRef Tag, bool Default) {
98   std::string foundTag = CurrentNode->_node->getVerbatimTag();
99   if (foundTag.empty()) {
100     // If no tag found and 'Tag' is the default, say it was found.
101     return Default;
102   }
103   // Return true iff found tag matches supplied tag.
104   return Tag.equals(foundTag);
105 }
106
107 void Input::beginMapping() {
108   if (EC)
109     return;
110   // CurrentNode can be null if the document is empty.
111   MapHNode *MN = dyn_cast_or_null<MapHNode>(CurrentNode);
112   if (MN) {
113     MN->ValidKeys.clear();
114   }
115 }
116
117 bool Input::preflightKey(const char *Key, bool Required, bool, bool &UseDefault,
118                          void *&SaveInfo) {
119   UseDefault = false;
120   if (EC)
121     return false;
122
123   // CurrentNode is null for empty documents, which is an error in case required
124   // nodes are present.
125   if (!CurrentNode) {
126     if (Required)
127       EC = make_error_code(errc::invalid_argument);
128     return false;
129   }
130
131   MapHNode *MN = dyn_cast<MapHNode>(CurrentNode);
132   if (!MN) {
133     setError(CurrentNode, "not a mapping");
134     return false;
135   }
136   MN->ValidKeys.push_back(Key);
137   HNode *Value = MN->Mapping[Key];
138   if (!Value) {
139     if (Required)
140       setError(CurrentNode, Twine("missing required key '") + Key + "'");
141     else
142       UseDefault = true;
143     return false;
144   }
145   SaveInfo = CurrentNode;
146   CurrentNode = Value;
147   return true;
148 }
149
150 void Input::postflightKey(void *saveInfo) {
151   CurrentNode = reinterpret_cast<HNode *>(saveInfo);
152 }
153
154 void Input::endMapping() {
155   if (EC)
156     return;
157   // CurrentNode can be null if the document is empty.
158   MapHNode *MN = dyn_cast_or_null<MapHNode>(CurrentNode);
159   if (!MN)
160     return;
161   for (MapHNode::NameToNode::iterator i = MN->Mapping.begin(),
162        End = MN->Mapping.end(); i != End; ++i) {
163     if (!MN->isValidKey(i->first())) {
164       setError(i->second, Twine("unknown key '") + i->first() + "'");
165       break;
166     }
167   }
168 }
169
170 unsigned Input::beginSequence() {
171   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
172     return SQ->Entries.size();
173   }
174   return 0;
175 }
176
177 void Input::endSequence() {
178 }
179
180 bool Input::preflightElement(unsigned Index, void *&SaveInfo) {
181   if (EC)
182     return false;
183   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
184     SaveInfo = CurrentNode;
185     CurrentNode = SQ->Entries[Index];
186     return true;
187   }
188   return false;
189 }
190
191 void Input::postflightElement(void *SaveInfo) {
192   CurrentNode = reinterpret_cast<HNode *>(SaveInfo);
193 }
194
195 unsigned Input::beginFlowSequence() {
196   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
197     return SQ->Entries.size();
198   }
199   return 0;
200 }
201
202 bool Input::preflightFlowElement(unsigned index, void *&SaveInfo) {
203   if (EC)
204     return false;
205   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
206     SaveInfo = CurrentNode;
207     CurrentNode = SQ->Entries[index];
208     return true;
209   }
210   return false;
211 }
212
213 void Input::postflightFlowElement(void *SaveInfo) {
214   CurrentNode = reinterpret_cast<HNode *>(SaveInfo);
215 }
216
217 void Input::endFlowSequence() {
218 }
219
220 void Input::beginEnumScalar() {
221   ScalarMatchFound = false;
222 }
223
224 bool Input::matchEnumScalar(const char *Str, bool) {
225   if (ScalarMatchFound)
226     return false;
227   if (ScalarHNode *SN = dyn_cast<ScalarHNode>(CurrentNode)) {
228     if (SN->value().equals(Str)) {
229       ScalarMatchFound = true;
230       return true;
231     }
232   }
233   return false;
234 }
235
236 void Input::endEnumScalar() {
237   if (!ScalarMatchFound) {
238     setError(CurrentNode, "unknown enumerated scalar");
239   }
240 }
241
242 bool Input::beginBitSetScalar(bool &DoClear) {
243   BitValuesUsed.clear();
244   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
245     BitValuesUsed.insert(BitValuesUsed.begin(), SQ->Entries.size(), false);
246   } else {
247     setError(CurrentNode, "expected sequence of bit values");
248   }
249   DoClear = true;
250   return true;
251 }
252
253 bool Input::bitSetMatch(const char *Str, bool) {
254   if (EC)
255     return false;
256   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
257     unsigned Index = 0;
258     for (std::vector<HNode *>::iterator i = SQ->Entries.begin(),
259          End = SQ->Entries.end(); i != End; ++i) {
260       if (ScalarHNode *SN = dyn_cast<ScalarHNode>(*i)) {
261         if (SN->value().equals(Str)) {
262           BitValuesUsed[Index] = true;
263           return true;
264         }
265       } else {
266         setError(CurrentNode, "unexpected scalar in sequence of bit values");
267       }
268       ++Index;
269     }
270   } else {
271     setError(CurrentNode, "expected sequence of bit values");
272   }
273   return false;
274 }
275
276 void Input::endBitSetScalar() {
277   if (EC)
278     return;
279   if (SequenceHNode *SQ = dyn_cast<SequenceHNode>(CurrentNode)) {
280     assert(BitValuesUsed.size() == SQ->Entries.size());
281     for (unsigned i = 0; i < SQ->Entries.size(); ++i) {
282       if (!BitValuesUsed[i]) {
283         setError(SQ->Entries[i], "unknown bit value");
284         return;
285       }
286     }
287   }
288 }
289
290 void Input::scalarString(StringRef &S) {
291   if (ScalarHNode *SN = dyn_cast<ScalarHNode>(CurrentNode)) {
292     S = SN->value();
293   } else {
294     setError(CurrentNode, "unexpected scalar");
295   }
296 }
297
298 void Input::setError(HNode *hnode, const Twine &message) {
299   assert(hnode && "HNode must not be NULL");
300   this->setError(hnode->_node, message);
301 }
302
303 void Input::setError(Node *node, const Twine &message) {
304   Strm->printError(node, message);
305   EC = make_error_code(errc::invalid_argument);
306 }
307
308 Input::HNode *Input::createHNodes(Node *N) {
309   SmallString<128> StringStorage;
310   if (ScalarNode *SN = dyn_cast<ScalarNode>(N)) {
311     StringRef KeyStr = SN->getValue(StringStorage);
312     if (!StringStorage.empty()) {
313       // Copy string to permanent storage
314       unsigned Len = StringStorage.size();
315       char *Buf = StringAllocator.Allocate<char>(Len);
316       memcpy(Buf, &StringStorage[0], Len);
317       KeyStr = StringRef(Buf, Len);
318     }
319     return new ScalarHNode(N, KeyStr);
320   } else if (SequenceNode *SQ = dyn_cast<SequenceNode>(N)) {
321     SequenceHNode *SQHNode = new SequenceHNode(N);
322     for (SequenceNode::iterator i = SQ->begin(), End = SQ->end(); i != End;
323          ++i) {
324       HNode *Entry = this->createHNodes(i);
325       if (EC)
326         break;
327       SQHNode->Entries.push_back(Entry);
328     }
329     return SQHNode;
330   } else if (MappingNode *Map = dyn_cast<MappingNode>(N)) {
331     MapHNode *mapHNode = new MapHNode(N);
332     for (MappingNode::iterator i = Map->begin(), End = Map->end(); i != End;
333          ++i) {
334       ScalarNode *KeyScalar = dyn_cast<ScalarNode>(i->getKey());
335       StringStorage.clear();
336       StringRef KeyStr = KeyScalar->getValue(StringStorage);
337       if (!StringStorage.empty()) {
338         // Copy string to permanent storage
339         unsigned Len = StringStorage.size();
340         char *Buf = StringAllocator.Allocate<char>(Len);
341         memcpy(Buf, &StringStorage[0], Len);
342         KeyStr = StringRef(Buf, Len);
343       }
344       HNode *ValueHNode = this->createHNodes(i->getValue());
345       if (EC)
346         break;
347       mapHNode->Mapping[KeyStr] = ValueHNode;
348     }
349     return mapHNode;
350   } else if (isa<NullNode>(N)) {
351     return new EmptyHNode(N);
352   } else {
353     setError(N, "unknown node kind");
354     return nullptr;
355   }
356 }
357
358 bool Input::MapHNode::isValidKey(StringRef Key) {
359   for (SmallVectorImpl<const char *>::iterator i = ValidKeys.begin(),
360        End = ValidKeys.end(); i != End; ++i) {
361     if (Key.equals(*i))
362       return true;
363   }
364   return false;
365 }
366
367 void Input::setError(const Twine &Message) {
368   this->setError(CurrentNode, Message);
369 }
370
371 bool Input::canElideEmptySequence() {
372   return false;
373 }
374
375 Input::MapHNode::~MapHNode() {
376   for (MapHNode::NameToNode::iterator i = Mapping.begin(), End = Mapping.end();
377                                                                 i != End; ++i) {
378     delete i->second;
379   }
380 }
381
382 Input::SequenceHNode::~SequenceHNode() {
383   for (std::vector<HNode*>::iterator i = Entries.begin(), End = Entries.end();
384                                                                 i != End; ++i) {
385     delete *i;
386   }
387 }
388
389
390
391 //===----------------------------------------------------------------------===//
392 //  Output
393 //===----------------------------------------------------------------------===//
394
395 Output::Output(raw_ostream &yout, void *context)
396     : IO(context),
397       Out(yout),
398       Column(0),
399       ColumnAtFlowStart(0),
400       NeedBitValueComma(false),
401       NeedFlowSequenceComma(false),
402       EnumerationMatchFound(false),
403       NeedsNewLine(false) {
404 }
405
406 Output::~Output() {
407 }
408
409 bool Output::outputting() {
410   return true;
411 }
412
413 void Output::beginMapping() {
414   StateStack.push_back(inMapFirstKey);
415   NeedsNewLine = true;
416 }
417
418 bool Output::mapTag(StringRef Tag, bool Use) {
419   if (Use) {
420     this->output(" ");
421     this->output(Tag);
422   }
423   return Use;
424 }
425
426 void Output::endMapping() {
427   StateStack.pop_back();
428 }
429
430 bool Output::preflightKey(const char *Key, bool Required, bool SameAsDefault,
431                           bool &UseDefault, void *&) {
432   UseDefault = false;
433   if (Required || !SameAsDefault) {
434     this->newLineCheck();
435     this->paddedKey(Key);
436     return true;
437   }
438   return false;
439 }
440
441 void Output::postflightKey(void *) {
442   if (StateStack.back() == inMapFirstKey) {
443     StateStack.pop_back();
444     StateStack.push_back(inMapOtherKey);
445   }
446 }
447
448 void Output::beginDocuments() {
449   this->outputUpToEndOfLine("---");
450 }
451
452 bool Output::preflightDocument(unsigned index) {
453   if (index > 0)
454     this->outputUpToEndOfLine("\n---");
455   return true;
456 }
457
458 void Output::postflightDocument() {
459 }
460
461 void Output::endDocuments() {
462   output("\n...\n");
463 }
464
465 unsigned Output::beginSequence() {
466   StateStack.push_back(inSeq);
467   NeedsNewLine = true;
468   return 0;
469 }
470
471 void Output::endSequence() {
472   StateStack.pop_back();
473 }
474
475 bool Output::preflightElement(unsigned, void *&) {
476   return true;
477 }
478
479 void Output::postflightElement(void *) {
480 }
481
482 unsigned Output::beginFlowSequence() {
483   StateStack.push_back(inFlowSeq);
484   this->newLineCheck();
485   ColumnAtFlowStart = Column;
486   output("[ ");
487   NeedFlowSequenceComma = false;
488   return 0;
489 }
490
491 void Output::endFlowSequence() {
492   StateStack.pop_back();
493   this->outputUpToEndOfLine(" ]");
494 }
495
496 bool Output::preflightFlowElement(unsigned, void *&) {
497   if (NeedFlowSequenceComma)
498     output(", ");
499   if (Column > 70) {
500     output("\n");
501     for (int i = 0; i < ColumnAtFlowStart; ++i)
502       output(" ");
503     Column = ColumnAtFlowStart;
504     output("  ");
505   }
506   return true;
507 }
508
509 void Output::postflightFlowElement(void *) {
510   NeedFlowSequenceComma = true;
511 }
512
513 void Output::beginEnumScalar() {
514   EnumerationMatchFound = false;
515 }
516
517 bool Output::matchEnumScalar(const char *Str, bool Match) {
518   if (Match && !EnumerationMatchFound) {
519     this->newLineCheck();
520     this->outputUpToEndOfLine(Str);
521     EnumerationMatchFound = true;
522   }
523   return false;
524 }
525
526 void Output::endEnumScalar() {
527   if (!EnumerationMatchFound)
528     llvm_unreachable("bad runtime enum value");
529 }
530
531 bool Output::beginBitSetScalar(bool &DoClear) {
532   this->newLineCheck();
533   output("[ ");
534   NeedBitValueComma = false;
535   DoClear = false;
536   return true;
537 }
538
539 bool Output::bitSetMatch(const char *Str, bool Matches) {
540   if (Matches) {
541     if (NeedBitValueComma)
542       output(", ");
543     this->output(Str);
544     NeedBitValueComma = true;
545   }
546   return false;
547 }
548
549 void Output::endBitSetScalar() {
550   this->outputUpToEndOfLine(" ]");
551 }
552
553 void Output::scalarString(StringRef &S) {
554   const char ScalarSafeChars[] = "abcdefghijklmnopqrstuvwxyz"
555       "ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_-/^., \t";
556
557   this->newLineCheck();
558   if (S.empty()) {
559     // Print '' for the empty string because leaving the field empty is not
560     // allowed.
561     this->outputUpToEndOfLine("''");
562     return;
563   }
564   bool isOctalString = S.front() == '0' &&
565                        S.find_first_not_of('0') != StringRef::npos &&
566                        !S.startswith_lower("0x");
567   if (S.find_first_not_of(ScalarSafeChars) == StringRef::npos &&
568       !isspace(S.front()) && !isspace(S.back()) && !isOctalString) {
569     // If the string consists only of safe characters, print it out without
570     // quotes.
571     this->outputUpToEndOfLine(S);
572     return;
573   }
574   unsigned i = 0;
575   unsigned j = 0;
576   unsigned End = S.size();
577   output("'"); // Starting single quote.
578   const char *Base = S.data();
579   while (j < End) {
580     // Escape a single quote by doubling it.
581     if (S[j] == '\'') {
582       output(StringRef(&Base[i], j - i + 1));
583       output("'");
584       i = j + 1;
585     }
586     ++j;
587   }
588   output(StringRef(&Base[i], j - i));
589   this->outputUpToEndOfLine("'"); // Ending single quote.
590 }
591
592 void Output::setError(const Twine &message) {
593 }
594
595 bool Output::canElideEmptySequence() {
596   // Normally, with an optional key/value where the value is an empty sequence,
597   // the whole key/value can be not written.  But, that produces wrong yaml
598   // if the key/value is the only thing in the map and the map is used in
599   // a sequence.  This detects if the this sequence is the first key/value
600   // in map that itself is embedded in a sequnce.
601   if (StateStack.size() < 2)
602     return true;
603   if (StateStack.back() != inMapFirstKey)
604     return true;
605   return (StateStack[StateStack.size()-2] != inSeq);
606 }
607
608 void Output::output(StringRef s) {
609   Column += s.size();
610   Out << s;
611 }
612
613 void Output::outputUpToEndOfLine(StringRef s) {
614   this->output(s);
615   if (StateStack.empty() || StateStack.back() != inFlowSeq)
616     NeedsNewLine = true;
617 }
618
619 void Output::outputNewLine() {
620   Out << "\n";
621   Column = 0;
622 }
623
624 // if seq at top, indent as if map, then add "- "
625 // if seq in middle, use "- " if firstKey, else use "  "
626 //
627
628 void Output::newLineCheck() {
629   if (!NeedsNewLine)
630     return;
631   NeedsNewLine = false;
632
633   this->outputNewLine();
634
635   assert(StateStack.size() > 0);
636   unsigned Indent = StateStack.size() - 1;
637   bool OutputDash = false;
638
639   if (StateStack.back() == inSeq) {
640     OutputDash = true;
641   } else if ((StateStack.size() > 1) && (StateStack.back() == inMapFirstKey) &&
642              (StateStack[StateStack.size() - 2] == inSeq)) {
643     --Indent;
644     OutputDash = true;
645   }
646
647   for (unsigned i = 0; i < Indent; ++i) {
648     output("  ");
649   }
650   if (OutputDash) {
651     output("- ");
652   }
653
654 }
655
656 void Output::paddedKey(StringRef key) {
657   output(key);
658   output(":");
659   const char *spaces = "                ";
660   if (key.size() < strlen(spaces))
661     output(&spaces[key.size()]);
662   else
663     output(" ");
664 }
665
666 //===----------------------------------------------------------------------===//
667 //  traits for built-in types
668 //===----------------------------------------------------------------------===//
669
670 void ScalarTraits<bool>::output(const bool &Val, void *, raw_ostream &Out) {
671   Out << (Val ? "true" : "false");
672 }
673
674 StringRef ScalarTraits<bool>::input(StringRef Scalar, void *, bool &Val) {
675   if (Scalar.equals("true")) {
676     Val = true;
677     return StringRef();
678   } else if (Scalar.equals("false")) {
679     Val = false;
680     return StringRef();
681   }
682   return "invalid boolean";
683 }
684
685 void ScalarTraits<StringRef>::output(const StringRef &Val, void *,
686                                      raw_ostream &Out) {
687   Out << Val;
688 }
689
690 StringRef ScalarTraits<StringRef>::input(StringRef Scalar, void *,
691                                          StringRef &Val) {
692   Val = Scalar;
693   return StringRef();
694 }
695  
696 void ScalarTraits<std::string>::output(const std::string &Val, void *,
697                                      raw_ostream &Out) {
698   Out << Val;
699 }
700
701 StringRef ScalarTraits<std::string>::input(StringRef Scalar, void *,
702                                          std::string &Val) {
703   Val = Scalar.str();
704   return StringRef();
705 }
706
707 void ScalarTraits<uint8_t>::output(const uint8_t &Val, void *,
708                                    raw_ostream &Out) {
709   // use temp uin32_t because ostream thinks uint8_t is a character
710   uint32_t Num = Val;
711   Out << Num;
712 }
713
714 StringRef ScalarTraits<uint8_t>::input(StringRef Scalar, void *, uint8_t &Val) {
715   unsigned long long n;
716   if (getAsUnsignedInteger(Scalar, 0, n))
717     return "invalid number";
718   if (n > 0xFF)
719     return "out of range number";
720   Val = n;
721   return StringRef();
722 }
723
724 void ScalarTraits<uint16_t>::output(const uint16_t &Val, void *,
725                                     raw_ostream &Out) {
726   Out << Val;
727 }
728
729 StringRef ScalarTraits<uint16_t>::input(StringRef Scalar, void *,
730                                         uint16_t &Val) {
731   unsigned long long n;
732   if (getAsUnsignedInteger(Scalar, 0, n))
733     return "invalid number";
734   if (n > 0xFFFF)
735     return "out of range number";
736   Val = n;
737   return StringRef();
738 }
739
740 void ScalarTraits<uint32_t>::output(const uint32_t &Val, void *,
741                                     raw_ostream &Out) {
742   Out << Val;
743 }
744
745 StringRef ScalarTraits<uint32_t>::input(StringRef Scalar, void *,
746                                         uint32_t &Val) {
747   unsigned long long n;
748   if (getAsUnsignedInteger(Scalar, 0, n))
749     return "invalid number";
750   if (n > 0xFFFFFFFFUL)
751     return "out of range number";
752   Val = n;
753   return StringRef();
754 }
755
756 void ScalarTraits<uint64_t>::output(const uint64_t &Val, void *,
757                                     raw_ostream &Out) {
758   Out << Val;
759 }
760
761 StringRef ScalarTraits<uint64_t>::input(StringRef Scalar, void *,
762                                         uint64_t &Val) {
763   unsigned long long N;
764   if (getAsUnsignedInteger(Scalar, 0, N))
765     return "invalid number";
766   Val = N;
767   return StringRef();
768 }
769
770 void ScalarTraits<int8_t>::output(const int8_t &Val, void *, raw_ostream &Out) {
771   // use temp in32_t because ostream thinks int8_t is a character
772   int32_t Num = Val;
773   Out << Num;
774 }
775
776 StringRef ScalarTraits<int8_t>::input(StringRef Scalar, void *, int8_t &Val) {
777   long long N;
778   if (getAsSignedInteger(Scalar, 0, N))
779     return "invalid number";
780   if ((N > 127) || (N < -128))
781     return "out of range number";
782   Val = N;
783   return StringRef();
784 }
785
786 void ScalarTraits<int16_t>::output(const int16_t &Val, void *,
787                                    raw_ostream &Out) {
788   Out << Val;
789 }
790
791 StringRef ScalarTraits<int16_t>::input(StringRef Scalar, void *, int16_t &Val) {
792   long long N;
793   if (getAsSignedInteger(Scalar, 0, N))
794     return "invalid number";
795   if ((N > INT16_MAX) || (N < INT16_MIN))
796     return "out of range number";
797   Val = N;
798   return StringRef();
799 }
800
801 void ScalarTraits<int32_t>::output(const int32_t &Val, void *,
802                                    raw_ostream &Out) {
803   Out << Val;
804 }
805
806 StringRef ScalarTraits<int32_t>::input(StringRef Scalar, void *, int32_t &Val) {
807   long long N;
808   if (getAsSignedInteger(Scalar, 0, N))
809     return "invalid number";
810   if ((N > INT32_MAX) || (N < INT32_MIN))
811     return "out of range number";
812   Val = N;
813   return StringRef();
814 }
815
816 void ScalarTraits<int64_t>::output(const int64_t &Val, void *,
817                                    raw_ostream &Out) {
818   Out << Val;
819 }
820
821 StringRef ScalarTraits<int64_t>::input(StringRef Scalar, void *, int64_t &Val) {
822   long long N;
823   if (getAsSignedInteger(Scalar, 0, N))
824     return "invalid number";
825   Val = N;
826   return StringRef();
827 }
828
829 void ScalarTraits<double>::output(const double &Val, void *, raw_ostream &Out) {
830   Out << format("%g", Val);
831 }
832
833 StringRef ScalarTraits<double>::input(StringRef Scalar, void *, double &Val) {
834   SmallString<32> buff(Scalar.begin(), Scalar.end());
835   char *end;
836   Val = strtod(buff.c_str(), &end);
837   if (*end != '\0')
838     return "invalid floating point number";
839   return StringRef();
840 }
841
842 void ScalarTraits<float>::output(const float &Val, void *, raw_ostream &Out) {
843   Out << format("%g", Val);
844 }
845
846 StringRef ScalarTraits<float>::input(StringRef Scalar, void *, float &Val) {
847   SmallString<32> buff(Scalar.begin(), Scalar.end());
848   char *end;
849   Val = strtod(buff.c_str(), &end);
850   if (*end != '\0')
851     return "invalid floating point number";
852   return StringRef();
853 }
854
855 void ScalarTraits<Hex8>::output(const Hex8 &Val, void *, raw_ostream &Out) {
856   uint8_t Num = Val;
857   Out << format("0x%02X", Num);
858 }
859
860 StringRef ScalarTraits<Hex8>::input(StringRef Scalar, void *, Hex8 &Val) {
861   unsigned long long n;
862   if (getAsUnsignedInteger(Scalar, 0, n))
863     return "invalid hex8 number";
864   if (n > 0xFF)
865     return "out of range hex8 number";
866   Val = n;
867   return StringRef();
868 }
869
870 void ScalarTraits<Hex16>::output(const Hex16 &Val, void *, raw_ostream &Out) {
871   uint16_t Num = Val;
872   Out << format("0x%04X", Num);
873 }
874
875 StringRef ScalarTraits<Hex16>::input(StringRef Scalar, void *, Hex16 &Val) {
876   unsigned long long n;
877   if (getAsUnsignedInteger(Scalar, 0, n))
878     return "invalid hex16 number";
879   if (n > 0xFFFF)
880     return "out of range hex16 number";
881   Val = n;
882   return StringRef();
883 }
884
885 void ScalarTraits<Hex32>::output(const Hex32 &Val, void *, raw_ostream &Out) {
886   uint32_t Num = Val;
887   Out << format("0x%08X", Num);
888 }
889
890 StringRef ScalarTraits<Hex32>::input(StringRef Scalar, void *, Hex32 &Val) {
891   unsigned long long n;
892   if (getAsUnsignedInteger(Scalar, 0, n))
893     return "invalid hex32 number";
894   if (n > 0xFFFFFFFFUL)
895     return "out of range hex32 number";
896   Val = n;
897   return StringRef();
898 }
899
900 void ScalarTraits<Hex64>::output(const Hex64 &Val, void *, raw_ostream &Out) {
901   uint64_t Num = Val;
902   Out << format("0x%016llX", Num);
903 }
904
905 StringRef ScalarTraits<Hex64>::input(StringRef Scalar, void *, Hex64 &Val) {
906   unsigned long long Num;
907   if (getAsUnsignedInteger(Scalar, 0, Num))
908     return "invalid hex64 number";
909   Val = Num;
910   return StringRef();
911 }