GNU Octave  4.4.1
A high-level interpreted language, primarily intended for numerical computations, mostly compatible with Matlab
uname-wrapper.c
Go to the documentation of this file.
1 /*
2 
3 Copyright (C) 2016-2018 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
9 the Free Software Foundation, either version 3 of the License, or
10 (at your option) any later version.
11 
12 Octave is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License 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 <https://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 = 0;
48  *nodename = 0;
49  *release = 0;
50  *version = 0;
51  *machine = 0;
52  }
53  else
54  {
55  *sysname = unm.sysname;
56  *nodename = unm.nodename;
57  *release = unm.release;
58  *version = unm.version;
59  *machine = unm.machine;
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
std::string release(void)
Definition: defaults.cc:266
OCTAVE_EXPORT octave_value_list error nd deftypefn *const octave_scalar_map err
Definition: error.cc:1049