开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 多媒体 > IP电话/视频会议 > 查看源码
dwindows.cxx
资源名称：pwlib_1.1pl17.zip　[点击查看]
上传用户：hzhsqp
上传日期：2007-01-06
资源大小：1600k
文件大小：24k
源码类别：

IP电话/视频会议

开发平台：

Visual C++

dwindows.cxx：源码内容
  1. /*
  2.  * dwindows.cxx
  3.  *
  4.  * Resource compiler, MS-Windows binary resource decompiler.
  5.  *
  6.  * Portable Windows Library
  7.  *
  8.  * Copyright (c) 1993-1998 Equivalence Pty. Ltd.
  9.  *
  10.  * The contents of this file are subject to the Mozilla Public License
  11.  * Version 1.0 (the "License"); you may not use this file except in
  12.  * compliance with the License. You may obtain a copy of the License at
  13.  * http://www.mozilla.org/MPL/
  14.  *
  15.  * Software distributed under the License is distributed on an "AS IS"
  16.  * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
  17.  * the License for the specific language governing rights and limitations
  18.  * under the License.
  19.  *
  20.  * The Original Code is Portable Windows Library.
  21.  *
  22.  * The Initial Developer of the Original Code is Equivalence Pty. Ltd.
  23.  *
  24.  * Portions are Copyright (C) 1993 Free Software Foundation, Inc.
  25.  * All Rights Reserved.
  26.  *
  27.  * Contributor(s): ______________________________________.
  28.  *
  29.  * $Log: dwindows.cxx,v $
  30.  * Revision 1.19  2000/06/21 02:05:45  robertj
  31.  * Fixed problems in decompile of .ICO file with multiple icons
  32.  *
  33.  * Revision 1.18  1999/10/18 04:41:09  robertj
  34.  * Added decompile of .BMP and .ICO files and fixed ability to have 64x64 icons
  35.  *
  36.  * Revision 1.17  1999/01/21 05:23:24  robertj
  37.  * Fixed build environment problems.
  38.  *
  39.  * Revision 1.16  1998/09/26 01:24:04  robertj
  40.  * Added open source license
  41.  *
  42.  * Revision 1.15  1997/12/12 08:44:24  robertj
  43.  * Update to currect version of PWLIB
  44.  *
  45.  * Revision 1.14  1995/12/10 12:11:59  robertj
  46.  * Changes to support graphical resource file editor.
  47.  *
  48.  * Revision 1.13  1994/07/02 03:25:39  robertj
  49.  * Fixed bug.
  50.  *
  51.  * Revision 1.12  1994/06/25  12:16:28  robertj
  52.  * Synchonsiation with unix implementation.
  53.  *
  54.  * Revision 1.11  1994/04/03  08:37:00  robertj
  55.  * *** empty log message ***
  56.  *
  57.  * Revision 1.10  1994/04/01  14:29:16  robertj
  58.  * New format PRC file
  59.  *
  60.  * Revision 1.9  1994/01/03  04:34:30  robertj
  61.  * Changed scan lines in internal structure to top to bottom.
  62.  *
  63.  * Revision 1.8  1993/12/31  07:05:07  robertj
  64.  * Changed pixmap images for one pixel one number in PRC file.
  65.  *
  66.  * Revision 1.7  1993/12/14  18:54:42  robertj
  67.  * WIN32 port.
  68.  *
  69.  * Revision 1.6  1993/11/30  18:39:11  robertj
  70.  * Standard container macro changed.
  71.  *
  72.  * Revision 1.5  1993/08/21  04:42:42  robertj
  73.  * Clone() function made optional and removed.
  74.  *
  75.  * Revision 1.4  1993/07/19  14:14:52  robertj
  76.  * Fixed major bugs in ICON and CURSOR decompiling.
  77.  *
  78.  * Revision 1.3  1993/07/17  02:57:00  robertj
  79.  * Further implementation
  80.  *
  81.  * Revision 1.2  1993/07/16  14:52:23  robertj
  82.  * Further implementation.
  83.  *
  84.  * Revision 1.1  1993/07/16  12:53:12  robertj
  85.  * Initial revision
  86.  *
  87.  */
  89. #include <ptlib.h>
  90. #ifndef WIN32
  91. #undef NEAR
  92. #endif
  93. #include <windows.h>
  95. #include "pwrc.h"
  96. #include "....includepwlibstdresid.h"
  98. #include <ctype.h>
  99. #include <fcntl.h>
  100. #include <iomanip.h>
  103. ///////////////////////////////////////////////////////////////
  104. //
  105. //  Decompiler
  106. //
  108. PDECLARE_CLASS(WinResource, PObject)
  109.   public:
  110.     WinResource(short tn, PString ts, short i, PINDEX l, off_t p)
  111.       : typeNum(tn), typeStr(ts), ID(i), len(l), pos(p) { }
  112.   
  113.     short typeNum;
  114.     PString typeStr;
  115.     short ID;
  116.     PINDEX len;
  117.     off_t pos;
  119.   protected:
  120.     Comparison Compare(const PObject & obj) const
  121.       { return typeNum == ((const WinResource &)obj).typeNum ? EqualTo : GreaterThan; }
  122. };
  124. PLIST(WinResourceList, WinResource);
  125. static WinResourceList WinResources;
  128. short ReadWord(PFile & in)
  129. {
  130.   short s;
  131.   in.Read(&s, sizeof(s));
  132.   return s;
  133. }
  136. long ReadLong(PFile & in)
  137. {
  138.   long l;
  139.   in.Read(&l, sizeof(l));
  140.   return l;
  141. }
  144. PString ReadStr(PFile & in)
  145. {
  146.   PString s;
  147.   PINDEX count = 256;
  148.   char * p = s.GetPointer(count+1);
  149.   while (count > 0 && in.Read(p, 1) && *p++ != '')
  150.     count--;
  151.   s.MakeMinimumSize();
  152.   return s;
  153. }
  156. short ReadTypeOrID(PFile & in, PString & str)
  157. {
  158.   BYTE c;
  159.   if (in.Read(&c, 1) && c == 0xff) {
  160.     str = "";
  161.     return ReadWord(in);
  162.   }
  164.   str = PString(c) + ReadStr(in);
  165.   return 0;
  166. }
  169. short ReadResHeader(PFile & in, short & ID, long & resLen)
  170. {
  171.   PString resTypeStr, resIDStr;
  172.   short resType = ReadTypeOrID(in, resTypeStr);
  173.   ID = ReadTypeOrID(in, resIDStr);
  174.   if (!resIDStr.IsEmpty()) // Named resources not supported
  175.     resType = 0;
  176.   in.SetPosition(2, PFile::Current);  // Skip load options
  177.   resLen = ReadLong(in);
  178.   return resType;
  179. }
  182. void ScanResources(PFile & in)
  183. {
  184.   in.SetPosition(0);
  185.   while (in.GetPosition() < in.GetLength()) {
  186.     const char * warn = NULL;
  187.     PString resTypeStr, resIDStr;
  188.     short resType = ReadTypeOrID(in, resTypeStr);
  189.     if (resTypeStr != "DIALOGSTRINGS" &&
  190.         resTypeStr.GetLength() != 4 &&
  191.         (resType < 1 || resType > 6) &&
  192.         resType != 9 && resType != 10 && resType != 12 && resType != 14)
  193.       warn = "Usupported resource";
  195.     short resID = ReadTypeOrID(in, resIDStr);
  196.     if (!resIDStr.IsEmpty())
  197.       warn = "Named resources are unsupported";
  199.     if (ReadWord(in) != 0x1030) {
  200.       cerr << "Warning: Unsupported load options in resource, type=";
  201.       if (resTypeStr.IsEmpty())
  202.         cerr << resType;
  203.       else
  204.         cerr << resTypeStr.ToLiteral();
  205.       cerr << " ID=";
  206.       if (resIDStr.IsEmpty())
  207.         cerr << resID;
  208.       else
  209.         cerr << resIDStr.ToLiteral();
  210.     }
  212.     long resLen = ReadLong(in);
  214.     if (warn == NULL)
  215.       WinResources.Append(new WinResource(resType,
  216.                         resTypeStr, resID, (PINDEX)resLen, in.GetPosition()));
  217.     else {
  218.       cerr << "Warning: " << warn << ", type=";
  219.       if (resTypeStr.IsEmpty())
  220.         cerr << resType;
  221.       else
  222.         cerr << resTypeStr.ToLiteral();
  223.       cerr << " ID=";
  224.       if (resIDStr.IsEmpty())
  225.         cerr << resID;
  226.       else
  227.         cerr << resIDStr.ToLiteral();
  228.       cerr << " - ignoring.n";
  229.     }
  231.     in.SetPosition(resLen, PFile::Current);
  232.   }
  233. }
  236. void DecompileStrings(PFile & in, PTextFile & out, const WinResource & res)
  237. {
  238.   for (PINDEX i = 0; i < 16; i++) {
  239.     char len;
  240.     in.Read(&len, 1);
  241.     if (len != 0) {
  242.       PString s;
  243.       in.Read(s.GetPointer(len+1), len);
  244.       out << "String " << (((res.ID-1)<<4)|i) << ", " << s.ToLiteral() << ";n";
  245.     }
  246.   }
  247. }
  250. void DecompileSubMenu(PFile & in, PTextFile & out, const PString & indent)
  251. {
  252.   PString title = ReadStr(in);
  253.   out << indent << "Menu " << title.ToLiteral() << "{n";
  254.   short menuFlags;
  255.   do {
  256.     menuFlags = ReadWord(in);
  257.     if ((menuFlags&MF_POPUP) != 0)
  258.       DecompileSubMenu(in, out, indent+"    ");
  259.     else {
  260.       unsigned short id = (unsigned short)ReadWord(in);
  261.       title = ReadStr(in);
  262.       if (title.IsEmpty())
  263.         out << indent << "    Separator;n";
  264.       else {
  265.         int tab = title.Find('t');
  266.         if (tab > 0)
  267.           title = title(0, tab-1);
  268.         out << indent << "    Item ";
  269.         if (!PProcess::Current().GetArguments().HasOption('i'))
  270.           out << "MenuItem";
  271.         out << id << " {n"
  272.             << indent << "        Title " << title.ToLiteral() << ";n"
  273.             << indent << "    }n";
  274.       }
  275.     }
  276.   } while ((menuFlags&MF_END) == 0);
  277.   out << indent << "}n";
  278. }
  281. void DecompileMenuBar(PFile & in, PTextFile & out, const WinResource & res)
  282. {
  283.   out << "nnnMenuBar ";
  284.   if (!PProcess::Current().GetArguments().HasOption('i'))
  285.     out << "@MenuBar";
  286.   out << res.ID << "n{n";
  288.   short menuFlags;
  289.   do {
  290.     menuFlags = ReadWord(in);
  291.     if ((menuFlags&MF_POPUP) != 0)
  292.       DecompileSubMenu(in, out, "    ");
  293.   } while ((menuFlags&MF_END) == 0);
  294.   out << "}n";
  295. }
  298. void DecompileDialog(PFile & in, PTextFile & out, const WinResource & res)
  299. {
  300.   for (PINDEX strRes = 0; strRes < WinResources.GetSize(); strRes++) {
  301.     if (WinResources[strRes].ID == res.ID &&
  302.                             WinResources[strRes].typeStr == "DIALOGSTRINGS")
  303.       break;
  304.   }
  306.   long style = ReadLong(in);
  307.   if (style != (WS_POPUP|WS_CAPTION|WS_SYSMENU|DS_MODALFRAME|DS_SETFONT))
  308.     cerr << "Warning: Unsupported style for dialog " << res.ID << endl;
  310.   char numItems;
  311.   in.Read(&numItems, 1);
  312.   short pos_x = ReadWord(in);
  313.   short pos_y = ReadWord(in);
  314.   short dim_x = ReadWord(in);
  315.   short dim_y = ReadWord(in);
  317.   if (in.ReadChar() != 0) {
  318.     cerr << "Warning: Unsupported menu in dialog " << res.ID << endl;
  319.     ReadStr(in);
  320.   }
  322.   if (in.ReadChar() != 0) {
  323.     cerr << "Warning: Unsupported class for dialog " << res.ID << endl;
  324.     ReadStr(in);
  325.   }
  327.   PString s = ReadStr(in);
  329.   out << "nnnDialog ";
  330.   if (!PProcess::Current().GetArguments().HasOption('i'))
  331.     out << "@Dialog";
  332.   out << res.ID << "n{n"
  333.          "    Title " << s.ToLiteral() << ";n";
  334.   if (pos_x != -10000 || pos_y != -10000)
  335.     out << "    Position " << pos_x << ',' << pos_y << ";n";
  336.   if (dim_x > 0 || dim_y > 0)
  337.     out << "    Dimensions " << dim_x << ',' << dim_y << ";n";
  339.   short fontSize = ReadWord(in);
  340.   s = ReadStr(in);
  341.   if (s != "MS Sans Serif" || fontSize != 8)
  342.     out << "    Font " << s.ToLiteral() << ", " << fontSize << endl;
  344.   out << endl;
  346.   for (PINDEX i = 0; i < numItems; i++) {
  347.     pos_x = ReadWord(in);
  348.     pos_y = ReadWord(in);
  349.     dim_x = ReadWord(in);
  350.     dim_y = ReadWord(in);
  351.     short id = ReadWord(in);
  352.     style = ReadLong(in);
  353.     BYTE type = (BYTE)in.ReadChar();
  354.     int iconID = 0;
  355.     if (type == 0x82 && (style&15) == SS_ICON) {
  356.       if (in.ReadChar() == 0xff) {
  357.         iconID = ReadWord(in);
  358.         in.SetPosition(1, PFile::Current); // Skip the extra null
  359.       }
  360.       else {
  361.         ReadStr(in);
  362.         cerr << "Warning: Unsupported icon name in item " << i+1
  363.              << " (ID=" << id << ") in dialog " << res.ID << endl;
  364.         in.SetPosition(2, PFile::Current); // Skip the terminating nulls
  365.       }
  366.     }
  367.     else {
  368.       s = ReadStr(in);
  369.       in.SetPosition(1, PFile::Current); // Skip the extra null
  370.     }
  372.     char * keyword = "??Control";
  373.     BOOL hasName = TRUE;
  374.     BOOL styleWarning = FALSE;
  375.     switch (type) {
  376.       case 0x80 :
  377.         switch (style & 15) {
  378.           case BS_PUSHBUTTON :
  379.           case BS_DEFPUSHBUTTON :
  380.             keyword = "PushButton";
  381.             break;
  382.                 
  383.           case BS_AUTOCHECKBOX :
  384.           case BS_CHECKBOX :
  385.             keyword = "CheckBox";
  386.             break;
  387.                 
  388.           case BS_AUTO3STATE :
  389.           case BS_3STATE :
  390.             keyword = "Check3Way";
  391.             break;
  392.                 
  393.           case BS_AUTORADIOBUTTON :
  394.           case BS_RADIOBUTTON :
  395.             keyword = "RadioButton";
  396.             break;
  398.           case BS_GROUPBOX :
  399.             keyword = "StaticBox";
  400.             break;
  402.           default:
  403.             styleWarning = TRUE;
  404.         }
  405.         break;
  407.       case 0x81 :
  408.         if ((style&ES_MULTILINE) != 0)
  409.           keyword = "TextEditor";
  410.         else if (s == "INTEDITBOX")
  411.           keyword = "IntEdit";
  412.         else if (s == "REALEDITBOX")
  413.           keyword = "RealEdit";
  414.         else
  415.           keyword = "EditBox";
  416.         hasName = FALSE;
  417.         break;
  419.       case 0x82 :
  420.         switch (style & 15) {
  421.           case SS_LEFT :
  422.           case SS_SIMPLE :
  423.             keyword = "LeftText";
  424.             break;
  425.                 
  426.           case SS_CENTER :
  427.             keyword = "CentreText";
  428.             break;
  429.                 
  430.           case SS_RIGHT :
  431.             keyword = "RightText";
  432.             break;
  433.                 
  434.           case SS_ICON :
  435.             keyword = "StaticIcon";
  436.             hasName = FALSE;
  437.             break;
  439.           default:
  440.             styleWarning = TRUE;
  441.         }
  442.         break;
  444.       case 0x83 :
  445.         keyword = "ListBox";
  446.         hasName = FALSE;
  447.         break;
  449.       case 0x84 :
  450.         keyword = (style&1) == SBS_HORZ ? "HScrollBar" : "VScrollBar";
  451.         hasName = FALSE;
  452.         break;
  454.       case 0x85 :
  455.         switch (style & 15) {
  456.           case CBS_DROPDOWN :
  457.             keyword = "ComboBox";
  458.             break;
  460.           case CBS_DROPDOWNLIST :
  461.             keyword = "ChoiceBox";
  462.             break;
  464.           default:
  465.             styleWarning = TRUE;
  466.         }
  467.         hasName = FALSE;
  468.         break;
  469.     }
  471.     if (styleWarning)
  472.       cerr << "Warning: Unsupported style for item " << i+1
  473.            << " (ID=" << id << ") in dialog " << res.ID << endl;
  475.     out << "    " << keyword << " {n";
  476.     if (hasName)
  477.       out << "        Title " << s.ToLiteral() << ";n";
  478.     else if (type == 0x82 && (style&15) == SS_ICON)
  479.       out << "        Icon " << iconID << ";n";
  480.     if (PProcess::Current().GetArguments().HasOption('i'))
  481.       out << "        Id " << id << ";n";
  482.     out << "        Position " << pos_x << ", " << pos_y << ";n"
  483.            "        Dimensions " << dim_x << ", " << dim_y << ";n";
  485.     PString options;
  486.     switch (type) {
  487.       case 0x83 :
  488.         if ((style&LBS_SORT) != 0)
  489.           options = "Sorted ";
  490.         if ((style&LBS_EXTENDEDSEL) != 0)
  491.           options += "MultiSelect ";
  492.         if ((style&LBS_MULTICOLUMN) != 0)
  493.           options += "MultiColumn";
  494.         break;
  496.       case 0x85 :
  497.         if ((style&CBS_SORT) != 0)
  498.           options = "Sorted";
  499.         break;
  501.       case 0x80 :
  502.         switch (style & 15) {
  503.           case BS_DEFPUSHBUTTON :
  504.           case BS_PUSHBUTTON :
  505.             switch (id) {
  506.               case 1 :
  507.                 options = "Ok";
  508.                 break;
  509.               case 2 :
  510.                 options = "Cancel";
  511.                 break;
  512.               case 3 :
  513.                 options = "Help";
  514.                 break;
  515.             }
  516.             if ((style & 15) == BS_DEFPUSHBUTTON)
  517.               options += " Default";
  518.         }
  519.     }
  520.     if (!options.IsEmpty())
  521.       out << "        Options " << options << ";n";
  523.     if (strRes < WinResources.GetSize()) {
  524.       off_t remember = in.GetPosition();
  525.       in.SetPosition(WinResources[strRes].pos);
  526.       while (in.GetPosition() < in.GetLength()) {
  527.         short strID = ReadWord(in);
  528.         short strLen = ReadWord(in);
  529.         short strCount = ReadWord(in);
  530.         if (strCount == 0)
  531.           break;
  532.         if (strID == id) {
  533.           out << "        String {n";
  534.           while (--strCount > 0)
  535.             out << "            " << ReadStr(in).ToLiteral() << ",n";
  536.           out <<   "            " << ReadStr(in).ToLiteral() << "n"
  537.                    "        }n";
  538.           break;
  539.         }
  540.         in.SetPosition(strLen, PFile::Current);
  541.       }
  542.       in.SetPosition(remember);
  543.     }
  545.     out << "    }n";
  546.   }
  547.   out << "}n";
  548. }
  551. void DecompileClut(PFile & in, PTextFile & out, PINDEX bitCount)
  552. {
  553.   if (bitCount == 24)
  554.     return;
  556.   out << "    Colours {n";
  558.   PINDEX colours = (1 << bitCount)-1;
  559.   for (PINDEX c = 0; c <= colours; c++) {
  560.     RGBQUAD rgb;
  561.     in.Read(&rgb, sizeof(rgb));
  562.     out << "        " << setw(3) << (rgb.rgbRed&0xff)
  563.         << ", "       << setw(3) << (rgb.rgbGreen&0xff)
  564.         << ", "       << setw(3) << (rgb.rgbBlue&0xff)
  565.         << (c != colours ? ",n" : "n");
  566.   }
  567.   out << "    }n";
  568. }
  571. void DecompilePixels(PFile & in, PTextFile & out,
  572.      const char * keyword, PINDEX lines, PINDEX lineWidth, PINDEX bitsPerPixel)
  573. {
  574.   off_t pixbase = in.GetPosition();
  575.   PINDEX lineBytes = ((lineWidth*bitsPerPixel+31)/32)*4;
  576.   out << "    " << keyword << " {n       ";
  577.   for (int l = lines-1; l >= 0; l--) {
  578.     in.SetPosition(pixbase+l*lineBytes);
  579.     if (bitsPerPixel > 8) {
  580.       for (PINDEX byteInLine = 0; byteInLine < lineBytes; byteInLine++)
  581.         out << in.ReadChar() << ' ';
  582.     }
  583.     else {
  584.       PINDEX outWidth = bitsPerPixel > 6 ? 4 : bitsPerPixel > 3 ? 3 : 2;
  585.       PINDEX byteInLine = 0;
  586.       PINDEX pixelsPerByte = 8/bitsPerPixel;
  587.       PINDEX bitsPerPixelMask = (1 << bitsPerPixel)-1;
  588.       PINDEX bitShift = 8 - bitsPerPixel;
  589.       PINDEX pixelInByte = pixelsPerByte;
  590.       PINDEX byte = 0;
  591.       for (PINDEX pix = 0; pix < lineWidth; pix++) {
  592.         if (++pixelInByte >= pixelsPerByte) {
  593.           byte = in.ReadChar();
  594.           byteInLine++;
  595.           pixelInByte = 0;
  596.         }
  597.         out << setw(outWidth) << ((byte >> bitShift)&bitsPerPixelMask);
  598.         byte <<= bitsPerPixel;
  599.       }
  600.     }
  601.     if (l > 0)
  602.       out << "n       ";
  603.   }
  604.   out << "n    }n";
  605.   in.SetPosition(pixbase+lines*lineBytes);
  606. }
  609. BOOL ReadBitmapHeader(PFile & in, BITMAPINFOHEADER & bm)
  610. {
  611.   in.Read(&bm, sizeof(bm));
  612.   if (bm.biPlanes == 1 && bm.biSizeImage < 65536L)
  613.     return TRUE;
  615.   cerr << "Warning: Unsupported image bitmap typen";
  616.   return FALSE;
  617. }
  620. BOOL DecompileIconCursorImage(PFile & in, PTextFile & out)
  621. {
  622.   BITMAPINFOHEADER bm;
  623.   if (!ReadBitmapHeader(in, bm))
  624.     return FALSE;
  625.   bm.biHeight /= 2;
  627.   out << "    Dimensions " << bm.biWidth << ','
  628.       << bm.biHeight << ',' << bm.biBitCount << ";n";
  630.   DecompileClut(in, out, bm.biBitCount);
  631.   DecompilePixels(in, out, "Pixels",
  632.           (PINDEX)bm.biHeight, (PINDEX)bm.biWidth, (PINDEX)bm.biBitCount);
  633.   DecompilePixels(in, out, "AndMask",
  634.                               (PINDEX)bm.biHeight, (PINDEX)bm.biWidth, 1);
  635.   return TRUE;
  636. }
  639. void DecompileIconCursor(PFile & in, PTextFile & out, const WinResource & res,
  640.       const char * keyword, short checkCode, short imgResType, BOOL hasHotspot)
  641. {
  642.   out << "nnn" << keyword << ' ';
  643.   if (!PProcess::Current().GetArguments().HasOption('i'))
  644.     out << '@' << keyword;
  645.   out << res.ID << "n{n";
  646.   in.SetPosition(2, PFile::Current);
  647.   if (ReadWord(in) != checkCode)
  648.     cerr << "Warning: Invalid " << keyword << " directory resource.n";
  650.   int biLevelID = -1;
  651.   int colourID = -1;
  653.   short count = ReadWord(in);
  654.   while (count-- > 0) {
  655.     in.SetPosition(4, PFile::Current);
  656.     if (ReadWord(in) != 1) {
  657.       cerr << "Warning: Multi plane " << keyword << " in resource.n";
  658.       in.SetPosition(8, PFile::Current);
  659.     }
  660.     else {
  661.       short bits = ReadWord(in);
  662.       in.SetPosition(4, PFile::Current);
  663.       if (bits == 1)
  664.         biLevelID = ReadWord(in);
  665.       else if (colourID < 0)
  666.         colourID = ReadWord(in);
  667.       else {
  668.         cerr << "Warning: Only one colour " << keyword << " supported in resource.n";
  669.         in.SetPosition(2, PFile::Current);
  670.       }
  671.     }
  672.   }
  674.   if (colourID >= 0) {
  675.     for (PINDEX colourRes=0; colourRes < WinResources.GetSize(); colourRes++) {
  676.       if (WinResources[colourRes].typeNum == imgResType &&
  677.                                         WinResources[colourRes].ID == colourID)
  678.         break;
  679.     }
  680.     if (colourRes >= WinResources.GetSize())
  681.       cerr << "Warning: Missing " << keyword << " resource.n";
  682.     else {
  683.       off_t remember = in.GetPosition();
  684.       in.SetPosition(WinResources[colourRes].pos);
  685.   
  686.       if (hasHotspot)
  687.         out << "    HOTSPOT "
  688.             << ReadWord(in) << ',' << ReadWord(in) << ";n";
  689.   
  690.       DecompileIconCursorImage(in, out);
  692.       in.SetPosition(remember);
  693.     }
  694.   }
  696.   if (biLevelID >= 0) {
  697.     for (PINDEX biLevelRes=0; biLevelRes<WinResources.GetSize(); biLevelRes++){
  698.       if (WinResources[biLevelRes].typeNum == imgResType &&
  699.                                       WinResources[biLevelRes].ID == biLevelID)
  700.         break;
  701.     }
  702.     if (biLevelRes >= WinResources.GetSize())
  703.       cerr << "Warning: Missing " << keyword << " resource.n";
  704.     else {
  705.       off_t remember = in.GetPosition();
  706.       in.SetPosition(WinResources[biLevelRes].pos);
  707.   
  708.       if (hasHotspot) {
  709.         if (colourID < 0)
  710.           out << "    HOTSPOT "
  711.               << ReadWord(in) << ',' << ReadWord(in) << ";n";
  712.         else
  713.           in.SetPosition(4, PFile::Current);
  714.       }
  716.       BITMAPINFOHEADER bm;
  717.       ReadBitmapHeader(in, bm);
  718.       bm.biHeight /= 2;
  719.   
  720.       if (colourID < 0)
  721.         out << "    Dimensions " << bm.biWidth << ','
  722.             << bm.biHeight << ',' << bm.biBitCount << ";n";
  724.       in.SetPosition(2*sizeof(RGBQUAD), PFile::Current);
  725.       DecompilePixels(in, out, "XorMask",
  726.                                   (PINDEX)bm.biHeight, (PINDEX)bm.biWidth, 1);
  727.       if (colourID < 0)
  728.         DecompilePixels(in, out, "AndMask",
  729.                                   (PINDEX)bm.biHeight, (PINDEX)bm.biWidth, 1);
  731.       in.SetPosition(remember);
  732.     }
  733.   }
  734.   out << "}n";
  735. }
  738. void DecompileIcon(PFile & in, PTextFile & out, const WinResource & res)
  739. {
  740.   DecompileIconCursor(in, out, res, "Icon", 1, 3, FALSE);
  741. }
  744. void DecompileCursor(PFile & in, PTextFile & out, const WinResource & res)
  745. {
  746.   DecompileIconCursor(in, out, res, "Cursor", 2, 1, TRUE);
  747. }
  750. void DecompileImage(PFile & in, PTextFile & out, const WinResource & res)
  751. {
  752.   BITMAPINFOHEADER bm;
  753.   ReadBitmapHeader(in, bm);
  754.   out << "nnnIMAGE " << res.ID << "n{n    Dimensions "
  755.       << bm.biWidth << ',' << bm.biHeight << ',' << bm.biBitCount << ";n";
  756.   DecompileClut(in, out, bm.biBitCount);
  757.   DecompilePixels(in, out, "Pixels",
  758.               (PINDEX)bm.biHeight, (PINDEX)bm.biWidth, (PINDEX)bm.biBitCount);
  759.   out << "}n";
  760. }
  763. void DecompileDataBlock(PFile & in, PTextFile & out, PINDEX len)
  764. {
  765.   out << "n{n    ";
  766.   int lineOutput = 16;
  767.   for (PINDEX i = 0; i < len-1; i++) {
  768.     out << in.ReadChar();
  769.     if (--lineOutput != 0)
  770.       out << ", ";
  771.     else {
  772.       out << ",n    ";
  773.       lineOutput = 16;
  774.     }
  775.   }
  776.   out << in.ReadChar() << "n}n";
  777. }
  780. void DecompileData(PFile & in, PTextFile & out, const WinResource & res)
  781. {
  782.   out << "nnnResource ";
  783.   if (!PProcess::Current().GetArguments().HasOption('i'))
  784.     out << "@Resource";
  785.   out << res.ID;
  786.   DecompileDataBlock(in, out, res.len);
  787. }
  790. void DecompileCustom(PFile & in, PTextFile & out)
  791. {
  792.   for (PINDEX res = 0; res < WinResources.GetSize(); res++) {
  793.     if (WinResources[res].typeStr.GetLength() == 4) {
  794.       in.SetPosition(WinResources[res].pos);
  795.       out << "nnnResource ";
  796.       if (!PProcess::Current().GetArguments().HasOption('i'))
  797.         out << "@Resource";
  798.       out << WinResources[res].ID << ", "
  799.           << WinResources[res].typeStr.ToLiteral();
  800.       DecompileDataBlock(in, out, WinResources[res].len);
  801.     }
  802.   }
  803. }
  806. void DecompileResources(PFile & in, PTextFile & out, short type,
  807.                void (*decompiler)(PFile &, PTextFile &, const WinResource &))
  808. {
  809.   for (PINDEX res = 0; res < WinResources.GetSize(); res++) {
  810.     if (WinResources[res].typeNum == type) {
  811.       in.SetPosition(WinResources[res].pos);
  812.       decompiler(in, out, WinResources[res]);
  813.     }
  814.   }
  815. }
  818. void Decompile(PFile & in, PTextFile & out)
  819. {
  820.   out << "// Portable Windows Library Resource Decompiler Generated File.nn";
  822.   _setmode(in.GetHandle(), _O_BINARY);
  824.   if (in.GetFilePath().GetType() == ".bmp") {
  825.     WinResource res(2, "", 1, 0, 0);
  826.     BITMAPFILEHEADER bmfh;
  827.     in.Read(&bmfh, sizeof(bmfh));
  828.     if (bmfh.bfType != 'MB')
  829.       cerr << "Resource file is not a .BMP file!n";
  830.     else
  831.       DecompileImage(in, out, res);
  832.   }
  833.   else if (in.GetFilePath().GetType() == ".ico") {
  834.     if (ReadWord(in) != 0 || ReadWord(in) != 1)
  835.       cerr << "Resource file is not a .ICO file!n";
  836.     else {
  837.       PINDEX count = ReadWord(in);
  838.       in.SetPosition(16*count, PFile::Current);
  839.       for (PINDEX i = 1; i <= count; i++) {
  840.         out << "nnnICON " << i << "n{n";
  841.         if (!DecompileIconCursorImage(in, out))
  842.           break;
  843.         out << "}n";
  844.       }
  845.     }
  846.   }
  847.   else {
  848. #ifdef WIN32
  849.     cerr << "Warning!!! The decompile facility is not available on Windows NT platforms.n"
  850.             "This will only decompile Windows 3.1 Resource files.nn";
  851. #endif
  853.     ScanResources(in);
  855.     DecompileResources(in, out, 6, DecompileStrings);
  856.     DecompileResources(in, out, 4, DecompileMenuBar);
  857.     DecompileResources(in, out, 5, DecompileDialog);
  858.     DecompileResources(in, out, 14, DecompileIcon);
  859.     DecompileResources(in, out, 12, DecompileCursor);
  860.     DecompileResources(in, out, 2, DecompileImage);
  861.     DecompileResources(in, out, 10, DecompileData);
  862.     DecompileCustom(in, out);
  863.   }
  865.   out << "nnn// End Resources.n";
  866. }