1ee3c74fbSChris Lattner //===- FileCheck.cpp - Check that File's Contents match what is expected --===//
2ee3c74fbSChris Lattner //
3ee3c74fbSChris Lattner //                     The LLVM Compiler Infrastructure
4ee3c74fbSChris Lattner //
5ee3c74fbSChris Lattner // This file is distributed under the University of Illinois Open Source
6ee3c74fbSChris Lattner // License. See LICENSE.TXT for details.
7ee3c74fbSChris Lattner //
8ee3c74fbSChris Lattner //===----------------------------------------------------------------------===//
9ee3c74fbSChris Lattner //
10ee3c74fbSChris Lattner // FileCheck does a line-by line check of a file that validates whether it
11ee3c74fbSChris Lattner // contains the expected content.  This is useful for regression tests etc.
12ee3c74fbSChris Lattner //
13ee3c74fbSChris Lattner // This program exits with an error status of 2 on error, exit status of 0 if
14ee3c74fbSChris Lattner // the file matched the expected contents, and exit status of 1 if it did not
15ee3c74fbSChris Lattner // contain the expected contents.
16ee3c74fbSChris Lattner //
17ee3c74fbSChris Lattner //===----------------------------------------------------------------------===//
18ee3c74fbSChris Lattner 
19ee3c74fbSChris Lattner #include "llvm/Support/CommandLine.h"
20ee3c74fbSChris Lattner #include "llvm/Support/MemoryBuffer.h"
21ee3c74fbSChris Lattner #include "llvm/Support/PrettyStackTrace.h"
22ee3c74fbSChris Lattner #include "llvm/Support/SourceMgr.h"
23ee3c74fbSChris Lattner #include "llvm/Support/raw_ostream.h"
24ee3c74fbSChris Lattner #include "llvm/System/Signals.h"
25ee3c74fbSChris Lattner using namespace llvm;
26ee3c74fbSChris Lattner 
27ee3c74fbSChris Lattner static cl::opt<std::string>
28ee3c74fbSChris Lattner CheckFilename(cl::Positional, cl::desc("<check-file>"), cl::Required);
29ee3c74fbSChris Lattner 
30ee3c74fbSChris Lattner static cl::opt<std::string>
31ee3c74fbSChris Lattner InputFilename("input-file", cl::desc("File to check (defaults to stdin)"),
32ee3c74fbSChris Lattner               cl::init("-"), cl::value_desc("filename"));
33ee3c74fbSChris Lattner 
34ee3c74fbSChris Lattner static cl::opt<std::string>
35ee3c74fbSChris Lattner CheckPrefix("check-prefix", cl::init("CHECK"),
36ee3c74fbSChris Lattner             cl::desc("Prefix to use from check file (defaults to 'CHECK')"));
37ee3c74fbSChris Lattner 
382c3e5cdfSChris Lattner static cl::opt<bool>
392c3e5cdfSChris Lattner NoCanonicalizeWhiteSpace("strict-whitespace",
402c3e5cdfSChris Lattner               cl::desc("Do not treat all horizontal whitespace as equivalent"));
412c3e5cdfSChris Lattner 
4226cccfe1SChris Lattner /// CheckString - This is a check that we found in the input file.
4326cccfe1SChris Lattner struct CheckString {
4426cccfe1SChris Lattner   /// Str - The string to match.
4526cccfe1SChris Lattner   std::string Str;
4626cccfe1SChris Lattner 
4726cccfe1SChris Lattner   /// Loc - The location in the match file that the check string was specified.
4826cccfe1SChris Lattner   SMLoc Loc;
4926cccfe1SChris Lattner 
5026cccfe1SChris Lattner   CheckString(const std::string &S, SMLoc L) : Str(S), Loc(L) {}
5126cccfe1SChris Lattner };
5226cccfe1SChris Lattner 
53ee3c74fbSChris Lattner 
546a7b917eSChris Lattner /// FindFixedStringInBuffer - This works like strstr, except for two things:
556a7b917eSChris Lattner /// 1) it handles 'nul' characters in memory buffers.  2) it returns the end of
566a7b917eSChris Lattner /// the memory buffer on match failure instead of null.
576a7b917eSChris Lattner static const char *FindFixedStringInBuffer(StringRef Str, const char *CurPtr,
58ee3c74fbSChris Lattner                                            const MemoryBuffer &MB) {
596a7b917eSChris Lattner   assert(!Str.empty() && "Can't find an empty string");
606a7b917eSChris Lattner   const char *BufEnd = MB.getBufferEnd();
61ee3c74fbSChris Lattner 
626a7b917eSChris Lattner   while (1) {
636a7b917eSChris Lattner     // Scan for the first character in the match string.
646a7b917eSChris Lattner     CurPtr = (char*)memchr(CurPtr, Str[0], BufEnd-CurPtr);
65ee3c74fbSChris Lattner 
666a7b917eSChris Lattner     // If we didn't find the first character of the string, then we failed to
676a7b917eSChris Lattner     // match.
686a7b917eSChris Lattner     if (CurPtr == 0) return BufEnd;
69ee3c74fbSChris Lattner 
706a7b917eSChris Lattner     // If the match string is one character, then we win.
716a7b917eSChris Lattner     if (Str.size() == 1) return CurPtr;
726a7b917eSChris Lattner 
736a7b917eSChris Lattner     // Otherwise, verify that the rest of the string matches.
746a7b917eSChris Lattner     if (Str.size() <= unsigned(BufEnd-CurPtr) &&
756a7b917eSChris Lattner         memcmp(CurPtr+1, Str.data()+1, Str.size()-1) == 0)
766a7b917eSChris Lattner       return CurPtr;
776a7b917eSChris Lattner 
786a7b917eSChris Lattner     // If not, advance past this character and try again.
796a7b917eSChris Lattner     ++CurPtr;
806a7b917eSChris Lattner   }
81ee3c74fbSChris Lattner }
82ee3c74fbSChris Lattner 
83ee3c74fbSChris Lattner /// ReadCheckFile - Read the check file, which specifies the sequence of
84ee3c74fbSChris Lattner /// expected strings.  The strings are added to the CheckStrings vector.
85ee3c74fbSChris Lattner static bool ReadCheckFile(SourceMgr &SM,
8626cccfe1SChris Lattner                           std::vector<CheckString> &CheckStrings) {
87ee3c74fbSChris Lattner   // Open the check file, and tell SourceMgr about it.
88ee3c74fbSChris Lattner   std::string ErrorStr;
89ee3c74fbSChris Lattner   MemoryBuffer *F =
90ee3c74fbSChris Lattner     MemoryBuffer::getFileOrSTDIN(CheckFilename.c_str(), &ErrorStr);
91ee3c74fbSChris Lattner   if (F == 0) {
92ee3c74fbSChris Lattner     errs() << "Could not open check file '" << CheckFilename << "': "
93ee3c74fbSChris Lattner            << ErrorStr << '\n';
94ee3c74fbSChris Lattner     return true;
95ee3c74fbSChris Lattner   }
96ee3c74fbSChris Lattner   SM.AddNewSourceBuffer(F, SMLoc());
97ee3c74fbSChris Lattner 
98*10f10cedSChris Lattner   // Find all instances of CheckPrefix followed by : in the file.
99ee3c74fbSChris Lattner   const char *CurPtr = F->getBufferStart(), *BufferEnd = F->getBufferEnd();
100ee3c74fbSChris Lattner 
101ee3c74fbSChris Lattner   while (1) {
102ee3c74fbSChris Lattner     // See if Prefix occurs in the memory buffer.
103*10f10cedSChris Lattner     const char *Ptr = FindFixedStringInBuffer(CheckPrefix, CurPtr, *F);
104ee3c74fbSChris Lattner 
105ee3c74fbSChris Lattner     // If we didn't find a match, we're done.
106ee3c74fbSChris Lattner     if (Ptr == BufferEnd)
107ee3c74fbSChris Lattner       break;
108ee3c74fbSChris Lattner 
109*10f10cedSChris Lattner     // Verify that the : is present after the prefix.
110*10f10cedSChris Lattner     if (Ptr[CheckPrefix.size()] != ':') {
111*10f10cedSChris Lattner       CurPtr = Ptr+1;
112*10f10cedSChris Lattner       continue;
113*10f10cedSChris Lattner     }
114*10f10cedSChris Lattner 
115ee3c74fbSChris Lattner     // Okay, we found the prefix, yay.  Remember the rest of the line, but
116ee3c74fbSChris Lattner     // ignore leading and trailing whitespace.
117*10f10cedSChris Lattner     Ptr += CheckPrefix.size()+1;
118*10f10cedSChris Lattner 
119ee3c74fbSChris Lattner     while (*Ptr == ' ' || *Ptr == '\t')
120ee3c74fbSChris Lattner       ++Ptr;
121ee3c74fbSChris Lattner 
122ee3c74fbSChris Lattner     // Scan ahead to the end of line.
123ee3c74fbSChris Lattner     CurPtr = Ptr;
124ee3c74fbSChris Lattner     while (CurPtr != BufferEnd && *CurPtr != '\n' && *CurPtr != '\r')
125ee3c74fbSChris Lattner       ++CurPtr;
126ee3c74fbSChris Lattner 
127ee3c74fbSChris Lattner     // Ignore trailing whitespace.
128ee3c74fbSChris Lattner     while (CurPtr[-1] == ' ' || CurPtr[-1] == '\t')
129ee3c74fbSChris Lattner       --CurPtr;
130ee3c74fbSChris Lattner 
131ee3c74fbSChris Lattner     // Check that there is something on the line.
132ee3c74fbSChris Lattner     if (Ptr >= CurPtr) {
133ee3c74fbSChris Lattner       SM.PrintMessage(SMLoc::getFromPointer(CurPtr),
134*10f10cedSChris Lattner                       "found empty check string with prefix '"+CheckPrefix+":'",
135ee3c74fbSChris Lattner                       "error");
136ee3c74fbSChris Lattner       return true;
137ee3c74fbSChris Lattner     }
138ee3c74fbSChris Lattner 
139ee3c74fbSChris Lattner     // Okay, add the string we captured to the output vector and move on.
14026cccfe1SChris Lattner     CheckStrings.push_back(CheckString(std::string(Ptr, CurPtr),
141ee3c74fbSChris Lattner                                        SMLoc::getFromPointer(Ptr)));
142ee3c74fbSChris Lattner   }
143ee3c74fbSChris Lattner 
144ee3c74fbSChris Lattner   if (CheckStrings.empty()) {
145*10f10cedSChris Lattner     errs() << "error: no check strings found with prefix '" << CheckPrefix
146*10f10cedSChris Lattner            << ":'\n";
147ee3c74fbSChris Lattner     return true;
148ee3c74fbSChris Lattner   }
149ee3c74fbSChris Lattner 
150ee3c74fbSChris Lattner   return false;
151ee3c74fbSChris Lattner }
152ee3c74fbSChris Lattner 
1532c3e5cdfSChris Lattner // CanonicalizeCheckStrings - Replace all sequences of horizontal whitespace in
1542c3e5cdfSChris Lattner // the check strings with a single space.
15526cccfe1SChris Lattner static void CanonicalizeCheckStrings(std::vector<CheckString> &CheckStrings) {
1562c3e5cdfSChris Lattner   for (unsigned i = 0, e = CheckStrings.size(); i != e; ++i) {
15726cccfe1SChris Lattner     std::string &Str = CheckStrings[i].Str;
1582c3e5cdfSChris Lattner 
1592c3e5cdfSChris Lattner     for (unsigned C = 0; C != Str.size(); ++C) {
1602c3e5cdfSChris Lattner       // If C is not a horizontal whitespace, skip it.
1612c3e5cdfSChris Lattner       if (Str[C] != ' ' && Str[C] != '\t')
1622c3e5cdfSChris Lattner         continue;
1632c3e5cdfSChris Lattner 
1642c3e5cdfSChris Lattner       // Replace the character with space, then remove any other space
1652c3e5cdfSChris Lattner       // characters after it.
1662c3e5cdfSChris Lattner       Str[C] = ' ';
1672c3e5cdfSChris Lattner 
1682c3e5cdfSChris Lattner       while (C+1 != Str.size() &&
1692c3e5cdfSChris Lattner              (Str[C+1] == ' ' || Str[C+1] == '\t'))
1702c3e5cdfSChris Lattner         Str.erase(Str.begin()+C+1);
1712c3e5cdfSChris Lattner     }
1722c3e5cdfSChris Lattner   }
1732c3e5cdfSChris Lattner }
1742c3e5cdfSChris Lattner 
1752c3e5cdfSChris Lattner /// CanonicalizeInputFile - Remove duplicate horizontal space from the specified
1762c3e5cdfSChris Lattner /// memory buffer, free it, and return a new one.
1772c3e5cdfSChris Lattner static MemoryBuffer *CanonicalizeInputFile(MemoryBuffer *MB) {
1786eca7ab9SDaniel Dunbar   SmallVector<char, 16> NewFile;
1792c3e5cdfSChris Lattner   NewFile.reserve(MB->getBufferSize());
1802c3e5cdfSChris Lattner 
1812c3e5cdfSChris Lattner   for (const char *Ptr = MB->getBufferStart(), *End = MB->getBufferEnd();
1822c3e5cdfSChris Lattner        Ptr != End; ++Ptr) {
1832c3e5cdfSChris Lattner     // If C is not a horizontal whitespace, skip it.
1842c3e5cdfSChris Lattner     if (*Ptr != ' ' && *Ptr != '\t') {
1852c3e5cdfSChris Lattner       NewFile.push_back(*Ptr);
1862c3e5cdfSChris Lattner       continue;
1872c3e5cdfSChris Lattner     }
1882c3e5cdfSChris Lattner 
1892c3e5cdfSChris Lattner     // Otherwise, add one space and advance over neighboring space.
1902c3e5cdfSChris Lattner     NewFile.push_back(' ');
1912c3e5cdfSChris Lattner     while (Ptr+1 != End &&
1922c3e5cdfSChris Lattner            (Ptr[1] == ' ' || Ptr[1] == '\t'))
1932c3e5cdfSChris Lattner       ++Ptr;
1942c3e5cdfSChris Lattner   }
1952c3e5cdfSChris Lattner 
1962c3e5cdfSChris Lattner   // Free the old buffer and return a new one.
1972c3e5cdfSChris Lattner   MemoryBuffer *MB2 =
1986eca7ab9SDaniel Dunbar     MemoryBuffer::getMemBufferCopy(NewFile.data(),
1996eca7ab9SDaniel Dunbar                                    NewFile.data() + NewFile.size(),
2002c3e5cdfSChris Lattner                                    MB->getBufferIdentifier());
2012c3e5cdfSChris Lattner 
2022c3e5cdfSChris Lattner   delete MB;
2032c3e5cdfSChris Lattner   return MB2;
2042c3e5cdfSChris Lattner }
2052c3e5cdfSChris Lattner 
206ee3c74fbSChris Lattner 
207ee3c74fbSChris Lattner int main(int argc, char **argv) {
208ee3c74fbSChris Lattner   sys::PrintStackTraceOnErrorSignal();
209ee3c74fbSChris Lattner   PrettyStackTraceProgram X(argc, argv);
210ee3c74fbSChris Lattner   cl::ParseCommandLineOptions(argc, argv);
211ee3c74fbSChris Lattner 
212ee3c74fbSChris Lattner   SourceMgr SM;
213ee3c74fbSChris Lattner 
214ee3c74fbSChris Lattner   // Read the expected strings from the check file.
21526cccfe1SChris Lattner   std::vector<CheckString> CheckStrings;
216ee3c74fbSChris Lattner   if (ReadCheckFile(SM, CheckStrings))
217ee3c74fbSChris Lattner     return 2;
218ee3c74fbSChris Lattner 
2192c3e5cdfSChris Lattner   // Remove duplicate spaces in the check strings if requested.
2202c3e5cdfSChris Lattner   if (!NoCanonicalizeWhiteSpace)
2212c3e5cdfSChris Lattner     CanonicalizeCheckStrings(CheckStrings);
2222c3e5cdfSChris Lattner 
223ee3c74fbSChris Lattner   // Open the file to check and add it to SourceMgr.
224ee3c74fbSChris Lattner   std::string ErrorStr;
225ee3c74fbSChris Lattner   MemoryBuffer *F =
226ee3c74fbSChris Lattner     MemoryBuffer::getFileOrSTDIN(InputFilename.c_str(), &ErrorStr);
227ee3c74fbSChris Lattner   if (F == 0) {
228ee3c74fbSChris Lattner     errs() << "Could not open input file '" << InputFilename << "': "
229ee3c74fbSChris Lattner            << ErrorStr << '\n';
230ee3c74fbSChris Lattner     return true;
231ee3c74fbSChris Lattner   }
2322c3e5cdfSChris Lattner 
2332c3e5cdfSChris Lattner   // Remove duplicate spaces in the input file if requested.
2342c3e5cdfSChris Lattner   if (!NoCanonicalizeWhiteSpace)
2352c3e5cdfSChris Lattner     F = CanonicalizeInputFile(F);
2362c3e5cdfSChris Lattner 
237ee3c74fbSChris Lattner   SM.AddNewSourceBuffer(F, SMLoc());
238ee3c74fbSChris Lattner 
239ee3c74fbSChris Lattner   // Check that we have all of the expected strings, in order, in the input
240ee3c74fbSChris Lattner   // file.
241ee3c74fbSChris Lattner   const char *CurPtr = F->getBufferStart(), *BufferEnd = F->getBufferEnd();
242ee3c74fbSChris Lattner 
243ee3c74fbSChris Lattner   for (unsigned StrNo = 0, e = CheckStrings.size(); StrNo != e; ++StrNo) {
24426cccfe1SChris Lattner     const CheckString &CheckStr = CheckStrings[StrNo];
245ee3c74fbSChris Lattner 
246ee3c74fbSChris Lattner     // Find StrNo in the file.
2476a7b917eSChris Lattner     const char *Ptr = FindFixedStringInBuffer(CheckStr.Str, CurPtr, *F);
248ee3c74fbSChris Lattner 
249ee3c74fbSChris Lattner     // If we found a match, we're done, move on.
250ee3c74fbSChris Lattner     if (Ptr != BufferEnd) {
25126cccfe1SChris Lattner       CurPtr = Ptr + CheckStr.Str.size();
252ee3c74fbSChris Lattner       continue;
253ee3c74fbSChris Lattner     }
254ee3c74fbSChris Lattner 
255ee3c74fbSChris Lattner     // Otherwise, we have an error, emit an error message.
25626cccfe1SChris Lattner     SM.PrintMessage(CheckStr.Loc, "expected string not found in input",
257ee3c74fbSChris Lattner                     "error");
2580029c0e5SChris Lattner 
2598bda49a8SDaniel Dunbar     // Print the "scanning from here" line.  If the current position is at the
2608bda49a8SDaniel Dunbar     // end of a line, advance to the start of the next line.
2610029c0e5SChris Lattner     const char *Scan = CurPtr;
2620029c0e5SChris Lattner     while (Scan != BufferEnd &&
2630029c0e5SChris Lattner            (*Scan == ' ' || *Scan == '\t'))
2640029c0e5SChris Lattner       ++Scan;
2650029c0e5SChris Lattner     if (*Scan == '\n' || *Scan == '\r')
2660029c0e5SChris Lattner       CurPtr = Scan+1;
2670029c0e5SChris Lattner 
2680029c0e5SChris Lattner 
269ee3c74fbSChris Lattner     SM.PrintMessage(SMLoc::getFromPointer(CurPtr), "scanning from here",
270ee3c74fbSChris Lattner                     "note");
271aedd8185SChris Lattner     return 1;
272ee3c74fbSChris Lattner   }
273ee3c74fbSChris Lattner 
274ee3c74fbSChris Lattner   return 0;
275ee3c74fbSChris Lattner }
276