Runtime.xcs

浏览该文件的文档.

//xlang
@SuppressWarnings
@Version(value = "1.0.0.11")
@Compiler(version = ">=4.0") // 要求编译器版本大于等于4.0
package Runtime {
 
    public class rtlp{
        public static int rtl_osid = _system_.getPlatformId();
    };
 
    public class UnixlikeApi : Library{
        static bool loaded = false;
 
        public static bool load_linux() {
            try {
                loadLibrary("libc.so.6");
                return true;
            } catch(Exception e) {
                _system_.output(e.getMessage());
 
                try {
                    loadLibrary("libc.so");
                    return true;
                } catch(Exception e) {
                    _system_.output(e.getMessage());
                }
            }
 
            return false;
        }
 
        public static bool load() {
            if (loaded == false) {
                if (rtlp.rtl_osid == 1) {
                    loaded = load_linux();
 
                    if (loaded == false) {
                        _system_.output("can not load libc");
                    }
                } else {
                    try {
                        loadLibrary("libc.dylib");
                        loaded = true;
                    } catch(Exception e) {
                        _system_.output(e.getMessage());
                    }
                }
            }
 
            return loaded;
        }
 
        public import{
            Pointer cdecl readlink (String __path,
                                    ObjectPtr __buf, Pointer __len);
            int cdecl kill(int pid, int sig);
        };
    };
    public class Win32Api{
 
        public static class Psapi32 : Library{
 
            public static bool loaded = false;
 
            public static bool load() {
                if (loaded == false) {
                    try {
                        loadLibrary("psapi.dll");
                        loaded = true;
                    } catch(Exception e) {
 
                    }
                }
 
                return loaded;
            }
 
            public import {
                int
                stdcall
                GetProcessImageFileNameA(
                    Pointer hProcess,
                    ObjectPtr lpExeName,
                    ObjectPtr lpdwSize
                );
 
                bool stdcall EnumProcessModules(
                    Pointer  hProcess,
                    ObjectPtr lphModule,
                    int   cb,
                    ObjectPtr lpcbNeeded
                );
 
                int stdcall GetModuleFileNameExA(
                    Pointer  hProcess,
                    Pointer hModule,
                    ObjectPtr   lpFilename,
                    int   nSize
                );
            };
        };
 
        public static class Kernel32 : Library{
            public static bool loaded = false;
            public static bool load() {
                if (loaded == false) {
                    try {
                        loadLibrary("kernel32.dll");
                        loaded = true;
                    } catch(Exception e) {
 
                    }
                }
 
                return loaded;
            }
 
            public static const int MAX_PATH = 260,
                                    TH32CS_SNAPHEAPLIST     = 1,
                                    TH32CS_SNAPPROCESS      = 2,
                                    TH32CS_SNAPTHREAD       = 4,
                                    TH32CS_SNAPMODULE       = 8,
                                    TH32CS_SNAPALL          = TH32CS_SNAPHEAPLIST | TH32CS_SNAPPROCESS | TH32CS_SNAPTHREAD | TH32CS_SNAPMODULE;
 
            public import {
                Pointer stdcall CreateToolhelp32Snapshot(
                    int dwFlags,
                    int th32ProcessID
                );
 
                //结构体356个字节
                bool stdcall Process32First(
                    Pointer hSnapshot,
                    ObjectPtr lppe
                );
 
                bool stdcall Process32Next(
                    Pointer           hSnapshot,
                    ObjectPtr lppe
                );
 
                int stdcall lstrlenA(
                    ObjectPtr lpString
                );
 
                bool stdcall CloseHandle(
                    Pointer hObject
                );
 
                bool stdcall QueryFullProcessImageNameA(
                    ObjectPtr hProcess,
                    int  dwFlags,
                    ObjectPtr  lpExeName,
                    ObjectPtr lpdwSize
                );
 
                Pointer stdcall OpenProcess(
                    int dwDesiredAccess,
                    bool bInheritHandle,
                    int dwProcessId);
 
                bool stdcall TerminateProcess(
                    Pointer hProcess,
                    int   uExitCode
                );
            };
        };
    };
      
    @Native
    static class PROCESSENTRY32
    {
        @Native public int   dwSize = sizeof(this);
        @Native public int   cntUsage;
        @Native public int   th32ProcessID;          // this process
        @Native public Pointer th32DefaultHeapID;
        @Native public int   th32ModuleID;           // associated exe
        @Native public int   cntThreads;
        @Native public int   th32ParentProcessID;    // this process's parent process
        @Native public int    pcPriClassBase;         // Base priority of process's threads
        @Native public int   dwFlags;
        @Native public byte [] szExeFile = new byte [Win32Api.Kernel32.MAX_PATH] ;   // Path
        @Native int n;
    };
 
    public class OSProcess{
        public OSProcess() {
        }
        public OSProcess(int Id) {
            processId = Id;
        }
        OSProcess(PROCESSENTRY32 entry) throws IndexOutOfBoundsException    , ArrayStoreException, NullPointerException{
            processId = entry.th32ProcessID;
            int len = Win32Api.Kernel32.lstrlenA(entry.szExeFile);
            if (len > 0){
                name = new String(entry.szExeFile, 0, len);
            }
        }
 
        int processId;
        String name;
        String exepath;
 
        public int getId() {
            return processId;
        }
 
        public String getName() {
            return name;
        }
 
        public String getPath() {
            //PROCESS_QUERY_INFORMATION
            if (exepath == nilptr) {
 
                if (rtlp.rtl_osid == 0) {
                    if (false == Win32Api.Psapi32.load()) {
                        return nilptr;
                    }
 
                    long handle = open();
 
                    if (handle > 0) {
                        byte [] path = new byte[Win32Api.Kernel32.MAX_PATH];
                        int [] pl = new int[1];
                        long [] hm = new long[1];
 
                        pl[0] = Win32Api.Kernel32.MAX_PATH;
                        int up = 0;
 
                        if (Win32Api.Psapi32.EnumProcessModules(handle, hm, 8, up)) {
                            int len = Win32Api.Psapi32.GetModuleFileNameExA(handle, hm[0], path, Win32Api.Kernel32.MAX_PATH);
 
                            if (len > 0) {
                                try {
                                    exepath = new String(path, 0, len);
                                } catch(Exception e) {
 
                                }
                            }
                        }
 
                        closeHandle(handle);
                    }
                }
            }
 
            return exepath;
        }
 
        public long open() {
            return Win32Api.Kernel32.OpenProcess(0x001fffff, false, processId);
        }
 
        public void closeHandle(long handle) {
            Win32Api.Kernel32.CloseHandle(handle);
        }
        public long open(int flag, bool bi) {
            return Win32Api.Kernel32.OpenProcess(flag, bi, processId);
        }
 
        public bool kill(int code) {
            bool r = false;
 
            if (rtlp.rtl_osid == 0) {
 
                long h = open();
 
                if (h > 0) {
                    r = Win32Api.Kernel32.TerminateProcess(h, code);
                    Win32Api.Kernel32.CloseHandle(h);
                }
            } else {
                r = 0 == UnixlikeApi.kill(processId, 15);
            }
 
            return r;
        }
 
        public static
        List<OSProcess> listProcesses() {
            int osid = _system_.getPlatformId();
 
            if (osid == 0) {
                return getProcessListWin32();
            } else if (osid == 1 || osid == 2) {
                return getProcessListUnix();
            }
 
            return nilptr;
        }
 
        static
        List<OSProcess> getProcessListUnix() {
            List<OSProcess> plist = nilptr;
 
            if (false == UnixlikeApi.load()) {
                return nilptr;
            }
 
            plist = new List<OSProcess>();
 
            try {
                File file = new File ("/proc");
                long hfind = file.open();
 
                if (hfind != 0) {
                    File pf = new File();
 
                    while (file.find(hfind, pf)) {
                        String pname = pf.getName();
 
                        if (pname != nilptr && pname.isDigit()) {
                            OSProcess process = new OSProcess();
                            String fppath = pf.getPath();
 
                            if (fppath != nilptr) {
                                String namepath = fppath.appendPath("status");
 
                                long fis = _system_.open(namepath, _system_.READ);
 
                                if (fis > 0) {
                                    String txtstatus = "";
                                    byte []status = new byte[1024];
                                    int rd = 0;
 
                                    while ((rd = _system_.read(fis, status, 0, 1024)) > 0) {
                                        txtstatus = txtstatus + new String(status, 0, rd);
                                    }
 
                                    _system_.close(fis);
                                    int pos = txtstatus.indexOf("Name:");
 
                                    if (pos != -1) {
                                        int le = txtstatus.indexOf("\n", pos);
                                        if (le == -1) {
                                            le = txtstatus.length();
                                        }
                                        process.name = txtstatus.substring(pos + 5, le).trim(true);
                                    }
                                }
 
                                String expath = fppath.appendPath("exe");
                                byte [] fullpath = new byte[4096];
                                long length = UnixlikeApi.readlink(expath, fullpath, (long)4096);
 
                                if (length != -1) {
                                    process.exepath = new String (fullpath, 0, (int)length);
                                }
 
                                process.processId = pname.parseInt();
                                plist.add(process);
                            }
                        }
                    }
 
                    file.close(hfind);
                }
            } catch(Exception e) {
 
            }
 
            return plist;
        }
 
        static
        List<OSProcess> getProcessListWin32() {
            List<OSProcess> plist = nilptr;
 
            if (false == Win32Api.Kernel32.load()) {
                return nilptr;
            }
 
            PROCESSENTRY32 struct = new PROCESSENTRY32();
            plist = new List<OSProcess>();
 
            long snopt = Win32Api.Kernel32.CreateToolhelp32Snapshot(
                             Win32Api.Kernel32.TH32CS_SNAPALL,
                             0);
 
            try {
                if (snopt > 0) {
                    bool succ = Win32Api.Kernel32.Process32First(snopt, struct);
 
                    while (succ) {
                        plist.add(new OSProcess(struct));
                        succ = Win32Api.Kernel32.Process32Next(snopt, struct);
                    }
 
                    Win32Api.Kernel32.CloseHandle(snopt);
                }
            } catch(Exception e) {
 
            }
 
            return plist;
        }
    };
};
 
/*
package System {
    public class out{
        public static int println(String text) {
            return _system_.consoleWrite(text + "\n");
        }
        public static int print(String text) {
            return _system_.consoleWrite(text);
        }
    };
 
    public class Console{
        public Console() {
            _system_.createConsole();
        }
    };
};
 
 
using { System; };
 
 
int main(String [] args) {
 
    List<Runtime.OSProcess> lists =  Runtime.OSProcess.listProcesses();
 
    List.Iterator<Runtime.OSProcess> iter = lists.iterator();
 
    while (iter.hasNext()) {
        Runtime.OSProcess p = iter.next();
        System.out.println(p.getName() + "[" + p.getId() + "] " + p.getPath());
    }
 
    Thread.sleep(-1);
 
    return 0;
}
*/