void fileOpenCb(Widget w, XEvent *event, String *params, Cardinal *num_params)
{
FileWindowRec *fw;
FileRec *file;
int item;
char path[MAXPATHLEN];
String *argv, push_action;
if (!(fw = findFileWidget(w, &item))) return;
zzz();
file = fw->files[item];
strcpy(path, fw->directory);
if (path[strlen(path)-1] != '/') strcat(path, "/");
strcat(path, file->name);
if (S_ISDIR(file->stats.st_mode))
{
contractPath(path);
chFileDir(fw, path);
}
else if (file->stats.st_mode & (S_IXUSR | S_IXGRP | S_IXOTH))
{
String arguments = XtNewString(file->name);
String action = (String) XtMalloc((strlen(path) + 6) * sizeof(char));
strcat(strcpy(action, "exec "), path);
argv = makeArgv(action, 1, &arguments);
executeApplication(user.shell, fw->directory, argv);
XTFREE(action);
freeArgv(argv);
}
else if (file->type)
{
if (*(push_action = file->type->push_action))
{
if (!(strcmp(push_action, "EDIT")))
doEdit(fw->directory, file->name);
else if (!(strcmp(push_action, "VIEW")))
doView(fw->directory, file->name);
else if (!(strcmp(push_action, "LOAD")))
{
zzz();
newApplicationWindow(path, NULL);
wakeUp();
}
else
{
argv = (String *) XtMalloc(sizeof(String));
argv[0] = XtNewString(file->name);
performAction(fw->shell, file->type->icon_pm.bm, push_action, fw->directory, 1, argv);
XTFREE(argv);
}
}
}
else doEdit(fw->directory, file->name);
wakeUp();
}
int main(int argc, char* argv[])
{
String prompt = "user> ";
String input;
malEnvPtr replEnv(new malEnv);
installCore(replEnv);
installFunctions(replEnv);
makeArgv(replEnv, argc - 2, argv + 2);
if (argc > 1) {
String filename = escape(argv[1]);
safeRep(STRF("(load-file %s)", filename.c_str()), replEnv);
return 0;
}
while (s_readLine.get(prompt, input)) {
safeRep(input, replEnv);
}
return 0;
}
int main(int argc, char* argv[])
{
String prompt = "user> ";
String input;
installCore(replEnv);
installFunctions(replEnv);
makeArgv(replEnv, argc - 2, argv + 2);
if (argc > 1) {
String filename = escape(argv[1]);
safeRep(STRF("(load-file %s)", filename.c_str()), replEnv);
return 0;
}
while (s_readLine.get(prompt, input)) {
String out = safeRep(input, replEnv);
if (out.length() > 0)
std::cout << out << "\n";
}
return 0;
}
