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
|
/* ``The contents of this file are subject to the Erlang Public License,
* Version 1.1, (the "License"); you may not use this file except in
* compliance with the License. You should have received a copy of the
* Erlang Public License along with this software. If not, it can be
* retrieved via the world wide web at http://www.erlang.org/.
*
* Software distributed under the License is distributed on an "AS IS"
* basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
* the License for the specific language governing rights and limitations
* under the License.
*
* The Initial Developer of the Original Code is Ericsson Utvecklings AB.
* Portions created by Ericsson are Copyright 1999, Ericsson Utvecklings
* AB. All Rights Reserved.''
*
* $Id$
*/
/*
* Author: Rickard Green
*
* Description: Driver that fakes driver version 1.0 and tests
* driver_system_info().
*
*/
#include "sys_info_drv_impl.h"
#define SYS_INFO_DRV_MAJOR_VSN 1
#define SYS_INFO_DRV_MINOR_VSN 0
#define SYS_INFO_DRV_NAME_STR "sys_info_1_0_drv"
#define SYS_INFO_DRV_NAME sys_info_1_0_drv
#define SYS_INFO_DRV_LAST_FIELD smp_support
#define SYS_INFO_DRV_RES_FORMAT "ok: " \
"drv_drv_vsn=%d.%d " \
"emu_drv_vsn=%d.%d " \
"erts_vsn=%s " \
"otp_vsn=%s " \
"thread=%s " \
"smp=%s"
static size_t
sys_info_drv_max_res_len(ErlDrvSysInfo *sip)
{
size_t slen = strlen(SYS_INFO_DRV_RES_FORMAT) + 1;
slen += 2*20; /* drv_drv_vsn */
slen += 2*20; /* emu_drv_vsn */
slen += strlen(sip->erts_version) + 1;
slen += strlen(sip->otp_release) + 1;
slen += 5; /* threads */
slen += 5; /* smp */
return slen;
}
static size_t
sys_info_drv_sprintf_sys_info(ErlDrvSysInfo *sip, char *str)
{
return sprintf(str,
SYS_INFO_DRV_RES_FORMAT,
SYS_INFO_DRV_MAJOR_VSN,
SYS_INFO_DRV_MINOR_VSN,
sip->driver_major_version,
sip->driver_minor_version,
sip->erts_version,
sip->otp_release,
sip->thread_support ? "true" : "false",
sip->smp_support ? "true" : "false");
}
#include "sys_info_drv_impl.c"
|
