org.praxislive.code.CodeProperty Maven / Gradle / Ivy
Go to download
Show more of this group Show more artifacts with this name
Show all versions of praxiscore-code Show documentation
Show all versions of praxiscore-code Show documentation
Forest-of-actors runtime supporting real-time systems and real-time recoding - bringing aspects of Erlang, Smalltalk and Extempore to Java.
/*
* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
*
* Copyright 2024 Neil C Smith.
*
* This code is free software; you can redistribute it and/or modify it
* under the terms of the GNU Lesser General Public License version 3 only, as
* published by the Free Software Foundation.
*
* This code is distributed in the hope that it will be useful, but WITHOUT
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
* FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License
* version 3 for more details.
*
* You should have received a copy of the GNU Lesser General Public License version 3
* along with this work; if not, see http://www.gnu.org/licenses/
*
*
* Please visit https://www.praxislive.org if you need additional information or
* have any questions.
*/
package org.praxislive.code;
import java.util.List;
import org.praxislive.core.Value;
import org.praxislive.core.Call;
import org.praxislive.core.Control;
import org.praxislive.core.ControlAddress;
import org.praxislive.core.PacketRouter;
import org.praxislive.core.ArgumentInfo;
import org.praxislive.core.ControlInfo;
import org.praxislive.core.TreeWriter;
import org.praxislive.core.services.ServiceUnavailableException;
import org.praxislive.core.types.PError;
import org.praxislive.core.types.PMap;
import org.praxislive.core.types.PReference;
import org.praxislive.core.types.PString;
import org.praxislive.core.services.LogBuilder;
import org.praxislive.core.services.LogLevel;
import org.praxislive.core.types.PArray;
class CodeProperty
implements Control {
public final static String MIME_TYPE = "text/x-praxis-java";
private final CodeFactory factory;
private CodeContext context;
private Call activeCall;
private Call taskCall;
private List sourceArgs;
private long latest;
private ControlAddress contextFactory;
private SharedCodeContext sharedCodeCtxt;
private CodeProperty(CodeFactory factory) {
this.factory = factory;
this.sourceArgs = List.of(PString.EMPTY);
}
@SuppressWarnings("unchecked")
protected void attach(CodeContext context) {
this.context = (CodeContext) context;
contextFactory = null;
sharedCodeCtxt = null;
}
@Override
public void call(Call call, PacketRouter router) throws Exception {
if (call.isRequest()) {
processInvoke(call, router);
} else if (call.isReply()) {
processReturn(call, router);
} else {
processError(call, router);
}
}
private void processInvoke(Call call, PacketRouter router) {
List args = call.args();
long time = call.time();
if (args.size() > 0 && isLatest(time)) {
try {
if (contextFactory == null) {
contextFactory = ControlAddress.of(
context.locateService(CodeContextFactoryService.class)
.orElseThrow(ServiceUnavailableException::new),
CodeContextFactoryService.NEW_CONTEXT);
sharedCodeCtxt = context.getLookup().find(SharedCodeContext.class).orElse(null);
}
String code = args.get(0).toString();
CodeContextFactoryService.Task task
= new CodeContextFactoryService.Task(
factory,
code,
context.getLogLevel(),
context.getDelegate().getClass(),
sharedCodeCtxt == null ? null : sharedCodeCtxt.getSharedClassLoader()
);
taskCall = Call.create(contextFactory, call.to(), time, PReference.of(task));
router.route(taskCall);
// managed to start task ok
setLatest(time);
if (activeCall != null) {
router.route(activeCall.reply(activeCall.args()));
}
activeCall = call;
} catch (Exception ex) {
router.route(call.error(PError.of(ex)));
}
} else {
router.route(call.reply(sourceArgs));
}
}
private void processReturn(Call call, PacketRouter router) {
try {
if (taskCall == null || taskCall.matchID() != call.matchID()) {
//LOG.warning("Unexpected Call received\n" + call.toString());
return;
}
taskCall = null;
CodeContextFactoryService.Result result
= PReference.from(call.args().get(0))
.flatMap(r -> r.as(CodeContextFactoryService.Result.class))
.orElseThrow(IllegalArgumentException::new);
sourceArgs = activeCall.args();
router.route(activeCall.reply(sourceArgs));
activeCall = null;
// flush log before we replace existing context
context.flush();
// install new code context, which will attach us and change context field
installContext(call.to(), result.getContext());
LogBuilder log = result.getLog();
context.log(log);
context.flush();
} catch (Exception ex) {
router.route(activeCall.error(PError.of(ex)));
}
}
private void processError(Call call, PacketRouter router) throws Exception {
if (taskCall == null || taskCall.matchID() != call.matchID()) {
//LOG.warning("Unexpected Call received\n" + call.toString());
return;
}
router.route(activeCall.error(call.args()));
activeCall = null;
List args = call.args();
PError err;
if (args.size() > 0) {
err = PError.from(args.get(0))
.orElseGet(() -> PError.of(args.get(0).toString()));
} else {
err = PError.of("");
}
context.getLog().log(LogLevel.ERROR, err);
context.flush();
}
private void setLatest(long time) {
latest = time == 0 ? -1 : time;
}
private boolean isLatest(long time) {
return latest == 0 || (time - latest) >= 0;
}
private void dispose() {
if (sharedCodeCtxt != null) {
sharedCodeCtxt.clearDependency(this);
sharedCodeCtxt = null;
}
}
// for access from shared code property
@SuppressWarnings("unchecked")
Class getDelegateClass() {
return context == null ? null : (Class) context.getDelegate().getClass();
}
void installContext(ControlAddress address, CodeContext context) {
this.context.getComponent().install((CodeContext) context);
// shared code context is now null!
checkSharedContext(address);
}
void checkSharedContext(ControlAddress address) {
sharedCodeCtxt = context.getLookup().find(SharedCodeContext.class).orElse(null);
if (sharedCodeCtxt != null) {
sharedCodeCtxt.checkDependency(address, this);
}
}
SharedCodeService.DependentTask createSharedCodeReloadTask() {
String code = sourceArgs.get(0).toString();
if (code.isEmpty()) {
code = factory.sourceTemplate();
}
return new SharedCodeService.DependentTask<>(factory, code, getDelegateClass());
}
static class Descriptor extends ControlDescriptor {
private final CodeFactory factory;
private final ControlInfo info;
private CodeProperty control;
public Descriptor(CodeFactory factory, int index) {
super(Descriptor.class, "code", Category.Internal, index);
this.factory = factory;
this.info = createInfo(factory);
}
private ControlInfo createInfo(CodeFactory factory) {
return ControlInfo.createPropertyInfo(
ArgumentInfo.of(PString.class,
PMap.of(PString.KEY_MIME_TYPE, MIME_TYPE,
ArgumentInfo.KEY_TEMPLATE, factory.sourceTemplate(),
CodeFactory.BASE_CLASS_KEY, factory.baseClass().getName(),
CodeFactory.BASE_IMPORTS_KEY,
factory.baseImports().stream().map(PString::of).collect(PArray.collector()))
),
PString.EMPTY,
PMap.EMPTY);
}
@Override
public void attach(CodeContext context, Descriptor previous) {
if (previous != null && previous.factory == factory) {
control = previous.control;
} else {
if (previous != null) {
previous.dispose();
}
control = new CodeProperty<>(factory);
}
control.attach(context);
}
@Override
public Control control() {
return control;
}
@Override
public ControlInfo controlInfo() {
return info;
}
@Override
public void dispose() {
control.dispose();
}
@Override
public void write(TreeWriter writer) {
Value source = control.sourceArgs.get(0);
if (!source.isEmpty()) {
writer.writeProperty(id(), source);
}
}
}
}