01: /*
02: * machine_version.java
03: *
04: * Copyright (C) 2004 Peter Graves
05: * $Id: machine_version.java,v 1.1 2004/02/27 17:19:59 piso Exp $
06: *
07: * This program is free software; you can redistribute it and/or
08: * modify it under the terms of the GNU General Public License
09: * as published by the Free Software Foundation; either version 2
10: * of the License, or (at your option) any later version.
11: *
12: * This program is distributed in the hope that it will be useful,
13: * but 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 this program; if not, write to the Free Software
19: * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
20: */
21:
22: package org.armedbear.lisp;
23:
24: import java.io.BufferedReader;
25: import java.io.FileInputStream;
26: import java.io.IOException;
27: import java.io.InputStreamReader;
28:
29: // ### machine-version
30: public final class machine_version extends Primitive0 {
31: private machine_version() {
32: super ("machine-version");
33: }
34:
35: public LispObject execute() throws ConditionThrowable {
36: String osName = System.getProperty("os.name");
37: if (osName != null && osName.toLowerCase().startsWith("linux")) {
38: try {
39: FileInputStream in = new FileInputStream(
40: "/proc/cpuinfo");
41: if (in != null) {
42: BufferedReader reader = new BufferedReader(
43: new InputStreamReader(in));
44: try {
45: String s;
46: while ((s = reader.readLine()) != null) {
47: int start = s.indexOf("model name");
48: if (start >= 0) {
49: start = s.indexOf(':', start);
50: if (start >= 0) {
51: return new SimpleString(s
52: .substring(start + 1)
53: .trim());
54: }
55: }
56: }
57: } finally {
58: reader.close();
59: }
60: }
61: } catch (IOException e) {
62: }
63: }
64: return NIL;
65: }
66:
67: private static final Primitive0 MACHINE_VERSION = new machine_version();
68: }
|