ip_proto.h now requires expert.h.
[metze/wireshark/wip.git] / version_info.c
1 /* version_info.c
2  * Routines to report version information for stuff used by Wireshark
3  *
4  * $Id$
5  *
6  * Wireshark - Network traffic analyzer
7  * By Gerald Combs <gerald@wireshark.org>
8  * Copyright 1998 Gerald Combs
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public License
12  * as published by the Free Software Foundation; either version 2
13  * of the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18  * GNU General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public License
21  * along with this program; if not, write to the Free Software
22  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
23  */
24
25 #include "config.h"
26
27 #include <glib.h>
28
29 #include <stdlib.h>
30 #include <stdio.h>
31 #include <string.h>
32 #include <errno.h>
33
34 #ifdef HAVE_LIBZ
35 #include <zlib.h>       /* to get the libz version number */
36 #endif
37
38 #ifdef HAVE_SYS_UTSNAME_H
39 #include <sys/utsname.h>
40 #endif
41
42 #include "version_info.h"
43 #include "capture-pcap-util.h"
44 #include <wsutil/unicode-utils.h>
45
46 #include "svnversion.h"
47
48 #ifdef HAVE_WINDOWS_H
49 #include <windows.h>
50 #endif
51
52 #ifdef HAVE_OS_X_FRAMEWORKS
53 #include <CoreFoundation/CoreFoundation.h>
54 #include "cfutils.h"
55 #endif
56
57 #ifdef HAVE_LIBCAP
58 # include <sys/capability.h>
59 #endif
60
61 #ifdef SVNVERSION
62         const char *wireshark_svnversion = " (" SVNVERSION " from " SVNPATH ")";
63 #else
64         const char *wireshark_svnversion = "";
65 #endif
66
67 /*
68  * If the string doesn't end with a newline, append one.
69  * Then word-wrap it to 80 columns.
70  */
71 static void
72 end_string(GString *str)
73 {
74         size_t point;
75         char *p, *q;
76
77         point = str->len;
78         if (point == 0 || str->str[point - 1] != '\n')
79                 g_string_append(str, "\n");
80         p = str->str;
81         while (*p != '\0') {
82                 q = strchr(p, '\n');
83                 if (q - p > 80) {
84                         /*
85                          * Break at or before this point.
86                          */
87                         q = p + 80;
88                         while (q > p && *q != ' ')
89                                 q--;
90                         if (q != p)
91                                 *q = '\n';
92                 }
93                 p = q + 1;
94         }
95 }
96
97 /*
98  * Get various library compile-time versions and append them to
99  * the specified GString.
100  *
101  * "additional_info" is called at the end to append any additional
102  * information; this is required in order to, for example, put the
103  * Portaudio information at the end of the string, as we currently
104  * don't use Portaudio in TShark.
105  */
106 void
107 get_compiled_version_info(GString *str, void (*prepend_info)(GString *),
108                           void (*append_info)(GString *))
109 {
110         if (sizeof(str) == 4)
111                 g_string_append(str, "(32-bit) ");
112         else
113                 g_string_append(str, "(64-bit) ");
114
115         if (prepend_info)
116                 (*prepend_info)(str);
117
118         /* GLIB */
119         g_string_append(str, "with ");
120         g_string_append_printf(str,
121 #ifdef GLIB_MAJOR_VERSION
122             "GLib %d.%d.%d", GLIB_MAJOR_VERSION, GLIB_MINOR_VERSION,
123             GLIB_MICRO_VERSION);
124 #else
125             "GLib (version unknown)");
126 #endif
127
128         /* Libpcap */
129         g_string_append(str, ", ");
130         get_compiled_pcap_version(str);
131
132         /* LIBZ */
133         g_string_append(str, ", ");
134 #ifdef HAVE_LIBZ
135         g_string_append(str, "with libz ");
136 #ifdef ZLIB_VERSION
137         g_string_append(str, ZLIB_VERSION);
138 #else /* ZLIB_VERSION */
139         g_string_append(str, "(version unknown)");
140 #endif /* ZLIB_VERSION */
141 #else /* HAVE_LIBZ */
142         g_string_append(str, "without libz");
143 #endif /* HAVE_LIBZ */
144
145         /* LIBCAP */
146         g_string_append(str, ", ");
147 #ifdef HAVE_LIBCAP
148         g_string_append(str, "with POSIX capabilities");
149 #ifdef _LINUX_CAPABILITY_VERSION
150         g_string_append(str, " (Linux)");
151 #endif /* _LINUX_CAPABILITY_VERSION */
152 #else /* HAVE_LIBCAP */
153         g_string_append(str, "without POSIX capabilities");
154 #endif /* HAVE_LIBCAP */
155
156         /* LIBNL */
157         g_string_append(str, ", ");
158 #if defined(HAVE_LIBNL1)
159         g_string_append(str, "with libnl 1");
160 #elif defined(HAVE_LIBNL2)
161         g_string_append(str, "with libnl 2");
162 #elif defined(HAVE_LIBNL3)
163         g_string_append(str, "with libnl 3");
164 #else
165         g_string_append(str, "without libnl");
166 #endif
167
168         /* Additional application-dependent information */
169         if (append_info)
170                 (*append_info)(str);
171         g_string_append(str, ".");
172
173         end_string(str);
174 }
175
176 #ifdef _WIN32
177 typedef void (WINAPI *nativesi_func_ptr)(LPSYSTEM_INFO);
178 #endif
179
180 /*
181  * Handles the rather elaborate process of getting OS version information
182  * from OS X (we want the OS X version, not the Darwin version, the latter
183  * being easy to get with uname()).
184  */
185 #ifdef HAVE_OS_X_FRAMEWORKS
186
187 /*
188  * Fetch a string, as a UTF-8 C string, from a dictionary, given a key.
189  */
190 static char *
191 get_string_from_dictionary(CFPropertyListRef dict, CFStringRef key)
192 {
193         CFStringRef cfstring;
194
195         cfstring = (CFStringRef)CFDictionaryGetValue((CFDictionaryRef)dict,
196             (const void *)key);
197         if (cfstring == NULL)
198                 return NULL;
199         if (CFGetTypeID(cfstring) != CFStringGetTypeID()) {
200                 /* It isn't a string.  Punt. */
201                 return NULL;
202         }
203         return CFString_to_C_string(cfstring);
204 }
205
206 /*
207  * Get the OS X version information, and append it to the GString.
208  * Return TRUE if we succeed, FALSE if we fail.
209  */
210 static gboolean
211 get_os_x_version_info(GString *str)
212 {
213         static const UInt8 server_version_plist_path[] =
214             "/System/Library/CoreServices/ServerVersion.plist";
215         static const UInt8 system_version_plist_path[] =
216             "/System/Library/CoreServices/SystemVersion.plist";
217         CFURLRef version_plist_file_url;
218         CFReadStreamRef version_plist_stream;
219         CFDictionaryRef version_dict;
220         char *string;
221
222         /*
223          * On OS X, report the OS X version number as the OS, and put
224          * the Darwin information in parentheses.
225          *
226          * Alas, Gestalt() is deprecated in Mountain Lion, so the build
227          * fails if you treat deprecation warnings as fatal.  I don't
228          * know of any replacement API, so we fall back on reading
229          * /System/Library/CoreServices/ServerVersion.plist if it
230          * exists, otherwise /System/Library/CoreServices/SystemVersion.plist,
231          * and using ProductUserVisibleVersion.  We also get the build
232          * version from ProductBuildVersion and the product name from
233          * ProductName.
234          */
235         version_plist_file_url = CFURLCreateFromFileSystemRepresentation(NULL,
236             server_version_plist_path, sizeof server_version_plist_path - 1,
237             false);
238         if (version_plist_file_url == NULL)
239                 return FALSE;
240         version_plist_stream = CFReadStreamCreateWithFile(NULL,
241             version_plist_file_url);
242         CFRelease(version_plist_file_url);
243         if (version_plist_stream == NULL)
244                 return FALSE;
245         if (!CFReadStreamOpen(version_plist_stream)) {
246                 CFRelease(version_plist_stream);
247
248                 /*
249                  * Try SystemVersion.plist.
250                  */
251                 version_plist_file_url = CFURLCreateFromFileSystemRepresentation(NULL,
252                     system_version_plist_path, sizeof system_version_plist_path - 1,
253                     false);
254                 if (version_plist_file_url == NULL)
255                         return FALSE;
256                 version_plist_stream = CFReadStreamCreateWithFile(NULL,
257                     version_plist_file_url);
258                 CFRelease(version_plist_file_url);
259                 if (version_plist_stream == NULL)
260                         return FALSE;
261                 if (!CFReadStreamOpen(version_plist_stream)) {
262                         CFRelease(version_plist_stream);
263                         return FALSE;
264                 }
265         }
266 #ifdef HAVE_CFPROPERTYLISTCREATEWITHSTREAM
267         version_dict = (CFDictionaryRef)CFPropertyListCreateWithStream(NULL,
268             version_plist_stream, 0, kCFPropertyListImmutable,
269             NULL, NULL);
270 #else
271         version_dict = (CFDictionaryRef)CFPropertyListCreateFromStream(NULL,
272             version_plist_stream, 0, kCFPropertyListImmutable,
273             NULL, NULL);
274 #endif
275         if (version_dict == NULL) {
276                 CFRelease(version_plist_stream);
277                 return FALSE;
278         }
279         if (CFGetTypeID(version_dict) != CFDictionaryGetTypeID()) {
280                 /* This is *supposed* to be a dictionary.  Punt. */
281                 CFRelease(version_dict);
282                 CFReadStreamClose(version_plist_stream);
283                 CFRelease(version_plist_stream);
284                 return FALSE;
285         }
286         /* Get the product name string. */
287         string = get_string_from_dictionary(version_dict,
288             CFSTR("ProductName"));
289         if (string == NULL) {
290                 CFRelease(version_dict);
291                 CFReadStreamClose(version_plist_stream);
292                 CFRelease(version_plist_stream);
293                 return FALSE;
294         }
295         g_string_append_printf(str, "%s", string);
296         g_free(string);
297
298         /* Get the OS version string. */
299         string = get_string_from_dictionary(version_dict,
300             CFSTR("ProductUserVisibleVersion"));
301         if (string == NULL) {
302                 CFRelease(version_dict);
303                 CFReadStreamClose(version_plist_stream);
304                 CFRelease(version_plist_stream);
305                 return FALSE;
306         }
307         g_string_append_printf(str, " %s", string);
308         g_free(string);
309
310         /* Get the build string */
311         string = get_string_from_dictionary(version_dict,
312             CFSTR("ProductBuildVersion"));
313         if (string == NULL) {
314                 CFRelease(version_dict);
315                 CFReadStreamClose(version_plist_stream);
316                 CFRelease(version_plist_stream);
317                 return FALSE;
318         }
319         g_string_append_printf(str, ", build %s", string);
320         g_free(string);
321         CFRelease(version_dict);
322         CFReadStreamClose(version_plist_stream);
323         CFRelease(version_plist_stream);
324         return TRUE;
325 }
326 #endif
327
328 /*
329  * Get the OS version, and append it to the GString
330  */
331 void get_os_version_info(GString *str)
332 {
333 #if defined(_WIN32)
334         OSVERSIONINFOEX info;
335         SYSTEM_INFO system_info;
336         nativesi_func_ptr nativesi_func;
337 #elif defined(HAVE_SYS_UTSNAME_H)
338         struct utsname name;
339 #endif
340
341 #if defined(_WIN32)
342         /*
343          * See
344          *
345          *      http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/getting_the_system_version.asp
346          *
347          * for more than you ever wanted to know about determining the
348          * flavor of Windows on which you're running.  Implementing more
349          * of that is left as an exercise to the reader - who should
350          * check any copyright information about code samples on MSDN
351          * before cutting and pasting into Wireshark.
352          *
353          * They should also note that you need an OSVERSIONINFOEX structure
354          * to get some of that information, and that not only is that
355          * structure not supported on older versions of Windows, you might
356          * not even be able to compile code that *uses* that structure with
357          * older versions of the SDK.
358          */
359
360         memset(&info, '\0', sizeof info);
361         info.dwOSVersionInfoSize = sizeof info;
362         if (!GetVersionEx((OSVERSIONINFO *)&info)) {
363                 /*
364                  * XXX - get the failure reason.
365                  */
366                 g_string_append(str, "unknown Windows version");
367                 return;
368         }
369
370         memset(&system_info, '\0', sizeof system_info);
371         /* Look for and use the GetNativeSystemInfo() function if available to get the correct processor
372          * architecture even when running 32-bit Wireshark in WOW64 (x86 emulation on 64-bit Windows) */
373         nativesi_func = (nativesi_func_ptr)GetProcAddress(GetModuleHandle(_T("kernel32.dll")), "GetNativeSystemInfo");
374         if(nativesi_func)
375                 nativesi_func(&system_info);
376         else
377                 GetSystemInfo(&system_info);
378
379         switch (info.dwPlatformId) {
380
381         case VER_PLATFORM_WIN32s:
382                 /* Shyeah, right. */
383                 g_string_append_printf(str, "Windows 3.1 with Win32s");
384                 break;
385
386         case VER_PLATFORM_WIN32_WINDOWS:
387                 /* Windows OT */
388                 switch (info.dwMajorVersion) {
389
390                 case 4:
391                         /* 3 cheers for Microsoft marketing! */
392                         switch (info.dwMinorVersion) {
393
394                         case 0:
395                                 g_string_append_printf(str, "Windows 95");
396                                 break;
397
398                         case 10:
399                                 g_string_append_printf(str, "Windows 98");
400                                 break;
401
402                         case 90:
403                                 g_string_append_printf(str, "Windows Me");
404                                 break;
405
406                         default:
407                                 g_string_append_printf(str, "Windows OT, unknown version %lu.%lu",
408                                     info.dwMajorVersion, info.dwMinorVersion);
409                                 break;
410                         }
411                         break;
412
413                 default:
414                         g_string_append_printf(str, "Windows OT, unknown version %lu.%lu",
415                             info.dwMajorVersion, info.dwMinorVersion);
416                         break;
417                 }
418                 break;
419
420         case VER_PLATFORM_WIN32_NT:
421                 /* Windows NT */
422                 switch (info.dwMajorVersion) {
423
424                 case 3:
425                 case 4:
426                         g_string_append_printf(str, "Windows NT %lu.%lu",
427                             info.dwMajorVersion, info.dwMinorVersion);
428                         break;
429
430                 case 5:
431                         /* 3 cheers for Microsoft marketing! */
432                         switch (info.dwMinorVersion) {
433
434                         case 0:
435                                 g_string_append_printf(str, "Windows 2000");
436                                 break;
437
438                         case 1:
439                                 g_string_append_printf(str, "Windows XP");
440                                 break;
441
442                         case 2:
443                                 if ((info.wProductType == VER_NT_WORKSTATION) &&
444                                     (system_info.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_AMD64)) {
445                                         g_string_append_printf(str, "Windows XP Professional x64 Edition");
446                                 } else {
447                                         g_string_append_printf(str, "Windows Server 2003");
448                                         if (system_info.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_AMD64)
449                                                 g_string_append_printf(str, " x64 Edition");
450                                 }
451                                 break;
452
453                         default:
454                                 g_string_append_printf(str, "Windows NT, unknown version %lu.%lu",
455                                                        info.dwMajorVersion, info.dwMinorVersion);
456                                 break;
457                         }
458                         break;
459
460                 case 6: {
461                         gboolean is_nt_workstation;
462
463                         if (system_info.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_AMD64)
464                                 g_string_append(str, "64-bit ");
465                         else if (system_info.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_INTEL)
466                                 g_string_append(str, "32-bit ");
467 #ifndef VER_NT_WORKSTATION
468 #define VER_NT_WORKSTATION 0x01
469                         is_nt_workstation = ((info.wReserved[1] & 0xff) == VER_NT_WORKSTATION);
470 #else
471                         is_nt_workstation = (info.wProductType == VER_NT_WORKSTATION);
472 #endif
473                         switch (info.dwMinorVersion) {
474                         case 0:
475                                 g_string_append_printf(str, is_nt_workstation ? "Windows Vista" : "Windows Server 2008");
476                                 break;
477                         case 1:
478                                 g_string_append_printf(str, is_nt_workstation ? "Windows 7" : "Windows Server 2008 R2");
479                                 break;
480                         case 2:
481                                 g_string_append_printf(str, is_nt_workstation ? "Windows 8" : "Windows Server 2012");
482                                 break;
483                         default:
484                                 g_string_append_printf(str, "Windows NT, unknown version %lu.%lu",
485                                                        info.dwMajorVersion, info.dwMinorVersion);
486                                 break;
487                         }
488                         break;
489                 }  /* case 6 */
490                 default:
491                         g_string_append_printf(str, "Windows NT, unknown version %lu.%lu",
492                             info.dwMajorVersion, info.dwMinorVersion);
493                         break;
494                 } /* info.dwMajorVersion */
495                 break;
496
497         default:
498                 g_string_append_printf(str, "Unknown Windows platform %lu version %lu.%lu",
499                     info.dwPlatformId, info.dwMajorVersion, info.dwMinorVersion);
500                 break;
501         }
502         if (info.szCSDVersion[0] != '\0')
503                 g_string_append_printf(str, " %s", utf_16to8(info.szCSDVersion));
504         g_string_append_printf(str, ", build %lu", info.dwBuildNumber);
505 #elif defined(HAVE_SYS_UTSNAME_H)
506         /*
507          * We have <sys/utsname.h>, so we assume we have "uname()".
508          */
509         if (uname(&name) < 0) {
510                 g_string_append_printf(str, "unknown OS version (uname failed - %s)",
511                     g_strerror(errno));
512                 return;
513         }
514
515         if (strcmp(name.sysname, "AIX") == 0) {
516                 /*
517                  * Yay, IBM!  Thanks for doing something different
518                  * from most of the other UNIXes out there, and
519                  * making "name.version" apparently be the major
520                  * version number and "name.release" be the minor
521                  * version number.
522                  */
523                 g_string_append_printf(str, "%s %s.%s", name.sysname, name.version,
524                     name.release);
525         } else {
526                 /*
527                  * XXX - get "version" on any other platforms?
528                  *
529                  * On Digital/Tru64 UNIX, it's something unknown.
530                  * On Solaris, it's some kind of build information.
531                  * On HP-UX, it appears to be some sort of subrevision
532                  * thing.
533                  * On *BSD and Darwin/OS X, it's a long string giving
534                  * a build date, config file name, etc., etc., etc..
535                  */
536 #ifdef HAVE_OS_X_FRAMEWORKS
537                 /*
538                  * On Mac OS X, report the Mac OS X version number as
539                  * the OS version if we can, and put the Darwin information
540                  * in parentheses.
541                  */
542                 if (get_os_x_version_info(str)) {
543                         /* Success - append the Darwin information. */
544                         g_string_append_printf(str, " (%s %s)", name.sysname, name.release);
545                 } else {
546                         /* Failure - just use the Darwin information. */
547                         g_string_append_printf(str, "%s %s", name.sysname, name.release);
548                 }
549 #else /* HAVE_OS_X_FRAMEWORKS */
550                 /*
551                  * XXX - on Linux, are there any APIs to get the distribution
552                  * name and version number?  I think some distributions have
553                  * that.
554                  *
555                  * At least on Linux Standard Base-compliant distributions,
556                  * there's an "lsb_release" command.  However:
557                  *
558                  *      http://forums.fedoraforum.org/showthread.php?t=220885
559                  *
560                  * seems to suggest that if you don't have the redhat-lsb
561                  * package installed, you don't have lsb_release, and that
562                  * /etc/fedora-release has the release information on
563                  * Fedora.
564                  *
565                  *      http://linux.die.net/man/1/lsb_release
566                  *
567                  * suggests that there's an /etc/distrib-release file, but
568                  * it doesn't indicate whether "distrib" is literally
569                  * "distrib" or is the name for the distribution, and
570                  * also speaks of an /etc/debian_version file.
571                  *
572                  * "lsb_release" apparently parses /etc/lsb-release, which
573                  * has shell-style assignments, assigning to, among other
574                  * values, DISTRIB_ID (distributor/distribution name),
575                  * DISTRIB_RELEASE (release number of the distribution),
576                  * DISTRIB_DESCRIPTION (*might* be name followed by version,
577                  * but the manpage for lsb_release seems to indicate that's
578                  * not guaranteed), and DISTRIB_CODENAME (code name, e.g.
579                  * "licentious" for the Ubuntu Licentious Lemur release).
580                  * the lsb_release man page also speaks of the distrib-release
581                  * file, but Debian doesn't have one, and Ubuntu 7's
582                  * lsb_release command doesn't look for one.
583                  *
584                  * I've seen references to /etc/redhat-release as well.
585                  *
586                  * At least on my Ubuntu 7 system, /etc/debian_version
587                  * doesn't contain anything interesting (just some Debian
588                  * codenames).
589                  *
590                  * See also
591                  *
592                  *      http://bugs.python.org/issue1322
593                  *
594                  *      http://www.novell.com/coolsolutions/feature/11251.html
595                  *
596                  *      http://linuxmafia.com/faq/Admin/release-files.html
597                  *
598                  * and the Lib/Platform.py file in recent Python 2.x
599                  * releases.
600                  */
601                 g_string_append_printf(str, "%s %s", name.sysname, name.release);
602 #endif /* HAVE_OS_X_FRAMEWORKS */
603         }
604 #else
605         g_string_append(str, "an unknown OS");
606 #endif
607 }
608
609
610 /*
611  * Get the CPU info, and append it to the GString
612  */
613
614 #if defined(_MSC_VER)
615 static void
616 do_cpuid(int *CPUInfo, guint32 selector){
617         __cpuid(CPUInfo, selector);
618 }
619 #elif defined(__GNUC__)
620 #if defined(__x86_64__)  
621 static inline void
622 do_cpuid(guint32 *CPUInfo, int selector)
623 {
624         __asm__ __volatile__("cpuid"
625                                                 : "=a" (CPUInfo[0]),
626                                                         "=b" (CPUInfo[1]),
627                                                         "=c" (CPUInfo[2]),
628                                                         "=d" (CPUInfo[3])
629                                                 : "a"(selector));
630 }
631 #else /* (__i386__) */
632 /* would need a test if older proccesors have the cpuid instruction */
633 static void
634 do_cpuid(guint32 *CPUInfo, int selector _U_){
635         CPUInfo[0] = 0;
636 }
637
638 #endif /* defined(__x86_64__)*/
639 #else /* Other compilers */
640 static void
641 do_cpuid(guint32 *CPUInfo, int selector _U_){
642         CPUInfo[0] = 0;
643 }
644 #endif
645
646 /*
647  * Get CPU info on platforms where the cpuid instruction can be used skip 32 bit versions for GCC
648  *      http://www.intel.com/content/dam/www/public/us/en/documents/application-notes/processor-identification-cpuid-instruction-note.pdf
649  * the get_cpuid() routine will return 0 in CPUInfo[0] if cpuinfo isn't available.
650  */
651
652 static void get_cpu_info(GString *str _U_)
653 {
654 #if defined(_MSC_VER)
655         int CPUInfo[4];
656 #else
657         guint32 CPUInfo[4];
658 #endif
659         char CPUBrandString[0x40];
660         unsigned nExIds;
661
662         /* http://msdn.microsoft.com/en-us/library/hskdteyh(v=vs.100).aspx */
663
664         /* Calling __cpuid with 0x80000000 as the InfoType argument*/
665         /* gets the number of valid extended IDs.*/
666         do_cpuid(CPUInfo, 0x80000000);
667         nExIds = CPUInfo[0];
668
669         if( nExIds<0x80000005)
670                 return;
671         memset(CPUBrandString, 0, sizeof(CPUBrandString));
672
673         /* Interpret CPU brand string.*/
674         do_cpuid(CPUInfo, 0x80000002);
675         memcpy(CPUBrandString, CPUInfo, sizeof(CPUInfo));
676         do_cpuid(CPUInfo, 0x80000003);
677         memcpy(CPUBrandString + 16, CPUInfo, sizeof(CPUInfo));
678         do_cpuid(CPUInfo, 0x80000004);
679         memcpy(CPUBrandString + 32, CPUInfo, sizeof(CPUInfo));
680
681         g_string_append_printf(str, "\n%s", CPUBrandString);
682
683 }
684
685 static void get_mem_info(GString *str _U_)
686 {
687 #if defined(_WIN32)
688         MEMORYSTATUSEX statex;
689
690         statex.dwLength = sizeof (statex);
691         
692         if(GlobalMemoryStatusEx (&statex))
693                 g_string_append_printf(str, ", with ""%" G_GINT64_MODIFIER "d" "MB of physical memory.\n", statex.ullTotalPhys/(1024*1024));
694 #endif
695
696 }
697
698 /*
699  * Get various library run-time versions, and the OS version, and append
700  * them to the specified GString.
701  */
702 void
703 get_runtime_version_info(GString *str, void (*additional_info)(GString *))
704 {
705 #ifndef _WIN32
706         gchar *lang;
707 #endif
708
709         g_string_append(str, "on ");
710
711         get_os_version_info(str);
712
713 #ifndef _WIN32
714         /* Locale */
715         if ((lang = getenv ("LANG")) != NULL)
716                 g_string_append_printf(str, ", with locale %s", lang);
717         else
718                 g_string_append(str, ", without locale");
719 #endif
720
721         /* Libpcap */
722         g_string_append(str, ", ");
723         get_runtime_pcap_version(str);
724
725         /* zlib */
726 #if defined(HAVE_LIBZ) && !defined(_WIN32)
727         g_string_append_printf(str, ", with libz %s", zlibVersion());
728 #endif
729
730         /* Additional application-dependent information */
731         if (additional_info)
732                 (*additional_info)(str);
733
734         g_string_append(str, ".");
735
736         /* CPU Info */
737         get_cpu_info(str);
738
739         /* Get info about installed memory Windows only */
740         get_mem_info(str);
741
742         /* Compiler info */
743
744         /*
745          * See https://sourceforge.net/apps/mediawiki/predef/index.php?title=Compilers
746          * information on various defined strings.
747          *
748          * GCC's __VERSION__ is a nice text string for humans to
749          * read.  The page at sourceforge.net largely describes
750          * numeric #defines that encode the version; if the compiler
751          * doesn't also offer a nice printable string, we try prettifying
752          * the number somehow.
753          */
754 #if defined(__GNUC__) && defined(__VERSION__)
755         /*
756          * Clang and llvm-gcc also define __GNUC__ and __VERSION__;
757          * distinguish between them.
758          */
759 #if defined(__clang__)
760         g_string_append_printf(str, "\n\nBuilt using clang %s.\n", __VERSION__);
761 #elif defined(__llvm__)
762         g_string_append_printf(str, "\n\nBuilt using llvm-gcc %s.\n", __VERSION__);
763 #else /* boring old GCC */
764         g_string_append_printf(str, "\n\nBuilt using gcc %s.\n", __VERSION__);
765 #endif /* llvm */
766 #elif defined(__HP_aCC)
767         g_string_append_printf(str, "\n\nBuilt using HP aCC %d.\n", __HP_aCC);
768 #elif defined(__xlC__)
769         g_string_append_printf(str, "\n\nBuilt using IBM XL C %d.%d\n",
770             (__xlC__ >> 8) & 0xFF, __xlC__ & 0xFF);
771 #ifdef __IBMC__
772         if ((__IBMC__ % 10) != 0)
773                 g_string_append_printf(str, " patch %d", __IBMC__ % 10);
774 #endif /* __IBMC__ */
775         g_string_append_printf(str, "\n");
776 #elif defined(__INTEL_COMPILER)
777         g_string_append_printf(str, "\n\nBuilt using Intel C %d.%d",
778             __INTEL_COMPILER / 100, (__INTEL_COMPILER / 10) % 10);
779         if ((__INTEL_COMPILER % 10) != 0)
780                 g_string_append_printf(str, " patch %d", __INTEL_COMPILER % 10);
781 #ifdef __INTEL_COMPILER_BUILD_DATE
782         g_string_sprinta(str, ", compiler built %04d-%02d-%02d",
783             __INTEL_COMPILER_BUILD_DATE / 10000,
784             (__INTEL_COMPILER_BUILD_DATE / 100) % 100,
785             __INTEL_COMPILER_BUILD_DATE % 100);
786 #endif /* __INTEL_COMPILER_BUILD_DATE */
787         g_string_append_printf(str, "\n");
788 #elif defined(_MSC_FULL_VER)
789 # if _MSC_FULL_VER > 99999999
790         g_string_append_printf(str, "\n\nBuilt using Microsoft Visual C++ %d.%d",
791                                (_MSC_FULL_VER / 10000000) - 6,
792                                (_MSC_FULL_VER / 100000) % 100);
793 #  if (_MSC_FULL_VER % 100000) != 0
794         g_string_append_printf(str, " build %d",
795                                _MSC_FULL_VER % 100000);
796 #  endif
797 # else
798         g_string_append_printf(str, "\n\nBuilt using Microsoft Visual C++ %d.%d",
799                                (_MSC_FULL_VER / 1000000) - 6,
800                                (_MSC_FULL_VER / 10000) % 100);
801 #  if (_MSC_FULL_VER % 10000) != 0
802         g_string_append_printf(str, " build %d",
803                                _MSC_FULL_VER % 10000);
804 #  endif
805 # endif
806         g_string_append_printf(str, "\n");
807 #elif defined(_MSC_VER)
808         /* _MSC_FULL_VER not defined, but _MSC_VER defined */
809         g_string_append_printf(str, "\n\nBuilt using Microsoft Visual C++ %d.%d\n",
810             (_MSC_VER / 100) - 6, _MSC_VER % 100);
811 #elif defined(__SUNPRO_C)
812         g_string_append_printf(str, "\n\nBuilt using Sun C %d.%d",
813             (__SUNPRO_C >> 8) & 0xF, (__SUNPRO_C >> 4) & 0xF);
814         if ((__SUNPRO_C & 0xF) != 0)
815                 g_string_append_printf(str, " patch %d", __SUNPRO_C & 0xF);
816         g_string_append_printf(str, "\n");
817 #endif
818
819         end_string(str);
820 }
821
822 /*
823  * Get copyright information.
824  */
825 const char *
826 get_copyright_info(void)
827 {
828         return
829 "Copyright 1998-2013 Gerald Combs <gerald@wireshark.org> and contributors.\n"
830 "This is free software; see the source for copying conditions. There is NO\n"
831 "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n";
832 }
833
834 #if defined(_WIN32)
835 /*
836  * Get the major OS version.
837  */
838 /* XXX - Should this return the minor version as well, e.g. 0x00050002? */
839 guint32
840 get_os_major_version()
841 {
842         OSVERSIONINFO info;
843         info.dwOSVersionInfoSize = sizeof info;
844         if (GetVersionEx(&info)) {
845                 return info.dwMajorVersion;
846         }
847         return 0;
848 }
849 #endif
850
851 /*
852  * Editor modelines
853  *
854  * Local Variables:
855  * c-basic-offset: 8
856  * tab-width: 8
857  * indent-tabs-mode: t
858  * End:
859  *
860  * ex: set shiftwidth=8 tabstop=8 noexpandtab:
861  * :indentSize=8:tabSize=8:noTabs=false:
862  */