static int
read_file( FILE *file, int *stacksiz)
{
int lineno = 1;
char string[LINE_LENGTH+1];
while( fgets( string, LINE_LENGTH, file) != NULL ) {
char *key, *value;
var_t *var;
if( string[strlen(string)-1] != '\n' ) {
printf( "Line %d: Line too long.\n", lineno);
return -1;
}
key = strtok_r( string, ":", &value);
if( !(var = get_var( key, varlist)) ) {
printf( "Line %d: Key '%s' not found.\n", lineno, key);
return -1;
}
var->stuff.prog = program_init();
strip_string( value);
if( parse_expression( value, var->stuff.prog, stacksiz, var->type, symbol_parser) == -1 ) {
printf( "Line %d: %s\n", lineno, parse_error);
return -1;
}
lineno++;
}
return 0;
};
int
main (int argc, char **argv)
{
const char *typestr = NULL;
program_init (argc, argv);
program_getoptuint ('i', &iterations);
program_getoptuint ('l', &layer);
program_getoptuint ('v', &vector);
program_getoptuint ('w', &window);
program_getoptstr ('t', &typestr);
if (typestr) {
for (type = 0; type < NUM_MODELS; type++) {
if (strcasecmp (typestr, model_name[type]) == 0)
break;
}
if (type == NUM_MODELS)
fatal ("unkown model %s", typestr);
}
b = bundle_open (program_poparg ());
if (b == NULL)
fatal ("bundle_open");
program_run ();
bundle_save (b);
bundle_free (b);
return 0;
}
void
shader_load(int prog, const char *fs, const char *vs) {
struct render_state *rs = RS;
assert(prog >=0 && prog < MAX_PROGRAM);
struct program * p = &rs->program[prog];
assert(p->prog == 0);
program_init(p, fs, vs);
}
void lprogram_create(lua_State *L)
{
struct program *program = lua_newuserdata(L, sizeof(struct program));
program_init(program);
int program_idx = lua_gettop(L);
lua_newtable(L);
lua_pushcfunction(L, program_gc);
lua_setfield(L, -2, "__gc");
lua_setmetatable(L, program_idx);
}
void program_loop_init(void)
{
hw_rtc_init();
config_init();
io_init();
program_init();
osThreadDef(prog_loop, _prog_loop, osPriorityAboveNormal, 0, 1024);
prog_loop = osThreadCreate(osThread(prog_loop), NULL);
}
int
main(int argc, char* argv[]) {
// Init program status
program_init(argc, argv);
// Render
Ticket* ticket = ticket_new_file("../res/omikuji.txt");
ticket_render_stream(ticket, stdout);
ticket_delete(ticket);
return 0;
}
void
shader_load(int prog, const char *fs, const char *vs, int texture, const char ** texture_uniform_name) {
struct render_state *rs = RS;
assert(prog >=0 && prog < MAX_PROGRAM);
struct program * p = &rs->program[prog];
if (p->prog) {
render_release(RS->R, SHADER, p->prog);
p->prog = 0;
}
program_init(p, fs, vs, texture, texture_uniform_name);
p->texture_number = texture;
RS->current_program = -1;
}
int main(int argc, char **argv)
{
char *paths[] = { NULL, NULL };
int i;
pthread_t u_tid;
cmdname = argv[0];
for (i = 1; i < argc && *argv[i] == '-'; i++) {
if (streq(argv[i], "-h")) {
usage();
}
}
paths[0] = (argc > i) ? argv[i] : ".";
paths[1] = (argc > (i + 1)) ? argv[i + 1] : paths[0];
atexit(atexit_handler);
if (!setlocale(LC_CTYPE, ""))
die("couldn't set locale\n");
config_init();
program_init();
read_config_files();
/* setup windows */
for (i = 0; i < 2; i++) {
data.win[i] = dwindow_create();
dwindow_set_sort(data.win[i], config()->sort);
dwindow_read(data.win[i], paths[i]);
}
data.wsel = data.win[0];
/* setup ui */
ui_init();
theme_init();
/* set default state */
states_push(list_state());
/* start update thread */
pthread_mutex_init(&data.mutex, NULL);
if (pthread_create(&u_tid, NULL, update_loop, &data) != 0)
die("pthread_create: %s\n", strerror(errno));
main_loop();
ui_close();
return 0;
}
int
main (int argc, char **argv)
{
program_init (argc, argv);
program_getoptuint ('m', &min);
b = bundle_open (program_poparg ());
if (b == NULL)
fatal ("bundle_open");
program_run ();
bundle_save (b);
bundle_free (b);
return 0;
}
void
init(const char *_cmd)
{
x11_init();
checkotherwm();
cmd = _cmd;
/* Setup the motion struct */
motion = xcalloc(1, sizeof(struct motion));
motion->type = NoMotion;
sysinfo_init();
clients_init();
bars_init(settings()->barfont);
launcher_init();
/* Select wvents to handle */
XSelectInput(dpy, root, WM_EVENT_MASK);
/* Setup cursors */
cursors_init();
cursor_set(root, NormalCursor);
/* Setup key bindings */
keys = settings()->keys;
key_init();
key_grab_all(keys);
/* Init atoms and EWMH */
atoms_init();
ewmh_init(wm_name);
/* Init program lists */
program_init(getenv("PATH"));
/* Create monitors */
create_monitors();
/* Init ewmh desktop functionality */
ewmh_root_set_number_of_desktops(
monitor_count(mons) * N_WORKSPACES);
ewmh_root_set_current_desktop(0);
get_windows();
set_environment();
}
extern umMem_T program_init_test(int argc, char *argv[])
{
FILE *input;
/*reads in the file*/
if (argc == 1) {
input = stdin;
} else {
input = fopen (argv[1], "rb");
}
if (input == NULL) return 0;
return program_init(input);
}
int
main (int argc, char **argv)
{
char *arg;
program_init (argc, argv);
arg = program_poparg ();
if (arg == NULL)
filter_lines (scanner_new (STDIN_FILENO));
while (arg) {
if (filter_lines (scanner_open (arg)) != 0)
error ("failed to open '%s'", arg);
arg = program_poparg ();
}
return 0;
}
/**
* @name program_editup
*
* Initialize all the things in the program that need to be initialized.
* init_permute determines whether to initialize the permute functions
* and Dawg models.
*/
void Wordrec::program_editup(const char *textbase, bool init_permute) {
if (textbase != NULL) {
imagefile = textbase;
/* Read in data files */
edit_with_ocr(textbase);
}
/* Initialize subsystems */
program_init();
mfeature_init(); // assumes that imagefile is initialized
if (init_permute)
getDict().init_permute();
setup_cp_maps();
init_metrics();
pass2_ok_split = chop_ok_split;
pass2_seg_states = wordrec_num_seg_states;
}
int main(int argc, char **argv) {
Program program;
Program *p = &program;
#ifdef RICH_OUTPUT
initscr();
raw();
keypad(stdscr, TRUE);
noecho();
#endif
program_init(p);
program_load_system(p, "./programs/divide.sys");
program_load_code(p, "./programs/divide.tis");
#ifdef RICH_OUTPUT
output_program(p);
int code = getch();
while (code != 'q') {
program_tick(p);
clear();
output_program(p);
refresh();
code = getch();
}
#else
int all_blocked_count = 0;
while (all_blocked_count < 5) {
int all_blocked = program_tick(p);
if (all_blocked) {
all_blocked_count++;
} else {
all_blocked_count = 0;
}
}
#endif
#ifdef RICH_OUTPUT
endwin();
#endif
program_clean(p);
}
void plugin_init(G_GNUC_UNUSED GeanyData *gdata)
{
GeanyKeyGroup *scope_key_group;
char *gladefile = g_build_filename(PLUGINDATADIR, "scope.glade", NULL);
GError *gerror = NULL;
GtkWidget *menubar1 = find_widget(geany->main_widgets->window, "menubar1");
guint item;
const MenuKey *menu_key = debug_menu_keys;
ToolItem *tool_item = toolbar_items;
const ScopeCallback *scb;
main_locale_init(LOCALEDIR, GETTEXT_PACKAGE);
scope_key_group = plugin_set_key_group(geany_plugin, "scope", COUNT_KB, NULL);
builder = gtk_builder_new();
gtk_builder_set_translation_domain(builder, GETTEXT_PACKAGE);
scp_tree_store_register_dynamic();
if (!gtk_builder_add_from_file(builder, gladefile, &gerror))
{
msgwin_status_add(_("Scope: %s."), gerror->message);
g_warning(_("Scope: %s."), gerror->message);
g_error_free(gerror);
g_object_unref(builder);
builder = NULL;
}
g_free(gladefile);
if (!builder)
return;
/* interface */
#ifndef G_OS_UNIX
gtk_widget_hide(get_widget("terminal_show"));
#endif
debug_item = get_widget("debug_item");
if (menubar1)
gtk_menu_shell_insert(GTK_MENU_SHELL(menubar1), debug_item, DEBUG_MENU_ITEM_POS);
else
gtk_container_add(GTK_CONTAINER(geany->main_widgets->tools_menu), debug_item);
menu_connect("debug_menu", &debug_menu_info, NULL);
ui_add_document_sensitive(get_widget("scope_reset_markers"));
ui_add_document_sensitive(get_widget("scope_cleanup_files"));
for (item = 0; item < EVALUATE_KB; item++, menu_key++)
{
keybindings_set_item(scope_key_group, item, on_scope_key, 0, 0, menu_key->name,
_(menu_key->label), debug_menu_items[item].widget);
}
geany_statusbar = GTK_STATUSBAR(gtk_widget_get_parent(geany->main_widgets->progressbar));
debug_statusbar = get_widget("debug_statusbar");
debug_state_label = GTK_LABEL(get_widget("debug_state_label"));
gtk_box_pack_end(GTK_BOX(geany_statusbar), debug_statusbar, FALSE, FALSE, 0);
debug_panel = get_widget("debug_panel");
gtk_notebook_append_page(GTK_NOTEBOOK(geany->main_widgets->message_window_notebook),
debug_panel, get_widget("debug_label"));
/* startup */
gtk216_init();
program_init();
prefs_init();
conterm_init();
inspect_init();
register_init();
parse_init();
debug_init();
views_init();
thread_init();
break_init();
watch_init();
stack_init();
local_init();
memory_init();
menu_init();
menu_set_popup_keybindings(scope_key_group, item);
for (item = 0; tool_item->index != -1; item++, tool_item++)
{
GtkMenuItem *menu_item = GTK_MENU_ITEM(debug_menu_items[tool_item->index].widget);
GtkToolItem *button = gtk_tool_button_new(NULL, gtk_menu_item_get_label(menu_item));
gtk_tool_button_set_use_underline(GTK_TOOL_BUTTON(button),
gtk_menu_item_get_use_underline(menu_item));
g_signal_connect(button, "clicked", G_CALLBACK(on_toolbar_button_clicked),
GINT_TO_POINTER(tool_item->index));
g_signal_connect(button, "toolbar-reconfigured",
G_CALLBACK(on_toolbar_reconfigured), tool_item);
tool_item->widget = GTK_WIDGET(button);
plugin_add_toolbar_item(geany_plugin, button);
}
toolbar_update_state(DS_INACTIVE);
views_update_state(DS_INACTIVE);
configure_toolbar();
g_signal_connect(debug_panel, "switch-page", G_CALLBACK(on_view_changed), NULL);
for (scb = scope_callbacks; scb->name; scb++)
plugin_signal_connect(geany_plugin, NULL, scb->name, FALSE, scb->callback, NULL);
}
void kmain(void)
{
int reset_after_shutdown=0;
#ifdef CONF_DKEY
int c;
#endif
/* Install the text.hi segment in the correct place. The
* firmware loader puts it in the bss segment, we copy it
* to it's final location.
*/
memcpy(&__text_hi, &__bss, &__etext_hi - &__text_hi);
reset_vector = rom_reset_vector;
/* Turn off motor, since writing to hitext manipulates motors */
motor_controller = 0;
memset(&__bss, 0, &__bss_end - &__bss);
#ifdef CONF_MM
mm_init();
#endif
while (1) {
power_init();
#ifdef CONF_AUTOSHUTOFF
shutoff_init();
#endif
lcd_init();
#ifdef CONF_DSOUND
dsound_init();
#endif
#ifdef CONF_TIME
systime_init();
#endif
#ifdef CONF_DSENSOR
ds_init();
#endif
#ifdef CONF_DMOTOR
dm_init();
#endif
#ifdef CONF_LNP
lnp_init();
lnp_logical_init();
#endif
#ifdef CONF_TM
tm_init();
#endif
#ifdef CONF_PROGRAM
program_init();
#endif
show_on();
// wait till power key released
//
#ifdef CONF_DKEY
dkey_multi=KEY_ANY;
while((c=dkey_multi) & KEY_ONOFF);
#else
while (PRESSED(dbutton(), BUTTON_ONOFF));
delay(100);
#endif
cls();
#ifndef CONF_PROGRAM
lcd_show(man_run);
#ifndef CONF_LCD_REFRESH
lcd_refresh();
#endif
#endif
// run app
//
#ifdef CONF_TM
#ifndef CONF_PROGRAM
execi(&main,0,0,PRIO_NORMAL,DEFAULT_STACK_SIZE);
#endif
tm_start();
#else
main(0,0);
#endif
show_off();
// ON/OFF + PROGRAM -> erase firmware
#ifdef CONF_DKEY
while((c=dkey_multi) & KEY_ONOFF)
if(c&KEY_PRGM)
reset_after_shutdown=1;
#else
while (PRESSED(dbutton(), BUTTON_ONOFF))
if (PRESSED(dbutton(), BUTTON_PROGRAM))
reset_after_shutdown=1;
#endif
#ifdef CONF_PROGRAM
program_shutdown();
#endif
#ifdef CONF_LNP
lnp_logical_shutdown();
#endif
#ifdef CONF_DMOTOR
dm_shutdown();
#endif
#ifdef CONF_DSENSOR
ds_shutdown();
#endif
#ifdef CONF_TIME
systime_shutdown();
#endif
if (reset_after_shutdown)
rom_reset();
lcd_clear();
lcd_power_off();
power_off();
}
}
