]> git.proxmox.com Git - mirror_edk2.git/blob - EdkCompatibilityPkg/Compatibility/FrameworkHiiOnUefiHiiThunk/SetupBrowser.c
43d1b9c0f40f67f3c417fe4ec7b4c469a06e18dd
[mirror_edk2.git] / EdkCompatibilityPkg / Compatibility / FrameworkHiiOnUefiHiiThunk / SetupBrowser.c
1 /**@file
2 Framework to UEFI 2.1 Setup Browser Thunk. The file consume EFI_FORM_BROWSER2_PROTOCOL
3 to produce a EFI_FORM_BROWSER_PROTOCOL.
4
5 Copyright (c) 2008, Intel Corporation
6 All rights reserved. This program and the accompanying materials
7 are licensed and made available under the terms and conditions of the BSD License
8 which accompanies this distribution. The full text of the license may be found at
9 http://opensource.org/licenses/bsd-license.php
10
11 THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,
12 WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.
13
14 **/
15
16 #include "HiiDatabase.h"
17 #include "SetupBrowser.h"
18
19 EFI_GUID gFrameworkBdsFrontPageFormsetGuid = FRAMEWORK_BDS_FRONTPAGE_FORMSET_GUID;
20 EFI_HII_HANDLE gStringPackHandle = NULL;
21 BOOLEAN mFrontPageDisplayed = FALSE;
22 //
23 // 106F3545-B788-4cb5-9D2A-CE0CDB208DF5
24 //
25 EFI_GUID gEfiHiiThunkProducerGuid = { 0x106f3545, 0xb788, 0x4cb5, { 0x9d, 0x2a, 0xce, 0xc, 0xdb, 0x20, 0x8d, 0xf5 } };
26
27
28 /**
29 Get string by string id from HII Interface
30
31
32 @param Id String ID.
33
34 @retval CHAR16 * String from ID.
35 @retval NULL If error occurs.
36
37 **/
38 CHAR16 *
39 GetStringById (
40 IN EFI_STRING_ID Id
41 )
42 {
43 return HiiGetString (gStringPackHandle, Id, NULL);
44 }
45
46 /**
47
48 Show progress bar with title above it. It only works in Graphics mode.
49
50
51 @param TitleForeground Foreground color for Title.
52 @param TitleBackground Background color for Title.
53 @param Title Title above progress bar.
54 @param ProgressColor Progress bar color.
55 @param Progress Progress (0-100)
56 @param PreviousValue The previous value of the progress.
57
58 @retval EFI_STATUS Success update the progress bar
59
60 **/
61 EFI_STATUS
62 PlatformBdsShowProgress (
63 IN EFI_GRAPHICS_OUTPUT_BLT_PIXEL TitleForeground,
64 IN EFI_GRAPHICS_OUTPUT_BLT_PIXEL TitleBackground,
65 IN CHAR16 *Title,
66 IN EFI_GRAPHICS_OUTPUT_BLT_PIXEL ProgressColor,
67 IN UINTN Progress,
68 IN UINTN PreviousValue
69 )
70 {
71 EFI_STATUS Status;
72 EFI_GRAPHICS_OUTPUT_PROTOCOL *GraphicsOutput;
73 EFI_UGA_DRAW_PROTOCOL *UgaDraw;
74 UINT32 SizeOfX;
75 UINT32 SizeOfY;
76 UINT32 ColorDepth;
77 UINT32 RefreshRate;
78 EFI_GRAPHICS_OUTPUT_BLT_PIXEL Color;
79 UINTN BlockHeight;
80 UINTN BlockWidth;
81 UINTN BlockNum;
82 UINTN PosX;
83 UINTN PosY;
84 UINTN Index;
85
86 if (Progress > 100) {
87 return EFI_INVALID_PARAMETER;
88 }
89
90 UgaDraw = NULL;
91 Status = gBS->HandleProtocol (
92 gST->ConsoleOutHandle,
93 &gEfiGraphicsOutputProtocolGuid,
94 (VOID **) &GraphicsOutput
95 );
96 if (EFI_ERROR (Status)) {
97 GraphicsOutput = NULL;
98
99 Status = gBS->HandleProtocol (
100 gST->ConsoleOutHandle,
101 &gEfiUgaDrawProtocolGuid,
102 (VOID **) &UgaDraw
103 );
104 }
105 if (EFI_ERROR (Status)) {
106 return EFI_UNSUPPORTED;
107 }
108
109 SizeOfX = 0;
110 SizeOfY = 0;
111 if (GraphicsOutput != NULL) {
112 SizeOfX = GraphicsOutput->Mode->Info->HorizontalResolution;
113 SizeOfY = GraphicsOutput->Mode->Info->VerticalResolution;
114 } else {
115 Status = UgaDraw->GetMode (
116 UgaDraw,
117 &SizeOfX,
118 &SizeOfY,
119 &ColorDepth,
120 &RefreshRate
121 );
122 if (EFI_ERROR (Status)) {
123 return EFI_UNSUPPORTED;
124 }
125 }
126
127 BlockWidth = SizeOfX / 100;
128 BlockHeight = SizeOfY / 50;
129
130 BlockNum = Progress;
131
132 PosX = 0;
133 PosY = SizeOfY * 48 / 50;
134
135 if (BlockNum == 0) {
136 //
137 // Clear progress area
138 //
139 SetMem (&Color, sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL), 0x0);
140
141 if (GraphicsOutput != NULL) {
142 Status = GraphicsOutput->Blt (
143 GraphicsOutput,
144 &Color,
145 EfiBltVideoFill,
146 0,
147 0,
148 0,
149 PosY - EFI_GLYPH_HEIGHT - 1,
150 SizeOfX,
151 SizeOfY - (PosY - EFI_GLYPH_HEIGHT - 1),
152 SizeOfX * sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL)
153 );
154 } else {
155 Status = UgaDraw->Blt (
156 UgaDraw,
157 (EFI_UGA_PIXEL *) &Color,
158 EfiUgaVideoFill,
159 0,
160 0,
161 0,
162 PosY - EFI_GLYPH_HEIGHT - 1,
163 SizeOfX,
164 SizeOfY - (PosY - EFI_GLYPH_HEIGHT - 1),
165 SizeOfX * sizeof (EFI_UGA_PIXEL)
166 );
167 }
168 }
169 //
170 // Show progress by drawing blocks
171 //
172 for (Index = PreviousValue; Index < BlockNum; Index++) {
173 PosX = Index * BlockWidth;
174 if (GraphicsOutput != NULL) {
175 Status = GraphicsOutput->Blt (
176 GraphicsOutput,
177 &ProgressColor,
178 EfiBltVideoFill,
179 0,
180 0,
181 PosX,
182 PosY,
183 BlockWidth - 1,
184 BlockHeight,
185 (BlockWidth) * sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL)
186 );
187 } else {
188 Status = UgaDraw->Blt (
189 UgaDraw,
190 (EFI_UGA_PIXEL *) &ProgressColor,
191 EfiUgaVideoFill,
192 0,
193 0,
194 PosX,
195 PosY,
196 BlockWidth - 1,
197 BlockHeight,
198 (BlockWidth) * sizeof (EFI_UGA_PIXEL)
199 );
200 }
201 }
202
203 PrintXY (
204 (SizeOfX - StrLen (Title) * EFI_GLYPH_WIDTH) / 2,
205 PosY - EFI_GLYPH_HEIGHT - 1,
206 &TitleForeground,
207 &TitleBackground,
208 Title
209 );
210
211 return EFI_SUCCESS;
212 }
213
214 /**
215 Function waits for a given event to fire, or for an optional timeout to expire.
216
217
218 @param Event The event to wait for
219
220 @param Timeout An optional timeout value in 100 ns units.
221
222 @retval EFI_SUCCESS Event fired before Timeout expired.
223 @retval EFI_TIME_OUT Timout expired before Event fired..
224
225 **/
226 EFI_STATUS
227 WaitForSingleEvent (
228 IN EFI_EVENT Event,
229 IN UINT64 Timeout OPTIONAL
230 )
231 {
232 EFI_STATUS Status;
233 UINTN Index;
234 EFI_EVENT TimerEvent;
235 EFI_EVENT WaitList[2];
236
237 if (Timeout != 0) {
238 //
239 // Create a timer event
240 //
241 Status = gBS->CreateEvent (EVT_TIMER, 0, NULL, NULL, &TimerEvent);
242 if (!EFI_ERROR (Status)) {
243 //
244 // Set the timer event
245 //
246 gBS->SetTimer (
247 TimerEvent,
248 TimerRelative,
249 Timeout
250 );
251
252 //
253 // Wait for the original event or the timer
254 //
255 WaitList[0] = Event;
256 WaitList[1] = TimerEvent;
257 Status = gBS->WaitForEvent (2, WaitList, &Index);
258 gBS->CloseEvent (TimerEvent);
259
260 //
261 // If the timer expired, change the return to timed out
262 //
263 if (!EFI_ERROR (Status) && Index == 1) {
264 Status = EFI_TIMEOUT;
265 }
266 }
267 } else {
268 //
269 // No timeout... just wait on the event
270 //
271 Status = gBS->WaitForEvent (1, &Event, &Index);
272 ASSERT (!EFI_ERROR (Status));
273 ASSERT (Index == 0);
274 }
275
276 return Status;
277 }
278
279 /**
280 Function show progress bar to wait for user input.
281
282
283 @param TimeoutDefault - The fault time out value before the system
284 continue to boot.
285
286 @retval EFI_SUCCESS User pressed some key except "Enter"
287 @retval EFI_TIME_OUT Timout expired or user press "Enter"
288
289 **/
290 EFI_STATUS
291 ShowProgress (
292 IN UINT16 TimeoutDefault
293 )
294 {
295 EFI_STATUS Status;
296 CHAR16 *TmpStr;
297 EFI_GRAPHICS_OUTPUT_BLT_PIXEL Foreground;
298 EFI_GRAPHICS_OUTPUT_BLT_PIXEL Background;
299 EFI_GRAPHICS_OUTPUT_BLT_PIXEL Color;
300 EFI_INPUT_KEY Key;
301 UINT16 TimeoutRemain;
302
303 if (TimeoutDefault == 0) {
304 return EFI_TIMEOUT;
305 }
306
307 DEBUG ((EFI_D_INFO, "\n\nStart showing progress bar... Press any key to stop it! ...Zzz....\n"));
308
309 SetMem (&Foreground, sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL), 0xff);
310 SetMem (&Background, sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL), 0x0);
311 SetMem (&Color, sizeof (EFI_GRAPHICS_OUTPUT_BLT_PIXEL), 0xff);
312
313 //
314 // Clear the progress status bar first
315 //
316 TmpStr = GetStringById (STRING_TOKEN (STR_START_BOOT_OPTION));
317 if (TmpStr != NULL) {
318 PlatformBdsShowProgress (Foreground, Background, TmpStr, Color, 0, 0);
319 }
320
321 TimeoutRemain = TimeoutDefault;
322 while (TimeoutRemain != 0) {
323 DEBUG ((EFI_D_INFO, "Showing progress bar...Remaining %d second!\n", TimeoutRemain));
324
325 Status = WaitForSingleEvent (gST->ConIn->WaitForKey, ONE_SECOND);
326 if (Status != EFI_TIMEOUT) {
327 break;
328 }
329 TimeoutRemain--;
330
331 //
332 // Show progress
333 //
334 if (TmpStr != NULL) {
335 PlatformBdsShowProgress (
336 Foreground,
337 Background,
338 TmpStr,
339 Color,
340 ((TimeoutDefault - TimeoutRemain) * 100 / TimeoutDefault),
341 0
342 );
343 }
344 }
345 gBS->FreePool (TmpStr);
346
347 //
348 // Timeout expired
349 //
350 if (TimeoutRemain == 0) {
351 return EFI_TIMEOUT;
352 }
353
354 //
355 // User pressed some key
356 //
357 Status = gST->ConIn->ReadKeyStroke (gST->ConIn, &Key);
358 if (EFI_ERROR (Status)) {
359 return Status;
360 }
361
362 if (Key.UnicodeChar == CHAR_CARRIAGE_RETURN) {
363 //
364 // User pressed enter, equivalent to select "continue"
365 //
366 return EFI_TIMEOUT;
367 }
368
369 return EFI_SUCCESS;
370 }
371
372 /**
373 Return the default value for system Timeout variable.
374
375 @return Timeout value.
376
377 **/
378 UINT16
379 EFIAPI
380 GetTimeout (
381 VOID
382 )
383 {
384 return PcdGet16 (PcdPlatformBootTimeOut);
385 }
386
387
388 /**
389 This is the Framework Setup Browser interface which displays a FormSet.
390
391 @param This The EFI_FORM_BROWSER_PROTOCOL context.
392 @param UseDatabase TRUE if the FormSet is from HII database. The Thunk implementation
393 only support UseDatabase is TRUE.
394 @param Handle The Handle buffer.
395 @param HandleCount The number of Handle in the Handle Buffer. It must be 1 for this implementation.
396 @param Packet The pointer to data buffer containing IFR and String package. Not supported.
397 @param CallbackHandle Not supported.
398 @param NvMapOverride The buffer is used only when there is no NV variable to define the
399 current settings and the caller needs to provide to the browser the
400 current settings for the the "fake" NV variable. If used, no saving of
401 an NV variable is possbile. This parameter is also ignored if Handle is NULL.
402
403 @retval EFI_SUCCESS If the Formset is displayed correctly.
404 @retval EFI_UNSUPPORTED If UseDatabase is FALSE or HandleCount is not 1.
405 @retval EFI_INVALID_PARAMETER If the *Handle passed in is not found in the database.
406 **/
407
408 EFI_STATUS
409 EFIAPI
410 ThunkSendForm (
411 IN EFI_FORM_BROWSER_PROTOCOL *This,
412 IN BOOLEAN UseDatabase,
413 IN FRAMEWORK_EFI_HII_HANDLE *Handle,
414 IN UINTN HandleCount,
415 IN FRAMEWORK_EFI_IFR_PACKET *Packet, OPTIONAL
416 IN EFI_HANDLE CallbackHandle, OPTIONAL
417 IN UINT8 *NvMapOverride, OPTIONAL
418 IN FRAMEWORK_EFI_SCREEN_DESCRIPTOR *ScreenDimensions, OPTIONAL
419 OUT BOOLEAN *ResetRequired OPTIONAL
420 )
421 {
422 EFI_STATUS Status;
423 EFI_BROWSER_ACTION_REQUEST ActionRequest;
424 HII_THUNK_CONTEXT *ThunkContext;
425 HII_THUNK_PRIVATE_DATA *Private;
426 EFI_FORMBROWSER_THUNK_PRIVATE_DATA *BrowserPrivate;
427
428 if (!UseDatabase) {
429 //
430 // ThunkSendForm only support displays forms registered into the HII database.
431 //
432 return EFI_UNSUPPORTED;
433 }
434
435 if (HandleCount != 1 ) {
436 return EFI_UNSUPPORTED;
437 }
438
439 BrowserPrivate = EFI_FORMBROWSER_THUNK_PRIVATE_DATA_FROM_THIS (This);
440 Private = BrowserPrivate->ThunkPrivate;
441
442 ThunkContext = FwHiiHandleToThunkContext (Private, *Handle);
443 if (ThunkContext == NULL) {
444 return EFI_INVALID_PARAMETER;
445 }
446
447 //
448 // Following UEFI spec to do auto booting after a time-out. This feature is implemented
449 // in Framework Setup Browser and moved to MdeModulePkg/Universal/BdsDxe. The auto booting is
450 // moved here in HII Thunk module.
451 //
452 if (CompareGuid (&gFrameworkBdsFrontPageFormsetGuid, &ThunkContext->FormSet->Guid) && !mFrontPageDisplayed) {
453 //
454 // Send form is called before entering the
455 //
456 mFrontPageDisplayed = TRUE;
457 Status = ShowProgress (GetTimeout ());
458
459 if (EFI_ERROR (Status)) {
460 return Status;
461 }
462 }
463
464 if (NvMapOverride != NULL) {
465 ThunkContext->NvMapOverride = NvMapOverride;
466 }
467
468 Status = mFormBrowser2Protocol->SendForm (
469 mFormBrowser2Protocol,
470 &ThunkContext->UefiHiiHandle,
471 1,
472 NULL,
473 0,
474 (EFI_SCREEN_DESCRIPTOR *) ScreenDimensions,
475 &ActionRequest
476 );
477
478 if (ActionRequest == EFI_BROWSER_ACTION_REQUEST_RESET) {
479 *ResetRequired = TRUE;
480 }
481
482 return Status;
483 }
484
485 /**
486
487 Rountine used to display a generic dialog interface and return
488 the Key or Input from user input.
489
490 @param LinesNumber The number of lines for the dialog box.
491 @param HotKey Defines if a single character is parsed (TRUE) and returned in KeyValue
492 or if a string is returned in StringBuffer.
493 @param MaximumStringSize The maximum size in bytes of a typed-in string.
494 @param StringBuffer On return contains the typed-in string if HotKey is FALSE.
495 @param Key The EFI_INPUT_KEY value returned if HotKey is TRUE.
496 @param FirstString The pointer to the first string in the list of strings
497 that comprise the dialog box.
498 @param ... A series of NumberOfLines text strings that will be used
499 to construct the dialog box.
500 @retval EFI_SUCCESS The dialog is created successfully and user interaction was received.
501 @retval EFI_DEVICE_ERROR The user typed in an ESC.
502 @retval EFI_INVALID_PARAMETER One of the parameters was invalid.(StringBuffer == NULL && HotKey == FALSE).
503 **/
504 EFI_STATUS
505 EFIAPI
506 ThunkCreatePopUp (
507 IN UINTN LinesNumber,
508 IN BOOLEAN HotKey,
509 IN UINTN MaximumStringSize,
510 OUT CHAR16 *StringBuffer,
511 OUT EFI_INPUT_KEY *Key,
512 IN CHAR16 *FirstString,
513 ...
514 )
515 {
516 VA_LIST Args;
517 EFI_SIMPLE_TEXT_OUTPUT_PROTOCOL *ConOut;
518 EFI_SIMPLE_TEXT_OUTPUT_MODE SavedConsoleMode;
519 UINTN Columns;
520 UINTN Rows;
521 UINTN Column;
522 UINTN Row;
523 UINTN NumberOfLines;
524 UINTN MaxLength;
525 CHAR16 *String;
526 UINTN Length;
527 CHAR16 *Line;
528 UINTN EventIndex;
529
530 if (!HotKey) {
531 return EFI_UNSUPPORTED;
532 }
533
534 if (MaximumStringSize == 0) {
535 //
536 // Blank strint to output
537 //
538 return EFI_INVALID_PARAMETER;
539 }
540
541 //
542 // Determine the length of the longest line in the popup and the the total
543 // number of lines in the popup
544 //
545 MaxLength = StrLen (FirstString);
546 NumberOfLines = 1;
547 VA_START (Args, FirstString);
548 while ((String = VA_ARG (Args, CHAR16 *)) != NULL) {
549 MaxLength = MAX (MaxLength, StrLen (String));
550 NumberOfLines++;
551 }
552 VA_END (Args);
553
554 //
555 // If the total number of lines in the popup is not same to the input NumberOfLines
556 // the parameter is not valid. Not check.
557 //
558 // if (NumberOfLines != LinesNumber) {
559 // return EFI_INVALID_PARAMETER;
560 // }
561
562 //
563 // If the maximum length of all the strings is not same to the input MaximumStringSize
564 // the parameter is not valid. Not check.
565 //
566 // if (MaxLength != MaximumStringSize) {
567 // return EFI_INVALID_PARAMETER;
568 // }
569
570 //
571 // Cache a pointer to the Simple Text Output Protocol in the EFI System Table
572 //
573 ConOut = gST->ConOut;
574
575 //
576 // Save the current console cursor position and attributes
577 //
578 CopyMem (&SavedConsoleMode, ConOut->Mode, sizeof (SavedConsoleMode));
579
580 //
581 // Retrieve the number of columns and rows in the current console mode
582 //
583 ConOut->QueryMode (ConOut, SavedConsoleMode.Mode, &Columns, &Rows);
584
585 //
586 // Disable cursor and set the foreground and background colors specified by Attribute
587 //
588 ConOut->EnableCursor (ConOut, FALSE);
589 ConOut->SetAttribute (ConOut, EFI_LIGHTGRAY | EFI_BACKGROUND_BLUE);
590
591 //
592 // Limit NumberOfLines to height of the screen minus 3 rows for the box itself
593 //
594 NumberOfLines = MIN (NumberOfLines, Rows - 3);
595
596 //
597 // Limit MaxLength to width of the screen minus 2 columns for the box itself
598 //
599 MaxLength = MIN (MaxLength, Columns - 2);
600
601 //
602 // Compute the starting row and starting column for the popup
603 //
604 Row = (Rows - (NumberOfLines + 3)) / 2;
605 Column = (Columns - (MaxLength + 2)) / 2;
606
607 //
608 // Allocate a buffer for a single line of the popup with borders and a Null-terminator
609 //
610 Line = AllocateZeroPool ((MaxLength + 3) * sizeof (CHAR16));
611 ASSERT (Line != NULL);
612
613 //
614 // Draw top of popup box
615 //
616 SetMem16 (Line, (MaxLength + 2) * 2, BOXDRAW_HORIZONTAL);
617 Line[0] = BOXDRAW_DOWN_RIGHT;
618 Line[MaxLength + 1] = BOXDRAW_DOWN_LEFT;
619 Line[MaxLength + 2] = L'\0';
620 ConOut->SetCursorPosition (ConOut, Column, Row++);
621 ConOut->OutputString (ConOut, Line);
622
623 //
624 // Draw middle of the popup with strings
625 //
626 VA_START (Args, FirstString);
627 String = FirstString;
628 while ((String != NULL) && (NumberOfLines > 0)) {
629 Length = StrLen (String);
630 SetMem16 (Line, (MaxLength + 2) * 2, L' ');
631 if (Length <= MaxLength) {
632 //
633 // Length <= MaxLength
634 //
635 CopyMem (Line + 1 + (MaxLength - Length) / 2, String , Length * sizeof (CHAR16));
636 } else {
637 //
638 // Length > MaxLength
639 //
640 CopyMem (Line + 1, String + (Length - MaxLength) / 2 , MaxLength * sizeof (CHAR16));
641 }
642 Line[0] = BOXDRAW_VERTICAL;
643 Line[MaxLength + 1] = BOXDRAW_VERTICAL;
644 Line[MaxLength + 2] = L'\0';
645 ConOut->SetCursorPosition (ConOut, Column, Row++);
646 ConOut->OutputString (ConOut, Line);
647 String = VA_ARG (Args, CHAR16 *);
648 NumberOfLines--;
649 }
650 VA_END (Args);
651
652 //
653 // Draw bottom of popup box
654 //
655 SetMem16 (Line, (MaxLength + 2) * 2, BOXDRAW_HORIZONTAL);
656 Line[0] = BOXDRAW_UP_RIGHT;
657 Line[MaxLength + 1] = BOXDRAW_UP_LEFT;
658 Line[MaxLength + 2] = L'\0';
659 ConOut->SetCursorPosition (ConOut, Column, Row++);
660 ConOut->OutputString (ConOut, Line);
661
662 //
663 // Free the allocated line buffer
664 //
665 FreePool (Line);
666
667 //
668 // Restore the cursor visibility, position, and attributes
669 //
670 ConOut->EnableCursor (ConOut, SavedConsoleMode.CursorVisible);
671 ConOut->SetCursorPosition (ConOut, SavedConsoleMode.CursorColumn, SavedConsoleMode.CursorRow);
672 ConOut->SetAttribute (ConOut, SavedConsoleMode.Attribute);
673
674 //
675 // Wait for a keystroke
676 //
677 if (Key != NULL) {
678 gBS->WaitForEvent (1, &gST->ConIn->WaitForKey, &EventIndex);
679 gST->ConIn->ReadKeyStroke (gST->ConIn, Key);
680 }
681
682 return EFI_SUCCESS;
683 }
684
685 /**
686
687 Initialize string packages in HII database.
688
689 **/
690 VOID
691 InitSetBrowserStrings (
692 VOID
693 )
694 {
695 //
696 // Initialize strings to HII database
697 //
698 gStringPackHandle = HiiAddPackages (
699 &gEfiHiiThunkProducerGuid,
700 NULL,
701 STRING_ARRAY_NAME,
702 NULL
703 );
704 ASSERT (gStringPackHandle != NULL);
705 }