[3047ce]: src / pkglist.cpp Maximize Restore History

Download this file

pkglist.cpp    420 lines (390 with data), 14.7 kB

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
/*
* pkglist.cpp
*
* $Id$
*
* Written by Keith Marshall <keithmarshall@users.sourceforge.net>
* Copyright (C) 2012, MinGW Project
*
*
* Implementation of the methods for the pkgListViewMaker class, to
* support the display of the package list in the mingw-get graphical
* user interface.
*
*
* This is free software. Permission is granted to copy, modify and
* redistribute this software, under the provisions of the GNU General
* Public License, Version 3, (or, at your option, any later version),
* as published by the Free Software Foundation; see the file COPYING
* for licensing details.
*
* Note, in particular, that this software is provided "as is", in the
* hope that it may prove useful, but WITHOUT WARRANTY OF ANY KIND; not
* even an implied WARRANTY OF MERCHANTABILITY, nor of FITNESS FOR ANY
* PARTICULAR PURPOSE. Under no circumstances will the author, or the
* MinGW Project, accept liability for any damages, however caused,
* arising from the use of this software.
*
*/
#define _WIN32_IE 0x0300
#include "guimain.h"
#include "pkgbase.h"
#include "pkglist.h"
#include "pkgkeys.h"
#include "pkginfo.h"
#include <wtkexcept.h>
void AppWindowMaker::InitPackageListView()
{
/* Create and initialise a ListView window, in which to present
* the package list...
*/
PackageListView = CreateWindow( WC_LISTVIEW, NULL,
WS_VISIBLE | WS_BORDER | WS_CHILD | WS_EX_CLIENTEDGE |
LVS_REPORT | LVS_SINGLESEL | LVS_SHOWSELALWAYS, 0, 0, 0, 0,
AppWindow, (HMENU)(ID_PACKAGE_LISTVIEW),
AppInstance, NULL
);
/* ...and set its extended style attributes.
*/
ListView_SetExtendedListViewStyle( PackageListView,
LVS_EX_GRIDLINES | LVS_EX_FULLROWSELECT | LVS_EX_ONECLICKACTIVATE
);
/* Propagate the default font, as set for the main window itself,
* to the list view control.
*/
SendMessage( PackageListView, WM_SETFONT, (WPARAM)(DefaultFont), TRUE );
/* Assign an image list, to furnish the package status icons.
*/
HIMAGELIST iconlist = ImageList_Create( 16, 16, ILC_COLOR32 | ILC_MASK, 13, 0 );
for( int index = 0; index <= PKGSTATE( PURGE ); index++ )
{
HICON image = LoadIcon( AppInstance, MAKEINTRESOURCE(ID_PKGSTATE(index)) );
if( ImageList_AddIcon( iconlist, image ) == -1 )
throw WTK::runtime_error( "Error loading package status icons" );
}
ListView_SetImageList( PackageListView, iconlist, LVSIL_SMALL );
/* Initialise the table layout, and assign column headings.
*/
LVCOLUMN table;
struct { int id; int width; char *text; } headings[] =
{
/* Specify the column headings for the package list table.
*/
{ ID_PKGLIST_TABLE_HEADINGS, 20, "" },
{ ID_PKGNAME_COLUMN_HEADING, 150, "Package" },
{ ID_PKGTYPE_COLUMN_HEADING, 48, "Class" },
{ ID_INSTVER_COLUMN_HEADING, 125, "Installed Version" },
{ ID_REPOVER_COLUMN_HEADING, 125, "Repository Version" },
{ ID_PKGDESC_COLUMN_HEADING, 400, "Description" },
/*
* This all-null entry terminates the sequence.
*/
{ 0, 0, NULL }
};
table.fmt = LVCFMT_LEFT;
table.mask = LVCF_FMT | LVCF_WIDTH | LVCF_TEXT | LVCF_SUBITEM;
for( int index = 0; headings[index].text != NULL; index++ )
{
/* Loop over the columns, setting the initial width
* (in pixels), and assigning the heading to each.
*/
table.cx = headings[index].width;
table.pszText = headings[index].text;
ListView_InsertColumn( PackageListView, index, &table );
}
/* "Update" the package list, to initialise the list view.
*/
UpdatePackageList();
}
void AppWindowMaker::UpdatePackageList()
{
/* Scan the XML package catalogue, adding a ListView item entry
* for each package record.
*/
pkgListViewMaker PackageList( PackageListView );
pkgDirectory *dir = pkgData->CatalogueAllPackages();
dir->InOrder( &PackageList );
delete dir;
}
pkgListViewMaker::pkgListViewMaker( HWND pane ): ListView( pane )
{
/* Constructor: initialise the invariant parameters within the
* embedded W32API ListView control structure.
*/
content.stateMask = 0;
content.mask = LVIF_PARAM | LVIF_TEXT | LVIF_IMAGE | LVIF_STATE;
content.iItem = -1;
}
void pkgListViewMaker::InsertItem( pkgXmlNode *pkg, char *class_name )
{
/* Private method to add a single package record, as an individual
* row item, to the displayed list view table.
*/
content.state = 0;
content.iItem += 1;
content.iSubItem = 0;
content.lParam = (unsigned long)(pkg);
content.pszText = "";
/* Assign a temporary action item, through which we may identify
* the latest available, and currently installed (if any), version
* attributes for the package under consideration.
*/
pkgActionItem avail;
pkgXmlNode *rel = pkg->FindFirstAssociate( release_key );
while( rel != NULL )
{
/* Examine each available release specification for the nominated
* package; select the one which represents the latest (most recent)
* available release.
*/
avail.SelectIfMostRecentFit( rel );
/* Also check for the presence of an installation record for each
* release; if found, mark it as the currently installed release;
* (we assign the "to-remove" attribute, but we don't action it).
*/
if( rel->GetInstallationRecord( rel->GetPropVal( tarname_key, NULL )) != NULL )
avail.SelectPackage( rel, to_remove );
/* Cycle, until all known releases have been examined.
*/
rel = rel->FindNextAssociate( release_key );
}
/* Check the identification of any currently installed release; this
* will capture property data for any installed release which may have
* been subsequently withdrawn from distribution.
*/
avail.ConfirmInstallationStatus();
/* Decompose the package tarname identifier for the latest available
* release, into its individual package specification properties.
*/
pkgSpecs latest( rel = avail.Selection() );
/* Allocate a temporary working text buffer, in which to format
* package property values for display...
*/
size_t len = strlen( rel->GetPropVal( tarname_key, value_none ) );
if( (rel = avail.Selection( to_remove )) != NULL )
{
/* ...ensuring that it is at least as large as the longer of the
* latest or installed release tarname.
*/
size_t altlen = strlen( rel->GetPropVal( tarname_key, value_none ) );
if( altlen > len ) len = altlen;
}
char buf[1 + len];
/* Choose a suitable icon for representation of the installation
* status of the package under consideration...
*/
if( rel != NULL )
{
/* ...noting that, when it is already installed...
*/
pkgSpecs current( rel );
if( latest > current )
/*
* ...and, when the latest available is NEWER than the
* installed version, then we choose the icon indicating
* an installed package with an available update...
*/
content.iImage = PKGSTATE( INSTALLED_OLD );
else
/* ...or, when the latest available is NOT NEWER than
* the installed version, then we choose the alternative
* icon, simply indicating an installed package...
*/
content.iImage = PKGSTATE( INSTALLED_CURRENT );
/* ...and also, load the version identification string for
* the installed version into the working text buffer.
*/
GetVersionString( buf, &current );
}
else
/* Alternatively, for any package which is not recorded as
* installed, choose the icon indicating an available, but
* not (yet) installed package.
*/
content.iImage = PKGSTATE( AVAILABLE );
/* Add the package identification record, as a list item...
*/
ListView_InsertItem( ListView, &content );
/*
* ...and fill in the text for the package name and class columns.
*/
ListView_SetItemText( ListView, content.iItem, 1, package_name );
ListView_SetItemText( ListView, content.iItem, 2, class_name );
/* When an installed package release has been identified...
*/
if( rel != NULL )
/*
* ...fill in the version identificaton text appropriately.
*/
ListView_SetItemText( ListView, content.iItem, 3, buf );
/* Finally, fill in the text for the latest version identification
* and package description columns.
*/
ListView_SetItemText( ListView, content.iItem, 4, GetVersionString( buf, &latest ) );
ListView_SetItemText( ListView, content.iItem, 5, GetTitle( avail.Selection()) );
}
char *pkgListViewMaker::GetTitle( pkgXmlNode *pkg, const pkgXmlNode *xml_root )
{
/* A private helper method, to retrieve the title attribute
* associated with the description for the nominated package.
*
* Note: this should really return a const char *, but then
* we would need to cast it to non-const for mapping into the
* ill-formed structure of Microsoft's LVITEM, so we may just
* as well return the non-const result anyway.
*/
pkgXmlNode *desc = pkg->FindFirstAssociate( description_key );
while( desc != NULL )
{
/* Handling it internally as the const which it should be...
*/
const char *title;
if( (title = desc->GetPropVal( title_key, NULL )) != NULL )
{
/* As soon as we find a description element with an
* assigned title attribute...
*/
#if 0
/* ...and noting that some package descriptions may
* redundantly respecify the package name as a colon
* delimited prefix to this title attribute...
*
* FIXME: ultimately, I'd like to remove this hack;
* package descriptions have no need to redundantly
* specify the package name as a prefix to the title,
* (since mingw-get can retrieve it from the package
* element containing the description anyway), and
* package maintainers should not rely on this
* hack to clean up the redundancy.
*/
for( const char *prefix = title; *prefix != '\0'; prefix++ )
if( *prefix == ':' )
{
/* ...we strip that redundant prefix away...
*/
title = ++prefix;
prefix = "";
}
/* ...then trim away any leading white space...
*/
while( isspace( *title ) )
++title;
#endif
/* ...before immediately returning the title, (with the
* required cast to non-const).
*/
return (char *)(title);
}
/* If we haven't yet found any title attribute, check for any
* further description elements at the current XML nesting level.
*/
desc = desc->FindNextAssociate( description_key );
}
/* If we've exhausted all description elements at the current XML
* nesting level, without finding a title attribute, and we haven't
* checked all enclosing levels back to the document root...
*/
if( pkg != xml_root )
/*
* ...then continue the search in the immediately enclosing level.
*/
return GetTitle( pkg->GetParent() );
/* If we get to here, then we've searched all levels back to the
* document root, and have failed to find any title attribute; we
* have nothing to return.
*/
return NULL;
}
static inline
char *version_string_copy( char *buf, const char *text, int fill = 0 )
{
/* Local helper function to construct a package version string
* from individual version specific elements of the tarname.
*/
if( text != NULL )
{
/* First, if a fill character is specified, copy it as the
* first character of the result; (we assume that we are
* appending to a previously constructed result, and that
* this is the field separator character).
*/
if( fill != 0 ) *buf++ = fill;
/* Now, append "text" up to, and including its final NUL
* terminator; (note that we do NOT guard against buffer
* overrun, as we have complete control over the calling
* context, where we allocated a result buffer at least
* as long as the tarname string from which the composed
* version string is extracted, and the composed result
* can never exceed the original length of this).
*/
do { if( (*buf = *text) != '\0' ) ++buf; } while( *text++ != '\0' );
}
/* Finally, we return a pointer to the terminating NUL of
* the result, so as to facilitate appending further text.
*/
return buf;
}
char *pkgListViewMaker::GetVersionString( char *buf, pkgSpecs *pkg )
{
/* Helper method to construct a fully qualified version string
* from the decomposed package tarname form in a pkgSpecs structure.
*
* We begin with the concatenation of package version and build ID
* fields, retrieved from the pkgSpecs representation...
*/
char *update = version_string_copy( buf, pkg->GetPackageVersion() );
update = version_string_copy( update, pkg->GetPackageBuild(), '-' );
if( pkg->GetSubSystemVersion() != NULL )
{
/* ...then, we append the sub-system ID, if applicable...
*/
update = version_string_copy( update, pkg->GetSubSystemName(), '-' );
update = version_string_copy( update, pkg->GetSubSystemVersion(), '-' );
update = version_string_copy( update, pkg->GetSubSystemBuild(), '-' );
}
/* ...and finally, we return a pointer to the buffer in which
* we constructed the fully qualified version string.
*/
return buf;
}
void pkgListViewMaker::Dispatch( pkgXmlNode *package )
{
/* Implementation of the "dispatcher" method, which is required
* by any derivative of the pkgDirectoryViewerEngine class, for
* dispatching the content of the directory to the display service,
* (which, in this case, populates the list view window pane).
*/
if( package->IsElementOfType( package_key ) )
{
/* Assemble the package name into the list view record block.
*/
package_name = (char *)(package->GetPropVal( name_key, value_unknown ));
/* When processing a pkgDirectory entry for a package entity,
* generate a sub-directory listing for any contained package
* components...
*/
pkgDirectory *dir;
if( (dir = EnumerateComponents( package )) != NULL )
{
/* ...and recurse, to process any which are found...
*/
dir->InOrder( this );
delete dir;
}
else
/* ...otherwise, simply insert an unclassified list entry
* for the bare package name, omitting the component class.
*/
InsertItem( package, "" );
}
else if( package->IsElementOfType( component_key ) )
{
/* Handle the recursive calls for the component sub-directory,
* inheriting the package name entry from the original package
* entity, and emit an appropriately classified list view entry
* for each identified component package.
*/
InsertItem( package, (char *)(package->GetPropVal( class_key, "" )) );
}
}
/* $RCSfile$: end of file */