GNU Octave  4.2.1
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Properties Friends Macros Pages
uname-wrapper.c
Go to the documentation of this file.
1 /*
2 
3 Copyright (C) 2016-2017 John W. Eaton
4 
5 This file is part of Octave.
6 
7 Octave is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published by the
9 Free Software Foundation; either version 3 of the License, or (at your
10 option) any later version.
11 
12 Octave is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 for more details.
16 
17 You should have received a copy of the GNU General Public License
18 along with Octave; see the file COPYING. If not, see
19 <http://www.gnu.org/licenses/>.
20 
21 */
22 
23 // uname may be provided by gnulib. We don't include gnulib headers
24 // directly in Octave's C++ source files to avoid problems that may be
25 // caused by the way that gnulib overrides standard library functions.
26 
27 #if defined (HAVE_CONFIG_H)
28 # include "config.h"
29 #endif
30 
31 #include <sys/utsname.h>
32 
33 #include "uname-wrapper.h"
34 
35 // Returns pointers to static storage.
36 
37 int
38 octave_uname_wrapper (char **sysname, char **nodename,
39  char **release, char **version, char **machine)
40 {
41  static struct utsname unm;
42 
43  int err = uname (&unm);
44 
45  if (err == 0)
46  {
47  *sysname = unm.sysname;
48  *nodename = unm.nodename;
49  *release = unm.release;
50  *version = unm.version;
51  *machine = unm.machine;
52  }
53  else
54  {
55  *sysname = 0;
56  *nodename = 0;
57  *release = 0;
58  *version = 0;
59  *machine = 0;
60  }
61 
62  return err;
63 }
int octave_uname_wrapper(char **sysname, char **nodename, char **release, char **version, char **machine)
Definition: uname-wrapper.c:38
OCTAVE_EXPORT octave_value_list error nd deftypefn *const octave_scalar_map err
Definition: error.cc:1036