| 1 | /* $Id: kDepIDB.c 398 2006-01-13 04:00:35Z bird $ */
|
|---|
| 2 | /** @file
|
|---|
| 3 | *
|
|---|
| 4 | * kDepIDB - Extract dependency information from a MS Visual C++ .idb file.
|
|---|
| 5 | *
|
|---|
| 6 | * Copyright (c) 2006 knut st. osmundsen <bird@innotek.de>
|
|---|
| 7 | *
|
|---|
| 8 | *
|
|---|
| 9 | * This file is part of kBuild.
|
|---|
| 10 | *
|
|---|
| 11 | * kBuild is free software; you can redistribute it and/or modify
|
|---|
| 12 | * it under the terms of the GNU General Public License as published by
|
|---|
| 13 | * the Free Software Foundation; either version 2 of the License, or
|
|---|
| 14 | * (at your option) any later version.
|
|---|
| 15 | *
|
|---|
| 16 | * kBuild is distributed in the hope that it will be useful,
|
|---|
| 17 | * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|---|
| 18 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|---|
| 19 | * GNU General Public License for more details.
|
|---|
| 20 | *
|
|---|
| 21 | * You should have received a copy of the GNU General Public License
|
|---|
| 22 | * along with kBuild; if not, write to the Free Software
|
|---|
| 23 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|---|
| 24 | *
|
|---|
| 25 | */
|
|---|
| 26 |
|
|---|
| 27 |
|
|---|
| 28 | /*******************************************************************************
|
|---|
| 29 | * Header Files *
|
|---|
| 30 | *******************************************************************************/
|
|---|
| 31 | #include <stdio.h>
|
|---|
| 32 | #include <stdlib.h>
|
|---|
| 33 | #include <string.h>
|
|---|
| 34 | #include <errno.h>
|
|---|
| 35 | #include <ctype.h>
|
|---|
| 36 | #ifndef __WIN32__
|
|---|
| 37 | # include <stdint.h>
|
|---|
| 38 | #else
|
|---|
| 39 | typedef unsigned char uint8_t;
|
|---|
| 40 | typedef unsigned short uint16_t;
|
|---|
| 41 | typedef unsigned int uint32_t;
|
|---|
| 42 | #endif
|
|---|
| 43 | #include "kDep.h"
|
|---|
| 44 |
|
|---|
| 45 | #define OFFSETOF(type, member) ( (int)(void *)&( ((type *)(void *)0)->member) )
|
|---|
| 46 |
|
|---|
| 47 | /*#define DEBUG*/
|
|---|
| 48 | #ifdef DEBUG
|
|---|
| 49 | #define dprintf(a) printf a
|
|---|
| 50 | #define dump(pb, cb, offBase) hexdump(pb,cb,offBase)
|
|---|
| 51 | #else
|
|---|
| 52 | #define dprintf(a) do {} while (0)
|
|---|
| 53 | #define dump(pb, cb, offBase) do {} while (0)
|
|---|
| 54 | #endif
|
|---|
| 55 |
|
|---|
| 56 |
|
|---|
| 57 | /*******************************************************************************
|
|---|
| 58 | * Global Variables *
|
|---|
| 59 | *******************************************************************************/
|
|---|
| 60 | /** the executable name. */
|
|---|
| 61 | static const char *argv0 = "";
|
|---|
| 62 |
|
|---|
| 63 | #ifdef DEBUG
|
|---|
| 64 | /**
|
|---|
| 65 | * Performs a hexdump.
|
|---|
| 66 | */
|
|---|
| 67 | static void hexdump(const uint8_t *pb, size_t cb, size_t offBase)
|
|---|
| 68 | {
|
|---|
| 69 | static const char szHex[16] = "0123456789abcdef";
|
|---|
| 70 |
|
|---|
| 71 | const unsigned cchWidth = 16;
|
|---|
| 72 | size_t off = 0;
|
|---|
| 73 | while (off < cb)
|
|---|
| 74 | {
|
|---|
| 75 | unsigned i;
|
|---|
| 76 | printf("%s%0*x %04x:", off ? "\n" : "", sizeof(pb) * 2, offBase + off, off);
|
|---|
| 77 | for (i = 0; i < cchWidth && off + i < cb ; i++)
|
|---|
| 78 | printf(off + i < cb ? !(i & 7) && i ? "-%02x" : " %02x" : " ", pb[i]);
|
|---|
| 79 |
|
|---|
| 80 | while (i++ < cchWidth)
|
|---|
| 81 | printf(" ");
|
|---|
| 82 | printf(" ");
|
|---|
| 83 |
|
|---|
| 84 | for (i = 0; i < cchWidth && off + i < cb; i++)
|
|---|
| 85 | {
|
|---|
| 86 | const uint8_t u8 = pb[i];
|
|---|
| 87 | printf("%c", u8 < 127 && u8 >= 32 ? u8 : '.', 1);
|
|---|
| 88 | }
|
|---|
| 89 | off += cchWidth;
|
|---|
| 90 | pb += cchWidth;
|
|---|
| 91 | }
|
|---|
| 92 | printf("\n");
|
|---|
| 93 | }
|
|---|
| 94 | #endif
|
|---|
| 95 |
|
|---|
| 96 | /**
|
|---|
| 97 | * Scans a stream (chunk of data really) for dependencies.
|
|---|
| 98 | *
|
|---|
| 99 | * @returns 0 on success.
|
|---|
| 100 | * @returns !0 on failure.
|
|---|
| 101 | * @param pbStream The stream bits.
|
|---|
| 102 | * @param cbStream The size of the stream.
|
|---|
| 103 | * @param pszPrefix The dependency prefix.
|
|---|
| 104 | * @param cchPrefix The size of the prefix.
|
|---|
| 105 | */
|
|---|
| 106 | static int ScanStream(uint8_t *pbStream, size_t cbStream, const char *pszPrefix, size_t cchPrefix)
|
|---|
| 107 | {
|
|---|
| 108 | const uint8_t *pbCur = pbStream;
|
|---|
| 109 | size_t cbLeft = cbStream;
|
|---|
| 110 | register char chFirst = *pszPrefix;
|
|---|
| 111 | while (cbLeft > cchPrefix + 2)
|
|---|
| 112 | {
|
|---|
| 113 | if ( *pbCur != chFirst
|
|---|
| 114 | || memcmp(pbCur, pszPrefix, cchPrefix))
|
|---|
| 115 | {
|
|---|
| 116 | pbCur++;
|
|---|
| 117 | cbLeft--;
|
|---|
| 118 | }
|
|---|
| 119 | else
|
|---|
| 120 | {
|
|---|
| 121 | size_t cchDep;
|
|---|
| 122 | pbCur += cchPrefix;
|
|---|
| 123 | cchDep = strlen(pbCur);
|
|---|
| 124 | depAdd(pbCur, cchDep);
|
|---|
| 125 | dprintf(("%05x: '%s'\n", pbCur - pbStream, pbCur));
|
|---|
| 126 |
|
|---|
| 127 | pbCur += cchDep;
|
|---|
| 128 | cbLeft -= cchDep + cchPrefix;
|
|---|
| 129 | }
|
|---|
| 130 | }
|
|---|
| 131 |
|
|---|
| 132 | return 0;
|
|---|
| 133 | }
|
|---|
| 134 |
|
|---|
| 135 |
|
|---|
| 136 |
|
|---|
| 137 | /**
|
|---|
| 138 | * Reads the file specified by the pInput file stream into memory.
|
|---|
| 139 | * The size of the file is returned in *pcbFile if specified.
|
|---|
| 140 | * The returned pointer should be freed by free().
|
|---|
| 141 | */
|
|---|
| 142 | void *ReadFileIntoMemory(FILE *pInput, size_t *pcbFile)
|
|---|
| 143 | {
|
|---|
| 144 | void *pvFile;
|
|---|
| 145 | long cbFile;
|
|---|
| 146 | int rc = 0;
|
|---|
| 147 |
|
|---|
| 148 | /*
|
|---|
| 149 | * Figure out file size.
|
|---|
| 150 | */
|
|---|
| 151 | if ( fseek(pInput, 0, SEEK_END) < 0
|
|---|
| 152 | || (cbFile = ftell(pInput)) < 0
|
|---|
| 153 | || fseek(pInput, 0, SEEK_SET))
|
|---|
| 154 | {
|
|---|
| 155 | fprintf(stderr, "%s: error: Failed to determin file size.\n", argv0);
|
|---|
| 156 | return NULL;
|
|---|
| 157 | }
|
|---|
| 158 | if (pcbFile)
|
|---|
| 159 | *pcbFile = cbFile;
|
|---|
| 160 |
|
|---|
| 161 | /*
|
|---|
| 162 | * Allocate memory and read the file.
|
|---|
| 163 | */
|
|---|
| 164 | pvFile = malloc(cbFile + 1);
|
|---|
| 165 | if (pvFile)
|
|---|
| 166 | {
|
|---|
| 167 | if (fread(pvFile, cbFile, 1, pInput))
|
|---|
| 168 | {
|
|---|
| 169 | ((uint8_t *)pvFile)[cbFile] = '\0';
|
|---|
| 170 | return pvFile;
|
|---|
| 171 | }
|
|---|
| 172 | fprintf(stderr, "%s: error: Failed to read %ld bytes.\n", argv0, cbFile);
|
|---|
| 173 | free(pvFile);
|
|---|
| 174 | }
|
|---|
| 175 | else
|
|---|
| 176 | fprintf(stderr, "%s: error: Failed to allocate %ld bytes (file mapping).\n", argv0, cbFile);
|
|---|
| 177 | return NULL;
|
|---|
| 178 | }
|
|---|
| 179 |
|
|---|
| 180 |
|
|---|
| 181 |
|
|---|
| 182 | ///////////////////////////////////////////////////////////////////////////////
|
|---|
| 183 | //
|
|---|
| 184 | //
|
|---|
| 185 | // P D B 7 . 0
|
|---|
| 186 | //
|
|---|
| 187 | //
|
|---|
| 188 | ///////////////////////////////////////////////////////////////////////////////
|
|---|
| 189 |
|
|---|
| 190 | /** A PDB 7.0 Page number. */
|
|---|
| 191 | typedef uint32_t PDB70PAGE;
|
|---|
| 192 | /** Pointer to a PDB 7.0 Page number. */
|
|---|
| 193 | typedef PDB70PAGE *PPDB70PAGE;
|
|---|
| 194 |
|
|---|
| 195 | /**
|
|---|
| 196 | * A PDB 7.0 stream.
|
|---|
| 197 | */
|
|---|
| 198 | typedef struct PDB70STREAM
|
|---|
| 199 | {
|
|---|
| 200 | /** The size of the stream. */
|
|---|
| 201 | uint32_t cbStream;
|
|---|
| 202 | } PDB70STREAM, *PPDB70STREAM;
|
|---|
| 203 |
|
|---|
| 204 |
|
|---|
| 205 | /** The PDB 7.00 signature. */
|
|---|
| 206 | #define PDB_SIGNATURE_700 "Microsoft C/C++ MSF 7.00\r\n\x1A" "DS\0\0"
|
|---|
| 207 | /**
|
|---|
| 208 | * The PDB 7.0 header.
|
|---|
| 209 | */
|
|---|
| 210 | typedef struct PDB70HDR
|
|---|
| 211 | {
|
|---|
| 212 | /** The signature string. */
|
|---|
| 213 | uint8_t szSignature[sizeof(PDB_SIGNATURE_700)];
|
|---|
| 214 | /** The page size. */
|
|---|
| 215 | uint32_t cbPage;
|
|---|
| 216 | /** The start page. */
|
|---|
| 217 | PDB70PAGE iStartPage;
|
|---|
| 218 | /** The number of pages in the file. */
|
|---|
| 219 | PDB70PAGE cPages;
|
|---|
| 220 | /** The root stream directory. */
|
|---|
| 221 | uint32_t cbRoot;
|
|---|
| 222 | /** Unknown function, always 0. */
|
|---|
| 223 | uint32_t u32Reserved;
|
|---|
| 224 | /** The page index of the root page table. */
|
|---|
| 225 | PDB70PAGE iRootPages;
|
|---|
| 226 | } PDB70HDR, *PPDB70HDR;
|
|---|
| 227 |
|
|---|
| 228 | /**
|
|---|
| 229 | * The PDB 7.0 root directory.
|
|---|
| 230 | */
|
|---|
| 231 | typedef struct PDB70ROOT
|
|---|
| 232 | {
|
|---|
| 233 | /** The number of streams */
|
|---|
| 234 | uint32_t cStreams;
|
|---|
| 235 | /** Array of streams. */
|
|---|
| 236 | PDB70STREAM aStreams[1];
|
|---|
| 237 | /* uint32_t aiPages[] */
|
|---|
| 238 | } PDB70ROOT, *PPDB70ROOT;
|
|---|
| 239 |
|
|---|
| 240 |
|
|---|
| 241 |
|
|---|
| 242 | static int Pdb70ValidateHeader(PPDB70HDR pHdr, size_t cbFile)
|
|---|
| 243 | {
|
|---|
| 244 | if (pHdr->cbPage * pHdr->cPages != cbFile)
|
|---|
| 245 | {
|
|---|
| 246 | fprintf(stderr, "%s: error: Bad PDB 2.0 header - cbPage * cPages != cbFile.\n", argv0);
|
|---|
| 247 | return 1;
|
|---|
| 248 | }
|
|---|
| 249 | if (pHdr->iStartPage >= pHdr->cPages && pHdr->iStartPage <= 0)
|
|---|
| 250 | {
|
|---|
| 251 | fprintf(stderr, "%s: error: Bad PDB 2.0 header - iStartPage=%u cPages=%u.\n", argv0,
|
|---|
| 252 | pHdr->iStartPage, pHdr->cPages);
|
|---|
| 253 | return 1;
|
|---|
| 254 | }
|
|---|
| 255 | if (pHdr->iRootPages >= pHdr->cPages && pHdr->iRootPages <= 0)
|
|---|
| 256 | {
|
|---|
| 257 | fprintf(stderr, "%s: error: Bad PDB 2.0 header - iRootPages=%u cPage=%u.\n", argv0,
|
|---|
| 258 | pHdr->iStartPage, pHdr->cPages);
|
|---|
| 259 | return 1;
|
|---|
| 260 | }
|
|---|
| 261 | return 0;
|
|---|
| 262 | }
|
|---|
| 263 |
|
|---|
| 264 | static size_t Pdb70Align(PPDB70HDR pHdr, size_t cb)
|
|---|
| 265 | {
|
|---|
| 266 | if (cb == ~(uint32_t)0 || !cb)
|
|---|
| 267 | return 0;
|
|---|
| 268 | return ((cb + pHdr->cbPage - 1) / pHdr->cbPage) * pHdr->cbPage;
|
|---|
| 269 | }
|
|---|
| 270 |
|
|---|
| 271 | static size_t Pdb70Pages(PPDB70HDR pHdr, size_t cb)
|
|---|
| 272 | {
|
|---|
| 273 | if (cb == ~(uint32_t)0 || !cb)
|
|---|
| 274 | return 0;
|
|---|
| 275 | return (cb + pHdr->cbPage - 1) / pHdr->cbPage;
|
|---|
| 276 | }
|
|---|
| 277 |
|
|---|
| 278 | static void *Pdb70AllocAndRead(PPDB70HDR pHdr, size_t cb, PPDB70PAGE paiPageMap)
|
|---|
| 279 | {
|
|---|
| 280 | const size_t cbPage = pHdr->cbPage;
|
|---|
| 281 | size_t cPages = Pdb70Pages(pHdr, cb);
|
|---|
| 282 | uint8_t *pbBuf = malloc(cPages * cbPage + 1);
|
|---|
| 283 | if (pbBuf)
|
|---|
| 284 | {
|
|---|
| 285 | size_t iPage = 0;
|
|---|
| 286 | while (iPage < cPages)
|
|---|
| 287 | {
|
|---|
| 288 | size_t off = paiPageMap[iPage];
|
|---|
| 289 | if (off < pHdr->cPages)
|
|---|
| 290 | {
|
|---|
| 291 | off *= cbPage;
|
|---|
| 292 | memcpy(pbBuf + iPage * cbPage, (uint8_t *)pHdr + off, cbPage);
|
|---|
| 293 | dump(pbBuf + iPage * cbPage, cbPage, off);
|
|---|
| 294 | }
|
|---|
| 295 | else
|
|---|
| 296 | {
|
|---|
| 297 | fprintf(stderr, "%s: warning: Invalid page index %u (max %u)!\n", argv0,
|
|---|
| 298 | (unsigned)off, pHdr->cPages);
|
|---|
| 299 | memset(pbBuf + iPage * cbPage, 0, cbPage);
|
|---|
| 300 | }
|
|---|
| 301 |
|
|---|
| 302 | iPage++;
|
|---|
| 303 | }
|
|---|
| 304 | pbBuf[cPages * cbPage] = '\0';
|
|---|
| 305 | }
|
|---|
| 306 | else
|
|---|
| 307 | fprintf(stderr, "%s: error: failed to allocate %u bytes\n", argv0, cPages * cbPage + 1);
|
|---|
| 308 | return pbBuf;
|
|---|
| 309 | }
|
|---|
| 310 |
|
|---|
| 311 | static PPDB70ROOT Pdb70AllocAndReadRoot(PPDB70HDR pHdr)
|
|---|
| 312 | {
|
|---|
| 313 | /*
|
|---|
| 314 | * The tricky bit here is to find the right length.
|
|---|
| 315 | * (Todo: Check if we can just use the stream size..)
|
|---|
| 316 | */
|
|---|
| 317 | PPDB70PAGE piPageMap = (uint32_t *)((uint8_t *)pHdr + pHdr->iRootPages * pHdr->cbPage);
|
|---|
| 318 | PPDB70ROOT pRoot = Pdb70AllocAndRead(pHdr, pHdr->cbRoot, piPageMap);
|
|---|
| 319 | if (pRoot)
|
|---|
| 320 | {
|
|---|
| 321 | /* This stuff is probably unnecessary: */
|
|---|
| 322 | /* size = stream header + array of stream. */
|
|---|
| 323 | size_t cb = OFFSETOF(PDB70ROOT, aStreams[pRoot->cStreams]);
|
|---|
| 324 | free(pRoot);
|
|---|
| 325 | pRoot = Pdb70AllocAndRead(pHdr, cb, piPageMap);
|
|---|
| 326 | if (pRoot)
|
|---|
| 327 | {
|
|---|
| 328 | /* size += page tables. */
|
|---|
| 329 | unsigned iStream = pRoot->cStreams;
|
|---|
| 330 | while (iStream-- > 0)
|
|---|
| 331 | if (pRoot->aStreams[iStream].cbStream != ~(uint32_t)0)
|
|---|
| 332 | cb += Pdb70Pages(pHdr, pRoot->aStreams[iStream].cbStream) * sizeof(PDB70PAGE);
|
|---|
| 333 | free(pRoot);
|
|---|
| 334 | pRoot = Pdb70AllocAndRead(pHdr, cb, piPageMap);
|
|---|
| 335 | if (pRoot)
|
|---|
| 336 | {
|
|---|
| 337 | /* validate? */
|
|---|
| 338 | return pRoot;
|
|---|
| 339 | }
|
|---|
| 340 | }
|
|---|
| 341 | }
|
|---|
| 342 | return NULL;
|
|---|
| 343 | }
|
|---|
| 344 |
|
|---|
| 345 | static void *Pdb70AllocAndReadStream(PPDB70HDR pHdr, PPDB70ROOT pRoot, unsigned iStream, size_t *pcbStream)
|
|---|
| 346 | {
|
|---|
| 347 | size_t cbStream = pRoot->aStreams[iStream].cbStream;
|
|---|
| 348 | PPDB70PAGE paiPageMap;
|
|---|
| 349 | if ( iStream >= pRoot->cStreams
|
|---|
| 350 | || cbStream == ~(uint32_t)0)
|
|---|
| 351 | {
|
|---|
| 352 | fprintf(stderr, "%s: error: Invalid stream %d\n", iStream);
|
|---|
| 353 | return NULL;
|
|---|
| 354 | }
|
|---|
| 355 |
|
|---|
| 356 | paiPageMap = (PPDB70PAGE)&pRoot->aStreams[pRoot->cStreams];
|
|---|
| 357 | while (iStream-- > 0)
|
|---|
| 358 | if (pRoot->aStreams[iStream].cbStream != ~(uint32_t)0)
|
|---|
| 359 | paiPageMap += Pdb70Pages(pHdr, pRoot->aStreams[iStream].cbStream);
|
|---|
| 360 |
|
|---|
| 361 | if (pcbStream)
|
|---|
| 362 | *pcbStream = cbStream;
|
|---|
| 363 | return Pdb70AllocAndRead(pHdr, cbStream, paiPageMap);
|
|---|
| 364 | }
|
|---|
| 365 |
|
|---|
| 366 | static int Pdb70Process(uint8_t *pbFile, size_t cbFile)
|
|---|
| 367 | {
|
|---|
| 368 | PPDB70HDR pHdr = (PPDB70HDR)pbFile;
|
|---|
| 369 | PPDB70ROOT pRoot;
|
|---|
| 370 | unsigned iStream;
|
|---|
| 371 | int rc = 0;
|
|---|
| 372 | dprintf(("pdb70\n"));
|
|---|
| 373 |
|
|---|
| 374 | /*
|
|---|
| 375 | * Validate the header and read the root stream.
|
|---|
| 376 | */
|
|---|
| 377 | if (Pdb70ValidateHeader(pHdr, cbFile))
|
|---|
| 378 | return 1;
|
|---|
| 379 | pRoot = Pdb70AllocAndReadRoot(pHdr);
|
|---|
| 380 | if (!pRoot)
|
|---|
| 381 | return 1;
|
|---|
| 382 |
|
|---|
| 383 | /*
|
|---|
| 384 | * Iterate the streams in the root and scan their content for
|
|---|
| 385 | * dependencies.
|
|---|
| 386 | */
|
|---|
| 387 | rc = 0;
|
|---|
| 388 | for (iStream = 0; iStream < pRoot->cStreams && !rc; iStream++)
|
|---|
| 389 | {
|
|---|
| 390 | const size_t cbStream = Pdb70Align(pHdr, pRoot->aStreams[iStream].cbStream);
|
|---|
| 391 | uint8_t *pbStream;
|
|---|
| 392 | if ( pRoot->aStreams[iStream].cbStream == ~(uint32_t)0
|
|---|
| 393 | || !pRoot->aStreams[iStream].cbStream)
|
|---|
| 394 | continue;
|
|---|
| 395 | dprintf(("Stream #%d: %#x bytes (%#x aligned)\n", iStream, pRoot->aStreams[iStream].cbStream, cbStream));
|
|---|
| 396 | pbStream = (uint8_t *)Pdb70AllocAndReadStream(pHdr, pRoot, iStream, NULL);
|
|---|
| 397 | if (pbStream)
|
|---|
| 398 | {
|
|---|
| 399 | rc = ScanStream(pbStream, cbStream, "/mr/inversedeps/", sizeof("/mr/inversedeps/") - 1);
|
|---|
| 400 | free(pbStream);
|
|---|
| 401 | }
|
|---|
| 402 | else
|
|---|
| 403 | rc = 1;
|
|---|
| 404 | }
|
|---|
| 405 |
|
|---|
| 406 | free(pRoot);
|
|---|
| 407 | return rc;
|
|---|
| 408 | }
|
|---|
| 409 |
|
|---|
| 410 |
|
|---|
| 411 |
|
|---|
| 412 | ///////////////////////////////////////////////////////////////////////////////
|
|---|
| 413 | //
|
|---|
| 414 | //
|
|---|
| 415 | // P D B 2 . 0
|
|---|
| 416 | //
|
|---|
| 417 | //
|
|---|
| 418 | ///////////////////////////////////////////////////////////////////////////////
|
|---|
| 419 |
|
|---|
| 420 |
|
|---|
| 421 | /** A PDB 2.0 Page number. */
|
|---|
| 422 | typedef uint16_t PDB20PAGE;
|
|---|
| 423 | /** Pointer to a PDB 2.0 Page number. */
|
|---|
| 424 | typedef PDB20PAGE *PPDB20PAGE;
|
|---|
| 425 |
|
|---|
| 426 | /**
|
|---|
| 427 | * A PDB 2.0 stream.
|
|---|
| 428 | */
|
|---|
| 429 | typedef struct PDB20STREAM
|
|---|
| 430 | {
|
|---|
| 431 | /** The size of the stream. */
|
|---|
| 432 | uint32_t cbStream;
|
|---|
| 433 | /** Some unknown value. */
|
|---|
| 434 | uint32_t u32Unknown;
|
|---|
| 435 | } PDB20STREAM, *PPDB20STREAM;
|
|---|
| 436 |
|
|---|
| 437 | /** The PDB 2.00 signature. */
|
|---|
| 438 | #define PDB_SIGNATURE_200 "Microsoft C/C++ program database 2.00\r\n\x1A" "JG\0"
|
|---|
| 439 | /**
|
|---|
| 440 | * The PDB 2.0 header.
|
|---|
| 441 | */
|
|---|
| 442 | typedef struct PDB20HDR
|
|---|
| 443 | {
|
|---|
| 444 | /** The signature string. */
|
|---|
| 445 | uint8_t szSignature[sizeof(PDB_SIGNATURE_200)];
|
|---|
| 446 | /** The page size. */
|
|---|
| 447 | uint32_t cbPage;
|
|---|
| 448 | /** The start page - whatever that is... */
|
|---|
| 449 | PDB20PAGE iStartPage;
|
|---|
| 450 | /** The number of pages in the file. */
|
|---|
| 451 | PDB20PAGE cPages;
|
|---|
| 452 | /** The root stream directory. */
|
|---|
| 453 | PDB20STREAM RootStream;
|
|---|
| 454 | /** The root page table. */
|
|---|
| 455 | PDB20PAGE aiRootPageMap[1];
|
|---|
| 456 | } PDB20HDR, *PPDB20HDR;
|
|---|
| 457 |
|
|---|
| 458 | /**
|
|---|
| 459 | * The PDB 2.0 root directory.
|
|---|
| 460 | */
|
|---|
| 461 | typedef struct PDB20ROOT
|
|---|
| 462 | {
|
|---|
| 463 | /** The number of streams */
|
|---|
| 464 | uint16_t cStreams;
|
|---|
| 465 | /** Reserved or high part of cStreams. */
|
|---|
| 466 | uint16_t u16Reserved;
|
|---|
| 467 | /** Array of streams. */
|
|---|
| 468 | PDB20STREAM aStreams[1];
|
|---|
| 469 | } PDB20ROOT, *PPDB20ROOT;
|
|---|
| 470 |
|
|---|
| 471 |
|
|---|
| 472 | static int Pdb20ValidateHeader(PPDB20HDR pHdr, size_t cbFile)
|
|---|
| 473 | {
|
|---|
| 474 | if (pHdr->cbPage * pHdr->cPages != cbFile)
|
|---|
| 475 | {
|
|---|
| 476 | fprintf(stderr, "%s: error: Bad PDB 2.0 header - cbPage * cPages != cbFile.\n", argv0);
|
|---|
| 477 | return 1;
|
|---|
| 478 | }
|
|---|
| 479 | if (pHdr->iStartPage >= pHdr->cPages && pHdr->iStartPage <= 0)
|
|---|
| 480 | {
|
|---|
| 481 | fprintf(stderr, "%s: error: Bad PDB 2.0 header - cbPage * cPages != cbFile.\n", argv0);
|
|---|
| 482 | return 1;
|
|---|
| 483 | }
|
|---|
| 484 | return 0;
|
|---|
| 485 | }
|
|---|
| 486 |
|
|---|
| 487 | static size_t Pdb20Pages(PPDB20HDR pHdr, size_t cb)
|
|---|
| 488 | {
|
|---|
| 489 | if (cb == ~(uint32_t)0 || !cb)
|
|---|
| 490 | return 0;
|
|---|
| 491 | return (cb + pHdr->cbPage - 1) / pHdr->cbPage;
|
|---|
| 492 | }
|
|---|
| 493 |
|
|---|
| 494 | static void *Pdb20AllocAndRead(PPDB20HDR pHdr, size_t cb, PPDB20PAGE paiPageMap)
|
|---|
| 495 | {
|
|---|
| 496 | size_t cPages = Pdb20Pages(pHdr, cb);
|
|---|
| 497 | uint8_t *pbBuf = malloc(cPages * pHdr->cbPage + 1);
|
|---|
| 498 | if (pbBuf)
|
|---|
| 499 | {
|
|---|
| 500 | size_t iPage = 0;
|
|---|
| 501 | while (iPage < cPages)
|
|---|
| 502 | {
|
|---|
| 503 | size_t off = paiPageMap[iPage];
|
|---|
| 504 | off *= pHdr->cbPage;
|
|---|
| 505 | memcpy(pbBuf + iPage * pHdr->cbPage, (uint8_t *)pHdr + off, pHdr->cbPage);
|
|---|
| 506 | iPage++;
|
|---|
| 507 | }
|
|---|
| 508 | pbBuf[cPages * pHdr->cbPage] = '\0';
|
|---|
| 509 | }
|
|---|
| 510 | else
|
|---|
| 511 | fprintf(stderr, "%s: error: failed to allocate %d bytes\n", argv0, cPages * pHdr->cbPage + 1);
|
|---|
| 512 | return pbBuf;
|
|---|
| 513 | }
|
|---|
| 514 |
|
|---|
| 515 | static PPDB20ROOT Pdb20AllocAndReadRoot(PPDB20HDR pHdr)
|
|---|
| 516 | {
|
|---|
| 517 | /*
|
|---|
| 518 | * The tricky bit here is to find the right length.
|
|---|
| 519 | * (Todo: Check if we can just use the stream size..)
|
|---|
| 520 | */
|
|---|
| 521 | PPDB20ROOT pRoot = Pdb20AllocAndRead(pHdr, sizeof(*pRoot), &pHdr->aiRootPageMap[0]);
|
|---|
| 522 | if (pRoot)
|
|---|
| 523 | {
|
|---|
| 524 | /* size = stream header + array of stream. */
|
|---|
| 525 | size_t cb = OFFSETOF(PDB20ROOT, aStreams[pRoot->cStreams]);
|
|---|
| 526 | free(pRoot);
|
|---|
| 527 | pRoot = Pdb20AllocAndRead(pHdr, cb, &pHdr->aiRootPageMap[0]);
|
|---|
| 528 | if (pRoot)
|
|---|
| 529 | {
|
|---|
| 530 | /* size += page tables. */
|
|---|
| 531 | unsigned iStream = pRoot->cStreams;
|
|---|
| 532 | while (iStream-- > 0)
|
|---|
| 533 | if (pRoot->aStreams[iStream].cbStream != ~(uint32_t)0)
|
|---|
| 534 | cb += Pdb20Pages(pHdr, pRoot->aStreams[iStream].cbStream) * sizeof(PDB20PAGE);
|
|---|
| 535 | free(pRoot);
|
|---|
| 536 | pRoot = Pdb20AllocAndRead(pHdr, cb, &pHdr->aiRootPageMap[0]);
|
|---|
| 537 | if (pRoot)
|
|---|
| 538 | {
|
|---|
| 539 | /* validate? */
|
|---|
| 540 | return pRoot;
|
|---|
| 541 | }
|
|---|
| 542 | }
|
|---|
| 543 | }
|
|---|
| 544 | return NULL;
|
|---|
| 545 |
|
|---|
| 546 | }
|
|---|
| 547 |
|
|---|
| 548 | static void *Pdb20AllocAndReadStream(PPDB20HDR pHdr, PPDB20ROOT pRoot, unsigned iStream, size_t *pcbStream)
|
|---|
| 549 | {
|
|---|
| 550 | size_t cbStream = pRoot->aStreams[iStream].cbStream;
|
|---|
| 551 | PPDB20PAGE paiPageMap;
|
|---|
| 552 | if ( iStream >= pRoot->cStreams
|
|---|
| 553 | || cbStream == ~(uint32_t)0)
|
|---|
| 554 | {
|
|---|
| 555 | fprintf(stderr, "%s: error: Invalid stream %d\n", iStream);
|
|---|
| 556 | return NULL;
|
|---|
| 557 | }
|
|---|
| 558 |
|
|---|
| 559 | paiPageMap = (PPDB20PAGE)&pRoot->aStreams[pRoot->cStreams];
|
|---|
| 560 | while (iStream-- > 0)
|
|---|
| 561 | if (pRoot->aStreams[iStream].cbStream != ~(uint32_t)0)
|
|---|
| 562 | paiPageMap += Pdb20Pages(pHdr, pRoot->aStreams[iStream].cbStream);
|
|---|
| 563 |
|
|---|
| 564 | if (pcbStream)
|
|---|
| 565 | *pcbStream = cbStream;
|
|---|
| 566 | return Pdb20AllocAndRead(pHdr, cbStream, paiPageMap);
|
|---|
| 567 | }
|
|---|
| 568 |
|
|---|
| 569 | static int Pdb20Process(uint8_t *pbFile, size_t cbFile)
|
|---|
| 570 | {
|
|---|
| 571 | PPDB20HDR pHdr = (PPDB20HDR)pbFile;
|
|---|
| 572 | PPDB20ROOT pRoot;
|
|---|
| 573 | unsigned iStream;
|
|---|
| 574 | int rc = 0;
|
|---|
| 575 |
|
|---|
| 576 | /*
|
|---|
| 577 | * Validate the header and read the root stream.
|
|---|
| 578 | */
|
|---|
| 579 | if (Pdb20ValidateHeader(pHdr, cbFile))
|
|---|
| 580 | return 1;
|
|---|
| 581 | pRoot = Pdb20AllocAndReadRoot(pHdr);
|
|---|
| 582 | if (!pRoot)
|
|---|
| 583 | return 1;
|
|---|
| 584 |
|
|---|
| 585 | /*
|
|---|
| 586 | * Iterate the streams in the root and scan their content for
|
|---|
| 587 | * dependencies.
|
|---|
| 588 | */
|
|---|
| 589 | rc = 0;
|
|---|
| 590 | for (iStream = 0; iStream < pRoot->cStreams && !rc; iStream++)
|
|---|
| 591 | {
|
|---|
| 592 | uint8_t *pbStream;
|
|---|
| 593 | if (pRoot->aStreams[iStream].cbStream == ~(uint32_t)0)
|
|---|
| 594 | continue;
|
|---|
| 595 | pbStream = (uint8_t *)Pdb20AllocAndReadStream(pHdr, pRoot, iStream, NULL);
|
|---|
| 596 | if (pbStream)
|
|---|
| 597 | {
|
|---|
| 598 | rc = ScanStream(pbStream, pRoot->aStreams[iStream].cbStream, "/ipm/header/", sizeof("/ipm/header/") - 1);
|
|---|
| 599 | free(pbStream);
|
|---|
| 600 | }
|
|---|
| 601 | else
|
|---|
| 602 | rc = 1;
|
|---|
| 603 | }
|
|---|
| 604 |
|
|---|
| 605 | free(pRoot);
|
|---|
| 606 | return rc;
|
|---|
| 607 | }
|
|---|
| 608 |
|
|---|
| 609 |
|
|---|
| 610 | /**
|
|---|
| 611 | * Make an attempt at parsing a Visual C++ IDB file.
|
|---|
| 612 | */
|
|---|
| 613 | static int ProcessIDB(FILE *pInput)
|
|---|
| 614 | {
|
|---|
| 615 | long cbFile;
|
|---|
| 616 | char *pbFile;
|
|---|
| 617 | char *pbHdr = PDB_SIGNATURE_200;
|
|---|
| 618 | int rc = 0;
|
|---|
| 619 |
|
|---|
| 620 | /*
|
|---|
| 621 | * Read the file into memory.
|
|---|
| 622 | */
|
|---|
| 623 | pbFile = (char *)ReadFileIntoMemory(pInput, &cbFile);
|
|---|
| 624 | if (!pbFile)
|
|---|
| 625 | return 1;
|
|---|
| 626 |
|
|---|
| 627 | /*
|
|---|
| 628 | * Figure out which parser to use.
|
|---|
| 629 | */
|
|---|
| 630 | if (!memcmp(pbFile, PDB_SIGNATURE_700, sizeof(PDB_SIGNATURE_700)))
|
|---|
| 631 | rc = Pdb70Process(pbFile, cbFile);
|
|---|
| 632 | else if (!memcmp(pbFile, PDB_SIGNATURE_200, sizeof(PDB_SIGNATURE_200)))
|
|---|
| 633 | rc = Pdb20Process(pbFile, cbFile);
|
|---|
| 634 | else
|
|---|
| 635 | {
|
|---|
| 636 | fprintf(stderr, "%s: error: Doesn't recognize the header of the Visual C++ IDB file.\n", argv0);
|
|---|
| 637 | rc = 1;
|
|---|
| 638 | }
|
|---|
| 639 |
|
|---|
| 640 | free(pbFile);
|
|---|
| 641 | return rc;
|
|---|
| 642 | }
|
|---|
| 643 |
|
|---|
| 644 |
|
|---|
| 645 | static void usage(const char *argv0)
|
|---|
| 646 | {
|
|---|
| 647 | printf("syntax: %s -o <output> -t <target> [-f] [-s] <vc idb-file>\n", argv0);
|
|---|
| 648 | }
|
|---|
| 649 |
|
|---|
| 650 |
|
|---|
| 651 | int main(int argc, char *argv[])
|
|---|
| 652 | {
|
|---|
| 653 | int i;
|
|---|
| 654 |
|
|---|
| 655 | /* Arguments. */
|
|---|
| 656 | FILE *pOutput = NULL;
|
|---|
| 657 | const char *pszOutput = NULL;
|
|---|
| 658 | FILE *pInput = NULL;
|
|---|
| 659 | const char *pszTarget = NULL;
|
|---|
| 660 | int fStubs = 0;
|
|---|
| 661 | int fFixCase = 0;
|
|---|
| 662 | /* Argument parsing. */
|
|---|
| 663 | int fInput = 0; /* set when we've found input argument. */
|
|---|
| 664 |
|
|---|
| 665 | argv0 = argv[0];
|
|---|
| 666 |
|
|---|
| 667 | /*
|
|---|
| 668 | * Parse arguments.
|
|---|
| 669 | */
|
|---|
| 670 | if (argc <= 1)
|
|---|
| 671 | {
|
|---|
| 672 | usage(argv[0]);
|
|---|
| 673 | return 1;
|
|---|
| 674 | }
|
|---|
| 675 | for (i = 1; i < argc; i++)
|
|---|
| 676 | {
|
|---|
| 677 | if (argv[i][0] == '-')
|
|---|
| 678 | {
|
|---|
| 679 | switch (argv[i][1])
|
|---|
| 680 | {
|
|---|
| 681 | /*
|
|---|
| 682 | * Output file.
|
|---|
| 683 | */
|
|---|
| 684 | case 'o':
|
|---|
| 685 | {
|
|---|
| 686 | pszOutput = &argv[i][2];
|
|---|
| 687 | if (pOutput)
|
|---|
| 688 | {
|
|---|
| 689 | fprintf(stderr, "%s: syntax error: only one output file!\n", argv[0]);
|
|---|
| 690 | return 1;
|
|---|
| 691 | }
|
|---|
| 692 | if (!*pszOutput)
|
|---|
| 693 | {
|
|---|
| 694 | if (++i >= argc)
|
|---|
| 695 | {
|
|---|
| 696 | fprintf(stderr, "%s: syntax error: The '-o' argument is missing the filename.\n", argv[0]);
|
|---|
| 697 | return 1;
|
|---|
| 698 | }
|
|---|
| 699 | pszOutput = argv[i];
|
|---|
| 700 | }
|
|---|
| 701 | if (pszOutput[0] == '-' && !pszOutput[1])
|
|---|
| 702 | pOutput = stdout;
|
|---|
| 703 | else
|
|---|
| 704 | pOutput = fopen(pszOutput, "w");
|
|---|
| 705 | if (!pOutput)
|
|---|
| 706 | {
|
|---|
| 707 | fprintf(stderr, "%s: error: Failed to create output file '%s'.\n", argv[0], pszOutput);
|
|---|
| 708 | return 1;
|
|---|
| 709 | }
|
|---|
| 710 | break;
|
|---|
| 711 | }
|
|---|
| 712 |
|
|---|
| 713 | /*
|
|---|
| 714 | * Target name.
|
|---|
| 715 | */
|
|---|
| 716 | case 't':
|
|---|
| 717 | {
|
|---|
| 718 | if (pszTarget)
|
|---|
| 719 | {
|
|---|
| 720 | fprintf(stderr, "%s: syntax error: only one target!\n", argv[0]);
|
|---|
| 721 | return 1;
|
|---|
| 722 | }
|
|---|
| 723 | pszTarget = &argv[i][2];
|
|---|
| 724 | if (!*pszTarget)
|
|---|
| 725 | {
|
|---|
| 726 | if (++i >= argc)
|
|---|
| 727 | {
|
|---|
| 728 | fprintf(stderr, "%s: syntax error: The '-t' argument is missing the target name.\n", argv[0]);
|
|---|
| 729 | return 1;
|
|---|
| 730 | }
|
|---|
| 731 | pszTarget = argv[i];
|
|---|
| 732 | }
|
|---|
| 733 | break;
|
|---|
| 734 | }
|
|---|
| 735 |
|
|---|
| 736 | /*
|
|---|
| 737 | * Fix case.
|
|---|
| 738 | */
|
|---|
| 739 | case 'f':
|
|---|
| 740 | {
|
|---|
| 741 | fFixCase = 1;
|
|---|
| 742 | break;
|
|---|
| 743 | }
|
|---|
| 744 |
|
|---|
| 745 | /*
|
|---|
| 746 | * Generate stubs.
|
|---|
| 747 | */
|
|---|
| 748 | case 's':
|
|---|
| 749 | {
|
|---|
| 750 | fStubs = 1;
|
|---|
| 751 | break;
|
|---|
| 752 | }
|
|---|
| 753 |
|
|---|
| 754 | /*
|
|---|
| 755 | * Invalid argument.
|
|---|
| 756 | */
|
|---|
| 757 | default:
|
|---|
| 758 | fprintf(stderr, "%s: syntax error: Invalid argument '%s'.\n", argv[0], argv[i]);
|
|---|
| 759 | usage(argv[0]);
|
|---|
| 760 | return 1;
|
|---|
| 761 | }
|
|---|
| 762 | }
|
|---|
| 763 | else
|
|---|
| 764 | {
|
|---|
| 765 | pInput = fopen(argv[i], "rb");
|
|---|
| 766 | if (!pInput)
|
|---|
| 767 | {
|
|---|
| 768 | fprintf(stderr, "%s: error: Failed to open input file '%s'.\n", argv[0], argv[i]);
|
|---|
| 769 | return 1;
|
|---|
| 770 | }
|
|---|
| 771 | fInput = 1;
|
|---|
| 772 | }
|
|---|
| 773 |
|
|---|
| 774 | /*
|
|---|
| 775 | * End of the line?
|
|---|
| 776 | */
|
|---|
| 777 | if (fInput)
|
|---|
| 778 | {
|
|---|
| 779 | if (++i < argc)
|
|---|
| 780 | {
|
|---|
| 781 | fprintf(stderr, "%s: syntax error: No arguments shall follow the input spec.\n", argv[0]);
|
|---|
| 782 | return 1;
|
|---|
| 783 | }
|
|---|
| 784 | break;
|
|---|
| 785 | }
|
|---|
| 786 | }
|
|---|
| 787 |
|
|---|
| 788 | /*
|
|---|
| 789 | * Got all we require?
|
|---|
| 790 | */
|
|---|
| 791 | if (!pInput)
|
|---|
| 792 | {
|
|---|
| 793 | fprintf(stderr, "%s: syntax error: No input!\n", argv[0]);
|
|---|
| 794 | return 1;
|
|---|
| 795 | }
|
|---|
| 796 | if (!pOutput)
|
|---|
| 797 | {
|
|---|
| 798 | fprintf(stderr, "%s: syntax error: No output!\n", argv[0]);
|
|---|
| 799 | return 1;
|
|---|
| 800 | }
|
|---|
| 801 | if (!pszTarget)
|
|---|
| 802 | {
|
|---|
| 803 | fprintf(stderr, "%s: syntax error: No target!\n", argv[0]);
|
|---|
| 804 | return 1;
|
|---|
| 805 | }
|
|---|
| 806 |
|
|---|
| 807 | /*
|
|---|
| 808 | * Do the parsing.
|
|---|
| 809 | */
|
|---|
| 810 | i = ProcessIDB(pInput);
|
|---|
| 811 |
|
|---|
| 812 | /*
|
|---|
| 813 | * Write the dependecy file.
|
|---|
| 814 | */
|
|---|
| 815 | if (!i)
|
|---|
| 816 | {
|
|---|
| 817 | depOptimize(fFixCase);
|
|---|
| 818 | fprintf(pOutput, "%s:", pszTarget);
|
|---|
| 819 | depPrint(pOutput);
|
|---|
| 820 | if (fStubs)
|
|---|
| 821 | depPrintStubs(pOutput);
|
|---|
| 822 | }
|
|---|
| 823 |
|
|---|
| 824 | /*
|
|---|
| 825 | * Close the output, delete output on failure.
|
|---|
| 826 | */
|
|---|
| 827 | if (!i && ferror(pOutput))
|
|---|
| 828 | {
|
|---|
| 829 | i = 1;
|
|---|
| 830 | fprintf(stderr, "%s: error: Error writing to '%s'.\n", argv[0], pszOutput);
|
|---|
| 831 | }
|
|---|
| 832 | fclose(pOutput);
|
|---|
| 833 | if (i)
|
|---|
| 834 | {
|
|---|
| 835 | if (unlink(pszOutput))
|
|---|
| 836 | fprintf(stderr, "%s: warning: failed to remove output file '%s' on failure.\n", argv[0], pszOutput);
|
|---|
| 837 | }
|
|---|
| 838 |
|
|---|
| 839 | return i;
|
|---|
| 840 | }
|
|---|
| 841 |
|
|---|