1 /* $Id$ */
2 /*
3  * Copyright (C) 2008-2011 Teluu Inc. (http://www.teluu.com)
4  * Copyright (C) 2003-2008 Benny Prijono <benny@prijono.org>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20 #include <pj/os.h>
21 #include <pj/ctype.h>
22 #include <pj/errno.h>
23 #include <pj/string.h>
24 
25 /*
26  * FYI these links contain useful infos about predefined macros across
27  * platforms:
28  *  - http://predef.sourceforge.net/preos.html
29  */
30 
31 #if defined(PJ_HAS_SYS_UTSNAME_H) && PJ_HAS_SYS_UTSNAME_H != 0
32 /* For uname() */
33 #   include <sys/utsname.h>
34 #   include <stdlib.h>
35 #   define PJ_HAS_UNAME		1
36 #endif
37 
38 #if defined(PJ_HAS_LIMITS_H) && PJ_HAS_LIMITS_H != 0
39 /* Include <limits.h> to get <features.h> to get various glibc macros.
40  * See http://predef.sourceforge.net/prelib.html
41  */
42 #   include <limits.h>
43 #endif
44 
45 #if defined(_MSC_VER)
46 /* For all Windows including mobile */
47 #   include <windows.h>
48 #endif
49 
50 #if defined(PJ_DARWINOS) && PJ_DARWINOS != 0
51 #   include "TargetConditionals.h"
52 #endif
53 
54 #ifndef PJ_SYS_INFO_BUFFER_SIZE
55 #   define PJ_SYS_INFO_BUFFER_SIZE	64
56 #endif
57 
58 
59 #if defined(PJ_DARWINOS) && PJ_DARWINOS != 0 && TARGET_OS_IPHONE
60 #   include <sys/types.h>
61 #   include <sys/sysctl.h>
62     void pj_iphone_os_get_sys_info(pj_sys_info *si, pj_str_t *si_buffer);
63 #endif
64 
65 #if defined(PJ_SYMBIAN) && PJ_SYMBIAN != 0
66     PJ_BEGIN_DECL
67     unsigned pj_symbianos_get_model_info(char *buf, unsigned buf_size);
68     unsigned pj_symbianos_get_platform_info(char *buf, unsigned buf_size);
69     void pj_symbianos_get_sdk_info(pj_str_t *name, pj_uint32_t *ver);
70     PJ_END_DECL
71 #endif
72 
73 
ver_info(pj_uint32_t ver,char * buf)74 static char *ver_info(pj_uint32_t ver, char *buf)
75 {
76     pj_size_t len;
77 
78     if (ver == 0) {
79 	*buf = '\0';
80 	return buf;
81     }
82 
83     sprintf(buf, "-%u.%u",
84 	    (ver & 0xFF000000) >> 24,
85 	    (ver & 0x00FF0000) >> 16);
86     len = strlen(buf);
87 
88     if (ver & 0xFFFF) {
89 	sprintf(buf+len, ".%u", (ver & 0xFF00) >> 8);
90 	len = strlen(buf);
91 
92 	if (ver & 0x00FF) {
93 	    sprintf(buf+len, ".%u", (ver & 0xFF));
94 	}
95     }
96 
97     return buf;
98 }
99 
parse_version(char * str)100 static pj_uint32_t parse_version(char *str)
101 {
102     int i, maxtok;
103     pj_ssize_t found_idx;
104     pj_uint32_t version = 0;
105     pj_str_t in_str = pj_str(str);
106     pj_str_t token, delim;
107 
108     while (*str && !pj_isdigit(*str))
109 	str++;
110 
111     maxtok = 4;
112     delim = pj_str(".-");
113     for (found_idx = pj_strtok(&in_str, &delim, &token, 0), i=0;
114 	 found_idx != in_str.slen && i < maxtok;
115 	 ++i, found_idx = pj_strtok(&in_str, &delim, &token,
116 	                            found_idx + token.slen))
117     {
118 	int n;
119 
120 	if (!pj_isdigit(*token.ptr))
121 	    break;
122 
123 	n = atoi(token.ptr);
124 	version |= (n << ((3-i)*8));
125     }
126 
127     return version;
128 }
129 
pj_get_sys_info(void)130 PJ_DEF(const pj_sys_info*) pj_get_sys_info(void)
131 {
132     static char si_buffer[PJ_SYS_INFO_BUFFER_SIZE];
133     static pj_sys_info si;
134     static pj_bool_t si_initialized;
135     pj_size_t left = PJ_SYS_INFO_BUFFER_SIZE, len;
136 
137     if (si_initialized)
138 	return &si;
139 
140     si.machine.ptr = si.os_name.ptr = si.sdk_name.ptr = si.info.ptr = "";
141 
142 #define ALLOC_CP_STR(str,field)	\
143 	do { \
144 	    len = pj_ansi_strlen(str); \
145 	    if (len && left >= len+1) { \
146 		si.field.ptr = si_buffer + PJ_SYS_INFO_BUFFER_SIZE - left; \
147 		si.field.slen = len; \
148 		pj_memcpy(si.field.ptr, str, len+1); \
149 		left -= (len+1); \
150 	    } \
151 	} while (0)
152 
153     /*
154      * Machine and OS info.
155      */
156 #if defined(PJ_HAS_UNAME) && PJ_HAS_UNAME
157     #if defined(PJ_DARWINOS) && PJ_DARWINOS != 0 && TARGET_OS_IPHONE && \
158 	(!defined TARGET_IPHONE_SIMULATOR || TARGET_IPHONE_SIMULATOR == 0)
159     {
160 	pj_str_t buf = {si_buffer + PJ_SYS_INFO_BUFFER_SIZE - left, left};
161 	pj_str_t machine = {"arm-", 4};
162 	pj_str_t sdk_name = {"iOS-SDK", 7};
163         size_t size = PJ_SYS_INFO_BUFFER_SIZE - machine.slen;
164 	char tmp[PJ_SYS_INFO_BUFFER_SIZE];
165         int name[] = {CTL_HW,HW_MACHINE};
166 
167 	pj_iphone_os_get_sys_info(&si, &buf);
168 	left -= si.os_name.slen + 1;
169 
170 	si.os_ver = parse_version(si.machine.ptr);
171 
172 	pj_memcpy(tmp, machine.ptr, machine.slen);
173         sysctl(name, 2, tmp+machine.slen, &size, NULL, 0);
174         ALLOC_CP_STR(tmp, machine);
175 	si.sdk_name = sdk_name;
176 
177 	#ifdef PJ_SDK_NAME
178 	pj_memcpy(tmp, PJ_SDK_NAME, pj_ansi_strlen(PJ_SDK_NAME) + 1);
179 	si.sdk_ver = parse_version(tmp);
180 	#endif
181     }
182     #else
183     {
184 	struct utsname u;
185 
186 	/* Successful uname() returns zero on Linux and positive value
187 	 * on OpenSolaris.
188 	 */
189 	if (uname(&u) == -1)
190 	    goto get_sdk_info;
191 
192 	ALLOC_CP_STR(u.machine, machine);
193 	ALLOC_CP_STR(u.sysname, os_name);
194 
195 	si.os_ver = parse_version(u.release);
196     }
197     #endif
198 #elif defined(_MSC_VER)
199     {
200     #if defined(PJ_WIN32_WINPHONE8) && PJ_WIN32_WINPHONE8
201 	si.os_name = pj_str("winphone");
202     #else
203 	OSVERSIONINFO ovi;
204 
205 	ovi.dwOSVersionInfoSize = sizeof(ovi);
206 
207 	if (GetVersionEx(&ovi) == FALSE)
208 	    goto get_sdk_info;
209 
210 	si.os_ver = (ovi.dwMajorVersion << 24) |
211 		    (ovi.dwMinorVersion << 16);
212 	#if defined(PJ_WIN32_WINCE) && PJ_WIN32_WINCE
213 	    si.os_name = pj_str("wince");
214 	#else
215 	    si.os_name = pj_str("win32");
216 	#endif
217     #endif
218     }
219 
220     {
221 	SYSTEM_INFO wsi;
222 
223     #if defined(PJ_WIN32_WINPHONE8) && PJ_WIN32_WINPHONE8
224 	GetNativeSystemInfo(&wsi);
225     #else
226 	GetSystemInfo(&wsi);
227     #endif
228 
229 	switch (wsi.wProcessorArchitecture) {
230 	#if (defined(PJ_WIN32_WINCE) && PJ_WIN32_WINCE) || \
231 	    (defined(PJ_WIN32_WINPHONE8) && PJ_WIN32_WINPHONE8)
232 	case PROCESSOR_ARCHITECTURE_ARM:
233 	    si.machine = pj_str("arm");
234 	    break;
235 	case PROCESSOR_ARCHITECTURE_SHX:
236 	    si.machine = pj_str("shx");
237 	    break;
238 	#else
239 	case PROCESSOR_ARCHITECTURE_AMD64:
240 	    si.machine = pj_str("x86_64");
241 	    break;
242 	case PROCESSOR_ARCHITECTURE_IA64:
243 	    si.machine = pj_str("ia64");
244 	    break;
245 	case PROCESSOR_ARCHITECTURE_INTEL:
246 	    si.machine = pj_str("i386");
247 	    break;
248 	#endif	/* PJ_WIN32_WINCE */
249 	}
250     #if defined(PJ_WIN32_WINPHONE8) && PJ_WIN32_WINPHONE8
251 	/* Avoid compile warning. */
252 	goto get_sdk_info;
253     #endif
254     }
255 #elif defined(PJ_SYMBIAN) && PJ_SYMBIAN != 0
256     {
257 	pj_symbianos_get_model_info(si_buffer, sizeof(si_buffer));
258 	ALLOC_CP_STR(si_buffer, machine);
259 
260 	char *p = si_buffer + sizeof(si_buffer) - left;
261 	unsigned plen;
262 	plen = pj_symbianos_get_platform_info(p, left);
263 	if (plen) {
264 	    /* Output format will be "Series60vX.X" */
265 	    si.os_name = pj_str("S60");
266 	    si.os_ver  = parse_version(p+9);
267 	} else {
268 	    si.os_name = pj_str("Unknown");
269 	}
270 
271 	/* Avoid compile warning on Symbian. */
272 	goto get_sdk_info;
273     }
274 #endif
275 
276     /*
277      * SDK info.
278      */
279 get_sdk_info:
280 
281 #if defined(__GLIBC__)
282     si.sdk_ver = (__GLIBC__ << 24) |
283 		 (__GLIBC_MINOR__ << 16);
284     si.sdk_name = pj_str("glibc");
285 #elif defined(__GNU_LIBRARY__)
286     si.sdk_ver = (__GNU_LIBRARY__ << 24) |
287 	         (__GNU_LIBRARY_MINOR__ << 16);
288     si.sdk_name = pj_str("libc");
289 #elif defined(__UCLIBC__)
290     si.sdk_ver = (__UCLIBC_MAJOR__ << 24) |
291     	         (__UCLIBC_MINOR__ << 16);
292     si.sdk_name = pj_str("uclibc");
293 #elif defined(_WIN32_WCE) && _WIN32_WCE
294     /* Old window mobile declares _WIN32_WCE as decimal (e.g. 300, 420, etc.),
295      * but then it was changed to use hex, e.g. 0x420, etc. See
296      * http://social.msdn.microsoft.com/forums/en-US/vssmartdevicesnative/thread/8a97c59f-5a1c-4bc6-99e6-427f065ff439/
297      */
298     #if _WIN32_WCE <= 500
299 	si.sdk_ver = ( (_WIN32_WCE / 100) << 24) |
300 		     ( ((_WIN32_WCE % 100) / 10) << 16) |
301 		     ( (_WIN32_WCE % 10) << 8);
302     #else
303 	si.sdk_ver = ( ((_WIN32_WCE & 0xFF00) >> 8) << 24) |
304 		     ( ((_WIN32_WCE & 0x00F0) >> 4) << 16) |
305 		     ( ((_WIN32_WCE & 0x000F) >> 0) << 8);
306     #endif
307     si.sdk_name = pj_str("cesdk");
308 #elif defined(_MSC_VER)
309     /* No SDK info is easily obtainable for Visual C, so lets just use
310      * _MSC_VER. The _MSC_VER macro reports the major and minor versions
311      * of the compiler. For example, 1310 for Microsoft Visual C++ .NET 2003.
312      * 1310 represents version 13 and a 1.0 point release.
313      * The Visual C++ 2005 compiler version is 1400.
314      */
315     si.sdk_ver = ((_MSC_VER / 100) << 24) |
316     	         (((_MSC_VER % 100) / 10) << 16) |
317     	         ((_MSC_VER % 10) << 8);
318     si.sdk_name = pj_str("msvc");
319 #elif defined(PJ_SYMBIAN) && PJ_SYMBIAN != 0
320     pj_symbianos_get_sdk_info(&si.sdk_name, &si.sdk_ver);
321 #endif
322 
323     /*
324      * Build the info string.
325      */
326     {
327 	char tmp[PJ_SYS_INFO_BUFFER_SIZE];
328 	char os_ver[20], sdk_ver[20];
329 	int cnt;
330 
331 	cnt = pj_ansi_snprintf(tmp, sizeof(tmp),
332 			       "%s%s%s%s%s%s%s",
333 			       si.os_name.ptr,
334 			       ver_info(si.os_ver, os_ver),
335 			       (si.machine.slen ? "/" : ""),
336 			       si.machine.ptr,
337 			       (si.sdk_name.slen ? "/" : ""),
338 			       si.sdk_name.ptr,
339 			       ver_info(si.sdk_ver, sdk_ver));
340 	if (cnt > 0 && cnt < (int)sizeof(tmp)) {
341 	    ALLOC_CP_STR(tmp, info);
342 	}
343     }
344 
345     si_initialized = PJ_TRUE;
346     return &si;
347 }
348