5 //===----------------------------------------------------------------------===//
9 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
11 //===----------------------------------------------------------------------===//
23    1. Determines r, the subset of h that o depends on, directly or indirectly
24    2. Removes the files in h - r from the file system
36 void stop(char *errorMsg) {  in stop()  function
38   exit(1);  in stop()
72       stop("rstream.getBuf: Error opening file");  in getBuf()
76       stop("rstream.getBuf: Error reading file");  in getBuf()
113       i += s.size() + 1;  in makeDirectory()
121       stop("StringTable.init: Invalid symbol table");  in init()
122     if (_data[_length - 1]) {  in init()
124       data = new char[length = _length + 1];  in init()
131                length - sizeof(unsigned));  in init()
145       stop("StringTable: Invalid string table");  in StringTable()
149     f.read(strData + sizeof(unsigned), strSize - sizeof(unsigned));  in StringTable()
150     s = f.tellg() - s;  in StringTable()
152       stop("StringTable: Unexpected EOF");  in StringTable()
168         stop("StringTable: String too long");  in StringTable()
170         length += l + 1;  in StringTable()
172           stop("StringTable: Symbol table too long");  in StringTable()
183         directory.insert(make_pair(str, p - data));  in StringTable()
186         p += l + 1;  in StringTable()
193   // -- returns 0.
206         stop("StringTable::encode: String now found in string table");  in encode()
208       ((unsigned *)&r)[1] = (*it).second;  in encode()
213   // references an invalid position in the table--returns the empty string.
217       unsigned &p = ((unsigned *)&x)[1];  in decode()
219         stop("StringTable::decode: Invalid string table lookup");  in decode()
255     stop("computeExternalSymbols: Unexpected EOF 1");  in computeExternalSymbols()
259     stop("computeExternalSymbols: Unexpected data after string table");  in computeExternalSymbols()
264   defined->clear();  in computeExternalSymbols()
265   undefined->clear();  in computeExternalSymbols()
271       stop("computeExternalSymbols: Unexpected EOF 2");  in computeExternalSymbols()
274       stop("computeExternalSymbols: File read error");  in computeExternalSymbols()
282         defined->insert(stringTable.decode(e.name));  in computeExternalSymbols()
284         undefined->insert(stringTable.decode(e.name));  in computeExternalSymbols()
290 // with "__kmp_external_", writing back the file in-place
307     stop("hideSymbols: Unexpected EOF");  in hideSymbols()
311     stop("hideSymbols: Unexpected data after string table");  in hideSymbols()
319       stop("hideSymbols: Unexpected EOF");  in hideSymbols()
322       stop("hideSymbols: File read error");  in hideSymbols()
334     stop("hideSymbols: Error opening output file");  in hideSymbols()
352       stop("hideSymbols: Unexpected EOF");  in hideSymbols()
355       stop("hideSymbols: File read error");  in hideSymbols()
362       stop("hideSymbols: File write error");  in hideSymbols()
366       for (int j = 1; j <= nAux; ++j) {  in hideSymbols()
408   for (i = nTotal - 1; i >= nExternal; --i)  in findRequiredExternal()
417         if (required->find(i) == required->end()) {  in findRequiredExternal()
420             required->insert(i);  in findRequiredExternal()
421             fresh[1 - cur].insert(i);  in findRequiredExternal()
428     cur = 1 - cur;  in findRequiredExternal()
439     stop("Please specify a positive integer followed by a list of object "  in main()
441   nExternal = atoi(argv[1]);  in main()
443     stop("Please specify a positive integer followed by a list of object "  in main()
446     stop("Too few external objects");  in main()
447   nInternal = argc - nExternal - 2;  in main()
448   defined = new set<string>[argc - 2];  in main()
449   undefined = new set<string>[argc - 2];  in main()
453     computeExternalSymbols(argv[i], defined + i - 2, undefined + i - 2);  in main()
457       findRequiredExternal(nExternal, argc - 2, defined, undefined);  in main()
460   // determine the set of symbols to hide--namely defined external symbols of  in main()
462   for (it = requiredExternal->begin(); it != requiredExternal->end(); ++it) {  in main()
472   // process the external files--removing those that are not required and hiding  in main()
475     if (requiredExternal->find(i) != requiredExternal->end())  in main()