1 /***************************************************************************
2  * Copyright (c) 2024 Microsoft Corporation
3  *
4  * This program and the accompanying materials are made available under the
5  * terms of the MIT License which is available at
6  * https://opensource.org/licenses/MIT.
7  *
8  * SPDX-License-Identifier: MIT
9  **************************************************************************/
10 
11 
12 /**************************************************************************/
13 /**************************************************************************/
14 /**                                                                       */
15 /** GUIX Component                                                        */
16 /**                                                                       */
17 /**   List Management (List)                                              */
18 /**                                                                       */
19 /**************************************************************************/
20 
21 #define GX_SOURCE_CODE
22 
23 
24 /* Include necessary system files.  */
25 
26 #include "gx_api.h"
27 #include "gx_widget.h"
28 #include "gx_window.h"
29 #include "gx_system.h"
30 #include "gx_utility.h"
31 
32 /**************************************************************************/
33 /*                                                                        */
34 /*  FUNCTION                                               RELEASE        */
35 /*                                                                        */
36 /*    _gx_vertical_list_up_wrap                           PORTABLE C      */
37 /*                                                           6.1          */
38 /*  AUTHOR                                                                */
39 /*                                                                        */
40 /*    Kenneth Maxwell, Microsoft Corporation                              */
41 /*                                                                        */
42 /*  DESCRIPTION                                                           */
43 /*                                                                        */
44 /*    This function scrolls up the vertical list.                         */
45 /*                                                                        */
46 /*  INPUT                                                                 */
47 /*                                                                        */
48 /*    vertical_list                         Vertical list control block   */
49 /*                                                                        */
50 /*  OUTPUT                                                                */
51 /*                                                                        */
52 /*    None                                                                */
53 /*                                                                        */
54 /*  CALLS                                                                 */
55 /*                                                                        */
56 /*    _gx_first_client_child_get            Get the first client child    */
57 /*    _gx_last_client_child_get             Get the last client child     */
58 /*    _gx_utility_rectangle_shift           Move a rectangle              */
59 /*    [gx_vertical_list_callback]           Invoke the list callback      */
60 /*                                            routine                     */
61 /*    _gx_widget_resize                     Resize a widget               */
62 /*    _gx_widget_attach                     Attach a widget to its parent */
63 /*                                                                        */
64 /*  CALLED BY                                                             */
65 /*                                                                        */
66 /*    _gx_vertical_list_scroll              Vertical list scroll function */
67 /*                                                                        */
68 /*  RELEASE HISTORY                                                       */
69 /*                                                                        */
70 /*    DATE              NAME                      DESCRIPTION             */
71 /*                                                                        */
72 /*  05-19-2020     Kenneth Maxwell          Initial Version 6.0           */
73 /*  09-30-2020     Kenneth Maxwell          Modified comment(s),          */
74 /*                                            resulting in version 6.1    */
75 /*                                                                        */
76 /**************************************************************************/
_gx_vertical_list_up_wrap(GX_VERTICAL_LIST * list)77 VOID _gx_vertical_list_up_wrap(GX_VERTICAL_LIST *list)
78 {
79 GX_WIDGET   *test;
80 GX_WIDGET   *check;
81 GX_BOOL      moving = GX_TRUE;
82 GX_RECTANGLE newpos;
83 INT          index;
84 
85     while (moving)
86     {
87         moving = GX_FALSE;
88 
89         if ((list -> gx_vertical_list_top_index + list -> gx_vertical_list_child_count < list -> gx_vertical_list_total_rows) ||
90             (list -> gx_widget_style & GX_STYLE_WRAP))
91         {
92             /* scrolling up. See if my top widget is already above my
93                client area: */
94 
95             test = _gx_widget_first_client_child_get((GX_WIDGET *)list);
96             if (test)
97             {
98                 if (test -> gx_widget_size.gx_rectangle_bottom < list -> gx_widget_size.gx_rectangle_top)
99                 {
100                     /* top widget is above my client area, move it to the bottom: */
101                     moving = GX_TRUE;
102                     check = _gx_widget_last_client_child_get((GX_WIDGET *)list);
103 
104                     _gx_widget_detach(test);
105 
106                     newpos = test -> gx_widget_size;
107                     _gx_utility_rectangle_shift(&newpos, 0, (GX_VALUE)(check -> gx_widget_size.gx_rectangle_bottom - newpos.gx_rectangle_top + 1));
108                     _gx_widget_resize(test, &newpos);
109 
110                     index = list -> gx_vertical_list_top_index + list -> gx_vertical_list_child_count;
111 
112                     /* Wrap index. */
113                     if (index >= list -> gx_vertical_list_total_rows)
114                     {
115                         index -= list -> gx_vertical_list_total_rows;
116                     }
117 
118                     list -> gx_vertical_list_callback(list, test, index);
119                     if (index == list -> gx_vertical_list_selected)
120                     {
121                         test -> gx_widget_style |=  GX_STYLE_DRAW_SELECTED;
122                     }
123                     else
124                     {
125                         test -> gx_widget_style &= ~GX_STYLE_DRAW_SELECTED;
126                     }
127                     _gx_widget_attach((GX_WIDGET *)list, test);
128                     list -> gx_vertical_list_top_index++;
129 
130                     /* Wrao page index.  */
131                     if (list -> gx_vertical_list_top_index >= list -> gx_vertical_list_total_rows)
132                     {
133                         list -> gx_vertical_list_top_index -= list -> gx_vertical_list_total_rows;
134                     }
135                 }
136             }
137         }
138     }
139 }
140 
141