Warning : session_start(): open(/var/lib/php/sessions/sess_e80kuotah8vjc7drmlla9r09ja, O_RDWR) failed: No space left on device (28) in /var/www/tb-usercake/models/config.php on line 51 Warning : session_start(): Failed to read session data: files (path: /var/lib/php/sessions) in /var/www/tb-usercake/models/config.php on line 51 > onPostedInChannel = syncList();
//transient bool debugPosting;
// when a discord action failed
transient Consumer onQueueError = error -> {
AutoCloseable __1 = enter(); try {
printStackTrace(error);
} finally { _close(__1); }};
void startDiscord() {
if (!discordEnabled()) { print("Not enabled"); return; }
vm_cleanPrints(); // avoid Swing Unicode problem
logModuleOutput(); // good idea for chat bots
// TODO: log JDA output going to System.out/err
discord = shardedDiscordBot40(new ListenerAdapter() {
@Override
public void onMessageUpdate(MessageUpdateEvent e) { try {
AutoCloseable __2 = enter(); try {
{ if (!discordEnabled() || !licensed()) return; }
Message msg = e.getMessage();
long msgID = msg.getIdLong();
User user = e.getAuthor();
long userID = user == null ? 0 : user.getIdLong();
String content = e.getMessage().getContentRaw();
MessageChannel channel = e.getChannel();
long channelID = channel.getIdLong();
String rendered = msgID + ": " + content;
//print("Message edited: " + rendered);
vmBus_send("editedDiscordMessage",
litmapparams("event" , e, "module" , dm_me(), "msgID", msgID, "msg", msg, "content", content,
"channelID", channelID, "channel", channel, "user", user, "userID", userID));
Object lineConcept = dm_discord_lineForMsgID_unimported(msgID);
if (lineConcept == null) return; // logging module not enabled
call(lineConcept, "_setField", "editedText" , content);
} finally { _close(__2); }} catch (Throwable __e) { printStackTrace(__e); }}
@Override
public void onMessageReceived(MessageReceivedEvent e) { try {
AutoCloseable __3 = enter(); try {
{ if (!discordEnabled() || !licensed()) return; }
// send out raw event
vmBus_send("discord_onMessageReceived", module(), e);
User user = e.getAuthor();
if (!reactToUser(user)) { print("Not reacting to user " + user); return; }
boolean bot = user.isBot();
long msgID = e.getMessage().getIdLong();
long userID = user.getIdLong();
Guild guild = e.isFromType(ChannelType.TEXT) ? e.getGuild() : null;
long guildID = toLong(call(guild, "getIdLong"));
Member member = e.getMember();
String userName = member == null ? null : member.getNickname(); // the changeable nick name - null sometimes?
if (userName == null && member != null) userName = member.getEffectiveName();
if (userName == null) userName = e.getAuthor().getName();
final Message msg = e.getMessage();
MessageChannel channel = e.getChannel();
long channelID = channel.getIdLong();
//print("Channel type: " + e.getChannelType());
boolean isPrivate = e.getChannelType() == ChannelType.PRIVATE;
String content = trim(msg.getContentRaw());
print("Msg from " + userName + ": " + content);
vmBus_send("incomingDiscordMessage",
litmapparams("fromBot" , bot, "module" , dm_me(), "msgID", msgID, "userID", userID, "userName", userName, "event" , e, "guildID", guildID, "guild", guild, "member", member,
"msg", msg,
"content", content, "isPrivate", isPrivate, "channelID", channelID, "channel", channel));
} finally { _close(__3); }} catch (Throwable __e) { printStackTrace(__e); }}
@Override
public void onMessageReactionAdd(MessageReactionAddEvent e) { try {
AutoCloseable __4 = enter(); try {
{ if (!discordEnabled() || !licensed()) return; }
MessageReaction r = e.getReaction();
User user = e.getUser();
if (!reactToUser(user)) return;
boolean bot = user.isBot();
long msgID = r.getMessageIdLong();
String emoji = r.getReactionEmote().getName();
vmBus_send("incomingDiscordReaction", litmapparams(
"reaction" , r,
"fromBot" , bot, "user", user, "userID" , user.getIdLong(),
"module" , dm_me(), "msgID", msgID, "emoji", emoji
));
} finally { _close(__4); }} catch (Throwable __e) { printStackTrace(__e); }}
@Override
public void onMessageReactionRemove(MessageReactionRemoveEvent e) { try {
AutoCloseable __5 = enter(); try {
{ if (!discordEnabled() || !licensed()) return; }
MessageReaction r = e.getReaction();
User user = e.getUser();
if (!reactToUser(user)) return;
boolean bot = user.isBot();
long msgID = r.getMessageIdLong();
String emoji = r.getReactionEmote().getName();
vmBus_send("discordReactionRemoved", litmapparams(
"reaction" , r,
"fromBot" , bot, "user", user, "userID" , user.getIdLong(),
"module" , dm_me(), "msgID", msgID, "emoji", emoji
));
} finally { _close(__5); }} catch (Throwable __e) { printStackTrace(__e); }}
@Override
public void onMessageReactionRemoveAll(MessageReactionRemoveAllEvent e) { try {
AutoCloseable __6 = enter(); try {
print("TODO: onMessageReactionRemoveAll");
} finally { _close(__6); }} catch (Throwable __e) { printStackTrace(__e); }}
@Override
public void onGuildMemberJoin(GuildMemberJoinEvent event) { try {
AutoCloseable __7 = enter(); try {
print("Got guild join");
{ if (!discordEnabled() || !licensed()) return; }
print("Join >> getting user ID");
long userID = rcall_long("getIdLong", rcall("getUser", event.getMember()));
print("Join >> sending");
vmBus_send("discordGuildJoin", litmapparams(
"module" , dm_me(), "event", event, "userID", userID, "guildID" , discord_guildIDFromEvent_gen(event)
));
} finally { _close(__7); }} catch (Throwable __e) { printStackTrace(__e); }}
@Override
public void onGuildMemberLeave(GuildMemberLeaveEvent event) { try {
AutoCloseable __8 = enter(); try {
print("Got guild leave");
{ if (!discordEnabled() || !licensed()) return; }
long userID = rcall_long("getIdLong", rcall("getUser", event.getMember()));
vmBus_send("discordGuildLeave", litmapparams(
"module" , dm_me(), "event", event, "userID", userID
));
} finally { _close(__8); }} catch (Throwable __e) { printStackTrace(__e); }} // end of JDA listener
}, "token" , discordToken, "membersIntent", membersIntent);
dm_registerAs("liveDiscordModule");
dm_vmBus_answerToMessage("activeDiscordTokens", new F0>() { public List get() { try { return ll(discordToken); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "ret ll(discordToken);"; }});
User selfUser = null;
int safety = 0;
while (licensed() && ++safety < 20 && (selfUser = getSelfUser()) == null) {
print("Waiting for first shard to connect");
sleepSeconds(1);
}
if (selfUser == null) throw fail("No shards connected after 20 seconds");
setField("discordBotName" , selfUser.getName());
setField("discordBotID" , selfUser.getIdLong());
print("Bot name: " + discordBotName);
}
public SelfUser getSelfUser() {
for (JDA shard : discord.getShards()) {
if (shard.getStatus().equals(JDA.Status.CONNECTED))
return shard.getSelfUser();
}
return null;
}
void cleanMeUp() {
if (discord != null) { try {
print("Shutting down discord");
discord.shutdown();
print("Bot shut down");
} catch (Throwable __e) { printStackTrace(__e); }}
discord = null;
}
Object userConcept(User user) {
String crud = dm_gazelle_linesCRUD();
Object userConcept = dm_call(crud, "uniqUser", user.getIdLong());
dm_call(crud, "cset", userConcept, litobjectarray("name" , user.getName()));
return userConcept;
}
// API
MessageChannel getChannel(long channelID) {
return discord.getTextChannelById(channelID);
}
void postInChannel(long channelID, String msg) {
postInChannel(channelID, msg, null);
}
void postInChannel(long channelID, String msg, IVF1 onPost) {
if (channelID == 0) return;
postInChannel(getChannel(channelID), msg, onPost);
}
// returns null for your convenience
String uploadFileInChannel(long channelID, File file, String fileName, String msg, IVF1 onPost) {
if (channelID == 0) return null;
return uploadFileInChannel(getChannel(channelID), file, fileName, msg, onPost);
}
void postInChannel(MessageChannel channel, String msg, IVF1 onPost) {
String originalMsg = msg;
msg = ecapeAndShortenForDiscord(msg);
if (empty(msg)) return;
String postID = !sendToPostedLinesCRUD ? null : (String) dm_pcall(gazelle_postedLinesCRUD(), "postingLine", channel.getId(), msg);
print("Posting in channel " + channel + ": " + msg);
pcallFAll(onPostedInChannel, channel, msg);
MessageAction a = channel.sendMessage(msg);
if (msg != originalMsg)
a.addFile(toUtf8(originalMsg), genericTextFileName());
a.queue(m -> msgPosted(m, onPost, postID), onQueueError);
}
String genericTextFileName() {
return "full-output-" + ymd_minus_hms() + ".txt";
}
void msgPosted(Message m, IVF1 onPost, String postID) { AutoCloseable __9 = enter(); try {
if (nempty(postID))
dm_call(gazelle_postedLinesCRUD(), "donePosting", postID, "discord msg " + m.getId());
long msgId = m.getIdLong();
print("I sent msg: " + msgId);
pcallF(onPost, m);
} finally { _close(__9); }}
void postInChannel(String channel, String msg) {
long id = dm_discord_channelID(channel);
if (id == 0) throw fail("Channel not found: " + channel);
postInChannel(id, msg);
}
void postInChannel(MessageChannel channel, String msg) {
postInChannel(channel, msg, null);
}
void postImage(Map msgMap, String url) {
postImage(msgMap, url, "");
}
void postImage(Map msgMap, String url, String description) {
postImage((MessageChannel) get("channel", msgMap), url, description);
}
void postImage(MessageChannel channel, String url, String description) {
print("Posting image: " + url);
channel.sendMessage(
new EmbedBuilder()
.setImage(absoluteURL(url))
//.setTitle(unnull(title))
.setDescription(unnull(description))
.setColor(discordImageEmbedMysteriousLineColor)
.build()).queue(null, onQueueError); // TODO: posted lines
}
void editMessage(long channelID, long msgID, String text) {
getChannel(channelID).editMessageById(str(msgID), text).queue(null, onQueueError);
}
void sendPM(long userID, String _text) {
String text = ecapeAndShortenForDiscord(_text);
if (empty(text)) return;
print("Sending PM to " + userID + ": " + text);
discord.getUserById(userID).openPrivateChannel().queue(channel -> {
channel.sendMessage(text).queue(null, onQueueError);
}, onQueueError);
print("PM queued");
}
void reply(Map msgMap, String text) {
reply(msgMap, text, null);
}
void reply(Map msgMap, String text, Object onPost) {
if (empty(text = trim(text))) return;
postInChannel((MessageChannel) msgMap.get("channel"), text, toIVF1(onPost));
}
void iAmTyping(Map msgMap) { try {
((MessageChannel) msgMap.get("channel")).sendTyping().queue(null, onQueueError);
} catch (Throwable __e) { printStackTrace(__e); }}
String startKeepAliveModule() { AutoCloseable __10 = enter(); try {
return dm_discord_startKeepAliveModule(module());
} finally { _close(__10); }}
boolean reactToUser(User user) {
boolean bot = user.isBot();
// don't react to other bots
if (bot && !reactToBots) return false;
// don't read msgs from myself
if (user.getIdLong() == discordBotID) return false;
return true;
}
String ecapeAndShortenForDiscord(String s) {
if (escapeAtEveryone) s = escapeAtEveryone(s);
return shortenForDiscord(s);
}
// returns null for your convenience
String uploadFileInChannel(MessageChannel channel, File file, String fileName, String msg, IVF1 onPost) {
msg = ecapeAndShortenForDiscord(msg);
MessageAction a = empty(msg)
? channel.sendFile(file, fileName)
: channel.sendMessage(msg).addFile(file, fileName);
a.queue(m -> msgPosted(m, onPost, null), onQueueError);
return null;
}
// returns null... you know the drill
String uploadFileInChannel(MessageChannel channel, byte[] data, String fileName, String msg, IVF1 onPost) {
msg = ecapeAndShortenForDiscord(msg);
MessageAction a = empty(msg)
? channel.sendFile(data, fileName)
: channel.sendMessage(msg).addFile(data, fileName);
a.queue(m -> msgPosted(m, onPost, null), onQueueError);
return null;
}
String uploadFileInChannel(long channelID, byte[] data, String fileName, String msg, IVF1 onPost) {
return uploadFileInChannel(getChannel(channelID), data, fileName, msg, onPost);
}
void queue(RestAction action) {
action.queue(null, onQueueError);
}
boolean discordEnabled() { return enabled; }
boolean printToModule() { return true; }
boolean discordHopperMetaCmdsEnabled = false;
long preferredChannelID;
transient double minutesToKeepRecordedAnswers = 60.0;
List recordedAnswers = syncList();
static class RecordedAnswer {
long timestamp;
long questionMsgID, answerMsgID, channelID;
String questionText, answerText;
public String toString() { return stdToString(this); }
}
static boolean _switchableField_verboseEvents = true; transient boolean verboseEvents = false;
transient List onDiscordStarted = new ArrayList();
transient List> onDiscordEvent = syncList();
ListenerAdapter genericListener() {
return new ListenerAdapter() {
public void onGenericEvent(Event e) { AutoCloseable __14 = enter(); try {
if (verboseEvents) print("Discord event: " + e);
pcallFAll(onDiscordEvent, e);
} finally { _close(__14); }}
};
}
void onDiscordEvent(IVF1 e) {
onDiscordEvent.add(e);
}
void enhanceFrame(Container f) { super.enhanceFrame(f);
internalFramePopupMenuItem(f, "Start keep-alive module", runnableThread(new Runnable() { public void run() { try { startKeepAliveModule();
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "startKeepAliveModule();"; }}));
minFrameSize(f, 300, 300);
}
// Note: Breaking change - moved start to thread
void start() { try { super.start(); startThread("Start", new Runnable() { public void run() { try { AutoCloseable __15 = enter(); try { try {
init();
startMe();
} catch (Throwable __e) { printStackTrace(__e); }} finally { _close(__15); }
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "AutoCloseable __15 = enter(); try { try {\r\n init();\r\n startMe();\r\n } c..."; }});} catch (Exception __e) { throw rethrow(__e); } }
void startMe() {
dm_vmBus_onMessage_q("incomingDiscordMessage", new VF1() { public void get(Map map) { try {
if (!enabled) return;
Object module = map.get("module");
if (!dm_isMe(module)) return;
String s = getString("content", map);
long channelID = toLong(map.get("channelID"));
if (channelID != 0 && preferredChannelID == 0)
setField("preferredChannelID" , channelID);
cleanRecordedAnswers();
String answer = answer(s, map);
sendReply(map, answer);
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "if (!enabled) ret;\r\n O module = map.get('module);\r\n if (!dm_isMe(mo..."; }});
if (!enabled) return;
print("Starting Discord");
startDiscord();
print("Started Discord");
discord.addEventListener(genericListener());
pcallFAll(onDiscordStarted);
}
void sendReply(Map map, String answer) {
if (empty(answer)) return;
cleanRecordedAnswers();
RecordedAnswer a = new RecordedAnswer();
if (minutesToKeepRecordedAnswers > 0) {
a.timestamp = now();
a.questionMsgID = getLong("msgID", map);
a.channelID = getLong("channelID", map);
a.questionText = getString("content", map);
a.answerText = answer;
print("Recording answer : " + a);
recordedAnswers.add(a);
change();
}
dm_rcall("reply", map.get("module"), map, answer, (IVF1) msg -> {
a.answerMsgID = rcall_long("getIdLong", msg);
change();
});
}
String answer(String s, Map map) {
if (discordHopperMetaCmdsEnabled && eq(s, "!bot count"))
return lstr(dm_activeDiscordTokens());
if (eq(s, "!ip address"))
return myPublicIP();
List tokens = extractPossibleDiscordTokens(s);
for (String token : unnullForIteration(tokens)) {
if (getLong("guildID", map) != 0)
return "Send tokens only in private messages!!";
String answer = "That's a Discord token!";
if (contains(concatLists((List>) vmBus_queryAll("activeDiscordTokens")), token))
answer += " And I'm there already.";
else {
answer += " Jumping there!!";
dm_showNewModuleWithParams(dm_moduleLibID(), "discordToken" , token);
}
reply(map, answer);
}
return null;
}
String atSelf() { return discordAt(discordBotID); }
// sometimes mentions come in like this?
String atExclamSelf() { return discordAtExclam(discordBotID); }
void onDiscordStarted(Runnable r) { onDiscordStarted.add(r); }
// OVERRIDE ME
void init() {
dm_watchField("discordToken", new Runnable() { public void run() { try { if (nempty(discordToken) && enabled) dm_reloadModule() ;
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "if (nempty(discordToken) && enabled) dm_reloadModule()"; }});
dm_reloadOnFieldChange("enabled");
}
void cleanRecordedAnswers() {
RecordedAnswer a;
boolean change = false;
synchronized(recordedAnswers) {
while ((a = first(recordedAnswers)) != null
&& elapsedMinutes_timestamp(a.timestamp) > minutesToKeepRecordedAnswers) {
print("Removing old answer: " + a);
recordedAnswers.remove(a);
}
change = true;
}
if (change) change();
}
public JComponent visualize() { JComponent _c = super.visualize();
if (empty(discordToken))
containerAddFirst(buttons, jThreadedButton("Give me a token!", new Runnable() { public void run() { try {
AutoCloseable __16 = enter(); try { dm_stringFieldDialog("discordToken");
} finally { _close(__16); }} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "temp enter(); dm_stringFieldDialog discordToken();"; }}));
addToContainer(buttons, jPopDownButton_noText(
"Export all my data...", runnableThread(new Runnable() { public void run() { try { dm_exportStructureToTextFileDialog(module()) ;
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "dm_exportStructureToTextFileDialog(module())"; }}),
"Import all my data...", runnableThread(new Runnable() { public void run() { try { dm_importStructureFromTextFileDialog(module()) ;
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "dm_importStructureFromTextFileDialog(module())"; }})
));
return _c; }
boolean warnOnDelete() { return true; }
// API
String migrateToType(String moduleLibID) {
String moduleID = assertNotNull(dm_showNewModuleWithParams(moduleLibID, "discordToken", discordToken));
print("Migrated to new module " + moduleID + ", disabling me");
setEnabled(false);
dm_reload(); // actually disable Discord
return moduleID;
}
}
static java.awt.Color colorFromHex(String hex) {
return awtColor(hex);
}
static List syncList() {
return synchroList();
}
static List syncList(List l) {
return synchroList(l);
}
static A printStackTrace(A e) {
// we go to system.out now - system.err is nonsense
if (e != null) print(getStackTrace(e));
return e;
}
static void printStackTrace() {
printStackTrace(new Throwable());
}
static void printStackTrace(String msg) {
printStackTrace(new Throwable(msg));
}
static void printStackTrace(String msg, Throwable e) {
printStackTrace(new Throwable(msg, e));
}
static void _close(AutoCloseable c) {
if (c != null) try {
c.close();
} catch (Throwable e) {
// Some classes stupidly throw an exception on double-closing
if (c instanceof javax.imageio.stream.ImageOutputStream)
return;
else throw rethrow(e);
}
}
static volatile StringBuffer local_log = new StringBuffer(); // not redirected
static boolean printAlsoToSystemOut = true;
static volatile Appendable print_log = local_log; // might be redirected, e.g. to main bot
// in bytes - will cut to half that
static volatile int print_log_max = 1024*1024;
static volatile int local_log_max = 100*1024;
static boolean print_silent = false; // total mute if set
static Object print_byThread_lock = new Object();
static volatile ThreadLocal print_byThread; // special handling by thread - prefers F1
static volatile Object print_allThreads;
static volatile Object print_preprocess;
static void print() {
print("");
}
static A print(String s, A o) {
print(combinePrintParameters(s, o));
return o;
}
// slightly overblown signature to return original object...
static A print(A o) {
ping_okInCleanUp();
if (print_silent) return o;
String s = o + "\n";
print_noNewLine(s);
return o;
}
static void print_noNewLine(String s) {
try {
Object f = getThreadLocal(print_byThread_dontCreate());
if (f == null) f = print_allThreads;
if (f != null)
// We do need the general callF machinery here as print_byThread is sometimes shared between modules
if (isFalse(
f instanceof F1 ? ((F1) f).get(s) :
callF(f, s))) return;
} catch (Throwable e) {
System.out.println(getStackTrace(e));
}
print_raw(s);
}
static void print_raw(String s) {
if (print_preprocess != null) s = (String) callF(print_preprocess, s);
s = fixNewLines(s);
Appendable loc = local_log;
Appendable buf = print_log;
int loc_max = print_log_max;
if (buf != loc && buf != null) {
print_append(buf, s, print_log_max);
loc_max = local_log_max;
}
if (loc != null)
print_append(loc, s, loc_max);
if (printAlsoToSystemOut)
System.out.print(s);
vmBus_send("printed", mc(), s);
}
static void print_autoRotate() {
}
static void vm_cleanPrints() {
print_preprocess = new F1() { public String get(String x) { try { return vm_cleanForPrint(x); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "vm_cleanForPrint(x)"; }};
}
static boolean logModuleOutput_installed = false;
static void logModuleOutput() {
if (logModuleOutput_installed) return;
logModuleOutput_installed = true;
final File logFile = getProgramFile("output.txt");
final LineBuffer buf = new LineBuffer(new VF1() { public void get(String line) { try {
appendToTextFile(logFile, "[" + localDateWithMilliseconds() + "] " + line + "\n");
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "appendToTextFile(logFile, \"[\" + localDateWithMilliseconds() + \"] \" + line + \"..."; }});
print_forAllThreads(new VF1() { public void get(String s) { try {
buf.append(s);
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "buf.append(s);"; }});
}
//lib 1400315 // JDA 4.0 with opus
// JDA 4.2 with opus
//static LS _stickyLibs_discordBot = ll(#1400315); // can cause loader constraint violations
static ShardManager shardedDiscordBot40(ListenerAdapter listener, Object... __) { try {
String token = stringPar("token", __);
if (empty(token)) {
File tokenFile = javaxSecretDir("discord-bot-token");
token = assertNempty("Need: " + tokenFile, trim(loadTextFile(tokenFile)));
}
print("Making DefaultShardManagerBuilder");
DefaultShardManagerBuilder builder = DefaultShardManagerBuilder.create(token,
GUILD_VOICE_STATES, GUILD_MESSAGES, GUILD_MESSAGE_REACTIONS, DIRECT_MESSAGES);
print("Have DefaultShardManagerBuilder");
if (boolPar("membersIntent", __))
builder.enableIntents(GUILD_MEMBERS);
builder.addEventListeners(listener);
print("Building JDA with token " + shorten(10, token));
ShardManager jda = builder.build();
print("Got JDA: " + jda);
//jda.awaitSatus(JDA.Status.CONNECTED);
//jda.awaitReady();
//print("Started sharded Discord bot (token: " + shorten(token, 7) + ")");
return jda;
} catch (Exception __e) { throw rethrow(__e); } }
static volatile boolean licensed_yes = true;
static boolean licensed() {
if (!licensed_yes) return false;
ping_okInCleanUp();
return true;
}
static void licensed_off() {
licensed_yes = false;
}
static void vmBus_send(String msg, Object... args) {
Object arg = vmBus_wrapArgs(args);
pcallFAll_minimalExceptionHandling(vm_busListeners_live(), msg, arg);
pcallFAll_minimalExceptionHandling(vm_busListenersByMessage_live().get(msg), msg, arg);
}
static void vmBus_send(String msg) {
vmBus_send(msg, (Object) null);
}
static Object[] litmapparams(Object... l) {
return new Object[] { litmap(l) };
}
static DynModule dm_me() {
return dm_current_mandatory();
}
static Object dm_discord_lineForMsgID_unimported(long msgID) {
return dm_call(dm_gazelle_linesCRUD(), "lineForID", msgID);
}
static Object call(Object o) {
return callF(o);
}
// varargs assignment fixer for a single string array argument
static Object call(Object o, String method, String[] arg) {
return call(o, method, new Object[] {arg});
}
static Object call(Object o, String method, Object... args) {
//ret call_cached(o, method, args);
return call_withVarargs(o, method, args);
}
static long toLong(Object o) {
if (o instanceof Number)
return ((Number) o).longValue();
if (o instanceof String)
return parseLong((String) o);
return 0;
}
static String trim(String s) { return s == null ? null : s.trim(); }
static String trim(StringBuilder buf) { return buf.toString().trim(); }
static String trim(StringBuffer buf) { return buf.toString().trim(); }
static long rcall_long(String method, Object o, Object... args) {
return toLong(rcall(method, o, args));
}
static Object rcall(String method, Object o, Object... args) {
return call_withVarargs(o, method, args);
}
static long discord_guildIDFromEvent_gen(Object event) {
return rcall_long("getIdLong", rcall("getGuild", event));
}
static AutoCloseable dm_registerAs(String... msgs) {
F0 f = new F0() { public String get() { try { return dm_moduleID(); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "ret dm_moduleID();"; }};
return combineAutoCloseables(map(msgs, msg ->
dm_vmBus_answerToMessage(msg, f)));
}
static AutoCloseable dm_vmBus_answerToMessage(String msg, final IF0 f) {
final DynModule m = dm_current_mandatory();
return dm_ownResource(vmBus_addListener_basic(msg, new F2() { public Object get(String _msg, Object arg) { try {
AutoCloseable __1 = m.enter(); try {
return callF(f);
} finally { _close(__1); }} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "temp m.enter();\r\n ret callF(f);"; }}));
}
static AutoCloseable dm_vmBus_answerToMessage(String msg, final F0 f) {
final DynModule m = dm_current_mandatory();
return dm_ownResource(vmBus_addListener_basic(msg, new F2() { public Object get(String _msg, Object arg) { try {
AutoCloseable __2 = m.enter(); try {
return callF(f);
} finally { _close(__2); }} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "temp m.enter();\r\n ret callF(f);"; }}));
}
static AutoCloseable dm_vmBus_answerToMessage(String msg, final F1 f) {
final DynModule m = dm_current_mandatory();
return dm_ownResource(vmBus_addListener_basic(msg, new F2() { public Object get(String _msg, Object arg) { try {
AutoCloseable __3 = m.enter(); try {
return callF(f, arg);
} finally { _close(__3); }} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "temp m.enter();\r\n ret callF(f, arg);"; }}));
}
static AutoCloseable dm_vmBus_answerToMessage(String msg, F2 f) {
final DynModule m = dm_current_mandatory();
return dm_ownResource(vmBus_addListener_basic(msg, new F2() { public Object get(String _msg, Object arg) { try {
if (arg instanceof Object[]) {
if (((Object[]) arg).length != 2) return null;
AutoCloseable __4 = m.enter(); try {
return callF(f, ((Object[]) arg)[0], ((Object[]) arg)[1]);
} finally { _close(__4); }}
return null;
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "if (arg cast O[]) {\r\n if (arg.length != 2) null;\r\n temp m.enter();\r..."; }}));
}
static AutoCloseable dm_vmBus_answerToMessage(String msg, F3 f) {
final DynModule m = dm_current_mandatory();
return dm_ownResource(vmBus_addListener_basic(msg, new F2() { public Object get(String _msg, Object arg) { try {
if (arg instanceof Object[]) {
if (((Object[]) arg).length != 3) return null;
AutoCloseable __5 = m.enter(); try {
return callF(f, ((Object[]) arg)[0], ((Object[]) arg)[1], ((Object[]) arg)[2]);
} finally { _close(__5); }}
return null;
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "if (arg cast O[]) {\r\n if (arg.length != 3) null;\r\n temp m.enter();\r..."; }}));
}
// get purpose 1: access a list/array/map (safer version of x.get(y))
static A get(List l, int idx) {
return l != null && idx >= 0 && idx < l(l) ? l.get(idx) : null;
}
// seems to conflict with other signatures
/*static B get(Map map, A key) {
ret map != null ? map.get(key) : null;
}*/
static A get(A[] l, int idx) {
return idx >= 0 && idx < l(l) ? l[idx] : null;
}
// default to false
static boolean get(boolean[] l, int idx) {
return idx >= 0 && idx < l(l) ? l[idx] : false;
}
// get purpose 2: access a field by reflection or a map
static Object get(Object o, String field) {
try {
if (o == null) return null;
if (o instanceof Class) return get((Class) o, field);
if (o instanceof Map)
return ((Map) o).get(field);
Field f = getOpt_findField(o.getClass(), field);
if (f != null) {
makeAccessible(f);
return f.get(o);
}
if (o instanceof DynamicObject)
return getOptDynOnly(((DynamicObject) o), field);
} catch (Exception e) {
throw asRuntimeException(e);
}
throw new RuntimeException("Field '" + field + "' not found in " + o.getClass().getName());
}
static Object get_raw(String field, Object o) {
return get_raw(o, field);
}
static Object get_raw(Object o, String field) { try {
if (o == null) return null;
Field f = get_findField(o.getClass(), field);
makeAccessible(f);
return f.get(o);
} catch (Exception __e) { throw rethrow(__e); } }
static Object get(Class c, String field) {
try {
Field f = get_findStaticField(c, field);
makeAccessible(f);
return f.get(null);
} catch (Exception e) {
throw new RuntimeException(e);
}
}
static Field get_findStaticField(Class c, String field) {
Class _c = c;
do {
for (Field f : _c.getDeclaredFields())
if (f.getName().equals(field) && (f.getModifiers() & java.lang.reflect.Modifier.STATIC) != 0)
return f;
_c = _c.getSuperclass();
} while (_c != null);
throw new RuntimeException("Static field '" + field + "' not found in " + c.getName());
}
static Field get_findField(Class c, String field) {
Class _c = c;
do {
for (Field f : _c.getDeclaredFields())
if (f.getName().equals(field))
return f;
_c = _c.getSuperclass();
} while (_c != null);
throw new RuntimeException("Field '" + field + "' not found in " + c.getName());
}
static Object get(String field, Object o) {
return get(o, field);
}
static boolean get(BitSet bs, int idx) {
return bs != null && bs.get(idx);
}
static List ll(A... a) {
ArrayList l = new ArrayList(a.length);
if (a != null) for (A x : a) l.add(x);
return l;
}
static RuntimeException rethrow(Throwable t) {
if (t instanceof Error)
_handleError((Error) t);
throw t instanceof RuntimeException ? (RuntimeException) t : new RuntimeException(t);
}
static RuntimeException rethrow(String msg, Throwable t) {
throw new RuntimeException(msg, t);
}
static void sleepSeconds(double s) {
if (s > 0) sleep(round(s*1000));
}
static RuntimeException fail() { throw new RuntimeException("fail"); }
static RuntimeException fail(Throwable e) { throw asRuntimeException(e); }
static RuntimeException fail(Object msg) { throw new RuntimeException(String.valueOf(msg)); }
static RuntimeException fail(Object... objects) { throw new Fail(objects); }
static RuntimeException fail(String msg) { throw new RuntimeException(msg == null ? "" : msg); }
static RuntimeException fail(String msg, Throwable innerException) { throw new RuntimeException(msg, innerException); }
static String dm_gazelle_linesCRUD() {
return dm_require("#1021628/GLines");
}
static Object dm_call(Object moduleOrID, String method, Object... args) {
Object mod = dm_getModule(moduleOrID);
if (mod == null) return null;
AutoCloseable __1 = dm_enter(mod); try {
return call_withVarargs(mod, method, args);
} finally { _close(__1); }}
static Object[] litobjectarray(Object... l) {
return litObjectArray(l);
}
static String getChannel() {
return getChannelName();
}
static boolean empty(Collection c) { return c == null || c.isEmpty(); }
static boolean empty(Iterable c) { return c == null || !c.iterator().hasNext(); }
static boolean empty(CharSequence s) { return s == null || s.length() == 0; }
static boolean empty(Map map) { return map == null || map.isEmpty(); }
static boolean empty(Object[] o) { return o == null || o.length == 0; }
static boolean empty(BitSet bs) { return bs == null || bs.isEmpty(); }
static boolean empty(Object o) {
if (o instanceof Collection) return empty((Collection) o);
if (o instanceof String) return empty((String) o);
if (o instanceof Map) return empty((Map) o);
if (o instanceof Object[]) return empty((Object[]) o);
if (o instanceof byte[]) return empty((byte[]) o);
if (o == null) return true;
throw fail("unknown type for 'empty': " + getType(o));
}
static boolean empty(Iterator i) { return i == null || !i.hasNext(); }
static boolean empty(double[] a) { return a == null || a.length == 0; }
static boolean empty(float[] a) { return a == null || a.length == 0; }
static boolean empty(int[] a) { return a == null || a.length == 0; }
static boolean empty(long[] a) { return a == null || a.length == 0; }
static boolean empty(byte[] a) { return a == null || a.length == 0; }
static boolean empty(short[] a) { return a == null || a.length == 0; }
static boolean empty(MultiMap mm) { return mm == null || mm.isEmpty(); }
static boolean empty(File f) { return getFileSize(f) == 0; }
static boolean empty(Rect r) { return !(r != null && r.w != 0 && r.h != 0); }
static Object dm_pcall(Object moduleOrID, String method, Object... args) { try {
return dm_call(moduleOrID, method, args);
} catch (Throwable __e) { return null; } }
static String gazelle_postedLinesCRUD() {
return dm_require("#1022603/GPostedLines");
}
static void pcallFAll(Collection l, Object... args) {
if (l != null) for (Object f : cloneList(l)) pcallF(f, args);
}
static void pcallFAll(Iterator it, Object... args) {
while (it.hasNext()) pcallF(it.next(), args);
}
static byte[] toUtf8(String s) { try {
return s.getBytes(utf8charset());
} catch (Exception __e) { throw rethrow(__e); } }
static String ymd_minus_hms() {
return ymd() + "-" + hms();
}
static boolean nempty(Collection c) {
return !empty(c);
}
static boolean nempty(CharSequence s) {
return !empty(s);
}
static boolean nempty(Object[] o) { return !empty(o); }
static boolean nempty(byte[] o) { return !empty(o); }
static boolean nempty(int[] o) { return !empty(o); }
static boolean nempty(BitSet bs) { return !empty(bs); }
static boolean nempty(Map m) {
return !empty(m);
}
static boolean nempty(Iterator i) {
return i != null && i.hasNext();
}
static boolean nempty(MultiMap mm) { return mm != null && !mm.isEmpty(); }
static boolean nempty(Object o) { return !empty(o); }
static boolean nempty(Rect r) { return r != null && r.w != 0 && r.h != 0; }
static Object pcallF(Object f, Object... args) {
return pcallFunction(f, args);
}
static A pcallF(F0 f) { try {
return f == null ? null : f.get();
} catch (Throwable __e) { return null; } }
static B pcallF(F1 f, A a) { try {
return f == null ? null : f.get(a);
} catch (Throwable __e) { return null; } }
static void pcallF(VF1 f, A a) {
try {
{ if (f != null) f.get(a); }
} catch (Throwable __e) { printStackTrace(__e); }
}
static Object pcallF(Runnable r) { try {
{ if (r != null) r.run(); } return null;
} catch (Throwable __e) { return null; } }
static A pcallF(IF0 f) { try {
return f == null ? null : f.get();
} catch (Throwable __e) { return null; } }
static B pcallF(IF1 f, A a) { try {
return f == null ? null : f.get(a);
} catch (Throwable __e) { return null; } }
static long dm_discord_channelID(String name) {
return (long) dm_call(dm_gazelle_linesCRUD(), "getChannelID", name);
}
static String absoluteURL(String url) {
return isAbsoluteURL(url) ? url : "http://" + url;
}
static String unnull(String s) {
return s == null ? "" : s;
}
static Collection unnull(Collection l) {
return l == null ? emptyList() : l;
}
static List unnull(List l) { return l == null ? emptyList() : l; }
static int[] unnull(int[] l) { return l == null ? emptyIntArray() : l; }
static char[] unnull(char[] l) { return l == null ? emptyCharArray() : l; }
static double[] unnull(double[] l) { return l == null ? emptyDoubleArray() : l; }
static Map unnull(Map l) {
return l == null ? emptyMap() : l;
}
static Iterable unnull(Iterable i) {
return i == null ? emptyList() : i;
}
static A[] unnull(A[] a) {
return a == null ? (A[]) emptyObjectArray() : a;
}
static BitSet unnull(BitSet b) {
return b == null ? new BitSet() : b;
}
static Pt unnull(Pt p) {
return p == null ? new Pt() : p;
}
//ifclass Symbol
static Symbol unnull(Symbol s) {
return s == null ? emptySymbol() : s;
}
//endif
static Pair unnull(Pair p) {
return p != null ? p : new Pair(null, null);
}
static int unnull(Integer i) { return i == null ? 0 : i; }
static long unnull(Long l) { return l == null ? 0L : l; }
static double unnull(Double l) { return l == null ? 0.0 : l; }
static String str(Object o) {
return o == null ? "null" : o.toString();
}
static String str(char[] c) {
return new String(c);
}
static IVF1 toIVF1(final Object f) {
if (f == null) return null;
if (f instanceof IVF1) return (IVF1) f;
if (isString(f)) return mainFunctionToIVF1((String) f);
return (IVF1) a -> { callF(f, a); };
}
static String dm_discord_startKeepAliveModule(Object mod) {
String discordToken = (String) (dm_get(mod, "discordToken"));
return dm_showNewModuleWithParams("#1024196/DiscordKeepAlive", "discordToken", discordToken);
}
static String escapeAtEveryone(String s) {
return replace(s, "@everyone", "@_everyone");
}
static String shortenForDiscord(String msg) {
return shorten(msg, 2000);
}
static String stdToString(Object o) {
return standard_toString(o);
}
static void internalFramePopupMenuItem(Container f, final String name, final Object action) {
internalFrameTitlePopupMenuItem(((JInternalFrame) f), name, action);
}
static Runnable runnableThread(final Runnable r) {
return new Runnable() { public void run() { try { startThread(r) ;
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "startThread(r)"; }};
}
static void minFrameSize(Component c, int w, int h) {
minimalFrameSize(c, w, h);
}
static Thread startThread(Object runnable) {
return startThread(defaultThreadName(), runnable);
}
static Thread startThread(String name, Runnable runnable) {
runnable = wrapAsActivity(runnable);
return startThread(newThread(runnable, name));
}
static Thread startThread(String name, Object runnable) {
runnable = wrapAsActivity(runnable);
return startThread(newThread(toRunnable(runnable), name));
}
static Thread startThread(Thread t) {
_registerThread(t);
t.start();
return t;
}
static AutoCloseable dm_vmBus_onMessage_q(final String msg, final VF1 onMessage) {
final DynModule m = dm_current_mandatory();
return dm_vmBus_onMessage(msg, new VF1 () { public void get(final A a) { try {
m.q().add(new Runnable() { public void run() { try {
callF(onMessage, a);
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "callF(onMessage, a);"; }}); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "switch to m.q();\r\n callF(onMessage, a);"; }});
}
static AutoCloseable dm_vmBus_onMessage_q(final String msg, final IVF1 onMessage) {
final DynModule m = dm_current_mandatory();
return dm_vmBus_onMessage(msg, new VF1 () { public void get(final A a) { try {
m.q().add(new Runnable() { public void run() { try {
callF(onMessage, a);
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "callF(onMessage, a);"; }}); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "switch to m.q();\r\n callF(onMessage, a);"; }});
}
static AutoCloseable dm_vmBus_onMessage_q(final String msg, final IVF2 onMessage) {
final DynModule m = dm_current_mandatory();
return dm_vmBus_onMessage(msg, new VF2() { public void get(A a, B b) { try {
m.q().add(new Runnable() { public void run() { try {
callF(onMessage, a, b);
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "callF(onMessage, a, b);"; }}); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "switch to m.q();\r\n callF(onMessage, a, b);"; }});
}
static AutoCloseable dm_vmBus_onMessage_q(final String msg, final IVF3 onMessage) {
DynModule m = dm_current_mandatory();
return dm_vmBus_onMessage(msg, new VF3() { public void get(A a, B b, C c) { try {
m.q().add(new Runnable() { public void run() { try {
callF(onMessage, a, b, c);
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "callF(onMessage, a, b, c);"; }}); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "switch to m.q();\r\n callF(onMessage, a, b, c);"; }});
}
static AutoCloseable dm_vmBus_onMessage_q(final String msg, final VF2 onMessage) {
final DynModule m = dm_current_mandatory();
return dm_vmBus_onMessage(msg, new VF2() { public void get(final A a, final B b) { try {
m.q().add(new Runnable() { public void run() { try {
callF(onMessage, a, b);
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "callF(onMessage, a, b);"; }}); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "switch to m.q();\r\n callF(onMessage, a, b);"; }});
}
static AutoCloseable dm_vmBus_onMessage_q(final String msg, final VF3 onMessage) {
final DynModule m = dm_current_mandatory();
return dm_vmBus_onMessage(msg, new VF3() { public void get(final A a, final B b, final C c) { try {
m.q().add(new Runnable() { public void run() { try {
callF(onMessage, a, b, c);
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "callF(onMessage, a, b, c);"; }}); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "switch to m.q();\r\n callF(onMessage, a, b, c);"; }});
}
static AutoCloseable dm_vmBus_onMessage_q(final String msg, final Runnable onMessage) {
final DynModule m = dm_current_mandatory();
return dm_vmBus_onMessage(msg, new VF1 () { public void get(final A a) { try {
m.q().add(new Runnable() { public void run() { try {
callF(onMessage);
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "callF(onMessage);"; }}); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "switch to m.q();\r\n callF(onMessage);"; }});
}
static boolean dm_isMe(Object mod) {
return dm_getModule(mod) == dm_current_mandatory_generic();
}
static String getString(Map map, Object key) {
return map == null ? null : (String) map.get(key);
}
static String getString(List l, int idx) {
return (String) get(l, idx);
}
static String getString(Object o, Object key) {
if (o instanceof Map) return getString((Map) o, key);
if (key instanceof String)
return (String) getOpt(o, (String) key);
throw fail("Not a string key: " + getClassName(key));
}
static String getString(String key, Object o) {
return getString(o, (Object) key);
}
static long now_virtualTime;
static long now() {
return now_virtualTime != 0 ? now_virtualTime : System.currentTimeMillis();
}
static long getLong(Object o, String field) {
return toLong(getOpt(o, field));
}
static long getLong(String field, Object o) {
return getLong(o, field);
}
static void change() {
//mainConcepts.allChanged();
// safe version for now cause function is sometimes included unnecessarily (e.g. by EGDiff)
callOpt(getOptMC("mainConcepts"), "allChanged");
}
static Object dm_rcall(String method, Object moduleOrID, Object... args) {
return dm_call(moduleOrID, method, args);
}
static boolean eq(Object a, Object b) {
return a == b || a != null && b != null && a.equals(b);
}
// a little kludge for stuff like eq(symbol, "$X")
static boolean eq(Symbol a, String b) {
return eq(str(a), b);
}
static String lstr(Map map) {
return str(l(map));
}
static String lstr(Collection c) {
return str(l(c));
}
static String lstr(String s) {
return str(l(s));
}
static List dm_activeDiscordTokens() {
return concatLists((List>) vmBus_queryAll("activeDiscordTokens"));
}
static String myPublicIP() {
return myFirewallIP();
}
static List extractPossibleDiscordTokens(String s) {
return regexpAll(discordTokenRegexp(), s);
}
static String unnullForIteration(String s) {
return s == null ? "" : s;
}
static Collection unnullForIteration(Collection l) {
return l == null ? immutableEmptyList() : l;
}
static List unnullForIteration(List l) { return l == null ? immutableEmptyList() : l; }
static int[] unnullForIteration(int[] l) { return l == null ? emptyIntArray() : l; }
static char[] unnullForIteration(char[] l) { return l == null ? emptyCharArray() : l; }
static double[] unnullForIteration(double[] l) { return l == null ? emptyDoubleArray() : l; }
static short[] unnullForIteration(short[] l) { return l == null ? emptyShortArray() : l; }
static Map unnullForIteration(Map l) {
return l == null ? immutableEmptyMap() : l;
}
static Iterable unnullForIteration(Iterable i) {
return i == null ? immutableEmptyList() : i;
}
static A[] unnullForIteration(A[] a) {
return a == null ? (A[]) emptyObjectArray() : a;
}
static BitSet unnullForIteration(BitSet b) {
return b == null ? new BitSet() : b;
}
static Pt unnullForIteration(Pt p) {
return p == null ? new Pt() : p;
}
//ifclass Symbol
static Symbol unnullForIteration(Symbol s) {
return s == null ? emptySymbol() : s;
}
//endif
static Pair unnullForIteration(Pair p) {
return p != null ? p : new Pair(null, null);
}
static long unnullForIteration(Long l) { return l == null ? 0L : l; }
static boolean contains(Collection c, Object o) {
return c != null && c.contains(o);
}
static boolean contains(Iterable it, Object a) {
if (it != null)
for (Object o : it)
if (eq(a, o))
return true;
return false;
}
static boolean contains(Object[] x, Object o) {
if (x != null)
for (Object a : x)
if (eq(a, o))
return true;
return false;
}
static boolean contains(String s, char c) {
return s != null && s.indexOf(c) >= 0;
}
static boolean contains(String s, String b) {
return s != null && s.indexOf(b) >= 0;
}
static boolean contains(BitSet bs, int i) {
return bs != null && bs.get(i);
}
static List concatLists(Iterable ... lists) {
List l = new ArrayList();
if (lists != null) for (Iterable list : lists)
addAll(l, list);
return l;
}
static List concatLists(Collection> lists) {
List l = new ArrayList();
if (lists != null) for (Iterable list : lists)
addAll(l, list);
return l;
}
static List vmBus_queryAll(String msg, Object... args) {
Object arg = vmBus_wrapArgs(args);
List out = new ArrayList();
for (Object o : unnullForIteration(vm_busListeners_live()))
addIfNotNull(out, pcallF(o, msg, arg));
for (Object o : unnullForIteration(vm_busListenersByMessage_live().get(msg)))
addIfNotNull(out, pcallF(o, msg, arg));
return out;
}
static String dm_showNewModuleWithParams(String moduleLibID, Object... params) {
String moduleID = dm_makeNewModuleWithParams(moduleLibID, params);
dm_showModule(moduleID);
return moduleID;
}
static String dm_moduleLibID() {
return programID() + "/" + shortClassName(dm_current_mandatory_generic());
}
static String dm_moduleLibID(Object mod) {
if (mod == null) return null;
mod = dm_getModule(mod);
if (hasSuperclassShortNamed(mod, "DynModule"))
return programID(mod) + "/" + shortClassName(mod);
return null;
}
static String discordAt(long userID) {
return userID == 0 ? "unknown person" : "<@" + userID + ">";
}
static String discordAtExclam(long userID) {
return userID == 0 ? "unknown person" : "<@!" + userID + ">";
}
static void dm_watchField(String field, Runnable onChange) {
new Dyn_FieldWatcher(dm_current_mandatory(), field, onChange);
}
static void dm_reloadModule(Object module) {
dm_reloadModuleInBackground(module);
}
static void dm_reloadModule() {
dm_reloadModuleInBackground();
}
static void dm_reloadOnFieldChange(String... fields) {
for (String field : unnullForIteration(fields))
dm_onFieldChange(field, new Runnable() { public void run() { try { dm_reloadModule();
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "dm_reloadModule();"; }});
}
static Object first(Object list) {
return first((Iterable) list);
}
static A first(List list) {
return empty(list) ? null : list.get(0);
}
static A first(A[] bla) {
return bla == null || bla.length == 0 ? null : bla[0];
}
static Pair first(Map map) {
return mapEntryToPair(first(entrySet(map)));
}
static Pair first(MultiMap mm) {
if (mm == null) return null;
var e = first(mm.data.entrySet());
if (e == null) return null;
return pair(e.getKey(), first(e.getValue()));
}
static A first(IterableIterator i) {
return first((Iterator ) i);
}
static A first(Iterator i) {
return i == null || !i.hasNext() ? null : i.next();
}
static A first(Iterable i) {
if (i == null) return null;
Iterator it = i.iterator();
return it.hasNext() ? it.next() : null;
}
static Character first(String s) { return empty(s) ? null : s.charAt(0); }
static Character first(CharSequence s) { return empty(s) ? null : s.charAt(0); }
static A first(Pair p) {
return p == null ? null : p.a;
}
static Byte first(byte[] l) {
return empty(l) ? null : l[0];
}
static A first(A[] l, IF1 pred) {
return firstThat(l, pred);
}
static A first(Iterable l, IF1 pred) {
return firstThat(l, pred);
}
static A first(IF1 pred, Iterable l) {
return firstThat(pred, l);
}
static double elapsedMinutes_timestamp(long time) {
return toMinutes(now()-time);
}
static void containerAddFirst(final Container c, final Component... l) {
if (c != null) { swing(() -> {
for (int i = 0; i < l(l); i++)
c.add(l[i], i);
revalidate(c);
}); }
}
// action can be Runnable or a function name
static JButton jThreadedButton(final String text, final Object action) {
return swing(new F0() { public JButton get() { try {
String text2 = dropPrefix("[disabled] ", text);
final JButton btn = new JButton(text2);
if (l(text2) < l(text)) btn.setEnabled(false);
btn.setToolTipText(btn.getText());
if (action != null)
btn.addActionListener(actionListenerInNewThread(action, btn));
return btn;
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "S text2 = dropPrefix(\"[disabled] \", text);\r\n final JButton btn = new JButt..."; }});
}
static void dm_stringFieldDialog(final String field, final Object... __) {
final DynModule m = dm_current_mandatory();
final String humanized = humanizeFormLabel(field);
final JTextField tf = jtextfield(get(m, field));
showFormTitled(or2(stringOptPar(__, "formTitle"), "Set " + humanized),
humanized + ":", tf, new Runnable() { public void run() { try {
m.setField(field, gtt(tf));
callF(optPar(__, "onSet"));
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "m.setField(field, gtt(tf));\r\n callF(optPar(__, \"onSet\"));"; }});
}
static void addToContainer(Container a, Component... b) {
if (a == null) return;
{ swing(() -> {
for (Component c : unnullForIteration(b))
if (c != null)
a.add(c);
}); }
}
// menuParams: text, Runnable, ...
// also: position := 'left/'center/'right
static JButton jPopDownButton_noText(final Object... menuParams) {
return toolTip("Additional commands", jPopDownButton("", menuParams));
}
static void dm_exportStructureToTextFileDialog(DynModule mod) {
inputText("Text file to save data in (" + dm_moduleName(mod) + ")",
f2s(dm_structureExportDefaultFile(mod)), new VF1() { public void get(String path) { try {
saveTextFileWithInfoBox(newFile(path),
javaTokWordWrap(dm_freshModuleStructureWithoutError(mod)));
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "saveTextFileWithInfoBox(newFile(path),\r\n javaTokWordWrap(dm_freshModul..."; }});
}
static void dm_importStructureFromTextFileDialog(DynModule mod) {
File f = showFileChooserWithDefaultDir("Module data to restore", javaxBackupDir());
if (fileExists(f)) {
infoBox("Replacing module with " + f2s(f));
dm_replaceModuleWithStructure(mod, loadTextFile(f));
}
}
static A assertNotNull(A a) {
assertTrue(a != null);
return a;
}
static A assertNotNull(String msg, A a) {
assertTrue(msg, a != null);
return a;
}
static A setEnabled(A c, boolean enable) {
if (c != null) { swing(() -> { c.setEnabled(enable); }); }
return c;
}
static A setEnabled(boolean enable, A c) {
return setEnabled(c, enable);
}
static void dm_reload() {
dm_reloadMe();
}
static AutoCloseable tempInterceptPrintIfNotIntercepted(F1 f) {
return print_byThread().get() == null ? tempInterceptPrint(f) : null;
}
static java.awt.Color awtColor(String hex) {
byte[] b = bytesFromHex(dropPrefix("#", hex));
return new Color(ubyteToInt(b[0]), ubyteToInt(b[1]), ubyteToInt(b[2]));
}
static List synchroList() {
return synchroList(new ArrayList ());
}
static List synchroList(List l) {
return Collections.synchronizedList(l);
}
static String getStackTrace(Throwable throwable) {
lastException(throwable);
return getStackTrace_noRecord(throwable);
}
static String getStackTrace_noRecord(Throwable throwable) {
StringWriter writer = new StringWriter();
throwable.printStackTrace(new PrintWriter(writer));
return hideCredentials(writer.toString());
}
static String getStackTrace() {
return getStackTrace_noRecord(new Throwable());
}
static String getStackTrace(String msg) {
return getStackTrace_noRecord(new Throwable(msg));
}
static String combinePrintParameters(String s, Object o) {
return (endsWithLetterOrDigit(s) ? s + ": " : s) + o;
}
static void ping_okInCleanUp() {
if (ping_pauseAll || ping_anyActions)
ping_impl(true);
}
// this syntax should be removed...
static Object getThreadLocal(Object o, String name) {
ThreadLocal t = (ThreadLocal) (getOpt(o, name));
return t != null ? t.get() : null;
}
static A getThreadLocal(ThreadLocal tl) {
return tl == null ? null : tl.get();
}
static A getThreadLocal(ThreadLocal tl, A defaultValue) {
return or(getThreadLocal(tl), defaultValue);
}
static ThreadLocal print_byThread_dontCreate() {
return print_byThread;
}
static boolean isFalse(Object o) {
return eq(false, o);
}
static Map> callF_cache = newDangerousWeakHashMap();
static A callF(F0 f) {
return f == null ? null : f.get();
}
static B callF(F1 f, A a) {
return f == null ? null : f.get(a);
}
static A callF(IF0 f) {
return f == null ? null : f.get();
}
static B callF(IF1 f, A a) {
return f == null ? null : f.get(a);
}
static B callF(A a, IF1 f) {
return f == null ? null : f.get(a);
}
static C callF(F2 f, A a, B b) {
return f == null ? null : f.get(a, b);
}
static C callF(IF2 f, A a, B b) {
return f == null ? null : f.get(a, b);
}
static void callF(VF1 f, A a) {
if (f != null) f.get(a);
}
static void callF(A a, IVF1 f) {
if (f != null) f.get(a);
}
static void callF(IVF1 f, A a) {
if (f != null) f.get(a);
}
static Object callF(Runnable r) { { if (r != null) r.run(); } return null; }
static Object callF(Object f, Object... args) {
return safeCallF(f, args);
}
static Object safeCallF(Object f, Object... args) {
if (f instanceof Runnable) {
((Runnable) f).run();
return null;
}
if (f == null) return null;
Class c = f.getClass();
ArrayList methods;
synchronized(callF_cache) {
methods = callF_cache.get(c);
if (methods == null)
methods = callF_makeCache(c);
}
int n = l(methods);
if (n == 0) {
if (f instanceof String)
throw fail("Legacy call: " + f);
throw fail("No get method in " + getClassName(c));
}
if (n == 1) return invokeMethod(methods.get(0), f, args);
for (int i = 0; i < n; i++) {
Method m = methods.get(i);
if (call_checkArgs(m, args, false))
return invokeMethod(m, f, args);
}
throw fail("No matching get method in " + getClassName(c));
}
// used internally
static ArrayList callF_makeCache(Class c) {
ArrayList l = new ArrayList();
Class _c = c;
do {
for (Method m : _c.getDeclaredMethods())
if (m.getName().equals("get")) {
makeAccessible(m);
l.add(m);
}
if (!l.isEmpty()) break;
_c = _c.getSuperclass();
} while (_c != null);
callF_cache.put(c, l);
return l;
}
static String fixNewLines(String s) {
int i = indexOf(s, '\r');
if (i < 0) return s;
int l = s.length();
StringBuilder out = new StringBuilder(l);
out.append(s, 0, i);
for (; i < l; i++) {
char c = s.charAt(i);
if (c != '\r')
out.append(c);
else {
out.append('\n');
if (i+1 < l && s.charAt(i+1) == '\n') ++i;
}
}
return out.toString();
}
static void print_append(Appendable buf, String s, int max) { try {
synchronized(buf) {
buf.append(s);
if (buf instanceof StringBuffer)
rotateStringBuffer(((StringBuffer) buf), max);
else if (buf instanceof StringBuilder)
rotateStringBuilder(((StringBuilder) buf), max);
}
} catch (Exception __e) { throw rethrow(__e); } }
static Class mc() {
return main.class;
}
static String vm_cleanForPrint(Object o) {
String s = str(o);
return or((String) vmBus_query("cleanForPrint", s), s);
}
static File getProgramFile(String progID, String fileName) {
if (new File(fileName).isAbsolute())
return new File(fileName);
return new File(getProgramDir(progID), fileName);
}
static File getProgramFile(String fileName) {
return getProgramFile(getProgramID(), fileName);
}
static void appendToTextFile(File file, String s) {
appendToFile(file, s);
}
static void appendToTextFile(String file, String s) {
appendToTextFile(programFile(file), s);
}
static String localDateWithMilliseconds(Date time) {
return localDateWithMilliseconds(time.getTime());
}
static String localDateWithMilliseconds(long time) {
SimpleDateFormat format = simpleDateFormat_local("yyyy/MM/dd HH:mm:ss''SSSS");
return format.format(time);
}
static String localDateWithMilliseconds() {
return localDateWithMilliseconds(now());
}
static void print_forAllThreads(Object f) {
assertNull("todo", print_allThreads);
print_allThreads = f;
}
static String stringPar(Object[] params, String name) {
return stringOptPar(params, name);
}
static String stringPar(String name, Object[] params) {
return stringOptPar(params, name);
}
static String stringPar(String name, Map params) {
return (String) optPar(name, params);
}
static String stringPar(String name, Object[] params, String defaultValue) {
return optPar(name, params, defaultValue);
}
static File javaxSecretDir_dir; // can be set to work on different base dir
static File javaxSecretDir() {
return javaxSecretDir_dir != null ? javaxSecretDir_dir : new File(userHome(), "JavaX-Secret");
}
static File javaxSecretDir(String sub) {
return newFile(javaxSecretDir(), sub);
}
static A assertNempty(A a) {
return assertNempty("empty", a);
}
static A assertNempty(String msg, A a) {
if (empty(a)) throw fail(msg + ": " + a);
return a;
}
static String loadTextFile(String fileName) {
return loadTextFile(fileName, null);
}
static String loadTextFile(File f, String defaultContents) { return loadTextFile(f, defaultContents, "UTF-8"); }
static String loadTextFile(File f, String defaultContents, String encoding) { try {
checkFileNotTooBigToRead(f);
if (f == null || !f.exists()) return defaultContents;
FileInputStream fileInputStream = new FileInputStream(f);
InputStreamReader inputStreamReader = new InputStreamReader(fileInputStream, encoding);
return loadTextFile(inputStreamReader);
} catch (Exception __e) { throw rethrow(__e); } }
public static String loadTextFile(File fileName) {
return loadTextFile(fileName, null);
}
static String loadTextFile(String fileName, String defaultContents) {
return fileName == null ? defaultContents : loadTextFile(newFile(fileName), defaultContents);
}
static String loadTextFile(Reader reader) throws IOException {
StringBuilder builder = new StringBuilder();
try {
char[] buffer = new char[1024];
int n;
while (-1 != (n = reader.read(buffer)))
builder.append(buffer, 0, n);
} finally {
reader.close();
}
return str(builder);
}
static boolean boolPar(ThreadLocal tl) {
return boolOptParam(tl);
}
// defaults to false
static boolean boolPar(Object[] __, String name) {
return boolOptParam(__, name);
}
static boolean boolPar(String name, Object[] __) {
return boolOptParam(__, name);
}
static boolean boolPar(String name, Map __) {
return boolOptParam(name, __);
}
static boolean boolPar(String name, Object[] params, boolean defaultValue) {
return optParam(params, name, defaultValue);
}
static int shorten_default = 100;
static String shorten(CharSequence s) { return shorten(s, shorten_default); }
static String shorten(CharSequence s, int max) {
return shorten(s, max, "...");
}
static String shorten(CharSequence s, int max, String shortener) {
if (s == null) return "";
if (max < 0) return str(s);
return s.length() <= max ? str(s) : subCharSequence(s, 0, min(s.length(), max-l(shortener))) + shortener;
}
static String shorten(int max, CharSequence s) { return shorten(s, max); }
static Object vmBus_wrapArgs(Object... args) {
return empty(args) ? null
: l(args) == 1 ? args[0]
: args;
}
static void pcallFAll_minimalExceptionHandling(Collection l, Object... args) {
if (l != null) for (Object f : cloneList(l)) { ping(); pcallF_minimalExceptionHandling(f, args); }
}
static void pcallFAll_minimalExceptionHandling(Iterator it, Object... args) {
while (it.hasNext()) { ping(); pcallF_minimalExceptionHandling(it.next(), args); }
}
static Set vm_busListeners_live_cache;
static Set vm_busListeners_live() { if (vm_busListeners_live_cache == null) vm_busListeners_live_cache = vm_busListeners_live_load(); return vm_busListeners_live_cache; }
static Set vm_busListeners_live_load() {
return vm_generalIdentityHashSet("busListeners");
}
static Map vm_busListenersByMessage_live_cache;
static Map vm_busListenersByMessage_live() { if (vm_busListenersByMessage_live_cache == null) vm_busListenersByMessage_live_cache = vm_busListenersByMessage_live_load(); return vm_busListenersByMessage_live_cache; }
static Map vm_busListenersByMessage_live_load() {
return vm_generalHashMap("busListenersByMessage");
}
static HashMap litmap(Object... x) {
HashMap map = new HashMap();
litmap_impl(map, x);
return map;
}
static void litmap_impl(Map map, Object... x) {
if (x != null) for (int i = 0; i < x.length-1; i += 2)
if (x[i+1] != null)
map.put(x[i], x[i+1]);
}
static DynModule dm_current_mandatory() {
return assertNotNull("No module set!", dm_currentModule());
}
static Object call_withVarargs(Object o, String method, Object... args) { try {
if (o == null) return null;
if (o instanceof Class) {
Class c = (Class) o;
_MethodCache cache = callOpt_getCache(c);
Method me = cache.findStaticMethod(method, args);
if (me != null)
return invokeMethod(me, null, args);
// try varargs
List methods = cache.cache.get(method);
if (methods != null) methodSearch: for (Method m : methods) {
{ if (!(m.isVarArgs())) continue; }
{ if (!(isStaticMethod(m))) continue; }
Object[] newArgs = massageArgsForVarArgsCall(m, args);
if (newArgs != null)
return invokeMethod(m, null, newArgs);
}
throw fail("Method " + c.getName() + "." + method + "(" + joinWithComma(classNames(args)) + ") not found");
} else {
Class c = o.getClass();
_MethodCache cache = callOpt_getCache(c);
Method me = cache.findMethod(method, args);
if (me != null)
return invokeMethod(me, o, args);
// try varargs
List methods = cache.cache.get(method);
if (methods != null) methodSearch: for (Method m : methods) {
{ if (!(m.isVarArgs())) continue; }
Object[] newArgs = massageArgsForVarArgsCall(m, args);
if (newArgs != null)
return invokeMethod(m, o, newArgs);
}
throw fail("Method " + c.getName() + "." + method + "(" + joinWithComma(classNames(args)) + ") not found");
}
} catch (Exception __e) { throw rethrow(__e); } }
static long parseLong(String s) {
if (empty(s)) return 0;
return Long.parseLong(dropSuffix("L", s));
}
static long parseLong(Object s) {
return Long.parseLong((String) s);
}
static String dm_moduleID(Object module) {
return strOrNull(getOpt(dm_getStem(module), "id"));
}
static String dm_moduleID() {
return dm_moduleID(dm_current_mandatory_generic());
}
static AutoCloseable combineAutoCloseables(final AutoCloseable a, final AutoCloseable b) {
return a == null ? b : b == null ? a : new AutoCloseable() { public String toString() { return "pClose(a); pClose(b);"; } public void close() throws Exception { pClose(a); pClose(b); }};
}
static AutoCloseable combineAutoCloseables(AutoCloseable a, AutoCloseable b, AutoCloseable c, AutoCloseable... more) {
return combineAutoCloseables(concatLists(ll(a, b, c), asList(more)));
}
static AutoCloseable combineAutoCloseables(Iterable l) {
return foldl(new F2() { public AutoCloseable get(AutoCloseable a, AutoCloseable b) { try { return combineAutoCloseables(a,b); } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "combineAutoCloseables(a,b)"; }}, null, l);
}
static List map(Iterable l, Object f) { return map(f, l); }
static List map(Object f, Iterable l) {
List x = emptyList(l);
if (l != null) for (Object o : l)
{ ping(); x.add(callF(f, o)); }
return x;
}
static List map(Iterable l, F1 f) { return map(f, l); }
static List map(F1 f, Iterable l) {
List x = emptyList(l);
if (l != null) for (A o : l)
{ ping(); x.add(callF(f, o)); }
return x;
}
static List map(IF1 f, Iterable l) { return map(l, f); }
static List map(Iterable l, IF1 f) {
List x = emptyList(l);
if (l != null) for (A o : l)
{ ping(); x.add(f.get(o)); }
return x;
}
static List map(IF1 f, A[] l) { return map(l, f); }
static List map(A[] l, IF1 f) {
List x = emptyList(l);
if (l != null) for (A o : l)
{ ping(); x.add(f.get(o)); }
return x;
}
static List map(Object f, Object[] l) { return map(f, asList(l)); }
static List map(Object[] l, Object f) { return map(f, l); }
static List map(Object f, Map map) {
return map(map, f);
}
// map: func(key, value) -> list element
static List map(Map map, Object f) {
List x = new ArrayList();
if (map != null) for (Object _e : map.entrySet()) { ping();
Map.Entry e = (Map.Entry) _e;
x.add(callF(f, e.getKey(), e.getValue()));
}
return x;
}
static List map(Map map, IF2 f) {
return map(map, (Object) f);
}
// new magic alias for mapLL - does it conflict?
static List map(IF1 f, A data1, A... moreData) {
List x = emptyList(l(moreData)+1);
x.add(f.get(data1));
if (moreData != null) for (A o : moreData)
{ ping(); x.add(f.get(o)); }
return x;
}
static A dm_ownResource(A resource) {
dm_currentModuleMandatory().ownResource(resource);
return resource;
}
// listener: voidfunc(S, O) or func(S, O)
static AutoCloseable vmBus_addListener_basic(String msg, Object listener) {
Map map = vm_busListenersByMessage_live();
synchronized(map) {
Set listeners = map.get(msg);
if (listeners == null) map.put(msg, listeners = syncIdentityHashSet());
// We're technically violating the one-synchronized-object-per-thread rule,
// but it should be OK here.
// TODO: remove empty sets from map
return tempAdd(listeners, listener);
}
}
static int l(Object[] a) { return a == null ? 0 : a.length; }
static int l(boolean[] a) { return a == null ? 0 : a.length; }
static int l(byte[] a) { return a == null ? 0 : a.length; }
static int l(short[] a) { return a == null ? 0 : a.length; }
static int l(long[] a) { return a == null ? 0 : a.length; }
static int l(int[] a) { return a == null ? 0 : a.length; }
static int l(float[] a) { return a == null ? 0 : a.length; }
static int l(double[] a) { return a == null ? 0 : a.length; }
static int l(char[] a) { return a == null ? 0 : a.length; }
static int l(Collection c) { return c == null ? 0 : c.size(); }
static int l(Iterator i) { return iteratorCount_int_close(i); } // consumes the iterator && closes it if possible
static int l(Map m) { return m == null ? 0 : m.size(); }
static int l(CharSequence s) { return s == null ? 0 : s.length(); }
static long l(File f) { return f == null ? 0 : f.length(); }
static int l(Object o) {
return o == null ? 0
: o instanceof String ? l((String) o)
: o instanceof Map ? l((Map) o)
: o instanceof Collection ? l((Collection) o)
: o instanceof Object[] ? l((Object[]) o)
: o instanceof boolean[] ? l((boolean[]) o)
: o instanceof byte[] ? l((byte[]) o)
: o instanceof char[] ? l((char[]) o)
: o instanceof short[] ? l((short[]) o)
: o instanceof int[] ? l((int[]) o)
: o instanceof float[] ? l((float[]) o)
: o instanceof double[] ? l((double[]) o)
: o instanceof long[] ? l((long[]) o)
: (Integer) call(o, "size");
}
static Field getOpt_findField(Class c, String field) {
Class _c = c;
do {
for (Field f : _c.getDeclaredFields())
if (f.getName().equals(field))
return f;
_c = _c.getSuperclass();
} while (_c != null);
return null;
}
static Field makeAccessible(Field f) {
try {
f.setAccessible(true);
} catch (Throwable e) {
// Note: The error reporting only works with Java VM option --illegal-access=deny
vmBus_send("makeAccessible_error", e, f);
}
return f;
}
static Method makeAccessible(Method m) {
try {
m.setAccessible(true);
} catch (Throwable e) {
vmBus_send("makeAccessible_error", e, m);
}
return m;
}
static Constructor makeAccessible(Constructor c) {
try {
c.setAccessible(true);
} catch (Throwable e) {
vmBus_send("makeAccessible_error", e, c);
}
return c;
}
static Object getOptDynOnly(DynamicObject o, String field) {
if (o == null || o.fieldValues == null) return null;
return o.fieldValues.get(field);
}
static RuntimeException asRuntimeException(Throwable t) {
if (t instanceof Error)
_handleError((Error) t);
return t instanceof RuntimeException ? (RuntimeException) t : new RuntimeException(t);
}
static void _handleError(Error e) {
call(javax(), "_handleError", e);
}
static volatile boolean sleep_noSleep = false;
static void sleep(long ms) {
ping();
if (ms < 0) return;
// allow spin locks
if (isAWTThread() && ms > 100) throw fail("Should not sleep on AWT thread");
try {
Thread.sleep(ms);
} catch (Exception e) { throw new RuntimeException(e); }
}
static void sleep() { try {
if (sleep_noSleep) throw fail("nosleep");
print("Sleeping.");
sleepQuietly();
} catch (Exception __e) { throw rethrow(__e); } }
static long round(double d) {
return Math.round(d);
}
static String round(String s) {
return roundBracket(s);
}
// makes dynamic & static modules
static String dm_require(String moduleLibID) {
return dm_makeModule(moduleLibID);
}
static Object dm_getModule(Object moduleOrID) {
if (moduleOrID == null || eq(moduleOrID, "")) return null;
if (isString(moduleOrID) && isIdentifier(((String) moduleOrID)))
return dm_getService(((String) moduleOrID));
if (isStringOrIntOrLong(moduleOrID))
return dm_callOS("getDynModuleByID", str(moduleOrID));
return dm_resolveModule(moduleOrID);
}
static AutoCloseable dm_enter(Object mod) {
return (AutoCloseable) callOpt(dm_getModule(mod), "enter");
}
static Object[] litObjectArray(Object... l) {
return l;
}
static String getChannelName() {
return (String) callOpt(getMainBot(), "getChannelName");
}
static String getType(Object o) {
return getClassName(o);
}
static long getFileSize(String path) {
return path == null ? 0 : new File(path).length();
}
static long getFileSize(File f) {
return f == null ? 0 : f.length();
}
static ArrayList cloneList(Iterable l) {
return l instanceof Collection ? cloneList((Collection) l) : asList(l);
}
static ArrayList cloneList(Collection l) {
if (l == null) return new ArrayList();
synchronized(collectionMutex(l)) {
return new ArrayList (l);
}
}
static Charset utf8charset_cache;
static Charset utf8charset() { if (utf8charset_cache == null) utf8charset_cache = utf8charset_load(); return utf8charset_cache; }
static Charset utf8charset_load() {
return Charset.forName("UTF-8");
}
static String ymd() {
return ymd(now());
}
static String ymd(long now) {
return year(now) + formatInt(month(now), 2) + formatInt(dayOfMonth(now), 2);
}
static String ymd(long now, TimeZone tz) {
return year(now, tz) + formatInt(month(now, tz), 2) + formatInt(dayOfMonth(now, tz), 2);
}
static String hms() {
return hms(now());
}
static String hms(long time) {
return new SimpleDateFormat("HHmmss").format(time);
}
static Object pcallFunction(Object f, Object... args) {
try { return callFunction(f, args); } catch (Throwable __e) { printStackTrace(__e); }
return null;
}
static boolean isAbsoluteURL(String s) {
return isURL(s);
}
static ArrayList emptyList() {
return new ArrayList();
//ret Collections.emptyList();
}
static ArrayList emptyList(int capacity) {
return new ArrayList(max(0, capacity));
}
// Try to match capacity
static ArrayList emptyList(Iterable l) {
return l instanceof Collection ? emptyList(((Collection) l).size()) : emptyList();
}
static ArrayList emptyList(Object[] l) {
return emptyList(l(l));
}
// get correct type at once
static ArrayList emptyList(Class c) {
return new ArrayList();
}
static int[] emptyIntArray_a = new int[0];
static int[] emptyIntArray() { return emptyIntArray_a; }
static char[] emptyCharArray = new char[0];
static char[] emptyCharArray() { return emptyCharArray; }
static double[] emptyDoubleArray = new double[0];
static double[] emptyDoubleArray() { return emptyDoubleArray; }
static Map emptyMap() {
return new HashMap();
}
static Object[] emptyObjectArray_a = new Object[0];
static Object[] emptyObjectArray() { return emptyObjectArray_a; }
static Symbol emptySymbol_value;
static Symbol emptySymbol() {
if (emptySymbol_value == null) emptySymbol_value = symbol("");
return emptySymbol_value;
}
static boolean isString(Object o) {
return o instanceof String;
}
static IVF1 mainFunctionToIVF1(final String fname) {
return (IVF1) a -> { callMC(fname, a); };
}
static Object dm_get(Object moduleOrID, String field) {
return get(dm_getModule(moduleOrID), field);
}
// legacy
static Object dm_get(String field, long moduleID) {
return dm_get(moduleID, field);
}
static Object dm_get(String field, Object moduleID) {
return dm_get(moduleID, field);
}
static Object dm_get(Object mod) {
return dm_heldObject(mod);
}
static List replace(List l, A a, A b) {
for (int i = 0; i < l(l); i++)
if (eq(l.get(i), a))
l.set(i, b);
return l;
}
static List replace(A a, A b, List l) {
return replace(l, a, b);
}
// replace all occurrences of a in s with b
static String replace(String s, String a, String b) {
return s == null ? null : a == null || b == null ? s : s.replace(a, b);
}
static String replace(String s, char a, char b) {
return s == null ? null : s.replace(a, b);
}
static String standard_toString(Object o) {
if (o == null) return "null";
String name = shortClassName(o);
Set fields = fieldNames(o);
if (empty(fields)) return name;
return name + "(" + joinWithComma(mapNonNulls(fields, field -> {
Object value = get(o, field);
if (value == null) return null;
return field + "=" + str(value);
})) + ")";
}
static void internalFrameTitlePopupMenuItem(JInternalFrame f, final String name, final Object action) {
internalFrameTitlePopupMenu(f, new VF1() { public void get(JPopupMenu menu) { try {
addMenuItem(menu, name, action)
; } catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "addMenuItem(menu, name, action)"; }});
}
static void minimalFrameSize(Component c, int w, int h) {
Container f = getPIFrame(c);
if (f != null) setSize(f, max(w, getWidth(f)), max(h, getHeight(f)));
}
static String defaultThreadName_name;
static String defaultThreadName() {
if (defaultThreadName_name == null)
defaultThreadName_name = "A thread by " + programID();
return defaultThreadName_name;
}
static Runnable wrapAsActivity(Object r) {
if (r == null) return null;
Runnable r2 = toRunnable(r);
Object mod = dm_current_generic();
if (mod == null) return r2;
return new Runnable() { public void run() { try {
AutoCloseable c = (AutoCloseable) (rcall("enter", mod));
AutoCloseable __1 = c; try {
r2.run();
} finally { _close(__1); }} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "AutoCloseable c = (AutoCloseable) (rcall enter(mod));\r\n temp c;\r\n r2.r..."; }};
}
// runnable = Runnable or String (method name)
static Thread newThread(Object runnable) {
return new BetterThread(_topLevelErrorHandling(toRunnable(runnable)));
}
static Thread newThread(Object runnable, String name) {
if (name == null) name = defaultThreadName();
return new BetterThread(_topLevelErrorHandling(toRunnable(runnable)), name);
}
static Thread newThread(String name, Object runnable) {
return newThread(runnable, name);
}
static Runnable toRunnable(final Object o) {
if (o instanceof Runnable) return (Runnable) o;
if (o instanceof String) throw fail("callF_legacy");
return new Runnable() { public void run() { try { callF(o) ;
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "callF(o)"; }};
}
static Map _registerThread_threads;
static Object _onRegisterThread; // voidfunc(Thread)
static Thread _registerThread(Thread t) {
if (_registerThread_threads == null)
_registerThread_threads = newWeakHashMap();
_registerThread_threads.put(t, true);
vm_generalWeakSubMap("thread2mc").put(t, weakRef(mc()));
callF(_onRegisterThread, t);
return t;
}
static void _registerThread() {
_registerThread(Thread.currentThread());
}
static AutoCloseable dm_vmBus_onMessage(final String msg, final VF1 onMessage) {
return dm_ownResource(vmBus_onMessage(msg, onMessage));
}
static AutoCloseable dm_vmBus_onMessage(final String msg, final IVF1 onMessage) {
return dm_ownResource(vmBus_onMessage(msg, ivf1ToVF1(onMessage)));
}
static AutoCloseable dm_vmBus_onMessage(final String msg, final IVF2 onMessage) {
return dm_ownResource(vmBus_onMessage(msg, ivf2ToVF2(onMessage)));
}
static AutoCloseable dm_vmBus_onMessage(String msg, final VF2 onMessage) {
return dm_ownResource(vmBus_onMessage(msg, onMessage));
}
static AutoCloseable dm_vmBus_onMessage(String msg, final VF3 onMessage) {
return dm_ownResource(vmBus_onMessage(msg, onMessage));
}
static AutoCloseable dm_vmBus_onMessage(String msg, Runnable onMessage) {
return dm_ownResource(vmBus_onMessage(msg, onMessage));
}
static Object dm_current_mandatory_generic() {
return assertNotNull("No module set", dm_current_generic());
}
static Object getOpt(Object o, String field) {
return getOpt_cached(o, field);
}
static Object getOpt(String field, Object o) {
return getOpt_cached(o, field);
}
static Object getOpt_raw(Object o, String field) { try {
Field f = getOpt_findField(o.getClass(), field);
if (f == null) return null;
makeAccessible(f);
return f.get(o);
} catch (Exception __e) { throw rethrow(__e); } }
// access of static fields is not yet optimized
static Object getOpt(Class c, String field) { try {
if (c == null) return null;
Field f = getOpt_findStaticField(c, field);
if (f == null) return null;
makeAccessible(f);
return f.get(null);
} catch (Exception __e) { throw rethrow(__e); } }
static Field getOpt_findStaticField(Class c, String field) {
Class _c = c;
do {
for (Field f : _c.getDeclaredFields())
if (f.getName().equals(field) && (f.getModifiers() & java.lang.reflect.Modifier.STATIC) != 0)
return f;
_c = _c.getSuperclass();
} while (_c != null);
return null;
}
static String getClassName(Object o) {
return o == null ? "null" : o instanceof Class ? ((Class) o).getName() : o.getClass().getName();
}
static Object callOpt(Object o) {
return callF(o);
}
static Object callOpt(Object o, String method, Object... args) {
return callOpt_withVarargs(o, method, args);
}
static Object getOptMC(String field) {
return getOpt(mc(), field);
}
static String myFirewallIP() {
return assertIPv4(loadPage("http://botcompany.de:8081/tb-int/my-ip.php"));
}
static List regexpAll(String pattern, String text) {
List matches = new ArrayList();
Matcher matcher = regexp(pattern, text);
while (matcher.find())
matches.add(matcher.group());
return matches;
}
static String discordTokenRegexp() {
return "[MN][A-Za-z\\d]{23}\\.[\\w-]{6}\\.[\\w-]{27}";
}
static List immutableEmptyList() {
return Collections.emptyList();
}
static short[] emptyShortArray = new short[0];
static short[] emptyShortArray() { return emptyShortArray; }
static Map immutableEmptyMap() {
return Collections.emptyMap();
}
static void addAll(Collection c, Iterable b) {
if (c != null && b != null) for (A a : b) c.add(a);
}
static boolean addAll(Collection c, Collection b) {
return c != null && b != null && c.addAll(b);
}
static boolean addAll(Collection c, B... b) {
return c != null && b != null && c.addAll(Arrays.asList(b));
}
static Map addAll(Map a, Map b) {
if (a != null && b != null) a.putAll(b);
return a;
}
static boolean addIfNotNull(Collection l, A a) {
return a != null && l != null & l.add(a);
}
static String dm_makeNewModuleWithParams(String moduleLibID, Object... params) {
return (String) dm_callOS("makeNewModule", moduleLibID, false, "beforeStart" , new VF1() { public void get(Object mod) { try {
print("Got module: " + dm_mod(mod));
dm_call(mod, "setFields", params);
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "print(\"Got module: \" + dm_mod(mod));\r\n dm_call(mod, 'setFields, params);"; }});
}
static void dm_showModule(Object module) {
Object stem = dm_getStem(module);
if (stem != null/* && !dm_moduleIsPoppedOut(stem)*/)
dm_callOS("showModule", stem);
}
static void dm_showModule() {
dm_showModule(dm_current_mandatory_generic());
}
static String programID() {
return getProgramID();
}
static String programID(Object o) {
return getProgramID(o);
}
static String shortClassName(Object o) {
if (o == null) return null;
Class c = o instanceof Class ? (Class) o : o.getClass();
String name = c.getName();
return shortenClassName(name);
}
static boolean hasSuperclassShortNamed(Object o, String name) {
Class c = _getClass(o);
while (c != null)
if (shortClassNameIs(c, name)) return true;
else c = c.getSuperclass();
return false;
}
static void dm_reloadModuleInBackground(Object module) {
dm_callOS("reloadModuleInBackground", dm_getStem(module));
}
static void dm_reloadModuleInBackground() {
dm_reloadModuleInBackground(dm_current_mandatory_generic());
}
static void dm_onFieldChange(String field, Runnable onChange) {
dm_watchField(field, onChange);
}
static void dm_onFieldChange(Collection fields, Runnable onChange) {
dm_watchFields(fields, onChange);
}
static Pair mapEntryToPair(Map.Entry e) {
return e == null ? null : pair(e.getKey(), e.getValue());
}
static Set> entrySet(Map map) {
return _entrySet(map);
}
static Pair pair(A a, B b) {
return new Pair(a, b);
}
static Pair pair(A a) {
return new Pair(a, a);
}
static A firstThat(Iterable l, IF1 pred) {
for (A a : unnullForIteration(l))
if (pred.get(a))
return a;
return null;
}
static A firstThat(A[] l, IF1 pred) {
for (A a : unnullForIteration(l))
if (pred.get(a))
return a;
return null;
}
static A firstThat(IF1 pred, Iterable l) {
return firstThat(l, pred);
}
static A firstThat(IF1 pred, A[] l) {
return firstThat(l, pred);
}
static double toMinutes(long ms) {
return ms/60000.0;
}
static Object swing(Object f) {
return swingAndWait(f);
}
static void swing(Runnable f) {
swingAndWait(f);
}
static A swing(F0 f) {
return (A) swingAndWait(f);
}
static A swing(IF0 f) {
return (A) swingAndWait(f);
}
static A revalidate(final A c) {
if (c == null || !c.isShowing()) return c;
{ swing(() -> {
// magic combo to actually relayout and repaint
c.revalidate();
c.repaint();
}); }
return c;
}
static void revalidate(JFrame f) { revalidate((Component) f); }
static void revalidate(JInternalFrame f) { revalidate((Component) f); }
static String dropPrefix(String prefix, String s) {
return s == null ? null : s.startsWith(prefix) ? s.substring(l(prefix)) : s;
}
static ActionListener actionListenerInNewThread(final Object runnable) {
return actionListenerInNewThread(runnable, null);
}
static ActionListener actionListenerInNewThread(final Object runnable, final Object instanceToHold) {
if (runnable instanceof ActionListener) return (ActionListener) runnable;
return new java.awt.event.ActionListener() { public void actionPerformed(java.awt.event.ActionEvent _evt) { try {
startThread("Action Listener", new Runnable() { public void run() { try {
AutoCloseable __1 = holdInstance(instanceToHold); try {
callF(runnable);
} finally { _close(__1); }
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "AutoCloseable __1 = holdInstance(instanceToHold); try {\r\n callF(runnable..."; }});
} catch (Throwable __e) { messageBox(__e); }}};
}
static Map humanizeFormLabel_replacements = litmap("id" , "ID", "md5" , "MD5");
static String humanizeFormLabel(String s) {
if (containsSpace(s)) return s;
return firstToUpper(
joinWithSpace(replaceElementsUsingMap(splitCamelCase(s), humanizeFormLabel_replacements)).replace("I D", "ID")
);
}
static JTextField jtextfield() {
return jTextField();
}
static JTextField jtextfield(String text) {
return jTextField(text);
}
static JTextField jtextfield(Object o) {
return jTextField(o);
}
static int showForm_defaultGap = 4;
static int showForm_gapBetweenColumns = 10;
static JPanel showFormTitled(final String title, final Object... _parts) {
JDesktopPane desktop = mainDesktopPane();
if (desktop != null) return showInternalFrameFormTitled(desktop, title, _parts);
return swing(new F0() { public JPanel get() { try {
final Var frame = new Var();
JPanel panel = showForm_makePanel(false, _parts);
showForm_makeFrame(title, panel);
frame.set(getFrame(panel));
return panel;
} catch (Exception __e) { throw rethrow(__e); } }
public String toString() { return "final new Var frame;\r\n JPanel panel = showForm_makePanel(false, _p..."; }});
}
static JPanel showForm_makePanel(Boolean internalFrame, Object... _parts) {
List out = showForm_arrange1(showForm_makeComponents(internalFrame, _parts));
return vstackWithSpacing(out, showForm_defaultGap);
}
static String or2(String a, String b) {
return nempty(a) ? a : b;
}
static String or2(String a, String b, String c) {
return or2(or2(a, b), c);
}
static String stringOptPar(Object[] params, String name) {
return (String) optPar(params, name);
}
static String gtt(JTextComponent c) {
return getTextTrim(c);
}
static String gtt(JComboBox cb) {
return getTextTrim(cb);
}
static A optPar(ThreadLocal tl, A defaultValue) {
A a = tl.get();
if (a != null) {
tl.set(null);
return a;
}
return defaultValue;
}
static A optPar(ThreadLocal tl) {
return optPar(tl, null);
}
static Object optPar(Object[] params, String name) {
return optParam(params, name);
}
static Object optPar(String name, Object[] params) {
return optParam(params, name);
}
static Object optPar(String name, Map params) {
return optParam(name, params);
}
static A optPar(Object[] params, String name, A defaultValue) {
return optParam(params, name, defaultValue);
}
static A optPar(String name, Object[] params, A defaultValue) {
return optParam(params, name, defaultValue);
}
static A toolTip(A c, final Object toolTip) {
return setToolTipText(c, toolTip);
}
static A toolTip(Object toolTip, A c) {
return setToolTipText(toolTip, c);
}
// menuParams: text, Runnable, ...
// also: position := 'left/'center/'right
static JButton jPopDownButton(String text, final Object... menuParams) {
return jbutton((empty(text) ? "" : text + " ") + unicode_downPointingTriangle(), new Runnable() { public void run() { try {
JPopupMenu menu = new JPopupMenu();
int emptyCount = menu.getComponentCount();
String position = (String) (optPar_ignoreOddLength("position", menuParams)); // TODO: this fails when you include a separator without a following null
fillJPopupMenu(menu, paramsWithout(menuParams, "position"));
if (menu.getComponentCount() != emptyCount) {
JButton btn = heldInstance(JButton.class);
int x = 0;
if (eq(position, "center")) x = (btn.getWidth()-getPreferredWidth(menu))/2;
else if (eq(position, "right")) x = btn.getWidth()-getPreferredWidth(menu);
menu.show(btn, x, btn.getHeight());
}
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "new JPopupMenu menu;\r\n int emptyCount = menu.getComponentCount();\r\n Str..."; }});
}
static void inputText(final String msg, final Object action) {
inputText(msg, "", action);
}
// action: voidfunc(S)
static void inputText(final String msg, final String defaultText, final Object action) {
final Object threadInfo = _threadInfo();
swingLater(new Runnable() { public void run() { try {
final JTextField tf = jtextfield(defaultText);
String title = joinStrings(" | ", msg, programName());
JComponent form = showFormTitled(title,
unnull(msg), tf,
new Runnable() { public void run() { try {
vmBus_send("inputtingText_OK", threadInfo, msg, tf);
callF_thread(action, getTextTrim(tf))
;
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "vmBus_send(\"inputtingText_OK\", threadInfo, msg, tf);\r\n callF_thread(ac..."; }});
renameSubmitButton(form, "OK");
vmBus_send("inputtingText", threadInfo, msg, tf);
} catch (Exception __e) { throw rethrow(__e); } } public String toString() { return "final JTextField tf = jtextfield(defaultText);\r\n String title = joinString..."; }});
}
static void inputText(String msg, String defaultText, IVF1 action) {
inputText(msg, defaultText, (Object) action);
}
static void inputText(String msg, IVF1 action) {
inputText(msg, (Object) action);
}
static String dm_moduleName() {
return dm_moduleName(assertNotNull(dm_current_generic()));
}
static String dm_moduleName(Object module) {
return (String) callOpt(dm_getStem(module), "moduleName");
}
static String f2s(File f) {
return f == null ? null : f.getAbsolutePath();
}
static String f2s(String s) { return f2s(newFile(s)); }
static String f2s(java.nio.file.Path p) {
return p == null ? null : f2s(p.toFile());
}
static File dm_structureExportDefaultFile(DynModule mod) {
return javaxBackupDir("module-" + shortClassName(mod) + "-" + ymdMinusHms() + ".txt");
}
static File saveTextFileWithInfoBox(File f, String text) {
saveTextFile(f, text);
fileSavedInfoBox(f);
return f;
}
static File newFile(File base, String... names) {
for (String name : names) base = new File(base, name);
return base;
}
static File newFile(String name) {
return name == null ? null : new File(name);
}
static File newFile(String base, String... names) {
return newFile(newFile(base), names);
}
static String javaTokWordWrap(String s) {
return javaTokWordWrap(120, s);
}
// TODO: complete trimming
static String javaTokWordWrap(int cols, String s) {
int col = 0;
List tok = javaTok(s);
for (int i = 0; i < l(tok); i++) {
String t = tok.get(i);
if (odd(i) && col >= cols && !containsNewLine(t))
tok.set(i, t = rtrimSpaces(t) + "\n");
int idx = t.lastIndexOf('\n');
if (idx >= 0) col = l(t)-(idx+1);
else col += l(t);
}
return join(tok);
}
static String dm_freshModuleStructureWithoutError(Object module) {
dm_clearError(module);
return dm_freshModuleStructure(module);
}
static File showFileChooserWithDefaultDir(String title, File defaultDir) {
JFileChooser fc = new JFileChooser();
fc.setDialogTitle(title);
fc.setCurrentDirectory(defaultDir);
return execFileChooser(fc);
}
static File javaxBackupDir_dir; // can be set to work on different base dir
static File javaxBackupDir() {
return javaxBackupDir_dir != null ? javaxBackupDir_dir : new File(userHome(), "JavaX-Backup");
}
static File javaxBackupDir(String sub) {
return newFile(javaxBackupDir(), sub);
}
static boolean fileExists(String path) {
return path != null && new File(path).exists();
}
static boolean fileExists(File f) {
return f != null && f.exists();
}
static JWindow infoBox(Object text) {
return infoMessage(strOrNull(text));
}
static JWindow infoBox(String text) {
return infoMessage(text);
}
static JWindow infoBox(String text, double seconds) {
return infoMessage(text, seconds);
}
static JWindow infoBox(Throwable e) {
return infoMessage(e);
}
static void dm_replaceModuleWithStructure(Object mod, String struct) {
setAll(dm_getStem(mod),
"contentsDirty" , false,
"oStruct" , struct);
dm_reloadModule(mod);
}
static void assertTrue(Object o) {
if (!(eq(o, true) /*|| isTrue(pcallF(o))*/))
throw fail(str(o));
}
static boolean assertTrue(String msg, boolean b) {
if (!b)
throw fail(msg);
return b;
}
static boolean assertTrue(boolean b) {
if (!b)
throw fail("oops");
return b;
}
static void dm_reloadMe() {
dm_reloadModule(dm_currentModule());
}
static ThreadLocal print_byThread() {
synchronized(print_byThread_lock) {
if (print_byThread == null)
print_byThread = new ThreadLocal();
}
return print_byThread;
}
// f can return false to suppress regular printing
// call print_raw within f to actually print something
static AutoCloseable tempInterceptPrint(F1 f) {
return tempSetThreadLocal(print_byThread(), f);
}
static byte[] bytesFromHex(String s) {
return hexToBytes(s);
}
static int ubyteToInt(byte b) {
return b & 0x0FF;
}
static int ubyteToInt(char c) {
return c & 0x0FF;
}
// PersistableThrowable doesn't hold GC-disturbing class references in backtrace
static volatile PersistableThrowable lastException_lastException;
static PersistableThrowable lastException() {
return lastException_lastException;
}
static void lastException(Throwable e) {
lastException_lastException = persistableThrowable(e);
}
static String hideCredentials(URL url) { return url == null ? null : hideCredentials(str(url)); }
static String hideCredentials(String url) {
try {
if (startsWithOneOf(url, "http://", "https://") && isAGIBlueDomain(hostNameFromURL(url))) return url;
} catch (Throwable e) {
print("HideCredentials", e);
}
return url.replaceAll("([&?])(_pass|key|cookie)=[^&\\s\"]*", "$1$2=");
}
static String hideCredentials(Object o) {
return hideCredentials(str(o));
}
static boolean endsWithLetterOrDigit(String s) {
return s != null && s.length() > 0 && Character.isLetterOrDigit(s.charAt(s.length()-1));
}
//sbool ping_actions_shareable = true;
static volatile boolean ping_pauseAll = false;
static int ping_sleep = 100; // poll pauseAll flag every 100
static volatile boolean ping_anyActions = false;
static Map ping_actions = newWeakHashMap();
static ThreadLocal ping_isCleanUpThread = new ThreadLocal();
// always returns true
static boolean ping() {
//ifdef useNewPing
newPing();
//endifdef
if (ping_pauseAll || ping_anyActions) ping_impl(true /* XXX */);
//ifndef LeanMode ping_impl(); endifndef
return true;
}
// returns true when it slept
static boolean ping_impl(boolean okInCleanUp) { try {
if (ping_pauseAll && !isAWTThread()) {
do
Thread.sleep(ping_sleep);
while (ping_pauseAll);
return true;
}
if (ping_anyActions) { // don't allow sharing ping_actions
if (!okInCleanUp && !isTrue(ping_isCleanUpThread.get()))
failIfUnlicensed();
Object action = null;
synchronized(ping_actions) {
if (!ping_actions.isEmpty()) {
action = ping_actions.get(currentThread());
if (action instanceof Runnable)
ping_actions.remove(currentThread());
if (ping_actions.isEmpty()) ping_anyActions = false;
}
}
if (action instanceof Runnable)
((Runnable) action).run();
else if (eq(action, "cancelled"))
throw fail("Thread cancelled.");
}
return false;
} catch (Exception __e) { throw rethrow(__e); } }
static A or(A a, A b) {
return a != null ? a : b;
}
static Map newDangerousWeakHashMap() {
return _registerDangerousWeakMap(synchroMap(new WeakHashMap()));
}
// initFunction: voidfunc(Map) - is called initially, and after clearing the map
static Map newDangerousWeakHashMap(Object initFunction) {
return _registerDangerousWeakMap(synchroMap(new WeakHashMap()), initFunction);
}
static Object invokeMethod(Method m, Object o, Object... args) { try {
try {
return m.invoke(o, args);
} catch (InvocationTargetException e) {
throw rethrow(getExceptionCause(e));
} catch (IllegalArgumentException e) {
throw new IllegalArgumentException(e.getMessage() + " - was calling: " + m + ", args: " + joinWithSpace(classNames(args)));
}
} catch (Exception __e) { throw rethrow(__e); } }
static boolean call_checkArgs(Method m, Object[] args, boolean debug) {
Class[] types = m.getParameterTypes();
if (types.length != args.length) {
if (debug)
print("Bad parameter length: " + args.length + " vs " + types.length);
return false;
}
for (int i = 0; i < types.length; i++) {
Object arg = args[i];
if (!(arg == null ? !types[i].isPrimitive()
: isInstanceX(types[i], arg))) {
if (debug)
print("Bad parameter " + i + ": " + arg + " vs " + types[i]);
return false;
}
}
return true;
}
static int indexOf(List l, A a, int startIndex) {
if (l == null) return -1;
int n = l(l);
for (int i = startIndex; i < n; i++)
if (eq(l.get(i), a))
return i;
return -1;
}
static int indexOf(List l, int startIndex, A a) {
return indexOf(l, a, startIndex);
}
static int indexOf(List l, A a) {
if (l == null) return -1;
return l.indexOf(a);
}
static int indexOf(String a, String b) {
return a == null || b == null ? -1 : a.indexOf(b);
}
static int indexOf(String a, String b, int i) {
return a == null || b == null ? -1 : a.indexOf(b, i);
}
static int indexOf(String a, char b) {
return a == null ? -1 : a.indexOf(b);
}
static int indexOf(String a, int i, char b) {
return indexOf(a, b, i);
}
static int indexOf(String a, char b, int i) {
return a == null ? -1 : a.indexOf(b, i);
}
static int indexOf(String a, int i, String b) {
return a == null || b == null ? -1 : a.indexOf(b, i);
}
static int indexOf(A[] x, A a) {
int n = l(x);
for (int i = 0; i < n; i++)
if (eq(x[i], a))
return i;
return -1;
}
static void rotateStringBuffer(StringBuffer buf, int max) { try {
if (buf == null) return;
synchronized(buf) {
if (buf.length() <= max) return;
try {
int newLength = max/2;
int ofs = buf.length()-newLength;
String newString = buf.substring(ofs);
buf.setLength(0);
buf.append("[...] ").append(newString);
} catch (Exception e) {
buf.setLength(0);
}
buf.trimToSize();
}
} catch (Exception __e) { throw rethrow(__e); } }
static void rotateStringBuilder(StringBuilder buf, int max) { try {
if (buf == null) return;
synchronized(buf) {
if (buf.length() <= max) return;
try {
int newLength = max/2;
int ofs = buf.length()-newLength;
String newString = buf.substring(ofs);
buf.setLength(0);
buf.append("[...] ").append(newString);
} catch (Exception e) {
buf.setLength(0);
}
buf.trimToSize();
}
} catch (Exception __e) { throw rethrow(__e); } }
static Object vmBus_query(String msg, Object... args) {
Object arg = vmBus_wrapArgs(args);
{ Object __1= pcallFAll_returnFirstNotNull(vm_busListeners_live(), msg, arg); if (__1 != null) return __1; }
return pcallFAll_returnFirstNotNull(vm_busListenersByMessage_live().get(msg), msg, arg);
}
static Object vmBus_query(String msg) {
return vmBus_query(msg, (Object) null);
}
static File getProgramDir() {
return programDir();
}
static File getProgramDir(String snippetID) {
return programDir(snippetID);
}
static String programID;
static String getProgramID() {
return nempty(programID) ? formatSnippetIDOpt(programID) : "?";
}
// TODO: ask JavaX instead
static String getProgramID(Class c) {
String id = (String) getOpt(c, "programID");
if (nempty(id))
return formatSnippetID(id);
return "?";
}
static String getProgramID(Object o) {
return getProgramID(getMainClass(o));
}
static Lock appendToFile_lock = lock();
static boolean appendToFile_keepOpen = false;
static HashMap appendToFile_writers = new HashMap();
static void appendToFile(String path, String s) { try {
Lock __0 = appendToFile_lock; lock(__0); try { // Let's just generally synchronize this to be safe.
mkdirsForFile(new File(path));
path = getCanonicalPath(path);
Writer writer = appendToFile_writers.get(path);
if (writer == null) {
//print("[Logging to " + path + "]");
writer = new BufferedWriter(new OutputStreamWriter(
newFileOutputStream(path, true), "UTF-8"));
if (appendToFile_keepOpen)
appendToFile_writers.put(path, writer);
}
writer.write(s);
if (!appendToFile_keepOpen)
writer.close();
} finally { unlock(__0); } } catch (Exception __e) { throw rethrow(__e); } }
static void appendToFile(File path, String s) {
if (path != null)
appendToFile(path.getPath(), s);
}
static void cleanMeUp_appendToFile() {
AutoCloseable __3 = tempCleaningUp(); try {
Lock __1 = appendToFile_lock; lock(__1); try {
closeAllWriters(values(appendToFile_writers));
appendToFile_writers.clear();
} finally { unlock(__1); } } finally { _close(__3); }}
static File programFile(String name) {
return prepareProgramFile(name);
}
static File programFile(String progID, String name) {
return prepareProgramFile(progID, name);
}
static SimpleDateFormat simpleDateFormat_local(String format) {
SimpleDateFormat sdf = new SimpleDateFormat(format);
sdf.setTimeZone(localTimeZone());
return sdf;
}
static A assertNull(A a) {
assertTrue(a == null);
return a;
}
static A assertNull(String msg, A a) {
assertTrue(msg, a == null);
return a;
}
static String _userHome;
static String userHome() {
if (_userHome == null)
return actualUserHome();
return _userHome;
}
static File userHome(String path) {
return new File(userDir(), path);
}
static ThreadLocal> checkFileNotTooBigToRead_tl = new ThreadLocal();
static void checkFileNotTooBigToRead(File f) {
callF(checkFileNotTooBigToRead_tl.get(), f);
}
static boolean boolOptParam(ThreadLocal tl) {
return isTrue(optPar(tl));
}
// defaults to false
static boolean boolOptParam(Object[] __, String name) {
return isTrue(optParam(__, name));
}
static boolean boolOptParam(String name, Object[] __) {
return boolOptParam(__, name);
}
static boolean boolOptParam(String name, Map __) {
return isTrue(optPar(name, __));
}
static A optParam(ThreadLocal tl, A defaultValue) {
return optPar(tl, defaultValue);
}
static A optParam(ThreadLocal tl) {
return optPar(tl);
}
static Object optParam(String name, Map params) {
return mapGet(params, name);
}
// now also takes a map as single array entry
static A optParam(Object[] opt, String name, A defaultValue) {
int n = l(opt);
if (n == 1 && opt[0] instanceof Map) {
Map map = (Map) (opt[0]);
return map.containsKey(name) ? (A) map.get(name) : defaultValue;
}
if (!even(l(opt))) throw fail("Odd parameter length");
for (int i = 0; i < l(opt); i += 2)
if (eq(opt[i], name))
return (A) opt[i+1];
return defaultValue;
}
static Object optParam(Object[] opt, String name) {
return optParam(opt, name, null);
}
static Object optParam(String name, Object[] params) {
return optParam(params, name);
}
static CharSequence subCharSequence(CharSequence s, int x) {
return subCharSequence(s, x, s == null ? 0 : s.length());
}
static CharSequence subCharSequence(CharSequence s, int x, int y) {
if (s == null) return null;
if (x < 0) x = 0;
if (x >= s.length()) return "";
if (y < x) y = x;
if (y > s.length()) y = s.length();
return s.subSequence(x, y);
}
static int min(int a, int b) {
return Math.min(a, b);
}
static long min(long a, long b) {
return Math.min(a, b);
}
static float min(float a, float b) { return Math.min(a, b); }
static float min(float a, float b, float c) { return min(min(a, b), c); }
static double min(double a, double b) {
return Math.min(a, b);
}
static double min(double[] c) {
double x = Double.MAX_VALUE;
for (double d : c) x = Math.min(x, d);
return x;
}
static float min(float[] c) {
float x = Float.MAX_VALUE;
for (float d : c) x = Math.min(x, d);
return x;
}
static byte min(byte[] c) {
byte x = 127;
for (byte d : c) if (d < x) x = d;
return x;
}
static short min(short[] c) {
short x = 0x7FFF;
for (short d : c) if (d < x) x = d;
return x;
}
static int min(int[] c) {
int x = Integer.MAX_VALUE;
for (int d : c) if (d < x) x = d;
return x;
}
static Object pcallF_minimalExceptionHandling(Object f, Object... args) {
try {
return callFunction(f, args);
} catch (Throwable e) {
System.out.println(getStackTrace(e));
_storeException(e);
}
return null;
}
static Set vm_generalIdentityHashSet(Object name) {
synchronized(vm_generalMap()) {
Set set = (Set) (vm_generalMap_get(name));
if (set == null)
vm_generalMap_put(name, set = syncIdentityHashSet());
return set;
}
}
static Map vm_generalHashMap(Object name) {
synchronized(vm_generalMap()) {
Map m = (Map) (vm_generalMap_get(name));
if (m == null)
vm_generalMap_put(name, m = syncHashMap());
return m;
}
}
static DynModule dm_currentModule() {
return optCast(DynModule.class, dm_current_generic());
}
static final Map callOpt_cache = newDangerousWeakHashMap();
static Object callOpt_cached(Object o, String methodName, Object... args) { try {
if (o == null) return null;
if (o instanceof Class) {
Class c = (Class) o;
_MethodCache cache = callOpt_getCache(c);
// TODO: (super-rare) case where method exists static and non-static
// with different args
Method me = cache.findMethod(methodName, args);
if (me == null || (me.getModifiers() & Modifier.STATIC) == 0) return null;
return invokeMethod(me, null, args);
} else {
Class c = o.getClass();
_MethodCache cache = callOpt_getCache(c);
Method me = cache.findMethod(methodName, args);
if (me == null) return null;
return invokeMethod(me, o, args);
}
} catch (Exception __e) { throw rethrow(__e); } }
// no longer synchronizes! (see #1102990)
static _MethodCache callOpt_getCache(Class c) {
_MethodCache cache = callOpt_cache.get(c);
if (cache == null)
callOpt_cache.put(c, cache = new _MethodCache(c));
return cache;
}
static boolean isStaticMethod(Method m) {
return methodIsStatic(m);
}
static Object[] massageArgsForVarArgsCall(Method m, Object[] args) {
Class[] types = m.getParameterTypes();
int n = types.length-1, nArgs = args.length;
if (nArgs < n) return null;
for (int i = 0; i < n; i++)
if (!argumentCompatibleWithType(args[i], types[i]))
return null;
Class varArgType = types[n].getComponentType();
for (int i = n; i < nArgs; i++)
if (!argumentCompatibleWithType(args[i], varArgType))
return null;
Object[] newArgs = new Object[n+1];
arraycopy(args, 0, newArgs, 0, n);
Object[] varArgs = arrayOfType(varArgType, nArgs-n);
arraycopy(args, n, varArgs, 0, nArgs-n);
newArgs[n] = varArgs;
return newArgs;
}
static String joinWithComma(Collection c) {
return join(", ", c);
}
static String joinWithComma(Object... c) {
return join(", ", c);
}
static String joinWithComma(String... c) {
return join(", ", c);
}
static String joinWithComma(Pair p) {
return p == null ? "" : joinWithComma(str(p.a), str(p.b));
}
static List classNames(Collection l) {
return getClassNames(l);
}
static List classNames(Object[] l) {
return getClassNames(Arrays.asList(l));
}
static String dropSuffix(String suffix, String s) {
return nempty(suffix) && endsWith(s, suffix) ? s.substring(0, l(s)-l(suffix)) : s;
}
static String strOrNull(Object o) {
return o == null ? null : str(o);
}
static Object dm_getStem(Object moduleOrID) {
if (isString(moduleOrID) && isIdentifier(((String) moduleOrID)))
moduleOrID = dm_getService(((String) moduleOrID));
if (isStringOrIntOrLong(moduleOrID))
return dm_getStemByID(moduleOrID);
return or(getOpt(dm_getModule(moduleOrID), "_host"), moduleOrID);
}
static void pClose(AutoCloseable c) {
close_pcall(c);
}
// unclear semantics as to whether return null on null
static ArrayList asList(A[] a) {
return a == null ? new ArrayList () : new ArrayList (Arrays.asList(a));
}
static ArrayList asList(int[] a) {
if (a == null) return null;
ArrayList l = emptyList(a.length);
for (int i : a) l.add(i);
return l;
}
static ArrayList asList(long[] a) {
if (a == null) return null;
ArrayList l = emptyList(a.length);
for (long i : a) l.add(i);
return l;
}
static ArrayList asList(float[] a) {
if (a == null) return null;
ArrayList l = emptyList(a.length);
for (float i : a) l.add(i);
return l;
}
static ArrayList asList(double[] a) {
if (a == null) return null;
ArrayList l = emptyList(a.length);
for (double i : a) l.add(i);
return l;
}
static ArrayList asList(short[] a) {
if (a == null) return null;
ArrayList l = emptyList(a.length);
for (short i : a) l.add(i);
return l;
}
static ArrayList asList(Iterator it) {
ArrayList l = new ArrayList();
if (it != null)
while (it.hasNext())
l.add(it.next());
return l;
}
// disambiguation
static ArrayList asList(IterableIterator s) {
return asList((Iterator) s);
}
static ArrayList asList(Iterable s) {
if (s instanceof ArrayList) return (ArrayList) s;
ArrayList l = new ArrayList();
if (s != null)
for (A a : s)
l.add(a);
return l;
}
static ArrayList asList(Enumeration e) {
ArrayList l = new ArrayList();
if (e != null)
while (e.hasMoreElements())
l.add(e.nextElement());
return l;
}
static List asList(Pair p) {
return p == null ? null : ll(p.a, p.b);
}
static A foldl(F2 f, A seed, Iterable l) {
A a = seed;
if (l != null) for(B b : l)
a = callF(f, a, b);
return a;
}
static A foldl(F2 f, A seed, B[] l) {
A a = seed;
if (l != null) for(B b : l)
a = callF(f, a, b);
return a;
}
static A foldl(Object f, A seed, B[] l) {
A a = seed;
if (l != null) for(B b : l)
a = (A) callF(f, a, b);
return a;
}
static DynModule dm_currentModuleMandatory() {
return dm_current_mandatory();
}
static