PageRenderTime 54ms CodeModel.GetById 18ms RepoModel.GetById 1ms app.codeStats 0ms

/opensource.apple.com/source/gdb/gdb-1708/src/binutils/rcparse.y

#
Happy | 1802 lines | 1669 code | 133 blank | 0 comment | 0 complexity | 93d5abf90718da84d57e18dcdfb53f74 MD5 | raw file
Possible License(s): MPL-2.0-no-copyleft-exception, GPL-2.0, BSD-3-Clause, GPL-3.0, MPL-2.0, LGPL-2.0, LGPL-2.1, CC-BY-SA-3.0, IPL-1.0, ISC, AGPL-1.0, AGPL-3.0, JSON, Apache-2.0, 0BSD 
    

  1. <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
    2. 

  2.     "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
    3. 

  3. <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
    4. 

  4. <head>
    5. 

  5. <title>rcparse.y</title>
    6. 

  6. <style type="text/css">
    7. 

  7. .enscript-comment { font-style: italic; color: rgb(178,34,34); }
    8. 

  8. .enscript-function-name { font-weight: bold; color: rgb(0,0,255); }
    9. 

  9. .enscript-variable-name { font-weight: bold; color: rgb(184,134,11); }
    10. 

  10. .enscript-keyword { font-weight: bold; color: rgb(160,32,240); }
    11. 

  11. .enscript-reference { font-weight: bold; color: rgb(95,158,160); }
    12. 

  12. .enscript-string { font-weight: bold; color: rgb(188,143,143); }
    13. 

  13. .enscript-builtin { font-weight: bold; color: rgb(218,112,214); }
    14. 

  14. .enscript-type { font-weight: bold; color: rgb(34,139,34); }
    15. 

  15. .enscript-highlight { text-decoration: underline; color: 0; }
    16. 

  16. </style>
    17. 

  17. </head>
    18. 

  18. <body id="top">
    19. 

  19. <h1 style="margin:8px;" id="f1">rcparse.y&nbsp;&nbsp;&nbsp;<span style="font-weight: normal; font-size: 0.5em;">[<a href="?txt">plain text</a>]</span></h1>
    20. 

  20. <hr/>
    21. 

  21. <div></div>
    22. 

  22. <pre>
    23. 

  23. %{ /* rcparse.y -- parser for Windows rc files
    24. 

  24.    Copyright 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2005
    25. 

  25.    Free Software Foundation, Inc.
    26. 

  26.    Written by Ian Lance Taylor, Cygnus Support.
    27. 

    28. 

  28.    This file is part of GNU Binutils.
    29. 

    30. 

  30.    This program is free software; you can redistribute it and/or modify
    31. 

  31.    it under the terms of the GNU General Public License as published by
    32. 

  32.    the Free Software Foundation; either version 2 of the License, or
    33. 

  33.    (at your option) any later version.
    34. 

    35. 

  35.    This program is distributed in the hope that it will be useful,
    36. 

  36.    but WITHOUT ANY WARRANTY; without even the implied warranty of
    37. 

  37.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    38. 

  38.    GNU General Public License for more details.
    39. 

    40. 

  40.    You should have received a copy of the GNU General Public License
    41. 

  41.    along with this program; if not, write to the Free Software
    42. 

  42.    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
    43. 

  43.    02110-1301, USA.  */
    44. 

  44. 

  45. /* This is a parser for Windows rc files.  It is based on the parser
    46. 

  46.    by Gunther Ebert &lt;<a href="mailto:gunther.ebert@ixos-leipzig.de">gunther.ebert@ixos-leipzig.de</a>&gt;.  */
    47. 

  47. 

  48. #include &quot;bfd.h&quot;
    49. 

  49. #include &quot;bucomm.h&quot;
    50. 

  50. #include &quot;libiberty.h&quot;
    51. 

  51. #include &quot;windres.h&quot;
    52. 

  52. #include &quot;safe-ctype.h&quot;
    53. 

  53. 

  54. /* The current language.  */
    55. 

  55. 

  56. static unsigned short language;
    57. 

  57. 

  58. /* The resource information during a sub statement.  */
    59. 

  59. 

  60. static struct res_res_info sub_res_info;
    61. 

  61. 

  62. /* Dialog information.  This is built by the nonterminals styles and
    63. 

  63.    controls.  */
    64. 

  64. 

  65. static struct dialog dialog;
    66. 

  66. 

  67. /* This is used when building a style.  It is modified by the
    68. 

  68.    nonterminal styleexpr.  */
    69. 

  69. 

  70. static unsigned long style;
    71. 

  71. 

  72. /* These are used when building a control.  They are set before using
    73. 

  73.    control_params.  */
    74. 

  74. 

  75. static unsigned long base_style;
    76. 

  76. static unsigned long default_style;
    77. 

  77. static unsigned long class;
    78. 

  78. static struct res_id res_text_field;
    79. 

  79. static unichar null_unichar;
    80. 

  80. 

  81. /* This is used for COMBOBOX, LISTBOX and EDITTEXT which
    82. 

  82.    do not allow resource 'text' field in control definition. */
    83. 

  83. static const struct res_id res_null_text = { 1, {{0, &amp;null_unichar}}};
    84. 

  84. 

  85. %}
    86. 

  86. 

  87. %union
    88. 

  88. {
    89. 

  89.   struct accelerator acc;
    90. 

  90.   struct accelerator *pacc;
    91. 

  91.   struct dialog_control *dialog_control;
    92. 

  92.   struct menuitem *menuitem;
    93. 

  93.   struct
    94. 

  94.   {
    95. 

  95.     struct rcdata_item *first;
    96. 

  96.     struct rcdata_item *last;
    97. 

  97.   } rcdata;
    98. 

  98.   struct rcdata_item *rcdata_item;
    99. 

  99.   struct stringtable_data *stringtable;
    100. 

  100.   struct fixed_versioninfo *fixver;
    101. 

  101.   struct ver_info *verinfo;
    102. 

  102.   struct ver_stringinfo *verstring;
    103. 

  103.   struct ver_varinfo *vervar;
    104. 

  104.   struct res_id id;
    105. 

  105.   struct res_res_info res_info;
    106. 

  106.   struct
    107. 

  107.   {
    108. 

  108.     unsigned short on;
    109. 

  109.     unsigned short off;
    110. 

  110.   } memflags;
    111. 

  111.   struct
    112. 

  112.   {
    113. 

  113.     unsigned long val;
    114. 

  114.     /* Nonzero if this number was explicitly specified as long.  */
    115. 

  115.     int dword;
    116. 

  116.   } i;
    117. 

  117.   unsigned long il;
    118. 

  118.   unsigned short is;
    119. 

  119.   const char *s;
    120. 

  120.   struct
    121. 

  121.   {
    122. 

  122.     unsigned long length;
    123. 

  123.     const char *s;
    124. 

  124.   } ss;
    125. 

  125. };
    126. 

  126. 

  127. %token BEG END
    128. 

  128. %token ACCELERATORS VIRTKEY ASCII NOINVERT SHIFT CONTROL ALT
    129. 

  129. %token BITMAP
    130. 

  130. %token CURSOR
    131. 

  131. %token DIALOG DIALOGEX EXSTYLE CAPTION CLASS STYLE
    132. 

  132. %token AUTO3STATE AUTOCHECKBOX AUTORADIOBUTTON CHECKBOX COMBOBOX CTEXT
    133. 

  133. %token DEFPUSHBUTTON EDITTEXT GROUPBOX LISTBOX LTEXT PUSHBOX PUSHBUTTON
    134. 

  134. %token RADIOBUTTON RTEXT SCROLLBAR STATE3 USERBUTTON
    135. 

  135. %token BEDIT HEDIT IEDIT
    136. 

  136. %token FONT
    137. 

  137. %token ICON
    138. 

  138. %token LANGUAGE CHARACTERISTICS VERSIONK
    139. 

  139. %token MENU MENUEX MENUITEM SEPARATOR POPUP CHECKED GRAYED HELP INACTIVE
    140. 

  140. %token MENUBARBREAK MENUBREAK
    141. 

  141. %token MESSAGETABLE
    142. 

  142. %token RCDATA
    143. 

  143. %token STRINGTABLE
    144. 

  144. %token VERSIONINFO FILEVERSION PRODUCTVERSION FILEFLAGSMASK FILEFLAGS
    145. 

  145. %token FILEOS FILETYPE FILESUBTYPE BLOCKSTRINGFILEINFO BLOCKVARFILEINFO
    146. 

  146. %token VALUE
    147. 

  147. %token &lt;s&gt; BLOCK
    148. 

  148. %token MOVEABLE FIXED PURE IMPURE PRELOAD LOADONCALL DISCARDABLE
    149. 

  149. %token NOT
    150. 

  150. %token &lt;s&gt; QUOTEDSTRING STRING
    151. 

  151. %token &lt;i&gt; NUMBER
    152. 

  152. %token &lt;ss&gt; SIZEDSTRING
    153. 

  153. %token IGNORED_TOKEN
    154. 

  154. 

  155. %type &lt;pacc&gt; acc_entries
    156. 

  156. %type &lt;acc&gt; acc_entry acc_event
    157. 

  157. %type &lt;dialog_control&gt; control control_params
    158. 

  158. %type &lt;menuitem&gt; menuitems menuitem menuexitems menuexitem
    159. 

  159. %type &lt;rcdata&gt; optrcdata_data optrcdata_data_int rcdata_data
    160. 

  160. %type &lt;rcdata_item&gt; opt_control_data
    161. 

  161. %type &lt;fixver&gt; fixedverinfo
    162. 

  162. %type &lt;verinfo&gt; verblocks
    163. 

  163. %type &lt;verstring&gt; vervals
    164. 

  164. %type &lt;vervar&gt; vertrans
    165. 

  165. %type &lt;res_info&gt; suboptions memflags_move_discard memflags_move
    166. 

  166. %type &lt;memflags&gt; memflag
    167. 

  167. %type &lt;id&gt; id optresidc resref
    168. 

  168. %type &lt;il&gt; exstyle parennumber
    169. 

  169. %type &lt;il&gt; numexpr posnumexpr cnumexpr optcnumexpr cposnumexpr
    170. 

  170. %type &lt;is&gt; acc_options acc_option menuitem_flags menuitem_flag
    171. 

  171. %type &lt;s&gt; file_name resname
    172. 

  172. %type &lt;i&gt; sizednumexpr sizedposnumexpr
    173. 

  173. 

  174. %left '|'
    175. 

  175. %left '^'
    176. 

  176. %left '&amp;'
    177. 

  177. %left '+' '-'
    178. 

  178. %left '*' '/' '%'
    179. 

  179. %right '~' NEG
    180. 

  180. 

  181. %%
    182. 

  182. 

  183. input:
    184. 

  184. 	  /* empty */
    185. 

  185. 	| input accelerator
    186. 

  186. 	| input bitmap
    187. 

  187. 	| input cursor
    188. 

  188. 	| input dialog
    189. 

  189. 	| input font
    190. 

  190. 	| input icon
    191. 

  191. 	| input language
    192. 

  192. 	| input menu
    193. 

  193. 	| input menuex
    194. 

  194. 	| input messagetable
    195. 

  195. 	| input rcdata
    196. 

  196. 	| input stringtable
    197. 

  197. 	| input user
    198. 

  198. 	| input versioninfo
    199. 

  199. 	| input IGNORED_TOKEN
    200. 

  200. 	;
    201. 

  201. 

  202. /* Accelerator resources.  */
    203. 

  203. 

  204. accelerator:
    205. 

  205. 	  id ACCELERATORS suboptions BEG acc_entries END
    206. 

  206. 	  {
    207. 

  207. 	    define_accelerator ($1, &amp;$3, $5);
    208. 

  208. 	    if (yychar != YYEMPTY)
    209. 

  209. 	      YYERROR;
    210. 

  210. 	    rcparse_discard_strings ();
    211. 

  211. 	  }
    212. 

  212. 	;
    213. 

  213. 

  214. acc_entries:
    215. 

  215. 	  /* empty */
    216. 

  216. 	  {
    217. 

  217. 	    $$ = NULL;
    218. 

  218. 	  }
    219. 

  219. 	| acc_entries acc_entry
    220. 

  220. 	  {
    221. 

  221. 	    struct accelerator *a;
    222. 

  222. 

  223. 	    a = (struct accelerator *) res_alloc (sizeof *a);
    224. 

  224. 	    *a = $2;
    225. 

  225. 	    if ($1 == NULL)
    226. 

  226. 	      $$ = a;
    227. 

  227. 	    else
    228. 

  228. 	      {
    229. 

  229. 		struct accelerator **pp;
    230. 

  230. 

  231. 		for (pp = &amp;$1-&gt;next; *pp != NULL; pp = &amp;(*pp)-&gt;next)
    232. 

  232. 		  ;
    233. 

  233. 		*pp = a;
    234. 

  234. 		$$ = $1;
    235. 

  235. 	      }
    236. 

  236. 	  }
    237. 

  237. 	;
    238. 

  238. 

  239. acc_entry:
    240. 

  240. 	  acc_event cposnumexpr
    241. 

  241. 	  {
    242. 

  242. 	    $$ = $1;
    243. 

  243. 	    $$.id = $2;
    244. 

  244. 	  }
    245. 

  245. 	| acc_event cposnumexpr ',' acc_options
    246. 

  246. 	  {
    247. 

  247. 	    $$ = $1;
    248. 

  248. 	    $$.id = $2;
    249. 

  249. 	    $$.flags |= $4;
    250. 

  250. 	    if (($$.flags &amp; ACC_VIRTKEY) == 0
    251. 

  251. 		&amp;&amp; ($$.flags &amp; (ACC_SHIFT | ACC_CONTROL)) != 0)
    252. 

  252. 	      rcparse_warning (_(&quot;inappropriate modifiers for non-VIRTKEY&quot;));
    253. 

  253. 	  }
    254. 

  254. 	;
    255. 

  255. 

  256. acc_event:
    257. 

  257. 	  QUOTEDSTRING
    258. 

  258. 	  {
    259. 

  259. 	    const char *s = $1;
    260. 

  260. 	    char ch;
    261. 

  261. 

  262. 	    $$.next = NULL;
    263. 

  263. 	    $$.id = 0;
    264. 

  264. 	    ch = *s;
    265. 

  265. 	    if (ch != '^')
    266. 

  266. 	      $$.flags = 0;
    267. 

  267. 	    else
    268. 

  268. 	      {
    269. 

  269. 		$$.flags = ACC_CONTROL | ACC_VIRTKEY;
    270. 

  270. 		++s;
    271. 

  271. 		ch = *s;
    272. 

  272. 		ch = TOUPPER (ch);
    273. 

  273. 	      }
    274. 

  274. 	    $$.key = ch;
    275. 

  275. 	    if (s[1] != '\0')
    276. 

  276. 	      rcparse_warning (_(&quot;accelerator should only be one character&quot;));
    277. 

  277. 	  }
    278. 

  278. 	| posnumexpr
    279. 

  279. 	  {
    280. 

  280. 	    $$.next = NULL;
    281. 

  281. 	    $$.flags = 0;
    282. 

  282. 	    $$.id = 0;
    283. 

  283. 	    $$.key = $1;
    284. 

  284. 	  }
    285. 

  285. 	;
    286. 

  286. 

  287. acc_options:
    288. 

  288. 	  acc_option
    289. 

  289. 	  {
    290. 

  290. 	    $$ = $1;
    291. 

  291. 	  }
    292. 

  292. 	| acc_options ',' acc_option
    293. 

  293. 	  {
    294. 

  294. 	    $$ = $1 | $3;
    295. 

  295. 	  }
    296. 

  296. 	/* I've had one report that the comma is optional.  */
    297. 

  297. 	| acc_options acc_option
    298. 

  298. 	  {
    299. 

  299. 	    $$ = $1 | $2;
    300. 

  300. 	  }
    301. 

  301. 	;
    302. 

  302. 

  303. acc_option:
    304. 

  304. 	  VIRTKEY
    305. 

  305. 	  {
    306. 

  306. 	    $$ = ACC_VIRTKEY;
    307. 

  307. 	  }
    308. 

  308. 	| ASCII
    309. 

  309. 	  {
    310. 

  310. 	    /* This is just the absence of VIRTKEY.  */
    311. 

  311. 	    $$ = 0;
    312. 

  312. 	  }
    313. 

  313. 	| NOINVERT
    314. 

  314. 	  {
    315. 

  315. 	    $$ = ACC_NOINVERT;
    316. 

  316. 	  }
    317. 

  317. 	| SHIFT
    318. 

  318. 	  {
    319. 

  319. 	    $$ = ACC_SHIFT;
    320. 

  320. 	  }
    321. 

  321. 	| CONTROL
    322. 

  322. 	  {
    323. 

  323. 	    $$ = ACC_CONTROL;
    324. 

  324. 	  }
    325. 

  325. 	| ALT
    326. 

  326. 	  {
    327. 

  327. 	    $$ = ACC_ALT;
    328. 

  328. 	  }
    329. 

  329. 	;
    330. 

  330. 

  331. /* Bitmap resources.  */
    332. 

  332. 

  333. bitmap:
    334. 

  334. 	  id BITMAP memflags_move file_name
    335. 

  335. 	  {
    336. 

  336. 	    define_bitmap ($1, &amp;$3, $4);
    337. 

  337. 	    if (yychar != YYEMPTY)
    338. 

  338. 	      YYERROR;
    339. 

  339. 	    rcparse_discard_strings ();
    340. 

  340. 	  }
    341. 

  341. 	;
    342. 

  342. 

  343. /* Cursor resources.  */
    344. 

  344. 

  345. cursor:
    346. 

  346. 	  id CURSOR memflags_move_discard file_name
    347. 

  347. 	  {
    348. 

  348. 	    define_cursor ($1, &amp;$3, $4);
    349. 

  349. 	    if (yychar != YYEMPTY)
    350. 

  350. 	      YYERROR;
    351. 

  351. 	    rcparse_discard_strings ();
    352. 

  352. 	  }
    353. 

  353. 	;
    354. 

  354. 

  355. /* Dialog resources.  */
    356. 

  356. 

  357. dialog:
    358. 

  358. 	  id DIALOG memflags_move exstyle posnumexpr cnumexpr cnumexpr
    359. 

  359. 	    cnumexpr
    360. 

  360. 	    {
    361. 

  361. 	      memset (&amp;dialog, 0, sizeof dialog);
    362. 

  362. 	      dialog.x = $5;
    363. 

  363. 	      dialog.y = $6;
    364. 

  364. 	      dialog.width = $7;
    365. 

  365. 	      dialog.height = $8;
    366. 

  366. 	      dialog.style = WS_POPUP | WS_BORDER | WS_SYSMENU;
    367. 

  367. 	      dialog.exstyle = $4;
    368. 

  368. 	      dialog.menu.named = 1;
    369. 

  369. 	      dialog.class.named = 1;
    370. 

  370. 	      dialog.font = NULL;
    371. 

  371. 	      dialog.ex = NULL;
    372. 

  372. 	      dialog.controls = NULL;
    373. 

  373. 	      sub_res_info = $3;
    374. 

  374. 	      style = 0;
    375. 

  375. 	    }
    376. 

  376. 	    styles BEG controls END
    377. 

  377. 	  {
    378. 

  378. 	    define_dialog ($1, &amp;sub_res_info, &amp;dialog);
    379. 

  379. 	    if (yychar != YYEMPTY)
    380. 

  380. 	      YYERROR;
    381. 

  381. 	    rcparse_discard_strings ();
    382. 

  382. 	  }
    383. 

  383. 	| id DIALOGEX memflags_move exstyle posnumexpr cnumexpr cnumexpr
    384. 

  384. 	    cnumexpr
    385. 

  385. 	    {
    386. 

  386. 	      memset (&amp;dialog, 0, sizeof dialog);
    387. 

  387. 	      dialog.x = $5;
    388. 

  388. 	      dialog.y = $6;
    389. 

  389. 	      dialog.width = $7;
    390. 

  390. 	      dialog.height = $8;
    391. 

  391. 	      dialog.style = WS_POPUP | WS_BORDER | WS_SYSMENU;
    392. 

  392. 	      dialog.exstyle = $4;
    393. 

  393. 	      dialog.menu.named = 1;
    394. 

  394. 	      dialog.class.named = 1;
    395. 

  395. 	      dialog.font = NULL;
    396. 

  396. 	      dialog.ex = ((struct dialog_ex *)
    397. 

  397. 			   res_alloc (sizeof (struct dialog_ex)));
    398. 

  398. 	      memset (dialog.ex, 0, sizeof (struct dialog_ex));
    399. 

  399. 	      dialog.controls = NULL;
    400. 

  400. 	      sub_res_info = $3;
    401. 

  401. 	      style = 0;
    402. 

  402. 	    }
    403. 

  403. 	    styles BEG controls END
    404. 

  404. 	  {
    405. 

  405. 	    define_dialog ($1, &amp;sub_res_info, &amp;dialog);
    406. 

  406. 	    if (yychar != YYEMPTY)
    407. 

  407. 	      YYERROR;
    408. 

  408. 	    rcparse_discard_strings ();
    409. 

  409. 	  }
    410. 

  410. 	| id DIALOGEX memflags_move exstyle posnumexpr cnumexpr cnumexpr
    411. 

  411. 	    cnumexpr cnumexpr
    412. 

  412. 	    {
    413. 

  413. 	      memset (&amp;dialog, 0, sizeof dialog);
    414. 

  414. 	      dialog.x = $5;
    415. 

  415. 	      dialog.y = $6;
    416. 

  416. 	      dialog.width = $7;
    417. 

  417. 	      dialog.height = $8;
    418. 

  418. 	      dialog.style = WS_POPUP | WS_BORDER | WS_SYSMENU;
    419. 

  419. 	      dialog.exstyle = $4;
    420. 

  420. 	      dialog.menu.named = 1;
    421. 

  421. 	      dialog.class.named = 1;
    422. 

  422. 	      dialog.font = NULL;
    423. 

  423. 	      dialog.ex = ((struct dialog_ex *)
    424. 

  424. 			   res_alloc (sizeof (struct dialog_ex)));
    425. 

  425. 	      memset (dialog.ex, 0, sizeof (struct dialog_ex));
    426. 

  426. 	      dialog.ex-&gt;help = $9;
    427. 

  427. 	      dialog.controls = NULL;
    428. 

  428. 	      sub_res_info = $3;
    429. 

  429. 	      style = 0;
    430. 

  430. 	    }
    431. 

  431. 	    styles BEG controls END
    432. 

  432. 	  {
    433. 

  433. 	    define_dialog ($1, &amp;sub_res_info, &amp;dialog);
    434. 

  434. 	    if (yychar != YYEMPTY)
    435. 

  435. 	      YYERROR;
    436. 

  436. 	    rcparse_discard_strings ();
    437. 

  437. 	  }
    438. 

  438. 	;
    439. 

  439. 

  440. exstyle:
    441. 

  441. 	  /* empty */
    442. 

  442. 	  {
    443. 

  443. 	    $$ = 0;
    444. 

  444. 	  }
    445. 

  445. 	| EXSTYLE '=' numexpr
    446. 

  446. 	  {
    447. 

  447. 	    $$ = $3;
    448. 

  448. 	  }
    449. 

  449. 	;
    450. 

  450. 

  451. styles:
    452. 

  452. 	  /* empty */
    453. 

  453. 	| styles CAPTION QUOTEDSTRING
    454. 

  454. 	  {
    455. 

  455. 	    dialog.style |= WS_CAPTION;
    456. 

  456. 	    style |= WS_CAPTION;
    457. 

  457. 	    unicode_from_ascii ((int *) NULL, &amp;dialog.caption, $3);
    458. 

  458. 	  }
    459. 

  459. 	| styles CLASS id
    460. 

  460. 	  {
    461. 

  461. 	    dialog.class = $3;
    462. 

  462. 	  }
    463. 

  463. 	| styles STYLE
    464. 

  464. 	    styleexpr
    465. 

  465. 	  {
    466. 

  466. 	    dialog.style = style;
    467. 

  467. 	  }
    468. 

  468. 	| styles EXSTYLE numexpr
    469. 

  469. 	  {
    470. 

  470. 	    dialog.exstyle = $3;
    471. 

  471. 	  }
    472. 

  472. 	| styles CLASS QUOTEDSTRING
    473. 

  473. 	  {
    474. 

  474. 	    res_string_to_id (&amp; dialog.class, $3);
    475. 

  475. 	  }
    476. 

  476. 	| styles FONT numexpr ',' QUOTEDSTRING
    477. 

  477. 	  {
    478. 

  478. 	    dialog.style |= DS_SETFONT;
    479. 

  479. 	    style |= DS_SETFONT;
    480. 

  480. 	    dialog.pointsize = $3;
    481. 

  481. 	    unicode_from_ascii ((int *) NULL, &amp;dialog.font, $5);
    482. 

  482. 	    if (dialog.ex != NULL)
    483. 

  483. 	      {
    484. 

  484. 		dialog.ex-&gt;weight = 0;
    485. 

  485. 		dialog.ex-&gt;italic = 0;
    486. 

  486. 		dialog.ex-&gt;charset = 1;
    487. 

  487. 	      }
    488. 

  488. 	  }
    489. 

  489. 	| styles FONT numexpr ',' QUOTEDSTRING cnumexpr
    490. 

  490. 	  {
    491. 

  491. 	    dialog.style |= DS_SETFONT;
    492. 

  492. 	    style |= DS_SETFONT;
    493. 

  493. 	    dialog.pointsize = $3;
    494. 

  494. 	    unicode_from_ascii ((int *) NULL, &amp;dialog.font, $5);
    495. 

  495. 	    if (dialog.ex == NULL)
    496. 

  496. 	      rcparse_warning (_(&quot;extended FONT requires DIALOGEX&quot;));
    497. 

  497. 	    else
    498. 

  498. 	      {
    499. 

  499. 		dialog.ex-&gt;weight = $6;
    500. 

  500. 		dialog.ex-&gt;italic = 0;
    501. 

  501. 		dialog.ex-&gt;charset = 1;
    502. 

  502. 	      }
    503. 

  503. 	  }
    504. 

  504. 	| styles FONT numexpr ',' QUOTEDSTRING cnumexpr cnumexpr
    505. 

  505. 	  {
    506. 

  506. 	    dialog.style |= DS_SETFONT;
    507. 

  507. 	    style |= DS_SETFONT;
    508. 

  508. 	    dialog.pointsize = $3;
    509. 

  509. 	    unicode_from_ascii ((int *) NULL, &amp;dialog.font, $5);
    510. 

  510. 	    if (dialog.ex == NULL)
    511. 

  511. 	      rcparse_warning (_(&quot;extended FONT requires DIALOGEX&quot;));
    512. 

  512. 	    else
    513. 

  513. 	      {
    514. 

  514. 		dialog.ex-&gt;weight = $6;
    515. 

  515. 		dialog.ex-&gt;italic = $7;
    516. 

  516. 		dialog.ex-&gt;charset = 1;
    517. 

  517. 	      }
    518. 

  518. 	  }
    519. 

  519. 	| styles FONT numexpr ',' QUOTEDSTRING cnumexpr cnumexpr cnumexpr
    520. 

  520. 	  {
    521. 

  521. 	    dialog.style |= DS_SETFONT;
    522. 

  522. 	    style |= DS_SETFONT;
    523. 

  523. 	    dialog.pointsize = $3;
    524. 

  524. 	    unicode_from_ascii ((int *) NULL, &amp;dialog.font, $5);
    525. 

  525. 	    if (dialog.ex == NULL)
    526. 

  526. 	      rcparse_warning (_(&quot;extended FONT requires DIALOGEX&quot;));
    527. 

  527. 	    else
    528. 

  528. 	      {
    529. 

  529. 		dialog.ex-&gt;weight = $6;
    530. 

  530. 		dialog.ex-&gt;italic = $7;
    531. 

  531. 		dialog.ex-&gt;charset = $8;
    532. 

  532. 	      }
    533. 

  533. 	  }
    534. 

  534. 	| styles MENU id
    535. 

  535. 	  {
    536. 

  536. 	    dialog.menu = $3;
    537. 

  537. 	  }
    538. 

  538. 	| styles CHARACTERISTICS numexpr
    539. 

  539. 	  {
    540. 

  540. 	    sub_res_info.characteristics = $3;
    541. 

  541. 	  }
    542. 

  542. 	| styles LANGUAGE numexpr cnumexpr
    543. 

  543. 	  {
    544. 

  544. 	    sub_res_info.language = $3 | ($4 &lt;&lt; SUBLANG_SHIFT);
    545. 

  545. 	  }
    546. 

  546. 	| styles VERSIONK numexpr
    547. 

  547. 	  {
    548. 

  548. 	    sub_res_info.version = $3;
    549. 

  549. 	  }
    550. 

  550. 	;
    551. 

  551. 

  552. controls:
    553. 

  553. 	  /* empty */
    554. 

  554. 	| controls control
    555. 

  555. 	  {
    556. 

  556. 	    struct dialog_control **pp;
    557. 

  557. 

  558. 	    for (pp = &amp;dialog.controls; *pp != NULL; pp = &amp;(*pp)-&gt;next)
    559. 

  559. 	      ;
    560. 

  560. 	    *pp = $2;
    561. 

  561. 	  }
    562. 

  562. 	;
    563. 

  563. 

  564. control:
    565. 

  565. 	  AUTO3STATE optresidc
    566. 

  566. 	    {
    567. 

  567. 	      default_style = BS_AUTO3STATE | WS_TABSTOP;
    568. 

  568. 	      base_style = BS_AUTO3STATE;
    569. 

  569. 	      class = CTL_BUTTON;
    570. 

  570. 	      res_text_field = $2;	
    571. 

  571. 	    }
    572. 

  572. 	    control_params
    573. 

  573. 	  {
    574. 

  574. 	    $$ = $4;
    575. 

  575. 	  }
    576. 

  576. 	| AUTOCHECKBOX optresidc
    577. 

  577. 	    {
    578. 

  578. 	      default_style = BS_AUTOCHECKBOX | WS_TABSTOP;
    579. 

  579. 	      base_style = BS_AUTOCHECKBOX;
    580. 

  580. 	      class = CTL_BUTTON;
    581. 

  581. 	      res_text_field = $2;	
    582. 

  582. 	    }
    583. 

  583. 	    control_params
    584. 

  584. 	  {
    585. 

  585. 	    $$ = $4;
    586. 

  586. 	  }
    587. 

  587. 	| AUTORADIOBUTTON optresidc
    588. 

  588. 	    {
    589. 

  589. 	      default_style = BS_AUTORADIOBUTTON | WS_TABSTOP;
    590. 

  590. 	      base_style = BS_AUTORADIOBUTTON;
    591. 

  591. 	      class = CTL_BUTTON;
    592. 

  592. 	      res_text_field = $2;	
    593. 

  593. 	    }
    594. 

  594. 	    control_params
    595. 

  595. 	  {
    596. 

  596. 	    $$ = $4;
    597. 

  597. 	  }
    598. 

  598. 	| BEDIT optresidc
    599. 

  599. 	    {
    600. 

  600. 	      default_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
    601. 

  601. 	      base_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
    602. 

  602. 	      class = CTL_EDIT;
    603. 

  603. 	      res_text_field = $2;	
    604. 

  604. 	    }
    605. 

  605. 	    control_params
    606. 

  606. 	  {
    607. 

  607. 	    $$ = $4;
    608. 

  608. 	    if (dialog.ex == NULL)
    609. 

  609. 	      rcparse_warning (_(&quot;BEDIT requires DIALOGEX&quot;));
    610. 

  610. 	    res_string_to_id (&amp;$$-&gt;class, &quot;BEDIT&quot;);
    611. 

  611. 	  }
    612. 

  612. 	| CHECKBOX optresidc
    613. 

  613. 	    {
    614. 

  614. 	      default_style = BS_CHECKBOX | WS_TABSTOP;
    615. 

  615. 	      base_style = BS_CHECKBOX | WS_TABSTOP;
    616. 

  616. 	      class = CTL_BUTTON;
    617. 

  617. 	      res_text_field = $2;	
    618. 

  618. 	    }
    619. 

  619. 	    control_params
    620. 

  620. 	  {
    621. 

  621. 	    $$ = $4;
    622. 

  622. 	  }
    623. 

  623. 	| COMBOBOX
    624. 

  624. 	    {
    625. 

  625. 	      /* This is as per MSDN documentation.  With some (???)
    626. 

  626. 		 versions of MS rc.exe their is no default style.  */
    627. 

  627. 	      default_style = CBS_SIMPLE | WS_TABSTOP;
    628. 

  628. 	      base_style = 0;
    629. 

  629. 	      class = CTL_COMBOBOX;
    630. 

  630. 	      res_text_field = res_null_text;	
    631. 

  631. 	    }
    632. 

  632. 	    control_params
    633. 

  633. 	  {
    634. 

  634. 	    $$ = $3;
    635. 

  635. 	  }
    636. 

  636. 	| CONTROL optresidc numexpr cnumexpr control_styleexpr cnumexpr
    637. 

  637. 	    cnumexpr cnumexpr cnumexpr optcnumexpr opt_control_data
    638. 

  638. 	  {
    639. 

  639. 	    $$ = define_control ($2, $3, $6, $7, $8, $9, $4, style, $10);
    640. 

  640. 	    if ($11 != NULL)
    641. 

  641. 	      {
    642. 

  642. 		if (dialog.ex == NULL)
    643. 

  643. 		  rcparse_warning (_(&quot;control data requires DIALOGEX&quot;));
    644. 

  644. 		$$-&gt;data = $11;
    645. 

  645. 	      }
    646. 

  646. 	  }
    647. 

  647. 	| CONTROL optresidc numexpr cnumexpr control_styleexpr cnumexpr
    648. 

  648. 	    cnumexpr cnumexpr cnumexpr cnumexpr cnumexpr opt_control_data
    649. 

  649. 	  {
    650. 

  650. 	    $$ = define_control ($2, $3, $6, $7, $8, $9, $4, style, $10);
    651. 

  651. 	    if (dialog.ex == NULL)
    652. 

  652. 	      rcparse_warning (_(&quot;help ID requires DIALOGEX&quot;));
    653. 

  653. 	    $$-&gt;help = $11;
    654. 

  654. 	    $$-&gt;data = $12;
    655. 

  655. 	  }
    656. 

  656. 	| CONTROL optresidc numexpr ',' QUOTEDSTRING control_styleexpr
    657. 

  657. 	    cnumexpr cnumexpr cnumexpr cnumexpr optcnumexpr opt_control_data
    658. 

  658. 	  {
    659. 

  659. 	    $$ = define_control ($2, $3, $7, $8, $9, $10, 0, style, $11);
    660. 

  660. 	    if ($12 != NULL)
    661. 

  661. 	      {
    662. 

  662. 		if (dialog.ex == NULL)
    663. 

  663. 		  rcparse_warning (&quot;control data requires DIALOGEX&quot;);
    664. 

  664. 		$$-&gt;data = $12;
    665. 

  665. 	      }
    666. 

  666. 	    $$-&gt;class.named = 1;
    667. 

  667.   	    unicode_from_ascii (&amp;$$-&gt;class.u.n.length, &amp;$$-&gt;class.u.n.name, $5);
    668. 

  668. 	  }
    669. 

  669. 	| CONTROL optresidc numexpr ',' QUOTEDSTRING control_styleexpr
    670. 

  670. 	    cnumexpr cnumexpr cnumexpr cnumexpr cnumexpr cnumexpr opt_control_data
    671. 

  671. 	  {
    672. 

  672. 	    $$ = define_control ($2, $3, $7, $8, $9, $10, 0, style, $11);
    673. 

  673. 	    if (dialog.ex == NULL)
    674. 

  674. 	      rcparse_warning (&quot;help ID requires DIALOGEX&quot;);
    675. 

  675. 	    $$-&gt;help = $12;
    676. 

  676. 	    $$-&gt;data = $13;
    677. 

  677. 	    $$-&gt;class.named = 1;
    678. 

  678.   	    unicode_from_ascii (&amp;$$-&gt;class.u.n.length, &amp;$$-&gt;class.u.n.name, $5);
    679. 

  679. 	  }
    680. 

  680. 	| CTEXT optresidc
    681. 

  681. 	    {
    682. 

  682. 	      default_style = SS_CENTER | WS_GROUP;
    683. 

  683. 	      base_style = SS_CENTER;
    684. 

  684. 	      class = CTL_STATIC;
    685. 

  685. 	      res_text_field = $2;	
    686. 

  686. 	    }
    687. 

  687. 	    control_params
    688. 

  688. 	  {
    689. 

  689. 	    $$ = $4;
    690. 

  690. 	  }
    691. 

  691. 	| DEFPUSHBUTTON optresidc
    692. 

  692. 	    {
    693. 

  693. 	      default_style = BS_DEFPUSHBUTTON | WS_TABSTOP;
    694. 

  694. 	      base_style = BS_DEFPUSHBUTTON | WS_TABSTOP;
    695. 

  695. 	      class = CTL_BUTTON;
    696. 

  696. 	      res_text_field = $2;	
    697. 

  697. 	    }
    698. 

  698. 	    control_params
    699. 

  699. 	  {
    700. 

  700. 	    $$ = $4;
    701. 

  701. 	  }
    702. 

  702. 	| EDITTEXT
    703. 

  703. 	    {
    704. 

  704. 	      default_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
    705. 

  705. 	      base_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
    706. 

  706. 	      class = CTL_EDIT;
    707. 

  707. 	      res_text_field = res_null_text;	
    708. 

  708. 	    }
    709. 

  709. 	    control_params
    710. 

  710. 	  {
    711. 

  711. 	    $$ = $3;
    712. 

  712. 	  }
    713. 

  713. 	| GROUPBOX optresidc
    714. 

  714. 	    {
    715. 

  715. 	      default_style = BS_GROUPBOX;
    716. 

  716. 	      base_style = BS_GROUPBOX;
    717. 

  717. 	      class = CTL_BUTTON;
    718. 

  718. 	      res_text_field = $2;	
    719. 

  719. 	    }
    720. 

  720. 	    control_params
    721. 

  721. 	  {
    722. 

  722. 	    $$ = $4;
    723. 

  723. 	  }
    724. 

  724. 	| HEDIT optresidc
    725. 

  725. 	    {
    726. 

  726. 	      default_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
    727. 

  727. 	      base_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
    728. 

  728. 	      class = CTL_EDIT;
    729. 

  729. 	      res_text_field = $2;	
    730. 

  730. 	    }
    731. 

  731. 	    control_params
    732. 

  732. 	  {
    733. 

  733. 	    $$ = $4;
    734. 

  734. 	    if (dialog.ex == NULL)
    735. 

  735. 	      rcparse_warning (_(&quot;IEDIT requires DIALOGEX&quot;));
    736. 

  736. 	    res_string_to_id (&amp;$$-&gt;class, &quot;HEDIT&quot;);
    737. 

  737. 	  }
    738. 

  738. 	| ICON resref numexpr cnumexpr cnumexpr opt_control_data
    739. 

  739.           {
    740. 

  740. 	    $$ = define_icon_control ($2, $3, $4, $5, 0, 0, 0, $6,
    741. 

  741. 				      dialog.ex);
    742. 

  742.           }
    743. 

  743. 	| ICON resref numexpr cnumexpr cnumexpr cnumexpr cnumexpr
    744. 

  744. 	    opt_control_data
    745. 

  745.           {
    746. 

  746. 	    $$ = define_icon_control ($2, $3, $4, $5, 0, 0, 0, $8,
    747. 

  747. 				      dialog.ex);
    748. 

  748.           }
    749. 

  749. 	| ICON resref numexpr cnumexpr cnumexpr cnumexpr cnumexpr
    750. 

  750. 	    icon_styleexpr optcnumexpr opt_control_data
    751. 

  751.           {
    752. 

  752. 	    $$ = define_icon_control ($2, $3, $4, $5, style, $9, 0, $10,
    753. 

  753. 				      dialog.ex);
    754. 

  754.           }
    755. 

  755. 	| ICON resref numexpr cnumexpr cnumexpr cnumexpr cnumexpr
    756. 

  756. 	    icon_styleexpr cnumexpr cnumexpr opt_control_data
    757. 

  757.           {
    758. 

  758. 	    $$ = define_icon_control ($2, $3, $4, $5, style, $9, $10, $11,
    759. 

  759. 				      dialog.ex);
    760. 

  760.           }
    761. 

  761. 	| IEDIT optresidc
    762. 

  762. 	    {
    763. 

  763. 	      default_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
    764. 

  764. 	      base_style = ES_LEFT | WS_BORDER | WS_TABSTOP;
    765. 

  765. 	      class = CTL_EDIT;
    766. 

  766. 	      res_text_field = $2;	
    767. 

  767. 	    }
    768. 

  768. 	    control_params
    769. 

  769. 	  {
    770. 

  770. 	    $$ = $4;
    771. 

  771. 	    if (dialog.ex == NULL)
    772. 

  772. 	      rcparse_warning (_(&quot;IEDIT requires DIALOGEX&quot;));
    773. 

  773. 	    res_string_to_id (&amp;$$-&gt;class, &quot;IEDIT&quot;);
    774. 

  774. 	  }
    775. 

  775. 	| LISTBOX
    776. 

  776. 	    {
    777. 

  777. 	      default_style = LBS_NOTIFY | WS_BORDER;
    778. 

  778. 	      base_style = LBS_NOTIFY | WS_BORDER;
    779. 

  779. 	      class = CTL_LISTBOX;
    780. 

  780. 	      res_text_field = res_null_text;	
    781. 

  781. 	    }
    782. 

  782. 	    control_params
    783. 

  783. 	  {
    784. 

  784. 	    $$ = $3;
    785. 

  785. 	  }
    786. 

  786. 	| LTEXT optresidc
    787. 

  787. 	    {
    788. 

  788. 	      default_style = SS_LEFT | WS_GROUP;
    789. 

  789. 	      base_style = SS_LEFT;
    790. 

  790. 	      class = CTL_STATIC;
    791. 

  791. 	      res_text_field = $2;	
    792. 

  792. 	    }
    793. 

  793. 	    control_params
    794. 

  794. 	  {
    795. 

  795. 	    $$ = $4;
    796. 

  796. 	  }
    797. 

  797. 	| PUSHBOX optresidc
    798. 

  798. 	    {
    799. 

  799. 	      default_style = BS_PUSHBOX | WS_TABSTOP;
    800. 

  800. 	      base_style = BS_PUSHBOX;
    801. 

  801. 	      class = CTL_BUTTON;
    802. 

  802. 	    }
    803. 

  803. 	    control_params
    804. 

  804. 	  {
    805. 

  805. 	    $$ = $4;
    806. 

  806. 	  }
    807. 

  807. 	| PUSHBUTTON optresidc
    808. 

  808. 	    {
    809. 

  809. 	      default_style = BS_PUSHBUTTON | WS_TABSTOP;
    810. 

  810. 	      base_style = BS_PUSHBUTTON | WS_TABSTOP;
    811. 

  811. 	      class = CTL_BUTTON;
    812. 

  812. 	      res_text_field = $2;	
    813. 

  813. 	    }
    814. 

  814. 	    control_params
    815. 

  815. 	  {
    816. 

  816. 	    $$ = $4;
    817. 

  817. 	  }
    818. 

  818. 	| RADIOBUTTON optresidc
    819. 

  819. 	    {
    820. 

  820. 	      default_style = BS_RADIOBUTTON | WS_TABSTOP;
    821. 

  821. 	      base_style = BS_RADIOBUTTON;
    822. 

  822. 	      class = CTL_BUTTON;
    823. 

  823. 	      res_text_field = $2;	
    824. 

  824. 	    }
    825. 

  825. 	    control_params
    826. 

  826. 	  {
    827. 

  827. 	    $$ = $4;
    828. 

  828. 	  }
    829. 

  829. 	| RTEXT optresidc
    830. 

  830. 	    {
    831. 

  831. 	      default_style = SS_RIGHT | WS_GROUP;
    832. 

  832. 	      base_style = SS_RIGHT;
    833. 

  833. 	      class = CTL_STATIC;
    834. 

  834. 	      res_text_field = $2;	
    835. 

  835. 	    }
    836. 

  836. 	    control_params
    837. 

  837. 	  {
    838. 

  838. 	    $$ = $4;
    839. 

  839. 	  }
    840. 

  840. 	| SCROLLBAR
    841. 

  841. 	    {
    842. 

  842. 	      default_style = SBS_HORZ;
    843. 

  843. 	      base_style = 0;
    844. 

  844. 	      class = CTL_SCROLLBAR;
    845. 

  845. 	      res_text_field = res_null_text;	
    846. 

  846. 	    }
    847. 

  847. 	    control_params
    848. 

  848. 	  {
    849. 

  849. 	    $$ = $3;
    850. 

  850. 	  }
    851. 

  851. 	| STATE3 optresidc
    852. 

  852. 	    {
    853. 

  853. 	      default_style = BS_3STATE | WS_TABSTOP;
    854. 

  854. 	      base_style = BS_3STATE;
    855. 

  855. 	      class = CTL_BUTTON;
    856. 

  856. 	      res_text_field = $2;	
    857. 

  857. 	    }
    858. 

  858. 	    control_params
    859. 

  859. 	  {
    860. 

  860. 	    $$ = $4;
    861. 

  861. 	  }
    862. 

  862. 	| USERBUTTON resref numexpr ',' numexpr ',' numexpr ','
    863. 

  863. 	    numexpr ',' numexpr ',' 
    864. 

  864. 	    { style = WS_CHILD | WS_VISIBLE; }
    865. 

  865. 	    styleexpr optcnumexpr
    866. 

  866. 	  {
    867. 

  867. 	    $$ = define_control ($2, $3, $5, $7, $9, $11, CTL_BUTTON,
    868. 

  868. 				 style, $15);
    869. 

  869. 	  }
    870. 

  870. 	;
    871. 

  871. 

  872. /* Parameters for a control.  The static variables DEFAULT_STYLE,
    873. 

  873.    BASE_STYLE, and CLASS must be initialized before this nonterminal
    874. 

  874.    is used.  DEFAULT_STYLE is the style to use if no style expression
    875. 

  875.    is specified.  BASE_STYLE is the base style to use if a style
    876. 

  876.    expression is specified; the style expression modifies the base
    877. 

  877.    style.  CLASS is the class of the control.  */
    878. 

  878. 

  879. control_params:
    880. 

  880. 	  numexpr cnumexpr cnumexpr cnumexpr cnumexpr opt_control_data
    881. 

  881. 	  {
    882. 

  882. 	    $$ = define_control (res_text_field, $1, $2, $3, $4, $5, class,
    883. 

  883. 				 default_style | WS_CHILD | WS_VISIBLE, 0);
    884. 

  884. 	    if ($6 != NULL)
    885. 

  885. 	      {
    886. 

  886. 		if (dialog.ex == NULL)
    887. 

  887. 		  rcparse_warning (_(&quot;control data requires DIALOGEX&quot;));
    888. 

  888. 		$$-&gt;data = $6;
    889. 

  889. 	      }
    890. 

  890. 	  }
    891. 

  891. 	| numexpr cnumexpr cnumexpr cnumexpr cnumexpr
    892. 

  892. 	    control_params_styleexpr optcnumexpr opt_control_data
    893. 

  893. 	  {
    894. 

  894. 	    $$ = define_control (res_text_field, $1, $2, $3, $4, $5, class, style, $7);
    895. 

  895. 	    if ($8 != NULL)
    896. 

  896. 	      {
    897. 

  897. 		if (dialog.ex == NULL)
    898. 

  898. 		  rcparse_warning (_(&quot;control data requires DIALOGEX&quot;));
    899. 

  899. 		$$-&gt;data = $8;
    900. 

  900. 	      }
    901. 

  901. 	  }
    902. 

  902. 	| numexpr cnumexpr cnumexpr cnumexpr cnumexpr
    903. 

  903. 	    control_params_styleexpr cnumexpr cnumexpr opt_control_data
    904. 

  904. 	  {
    905. 

  905. 	    $$ = define_control (res_text_field, $1, $2, $3, $4, $5, class, style, $7);
    906. 

  906. 	    if (dialog.ex == NULL)
    907. 

  907. 	      rcparse_warning (_(&quot;help ID requires DIALOGEX&quot;));
    908. 

  908. 	    $$-&gt;help = $8;
    909. 

  909. 	    $$-&gt;data = $9;
    910. 

  910. 	  }
    911. 

  911. 	;
    912. 

  912. 

  913. optresidc:
    914. 

  914. 	  /* empty */
    915. 

  915. 	  {
    916. 

  916. 	    res_string_to_id (&amp;$$, &quot;&quot;);
    917. 

  917. 	  }
    918. 

  918. 	| posnumexpr ','
    919. 

  919. 	  {
    920. 

  920. 	    $$.named = 0;
    921. 

  921. 	    $$.u.id = $1;
    922. 

  922. 	  }
    923. 

  923. 	| QUOTEDSTRING
    924. 

  924. 	  {
    925. 

  925. 	    res_string_to_id (&amp;$$, $1);
    926. 

  926. 	  }
    927. 

  927. 	| QUOTEDSTRING ','
    928. 

  928. 	  {
    929. 

  929. 	    res_string_to_id (&amp;$$, $1);
    930. 

  930. 	  }
    931. 

  931. 	;
    932. 

  932. 

  933. opt_control_data:
    934. 

  934. 	  /* empty */
    935. 

  935. 	  {
    936. 

  936. 	    $$ = NULL;
    937. 

  937. 	  }
    938. 

  938. 	| BEG optrcdata_data END
    939. 

  939. 	  {
    940. 

  940. 	    $$ = $2.first;
    941. 

  941. 	  }
    942. 

  942. 	;
    943. 

  943. 

  944. /* These only exist to parse a reduction out of a common case.  */
    945. 

  945. 

  946. control_styleexpr:
    947. 

  947. 	  ','
    948. 

  948. 	  { style = WS_CHILD | WS_VISIBLE; }
    949. 

  949. 	  styleexpr
    950. 

  950. 	;
    951. 

  951. 

  952. icon_styleexpr:
    953. 

  953. 	  ','
    954. 

  954. 	  { style = SS_ICON | WS_CHILD | WS_VISIBLE; }
    955. 

  955. 	  styleexpr
    956. 

  956. 	;
    957. 

  957. 

  958. control_params_styleexpr:
    959. 

  959. 	  ','
    960. 

  960. 	  { style = base_style | WS_CHILD | WS_VISIBLE; }
    961. 

  961. 	  styleexpr
    962. 

  962. 	;
    963. 

  963. 

  964. /* Font resources.  */
    965. 

  965. 

  966. font:
    967. 

  967. 	  id FONT memflags_move_discard file_name
    968. 

  968. 	  {
    969. 

  969. 	    define_font ($1, &amp;$3, $4);
    970. 

  970. 	    if (yychar != YYEMPTY)
    971. 

  971. 	      YYERROR;
    972. 

  972. 	    rcparse_discard_strings ();
    973. 

  973. 	  }
    974. 

  974. 	;
    975. 

  975. 

  976. /* Icon resources.  */
    977. 

  977. 

  978. icon:
    979. 

  979. 	  id ICON memflags_move_discard file_name
    980. 

  980. 	  {
    981. 

  981. 	    define_icon ($1, &amp;$3, $4);
    982. 

  982. 	    if (yychar != YYEMPTY)
    983. 

  983. 	      YYERROR;
    984. 

  984. 	    rcparse_discard_strings ();
    985. 

  985. 	  }
    986. 

  986. 	;
    987. 

  987. 

  988. /* Language command.  This changes the static variable language, which
    989. 

  989.    affects all subsequent resources.  */
    990. 

  990. 

  991. language:
    992. 

  992. 	  LANGUAGE numexpr cnumexpr
    993. 

  993. 	  {
    994. 

  994. 	    language = $2 | ($3 &lt;&lt; SUBLANG_SHIFT);
    995. 

  995. 	  }
    996. 

  996. 	;
    997. 

  997. 

  998. /* Menu resources.  */
    999. 

  999. 

  1000. menu:
    1001. 

  1001. 	  id MENU suboptions BEG menuitems END
    1002. 

  1002. 	  {
    1003. 

  1003. 	    define_menu ($1, &amp;$3, $5);
    1004. 

  1004. 	    if (yychar != YYEMPTY)
    1005. 

  1005. 	      YYERROR;
    1006. 

  1006. 	    rcparse_discard_strings ();
    1007. 

  1007. 	  }
    1008. 

  1008. 	;
    1009. 

  1009. 

  1010. menuitems:
    1011. 

  1011. 	  /* empty */
    1012. 

  1012. 	  {
    1013. 

  1013. 	    $$ = NULL;
    1014. 

  1014. 	  }
    1015. 

  1015. 	| menuitems menuitem
    1016. 

  1016. 	  {
    1017. 

  1017. 	    if ($1 == NULL)
    1018. 

  1018. 	      $$ = $2;
    1019. 

  1019. 	    else
    1020. 

  1020. 	      {
    1021. 

  1021. 		struct menuitem **pp;
    1022. 

  1022. 

  1023. 		for (pp = &amp;$1-&gt;next; *pp != NULL; pp = &amp;(*pp)-&gt;next)
    1024. 

  1024. 		  ;
    1025. 

  1025. 		*pp = $2;
    1026. 

  1026. 		$$ = $1;
    1027. 

  1027. 	      }
    1028. 

  1028. 	  }
    1029. 

  1029. 	;
    1030. 

  1030. 

  1031. menuitem:
    1032. 

  1032. 	  MENUITEM QUOTEDSTRING cnumexpr menuitem_flags
    1033. 

  1033. 	  {
    1034. 

  1034. 	    $$ = define_menuitem ($2, $3, $4, 0, 0, NULL);
    1035. 

  1035. 	  }
    1036. 

  1036. 	| MENUITEM SEPARATOR
    1037. 

  1037. 	  {
    1038. 

  1038. 	    $$ = define_menuitem (NULL, 0, 0, 0, 0, NULL);
    1039. 

  1039. 	  }
    1040. 

  1040. 	| POPUP QUOTEDSTRING menuitem_flags BEG menuitems END
    1041. 

  1041. 	  {
    1042. 

  1042. 	    $$ = define_menuitem ($2, 0, $3, 0, 0, $5);
    1043. 

  1043. 	  }
    1044. 

  1044. 	;
    1045. 

  1045. 

  1046. menuitem_flags:
    1047. 

  1047. 	  /* empty */
    1048. 

  1048. 	  {
    1049. 

  1049. 	    $$ = 0;
    1050. 

  1050. 	  }
    1051. 

  1051. 	| menuitem_flags ',' menuitem_flag
    1052. 

  1052. 	  {
    1053. 

  1053. 	    $$ = $1 | $3;
    1054. 

  1054. 	  }
    1055. 

  1055. 	| menuitem_flags menuitem_flag
    1056. 

  1056. 	  {
    1057. 

  1057. 	    $$ = $1 | $2;
    1058. 

  1058. 	  }
    1059. 

  1059. 	;
    1060. 

  1060. 

  1061. menuitem_flag:
    1062. 

  1062. 	  CHECKED
    1063. 

  1063. 	  {
    1064. 

  1064. 	    $$ = MENUITEM_CHECKED;
    1065. 

  1065. 	  }
    1066. 

  1066. 	| GRAYED
    1067. 

  1067. 	  {
    1068. 

  1068. 	    $$ = MENUITEM_GRAYED;
    1069. 

  1069. 	  }
    1070. 

  1070. 	| HELP
    1071. 

  1071. 	  {
    1072. 

  1072. 	    $$ = MENUITEM_HELP;
    1073. 

  1073. 	  }
    1074. 

  1074. 	| INACTIVE
    1075. 

  1075. 	  {
    1076. 

  1076. 	    $$ = MENUITEM_INACTIVE;
    1077. 

  1077. 	  }
    1078. 

  1078. 	| MENUBARBREAK
    1079. 

  1079. 	  {
    1080. 

  1080. 	    $$ = MENUITEM_MENUBARBREAK;
    1081. 

  1081. 	  }
    1082. 

  1082. 	| MENUBREAK
    1083. 

  1083. 	  {
    1084. 

  1084. 	    $$ = MENUITEM_MENUBREAK;
    1085. 

  1085. 	  }
    1086. 

  1086. 	;
    1087. 

  1087. 

  1088. /* Menuex resources.  */
    1089. 

  1089. 

  1090. menuex:
    1091. 

  1091. 	  id MENUEX suboptions BEG menuexitems END
    1092. 

  1092. 	  {
    1093. 

  1093. 	    define_menu ($1, &amp;$3, $5);
    1094. 

  1094. 	    if (yychar != YYEMPTY)
    1095. 

  1095. 	      YYERROR;
    1096. 

  1096. 	    rcparse_discard_strings ();
    1097. 

  1097. 	  }
    1098. 

  1098. 	;
    1099. 

  1099. 

  1100. menuexitems:
    1101. 

  1101. 	  /* empty */
    1102. 

  1102. 	  {
    1103. 

  1103. 	    $$ = NULL;
    1104. 

  1104. 	  }
    1105. 

  1105. 	| menuexitems menuexitem
    1106. 

  1106. 	  {
    1107. 

  1107. 	    if ($1 == NULL)
    1108. 

  1108. 	      $$ = $2;
    1109. 

  1109. 	    else
    1110. 

  1110. 	      {
    1111. 

  1111. 		struct menuitem **pp;
    1112. 

  1112. 

  1113. 		for (pp = &amp;$1-&gt;next; *pp != NULL; pp = &amp;(*pp)-&gt;next)
    1114. 

  1114. 		  ;
    1115. 

  1115. 		*pp = $2;
    1116. 

  1116. 		$$ = $1;
    1117. 

  1117. 	      }
    1118. 

  1118. 	  }
    1119. 

  1119. 	;
    1120. 

  1120. 

  1121. menuexitem:
    1122. 

  1122. 	  MENUITEM QUOTEDSTRING
    1123. 

  1123. 	  {
    1124. 

  1124. 	    $$ = define_menuitem ($2, 0, 0, 0, 0, NULL);
    1125. 

  1125. 	  }
    1126. 

  1126. 	| MENUITEM QUOTEDSTRING cnumexpr
    1127. 

  1127. 	  {
    1128. 

  1128. 	    $$ = define_menuitem ($2, $3, 0, 0, 0, NULL);
    1129. 

  1129. 	  }
    1130. 

  1130. 	| MENUITEM QUOTEDSTRING cnumexpr cnumexpr optcnumexpr
    1131. 

  1131. 	  {
    1132. 

  1132. 	    $$ = define_menuitem ($2, $3, $4, $5, 0, NULL);
    1133. 

  1133. 	  }
    1134. 

  1134.  	| MENUITEM SEPARATOR
    1135. 

  1135.  	  {
    1136. 

  1136.  	    $$ = define_menuitem (NULL, 0, 0, 0, 0, NULL);
    1137. 

  1137.  	  }
    1138. 

  1138. 	| POPUP QUOTEDSTRING BEG menuexitems END
    1139. 

  1139. 	  {
    1140. 

  1140. 	    $$ = define_menuitem ($2, 0, 0, 0, 0, $4);
    1141. 

  1141. 	  }
    1142. 

  1142. 	| POPUP QUOTEDSTRING cnumexpr BEG menuexitems END
    1143. 

  1143. 	  {
    1144. 

  1144. 	    $$ = define_menuitem ($2, $3, 0, 0, 0, $5);
    1145. 

  1145. 	  }
    1146. 

  1146. 	| POPUP QUOTEDSTRING cnumexpr cnumexpr BEG menuexitems END
    1147. 

  1147. 	  {
    1148. 

  1148. 	    $$ = define_menuitem ($2, $3, $4, 0, 0, $6);
    1149. 

  1149. 	  }
    1150. 

  1150. 	| POPUP QUOTEDSTRING cnumexpr cnumexpr cnumexpr optcnumexpr
    1151. 

  1151. 	    BEG menuexitems END
    1152. 

  1152. 	  {
    1153. 

  1153. 	    $$ = define_menuitem ($2, $3, $4, $5, $6, $8);
    1154. 

  1154. 	  }
    1155. 

  1155. 	;
    1156. 

  1156. 

  1157. /* Messagetable resources.  */
    1158. 

  1158. 

  1159. messagetable:
    1160. 

  1160. 	  id MESSAGETABLE memflags_move file_name
    1161. 

  1161. 	  {
    1162. 

  1162. 	    define_messagetable ($1, &amp;$3, $4);
    1163. 

  1163. 	    if (yychar != YYEMPTY)
    1164. 

  1164. 	      YYERROR;
    1165. 

  1165. 	    rcparse_discard_strings ();
    1166. 

  1166. 	  }
    1167. 

  1167. 	;
    1168. 

  1168. 

  1169. /* Rcdata resources.  */
    1170. 

  1170. 

  1171. rcdata:
    1172. 

  1172. 	  id RCDATA suboptions BEG optrcdata_data END
    1173. 

  1173. 	  {
    1174. 

  1174. 	    define_rcdata ($1, &amp;$3, $5.first);
    1175. 

  1175. 	    if (yychar != YYEMPTY)
    1176. 

  1176. 	      YYERROR;
    1177. 

  1177. 	    rcparse_discard_strings ();
    1178. 

  1178. 	  }
    1179. 

  1179. 	| id RCDATA suboptions file_name
    1180. 

  1180. 	  {
    1181. 

  1181. 	    define_rcdata_file ($1, &amp;$3, $4);
    1182. 

  1182. 	    if (yychar != YYEMPTY)
    1183. 

  1183. 	      YYERROR;
    1184. 

  1184. 	    rcparse_discard_strings ();
    1185. 

  1185. 	  }
    1186. 

  1186. 	;
    1187. 

  1187. 

  1188. /* We use a different lexing algorithm, because rcdata strings may
    1189. 

  1189.    contain embedded null bytes, and we need to know the length to use.  */
    1190. 

  1190. 

  1191. optrcdata_data:
    1192. 

  1192. 	  {
    1193. 

  1193. 	    rcparse_rcdata ();
    1194. 

  1194. 	  }
    1195. 

  1195. 	  optrcdata_data_int
    1196. 

  1196. 	  {
    1197. 

  1197. 	    rcparse_normal ();
    1198. 

  1198. 	    $$ = $2;
    1199. 

  1199. 	  }
    1200. 

  1200. 	;
    1201. 

  1201. 

  1202. optrcdata_data_int:
    1203. 

  1203. 	  /* empty */
    1204. 

  1204. 	  {
    1205. 

  1205. 	    $$.first = NULL;
    1206. 

  1206. 	    $$.last = NULL;
    1207. 

  1207. 	  }
    1208. 

  1208. 	| rcdata_data
    1209. 

  1209. 	  {
    1210. 

  1210. 	    $$ = $1;
    1211. 

  1211. 	  }
    1212. 

  1212. 	;
    1213. 

  1213. 

  1214. rcdata_data:
    1215. 

  1215. 	  SIZEDSTRING
    1216. 

  1216. 	  {
    1217. 

  1217. 	    struct rcdata_item *ri;
    1218. 

  1218. 

  1219. 	    ri = define_rcdata_string ($1.s, $1.length);
    1220. 

  1220. 	    $$.first = ri;
    1221. 

  1221. 	    $$.last = ri;
    1222. 

  1222. 	  }
    1223. 

  1223. 	| sizednumexpr
    1224. 

  1224. 	  {
    1225. 

  1225. 	    struct rcdata_item *ri;
    1226. 

  1226. 

  1227. 	    ri = define_rcdata_number ($1.val, $1.dword);
    1228. 

  1228. 	    $$.first = ri;
    1229. 

  1229. 	    $$.last = ri;
    1230. 

  1230. 	  }
    1231. 

  1231. 	| rcdata_data ',' SIZEDSTRING
    1232. 

  1232. 	  {
    1233. 

  1233. 	    struct rcdata_item *ri;
    1234. 

  1234. 

  1235. 	    ri = define_rcdata_string ($3.s, $3.length);
    1236. 

  1236. 	    $$.first = $1.first;
    1237. 

  1237. 	    $1.last-&gt;next = ri;
    1238. 

  1238. 	    $$.last = ri;
    1239. 

  1239. 	  }
    1240. 

  1240. 	| rcdata_data ',' sizednumexpr
    1241. 

  1241. 	  {
    1242. 

  1242. 	    struct rcdata_item *ri;
    1243. 

  1243. 

  1244. 	    ri = define_rcdata_number ($3.val, $3.dword);
    1245. 

  1245. 	    $$.first = $1.first;
    1246. 

  1246. 	    $1.last-&gt;next = ri;
    1247. 

  1247. 	    $$.last = ri;
    1248. 

  1248. 	  }
    1249. 

  1249. 	;
    1250. 

  1250. 

  1251. /* Stringtable resources.  */
    1252. 

  1252. 

  1253. stringtable:
    1254. 

  1254. 	  STRINGTABLE suboptions BEG 
    1255. 

  1255. 	    { sub_res_info = $2; }
    1256. 

  1256. 	    string_data END
    1257. 

  1257. 	;
    1258. 

  1258. 

  1259. string_data:
    1260. 

  1260. 	  /* empty */
    1261. 

  1261. 	| string_data numexpr QUOTEDSTRING
    1262. 

  1262. 	  {
    1263. 

  1263. 	    define_stringtable (&amp;sub_res_info, $2, $3);
    1264. 

  1264. 	    if (yychar != YYEMPTY)
    1265. 

  1265. 	      YYERROR;
    1266. 

  1266. 	    rcparse_discard_strings ();
    1267. 

  1267. 	  }
    1268. 

  1268. 	| string_data numexpr ',' QUOTEDSTRING
    1269. 

  1269. 	  {
    1270. 

  1270. 	    define_stringtable (&amp;sub_res_info, $2, $4);
    1271. 

  1271. 	    if (yychar != YYEMPTY)
    1272. 

  1272. 	      YYERROR;
    1273. 

  1273. 	    rcparse_discard_strings ();
    1274. 

  1274. 	  }
    1275. 

  1275. 	;
    1276. 

  1276. 

  1277. /* User defined resources.  We accept general suboptions in the
    1278. 

  1278.    file_name case to keep the parser happy.  */
    1279. 

  1279. 

  1280. user:
    1281. 

  1281. 	  id id suboptions BEG optrcdata_data END
    1282. 

  1282. 	  {
    1283. 

  1283. 	    define_user_data ($1, $2, &amp;$3, $5.first);
    1284. 

  1284. 	    if (yychar != YYEMPTY)
    1285. 

  1285. 	      YYERROR;
    1286. 

  1286. 	    rcparse_discard_strings ();
    1287. 

  1287. 	  }
    1288. 

  1288. 	| id id suboptions file_name
    1289. 

  1289. 	  {
    1290. 

  1290. 	    define_user_file ($1, $2, &amp;$3, $4);
    1291. 

  1291. 	    if (yychar != YYEMPTY)
    1292. 

  1292. 	      YYERROR;
    1293. 

  1293. 	    rcparse_discard_strings ();
    1294. 

  1294. 	  }
    1295. 

  1295. 	;
    1296. 

  1296. 

  1297. /* Versioninfo resources.  */
    1298. 

  1298. 

  1299. versioninfo:
    1300. 

  1300. 	  id VERSIONINFO fixedverinfo BEG verblocks END
    1301. 

  1301. 	  {
    1302. 

  1302. 	    define_versioninfo ($1, language, $3, $5);
    1303. 

  1303. 	    if (yychar != YYEMPTY)
    1304. 

  1304. 	      YYERROR;
    1305. 

  1305. 	    rcparse_discard_strings ();
    1306. 

  1306. 	  }
    1307. 

  1307. 	;
    1308. 

  1308. 

  1309. fixedverinfo:
    1310. 

  1310. 	  /* empty */
    1311. 

  1311. 	  {
    1312. 

  1312. 	    $$ = ((struct fixed_versioninfo *)
    1313. 

  1313. 		  res_alloc (sizeof (struct fixed_versioninfo)));
    1314. 

  1314. 	    memset ($$, 0, sizeof (struct fixed_versioninfo));
    1315. 

  1315. 	  }
    1316. 

  1316. 	| fixedverinfo FILEVERSION numexpr cnumexpr cnumexpr cnumexpr
    1317. 

  1317. 	  {
    1318. 

  1318. 	    $1-&gt;file_version_ms = ($3 &lt;&lt; 16) | $4;
    1319. 

  1319. 	    $1-&gt;file_version_ls = ($5 &lt;&lt; 16) | $6;
    1320. 

  1320. 	    $$ = $1;
    1321. 

  1321. 	  }
    1322. 

  1322. 	| fixedverinfo PRODUCTVERSION numexpr cnumexpr cnumexpr cnumexpr
    1323. 

  1323. 	  {
    1324. 

  1324. 	    $1-&gt;product_version_ms = ($3 &lt;&lt; 16) | $4;
    1325. 

  1325. 	    $1-&gt;product_version_ls = ($5 &lt;&lt; 16) | $6;
    1326. 

  1326. 	    $$ = $1;
    1327. 

  1327. 	  }
    1328. 

  1328. 	| fixedverinfo FILEFLAGSMASK numexpr
    1329. 

  1329. 	  {
    1330. 

  1330. 	    $1-&gt;file_flags_mask = $3;
    1331. 

  1331. 	    $$ = $1;
    1332. 

  1332. 	  }
    1333. 

  1333. 	| fixedverinfo FILEFLAGS numexpr
    1334. 

  1334. 	  {
    1335. 

  1335. 	    $1-&gt;file_flags = $3;
    1336. 

  1336. 	    $$ = $1;
    1337. 

  1337. 	  }
    1338. 

  1338. 	| fixedverinfo FILEOS numexpr
    1339. 

  1339. 	  {
    1340. 

  1340. 	    $1-&gt;file_os = $3;
    1341. 

  1341. 	    $$ = $1;
    1342. 

  1342. 	  }
    1343. 

  1343. 	| fixedverinfo FILETYPE numexpr
    1344. 

  1344. 	  {
    1345. 

  1345. 	    $1-&gt;file_type = $3;
    1346. 

  1346. 	    $$ = $1;
    1347. 

  1347. 	  }
    1348. 

  1348. 	| fixedverinfo FILESUBTYPE numexpr
    1349. 

  1349. 	  {
    1350. 

  1350. 	    $1-&gt;file_subtype = $3;
    1351. 

  1351. 	    $$ = $1;
    1352. 

  1352. 	  }
    1353. 

  1353. 	;
    1354. 

  1354. 

  1355. /* To handle verblocks successfully, the lexer handles BLOCK
    1356. 

  1356.    specially.  A BLOCK &quot;StringFileInfo&quot; is returned as
    1357. 

  1357.    BLOCKSTRINGFILEINFO.  A BLOCK &quot;VarFileInfo&quot; is returned as
    1358. 

  1358.    BLOCKVARFILEINFO.  A BLOCK with some other string returns BLOCK
    1359. 

  1359.    with the string as the value.  */
    1360. 

  1360. 

  1361. verblocks:
    1362. 

  1362. 	  /* empty */
    1363. 

  1363. 	  {
    1364. 

  1364. 	    $$ = NULL;
    1365. 

  1365. 	  }
    1366. 

  1366. 	| verblocks BLOCKSTRINGFILEINFO BEG BLOCK BEG vervals END END
    1367. 

  1367. 	  {
    1368. 

  1368. 	    $$ = append_ver_stringfileinfo ($1, $4, $6);
    1369. 

  1369. 	  }
    1370. 

  1370. 	| verblocks BLOCKVARFILEINFO BEG VALUE QUOTEDSTRING vertrans END
    1371. 

  1371. 	  {
    1372. 

  1372. 	    $$ = append_ver_varfileinfo ($1, $5, $6);
    1373. 

  1373. 	  }
    1374. 

  1374. 	;
    1375. 

  1375. 

  1376. vervals:
    1377. 

  1377. 	  /* empty */
    1378. 

  1378. 	  {
    1379. 

  1379. 	    $$ = NULL;
    1380. 

  1380. 	  }
    1381. 

  1381. 	| vervals VALUE QUOTEDSTRING ',' QUOTEDSTRING
    1382. 

  1382. 	  {
    1383. 

  1383. 	    $$ = append_verval ($1, $3, $5);
    1384. 

  1384. 	  }
    1385. 

  1385. 	;
    1386. 

  1386. 

  1387. vertrans:
    1388. 

  1388. 	  /* empty */
    1389. 

  1389. 	  {
    1390. 

  1390. 	    $$ = NULL;
    1391. 

  1391. 	  }
    1392. 

  1392. 	| vertrans cnumexpr cnumexpr
    1393. 

  1393. 	  {
    1394. 

  1394. 	    $$ = append_vertrans ($1, $2, $3);
    1395. 

  1395. 	  }
    1396. 

  1396. 	;
    1397. 

  1397. 

  1398. /* A resource ID.  */
    1399. 

  1399. 

  1400. id:
    1401. 

  1401. 	  posnumexpr
    1402. 

  1402. 	  {
    1403. 

  1403. 	    $$.named = 0;
    1404. 

  1404. 	    $$.u.id = $1;
    1405. 

  1405. 	  }
    1406. 

  1406. 	| STRING
    1407. 

  1407. 	  {
    1408. 

  1408. 	    char *copy, *s;
    1409. 

  1409. 

  1410. 	    /* It seems that resource ID's are forced to upper case.  */
    1411. 

  1411. 	    copy = xstrdup ($1);
    1412. 

  1412. 	    for (s = copy; *s != '\0'; s++)
    1413. 

  1413. 	      *s = TOUPPER (*s);
    1414. 

  1414. 	    res_string_to_id (&amp;$$, copy);
    1415. 

  1415. 	    free (copy);
    1416. 

  1416. 	  }
    1417. 

  1417. 	;
    1418. 

  1418. 

  1419. /* A resource reference.  */
    1420. 

  1420. 

  1421. resname:
    1422. 

  1422. 	  QUOTEDSTRING
    1423. 

  1423. 	  {
    1424. 

  1424. 	    $$ = $1;
    1425. 

  1425. 	  }
    1426. 

  1426. 	| QUOTEDSTRING ','
    1427. 

  1427. 	  {
    1428. 

  1428. 	    $$ = $1;
    1429. 

  1429. 	  }
    1430. 

  1430. 	| STRING ','
    1431. 

  1431. 	  {
    1432. 

  1432. 	    $$ = $1;
    1433. 

  1433. 	  }
    1434. 

  1434. 	;
    1435. 

  1435. 

  1436. 

  1437. resref:
    1438. 

  1438. 	  posnumexpr ','
    1439. 

  1439. 	  {
    1440. 

  1440. 	    $$.named = 0;
    1441. 

  1441. 	    $$.u.id = $1;
    1442. 

  1442. 	  }
    1443. 

  1443. 	| resname
    1444. 

  1444. 	  {
    1445. 

  1445. 	    char *copy, *s;
    1446. 

  1446. 

  1447. 	    /* It seems that resource ID's are forced to upper case.  */
    1448. 

  1448. 	    copy = xstrdup ($1);
    1449. 

  1449. 	    for (s = copy; *s != '\0'; s++)
    1450. 

  1450. 	      *s = TOUPPER (*s);
    1451. 

  1451. 	    res_string_to_id (&amp;$$, copy);
    1452. 

  1452. 	    free (copy);
    1453. 

  1453. 	  }
    1454. 

  1454. 	;
    1455. 

  1455. 

  1456. /* Generic suboptions.  These may appear before the BEGIN in any
    1457. 

  1457.    multiline statement.  */
    1458. 

  1458. 

  1459. suboptions:
    1460. 

  1460. 	  /* empty */
    1461. 

  1461. 	  {
    1462. 

  1462. 	    memset (&amp;$$, 0, sizeof (struct res_res_info));
    1463. 

  1463. 	    $$.language = language;
    1464. 

  1464. 	    /* FIXME: Is this the right default?  */
    1465. 

  1465. 	    $$.memflags = MEMFLAG_MOVEABLE | MEMFLAG_PURE | MEMFLAG_DISCARDABLE;
    1466. 

  1466. 	  }
    1467. 

  1467. 	| suboptions memflag
    1468. 

  1468. 	  {
    1469. 

  1469. 	    $$ = $1;
    1470. 

  1470. 	    $$.memflags |= $2.on;
    1471. 

  1471. 	    $$.memflags &amp;=~ $2.off;
    1472. 

  1472. 	  }
    1473. 

  1473. 	| suboptions CHARACTERISTICS numexpr
    1474. 

  1474. 	  {
    1475. 

  1475. 	    $$ = $1;
    1476. 

  1476. 	    $$.characteristics = $3;
    1477. 

  1477. 	  }
    1478. 

  1478. 	| suboptions LANGUAGE numexpr cnumexpr
    1479. 

  1479. 	  {
    1480. 

  1480. 	    $$ = $1;
    1481. 

  1481. 	    $$.language = $3 | ($4 &lt;&lt; SUBLANG_SHIFT);
    1482. 

  1482. 	  }
    1483. 

  1483. 	| suboptions VERSIONK numexpr
    1484. 

  1484. 	  {
    1485. 

  1485. 	    $$ = $1;
    1486. 

  1486. 	    $$.version = $3;
    1487. 

  1487. 	  }
    1488. 

  1488. 	;
    1489. 

  1489. 

  1490. /* Memory flags which default to MOVEABLE and DISCARDABLE.  */
    1491. 

  1491. 

  1492. memflags_move_discard:
    1493. 

  1493. 	  /* empty */
    1494. 

  1494. 	  {
    1495. 

  1495. 	    memset (&amp;$$, 0, sizeof (struct res_res_info));
    1496. 

  1496. 	    $$.language = language;
    1497. 

  1497. 	    $$.memflags = MEMFLAG_MOVEABLE | MEMFLAG_DISCARDABLE;
    1498. 

  1498. 	  }
    1499. 

  1499. 	| memflags_move_discard memflag
    1500. 

  1500. 	  {
    1501. 

  1501. 	    $$ = $1;
    1502. 

  1502. 	    $$.memflags |= $2.on;
    1503. 

  1503. 	    $$.memflags &amp;=~ $2.off;
    1504. 

  1504. 	  }
    1505. 

  1505. 	;
    1506. 

  1506. 

  1507. /* Memory flags which default to MOVEABLE.  */
    1508. 

  1508. 

  1509. memflags_move:
    1510. 

  1510. 	  /* empty */
    1511. 

  1511. 	  {
    1512. 

  1512. 	    memset (&amp;$$, 0, sizeof (struct res_res_info));
    1513. 

  1513. 	    $$.language = language;
    1514. 

  1514. 	    $$.memflags = MEMFLAG_MOVEABLE | MEMFLAG_PURE | MEMFLAG_DISCARDABLE;
    1515. 

  1515. 	  }
    1516. 

  1516. 	| memflags_move memflag
    1517. 

  1517. 	  {
    1518. 

  1518. 	    $$ = $1;
    1519. 

  1519. 	    $$.memflags |= $2.on;
    1520. 

  1520. 	    $$.memflags &amp;=~ $2.off;
    1521. 

  1521. 	  }
    1522. 

  1522. 	;
    1523. 

  1523. 

  1524. /* Memory flags.  This returns a struct with two integers, because we
    1525. 

  1525.    sometimes want to set bits and we sometimes want to clear them.  */
    1526. 

  1526. 

  1527. memflag:
    1528. 

  1528. 	  MOVEABLE
    1529. 

  1529. 	  {
    1530. 

  1530. 	    $$.on = MEMFLAG_MOVEABLE;
    1531. 

  1531. 	    $$.off = 0;
    1532. 

  1532. 	  }
    1533. 

  1533. 	| FIXED
    1534. 

  1534. 	  {
    1535. 

  1535. 	    $$.on = 0;
    1536. 

  1536. 	    $$.off = MEMFLAG_MOVEABLE;
    1537. 

  1537. 	  }
    1538. 

  1538. 	| PURE
    1539. 

  1539. 	  {
    1540. 

  1540. 	    $$.on = MEMFLAG_PURE;
    1541. 

  1541. 	    $$.off = 0;
    1542. 

  1542. 	  }
    1543. 

  1543. 	| IMPURE
    1544. 

  1544. 	  {
    1545. 

  1545. 	    $$.on = 0;
    1546. 

  1546. 	    $$.off = MEMFLAG_PURE;
    1547. 

  1547. 	  }
    1548. 

  1548. 	| PRELOAD
    1549. 

  1549. 	  {
    1550. 

  1550. 	    $$.on = MEMFLAG_PRELOAD;
    1551. 

  1551. 	    $$.off = 0;
    1552. 

  1552. 	  }
    1553. 

  1553. 	| LOADONCALL
    1554. 

  1554. 	  {
    1555. 

  1555. 	    $$.on = 0;
    1556. 

  1556. 	    $$.off = MEMFLAG_PRELOAD;
    1557. 

  1557. 	  }
    1558. 

  1558. 	| DISCARDABLE
    1559. 

  1559. 	  {
    1560. 

  1560. 	    $$.on = MEMFLAG_DISCARDABLE;
    1561. 

  1561. 	    $$.off = 0;
    1562. 

  1562. 	  }
    1563. 

  1563. 	;
    1564. 

  1564. 

  1565. /* A file name.  */
    1566. 

  1566. 

  1567. file_name:
    1568. 

  1568. 	  QUOTEDSTRING
    1569. 

  1569. 	  {
    1570. 

  1570. 	    $$ = $1;
    1571. 

  1571. 	  }
    1572. 

  1572. 	| STRING
    1573. 

  1573. 	  {
    1574. 

  1574. 	    $$ = $1;
    1575. 

  1575. 	  }
    1576. 

  1576. 	;
    1577. 

  1577. 

  1578. /* A style expression.  This changes the static variable STYLE.  We do
    1579. 

  1579.    it this way because rc appears to permit a style to be set to
    1580. 

  1580.    something like
    1581. 

  1581.        WS_GROUP | NOT WS_TABSTOP
    1582. 

  1582.    to mean that a default of WS_TABSTOP should be removed.  Anything
    1583. 

  1583.    which wants to accept a style must first set STYLE to the default
    1584. 

  1584.    value.  The styleexpr nonterminal will change STYLE as specified by
    1585. 

  1585.    the user.  Note that we do not accept arbitrary expressions here,
    1586. 

  1586.    just numbers separated by '|'.  */
    1587. 

  1587. 

  1588. styleexpr:
    1589. 

  1589. 	  parennumber
    1590. 

  1590. 	  {
    1591. 

  1591. 	    style |= $1;
    1592. 

  1592. 	  }
    1593. 

  1593. 	| NOT parennumber
    1594. 

  1594. 	  {
    1595. 

  1595. 	    style &amp;=~ $2;
    1596. 

  1596. 	  }
    1597. 

  1597. 	| styleexpr '|' parennumber
    1598. 

  1598. 	  {
    1599. 

  1599. 	    style |= $3;
    1600. 

  1600. 	  }
    1601. 

  1601. 	| styleexpr '|' NOT parennumber
    1602. 

  1602. 	  {
    1603. 

  1603. 	    style &amp;=~ $4;
    1604. 

  1604. 	  }
    1605. 

  1605. 	;
    1606. 

  1606. 

  1607. parennumber:
    1608. 

  1608. 	  NUMBER
    1609. 

  1609. 	  {
    1610. 

  1610. 	    $$ = $1.val;
    1611. 

  1611. 	  }
    1612. 

  1612. 	| '(' numexpr ')'
    1613. 

  1613. 	  {
    1614. 

  1614. 	    $$ = $2;
    1615. 

  1615. 	  }
    1616. 

  1616. 	;
    1617. 

  1617. 

  1618. /* An optional expression with a leading comma.  */
    1619. 

  1619. 

  1620. optcnumexpr:
    1621. 

  1621. 	  /* empty */
    1622. 

  1622. 	  {
    1623. 

  1623. 	    $$ = 0;
    1624. 

  1624. 	  }
    1625. 

  1625. 	| cnumexpr
    1626. 

  1626. 	  {
    1627. 

  1627. 	    $$ = $1;
    1628. 

  1628. 	  }
    1629. 

  1629. 	;
    1630. 

  1630. 

  1631. /* An expression with a leading comma.  */
    1632. 

  1632. 

  1633. cnumexpr:
    1634. 

  1634. 	  ',' numexpr
    1635. 

  1635. 	  {
    1636. 

  1636. 	    $$ = $2;
    1637. 

  1637. 	  }
    1638. 

  1638. 	;
    1639. 

  1639. 

  1640. /* A possibly negated numeric expression.  */
    1641. 

  1641. 

  1642. numexpr:
    1643. 

  1643. 	  sizednumexpr
    1644. 

  1644. 	  {
    1645. 

  1645. 	    $$ = $1.val;
    1646. 

  1646. 	  }
    1647. 

  1647. 	;
    1648. 

  1648. 

  1649. /* A possibly negated expression with a size.  */
    1650. 

  1650. 

  1651. sizednumexpr:
    1652. 

  1652. 	  NUMBER
    1653. 

  1653. 	  {
    1654. 

  1654. 	    $$ = $1;
    1655. 

  1655. 	  }
    1656. 

  1656. 	| '(' sizednumexpr ')'
    1657. 

  1657. 	  {
    1658. 

  1658. 	    $$ = $2;
    1659. 

  1659. 	  }
    1660. 

  1660. 	| '~' sizednumexpr %prec '~'
    1661. 

  1661. 	  {
    1662. 

  1662. 	    $$.val = ~ $2.val;
    1663. 

  1663. 	    $$.dword = $2.dword;
    1664. 

  1664. 	  }
    1665. 

  1665. 	| '-' sizednumexpr %prec NEG
    1666. 

  1666. 	  {
    1667. 

  1667. 	    $$.val = - $2.val;
    1668. 

  1668. 	    $$.dword = $2.dword;
    1669. 

  1669. 	  }
    1670. 

  1670. 	| sizednumexpr '*' sizednumexpr
    1671. 

  1671. 	  {
    1672. 

  1672. 	    $$.val = $1.val * $3.val;
    1673. 

  1673. 	    $$.dword = $1.dword || $3.dword;
    1674. 

  1674. 	  }
    1675. 

  1675. 	| sizednumexpr '/' sizednumexpr
    1676. 

  1676. 	  {
    1677. 

  1677. 	    $$.val = $1.val / $3.val;
    1678. 

  1678. 	    $$.dword = $1.dword || $3.dword;
    1679. 

  1679. 	  }
    1680. 

  1680. 	| sizednumexpr '%' sizednumexpr
    1681. 

  1681. 	  {
    1682. 

  1682. 	    $$.val = $1.val % $3.val;
    1683. 

  1683. 	    $$.dword = $1.dword || $3.dword;
    1684. 

  1684. 	  }
    1685. 

  1685. 	| sizednumexpr '+' sizednumexpr
    1686. 

  1686. 	  {
    1687. 

  1687. 	    $$.val = $1.val + $3.val;
    1688. 

  1688. 	    $$.dword = $1.dword || $3.dword;
    1689. 

  1689. 	  }
    1690. 

  1690. 	| sizednumexpr '-' sizednumexpr
    1691. 

  1691. 	  {
    1692. 

  1692. 	    $$.val = $1.val - $3.val;
    1693. 

  1693. 	    $$.dword = $1.dword || $3.dword;
    1694. 

  1694. 	  }
    1695. 

  1695. 	| sizednumexpr '&amp;' sizednumexpr
    1696. 

  1696. 	  {
    1697. 

  1697. 	    $$.val = $1.val &amp; $3.val;
    1698. 

  1698. 	    $$.dword = $1.dword || $3.dword;
    1699. 

  1699. 	  }
    1700. 

  1700. 	| sizednumexpr '^' sizednumexpr
    1701. 

  1701. 	  {
    1702. 

  1702. 	    $$.val = $1.val ^ $3.val;
    1703. 

  1703. 	    $$.dword = $1.dword || $3.dword;
    1704. 

  1704. 	  }
    1705. 

  1705. 	| sizednumexpr '|' sizednumexpr
    1706. 

  1706. 	  {
    1707. 

  1707. 	    $$.val = $1.val | $3.val;
    1708. 

  1708. 	    $$.dword = $1.dword || $3.dword;
    1709. 

  1709. 	  }
    1710. 

  1710. 	;
    1711. 

  1711. 

  1712. /* An expression with a leading comma which does not use unary
    1713. 

  1713.    negation.  */
    1714. 

  1714. 

  1715. cposnumexpr:
    1716. 

  1716. 	  ',' posnumexpr
    1717. 

  1717. 	  {
    1718. 

  1718. 	    $$ = $2;
    1719. 

  1719. 	  }
    1720. 

  1720. 	;
    1721. 

  1721. 

  1722. /* An expression which does not use unary negation.  */
    1723. 

  1723. 

  1724. posnumexpr:
    1725. 

  1725. 	  sizedposnumexpr
    1726. 

  1726. 	  {
    1727. 

  1727. 	    $$ = $1.val;
    1728. 

  1728. 	  }
    1729. 

  1729. 	;
    1730. 

  1730. 

  1731. /* An expression which does not use unary negation.  We separate unary
    1732. 

  1732.    negation to avoid parsing conflicts when two numeric expressions
    1733. 

  1733.    appear consecutively.  */
    1734. 

  1734. 

  1735. sizedposnumexpr:
    1736. 

  1736. 	  NUMBER
    1737. 

  1737. 	  {
    1738. 

  1738. 	    $$ = $1;
    1739. 

  1739. 	  }
    1740. 

  1740. 	| '(' sizednumexpr ')'
    1741. 

  1741. 	  {
    1742. 

  1742. 	    $$ = $2;
    1743. 

  1743. 	  }
    1744. 

  1744. 	| '~' sizednumexpr %prec '~'
    1745. 

  1745. 	  {
    1746. 

  1746. 	    $$.val = ~ $2.val;
    1747. 

  1747. 	    $$.dword = $2.dword;
    1748. 

  1748. 	  }
    1749. 

  1749. 	| sizedposnumexpr '*' sizednumexpr
    1750. 

  1750. 	  {
    1751. 

  1751. 	    $$.val = $1.val * $3.val;
    1752. 

  1752. 	    $$.dword = $1.dword || $3.dword;
    1753. 

  1753. 	  }
    1754. 

  1754. 	| sizedposnumexpr '/' sizednumexpr
    1755. 

  1755. 	  {
    1756. 

  1756. 	    $$.val = $1.val / $3.val;
    1757. 

  1757. 	    $$.dword = $1.dword || $3.dword;
    1758. 

  1758. 	  }
    1759. 

  1759. 	| sizedposnumexpr '%' sizednumexpr
    1760. 

  1760. 	  {
    1761. 

  1761. 	    $$.val = $1.val % $3.val;
    1762. 

  1762. 	    $$.dword = $1.dword || $3.dword;
    1763. 

  1763. 	  }
    1764. 

  1764. 	| sizedposnumexpr '+' sizednumexpr
    1765. 

  1765. 	  {
    1766. 

  1766. 	    $$.val = $1.val + $3.val;
    1767. 

  1767. 	    $$.dword = $1.dword || $3.dword;
    1768. 

  1768. 	  }
    1769. 

  1769. 	| sizedposnumexpr '-' sizednumexpr
    1770. 

  1770. 	  {
    1771. 

  1771. 	    $$.val = $1.val - $3.val;
    1772. 

  1772. 	    $$.dword = $1.dword || $3.dword;
    1773. 

  1773. 	  }
    1774. 

  1774. 	| sizedposnumexpr '&amp;' sizednumexpr
    1775. 

  1775. 	  {
    1776. 

  1776. 	    $$.val = $1.val &amp; $3.val;
    1777. 

  1777. 	    $$.dword = $1.dword || $3.dword;
    1778. 

  1778. 	  }
    1779. 

  1779. 	| sizedposnumexpr '^' sizednumexpr
    1780. 

  1780. 	  {
    1781. 

  1781. 	    $$.val = $1.val ^ $3.val;
    1782. 

  1782. 	    $$.dword = $1.dword || $3.dword;
    1783. 

  1783. 	  }
    1784. 

  1784. 	| sizedposnumexpr '|' sizednumexpr
    1785. 

  1785. 	  {
    1786. 

  1786. 	    $$.val = $1.val | $3.val;
    1787. 

  1787. 	    $$.dword = $1.dword || $3.dword;
    1788. 

  1788. 	  }
    1789. 

  1789. 	;
    1790. 

  1790. 

  1791. %%
    1792. 

  1792. 

  1793. /* Set the language from the command line.  */
    1794. 

  1794. 

  1795. void
    1796. 

  1796. rcparse_set_language (int lang)
    1797. 

  1797. {
    1798. 

  1798.   language = lang;
    1799. 

  1799. }
    1800. 

  1800. </pre>
    1801. 

  1801. <hr />
    1802. 

  1802. </body></html>
    1803.