/*******************************************************************************
* Copyright (c) 2006 Vlad Dumitrescu and others.
* All rights reserved. This program and the accompanying materials
* are made available under the terms of the Eclipse Public License v1.0
* which accompanies this distribution, and is available at
* http://www.eclipse.org/legal/epl-v10.html
*
* Contributors:
* Vlad Dumitrescu
*******************************************************************************/
package org.erlide.runtime.rpc;
import org.erlide.util.erlang.OtpErlang;
import com.ericsson.otp.erlang.OtpErlangAtom;
import com.ericsson.otp.erlang.OtpErlangObject;
import com.ericsson.otp.erlang.OtpErlangString;
import com.ericsson.otp.erlang.OtpErlangTuple;
public class RpcResult {
private static final OtpErlangAtom UNDEFINED = new OtpErlangAtom("undefined");
private OtpErlangObject fValue;
private boolean fOk = true;
private RpcResult(final boolean ok) {
fOk = ok;
fValue = UNDEFINED;
}
public RpcResult(final OtpErlangObject res) {
if (res instanceof OtpErlangTuple
&& ((OtpErlangTuple) res).elementAt(0) instanceof OtpErlangAtom
&& ("badrpc"
.equals(((OtpErlangAtom) ((OtpErlangTuple) res).elementAt(0))
.atomValue())
|| "EXIT".equals(
((OtpErlangAtom) ((OtpErlangTuple) res).elementAt(0))
.atomValue()))) {
fOk = false;
fValue = ((OtpErlangTuple) res).elementAt(1);
} else {
fOk = true;
fValue = res;
}
}
public boolean isOk() {
return fOk;
}
public OtpErlangObject getValue() {
return fValue;
}
@Override
public String toString() {
return "RPC:" + fOk + "=" + fValue.toString();
}
public static RpcResult error(final String msg) {
final RpcResult r = new RpcResult(false);
r.fValue = OtpErlang.mkTuple(new OtpErlangAtom("error"),
new OtpErlangString(msg));
return r;
}
}