static void menu_select_callback(MenuLayer *menu_layer, MenuIndex *cell_index, void *data) {
if (cell_index->row == GAME_INDEX) {
chess_init();
} else if (cell_index->row == INSTRUCTION_INDEX) {
text_init(CHESS);
} else if (cell_index->row == SETTINGS_INDEX) {
settings_init();
} else if (cell_index->row == ABOUT_INDEX) {
text_init(ABOUT);
}
}
/* OPEN_WORKSTATION: */
VOID
v_opnwk()
{
font_ring[1] = &second;
cur_work = &virt_work;
CONTRL[6] = virt_work.handle = 1;
virt_work.next_work = NULLPTR;
line_cw = -1; /* invalidate current line width */
text_init(); /* initialize the SIZ_TAB info */
init_wk();
/* Input must be initialized here and not in init_wk */
loc_mode = 0; /* default is request mode */
val_mode = 0; /* default is request mode */
chc_mode = 0; /* default is request mode */
str_mode = 0; /* default is request mode */
HIDE_CNT = 1; /* mouse is initially hidden */
GCURX = DEV_TAB[0]/2; /* initialize the mouse to center */
GCURY = DEV_TAB[1]/2;
INIT_G(); /* go into graphics mode */
}
int xml_script_reader_parse(script_t *script) {
assert(_p_xml_reader);
/* init list of playlets */
int idx = 0;
text_t *cur_text = NULL;
ptrlist_init(&(script->texts));
int ret;
int element_type = XML_READER_TYPE_NONE;
unsigned char *element_name = '\0';
ret = xmlTextReaderRead(_p_xml_reader);
while (ret == 1) {
element_type = xmlTextReaderNodeType(_p_xml_reader);
if (XML_READER_TYPE_ELEMENT == element_type) {
element_name = xmlTextReaderLocalName(_p_xml_reader);
if(!strcmp(XML_POINTER_ELE, (const char *) element_name)) {
/* starting new text */
cur_text = text_init();
/* setting pointer index value. */
cur_text->pointer_idx = idx++;
/* setting cpu address value. */
readPointerAddressAttr(&(cur_text->cpu_address));
}
xmlFree(element_name);
}
else if (XML_READER_TYPE_END_ELEMENT == element_type) {
element_name = xmlTextReaderLocalName(_p_xml_reader);
if(!strcmp(XML_POINTER_ELE, (const char *) element_name)) {
/* end of text*/
if(NULL != cur_text)
ptrlist_add(&(script->texts), cur_text);
cur_text = NULL;
}
xmlFree(element_name);
}
else if (XML_READER_TYPE_CDATA == element_type && NULL != cur_text) {
readPointerCData(&(cur_text->u8srt));
}
ret = xmlTextReaderRead(_p_xml_reader);
}
return 0;
}
/* initialize blue and opengl stuff */
void blue_gl_init(INITFUNC_ARGS){
/* Blue type initialization */
window_type = window_init(lib, Module);
view_type = view_init(lib, Module);
layer_type = layer_init(lib, Module);
shape_type = shape_init(lib, Module);
image_type = image_init(lib, Module);
light_type = light_init(lib, Module);
text_type = text_init(lib, Module);
}
/**
* @brief text_free
*
* Free a Text structure.
*
* @param text Text.
*/
static void text_free(Text *text)
{
int i;
for (i = 0; i < text->n_lines; ++i) {
free((void*)text->line[i]);
}
free((void*)text->line);
text_init(text);
}
/*Initialise the virtual consoles*/
void terminal_vt_init(void) {
int i;
for(i = 0; i < MAX_CONSOLES; ++i) {
struct term *console = consoles + i;
#ifndef VESA
text_init(console);
#else
vesa_init(console);
#endif
}
}
int main (void){
/*Test
Oppretter et nytt minneområdet (char* buffer). Deretter oppretter jeg en text_t-peker
som skal peke på hvor i minnet tekst skal begynne å lagres. Teksten vil ikke
lagres i denne structen, men strukten er en peker til den neste plassen i
det opprettede minneområdet hvor noe kan lagres. Structen blir på en måte
en guide i minnet så det som kan lagres kan finne ut hvor neste lagringsplass er.
Oppretter deretter en tekst som jeg lagrer i minneområdet
*/
char *buffer = malloc(CONTAINER_SIZE);
text_t *ptr = text_init(buffer, CONTAINER_SIZE);
text_store_entry(ptr, "hello", 6);
char *fetch_text;
ssize_t ret_v = text_fetch_entry(ptr, 0, fetch_text, 6);
//Sjekker at størrelsen returnert er like stor
assert(ret_v==6);
free(buffer);
return 0;
}
void smi_init() {
smram_state_t smram;
pci_driver_t **driver;
smram = smram_save_state();
smram_tseg_set_state(SMRAM_TSEG_OPEN);
outputf("NetWatch running");
/* Turn on the SMIs we want */
smi_disable();
eth_init();
crc32_init();
/* After everything is initialized, load drivers. */
for (driver = drivers; *driver; driver++)
{
outputf("Probing driver: %s", (*driver)->name);
if (pci_probe_driver(*driver))
output("Found a card");
}
outputf("Driver probe complete");
/* Load in fonts. */
text_init();
smi_register_handler(SMI_EVENT_FAST_TIMER, timer_handler);
smi_enable_event(SMI_EVENT_FAST_TIMER);
smi_register_handler(SMI_EVENT_DEVTRAP_KBC, kbc_handler);
smi_enable_event(SMI_EVENT_DEVTRAP_KBC);
smi_register_handler(SMI_EVENT_GBL_RLS, gbl_rls_handler);
smi_enable_event(SMI_EVENT_GBL_RLS);
smi_enable();
vga_flush_imm(1);
smram_restore_state(smram);
}
int main (int argc, char *argv[])
{
gchar *game_filename = NULL;
gchar *graphics_filename = NULL;
gchar *splash_filename = NULL;
gchar *music_filename = NULL;
gchar *hints_filename = NULL;
gtk_init (&argc, &argv);
gui_init ();
text_init ();
graphics_init ();
read_config_file ();
if (argc >= 6)
hints_filename = g_strdup (argv[5]);
if (argc >= 5)
music_filename = g_strdup (argv[4]);
if (argc >= 4)
splash_filename = g_strdup (argv[3]);
if (argc >= 3)
graphics_filename = g_strdup (argv[2]);
if (argc >= 2)
game_filename = g_strdup (argv[1]);
gtk_widget_show_all (Gui.main_window);
if (start_new_game (game_filename,
graphics_filename,
splash_filename,
music_filename,
hints_filename))
gtk_main ();
return 0;
}
/*
* ex_txt --
* Get lines from the terminal for ex.
*
* PUBLIC: int ex_txt(SCR *, TEXTH *, ARG_CHAR_T, u_int32_t);
*/
int
ex_txt(SCR *sp, TEXTH *tiqh, ARG_CHAR_T prompt, u_int32_t flags)
{
EVENT ev;
GS *gp;
TEXT ait, *ntp, *tp;
carat_t carat_st;
size_t cnt;
int rval;
int nochange;
rval = 0;
/*
* Get a TEXT structure with some initial buffer space, reusing the
* last one if it's big enough. (All TEXT bookkeeping fields default
* to 0 -- text_init() handles this.)
*/
if (!TAILQ_EMPTY(tiqh)) {
tp = TAILQ_FIRST(tiqh);
if (TAILQ_NEXT(tp, q) != NULL || tp->lb_len < 32) {
text_lfree(tiqh);
goto newtp;
}
tp->len = 0;
} else {
newtp: if ((tp = text_init(sp, NULL, 0, 32)) == NULL)
goto err;
TAILQ_INSERT_HEAD(tiqh, tp, q);
}
/* Set the starting line number. */
tp->lno = sp->lno + 1;
/*
* If it's a terminal, set up autoindent, put out the prompt, and
* set it up so we know we were suspended. Otherwise, turn off
* the autoindent flag, as that requires less special casing below.
*
* XXX
* Historic practice is that ^Z suspended command mode (but, because
* it ran in cooked mode, it was unaffected by the autowrite option.)
* On restart, any "current" input was discarded, whether in insert
* mode or not, and ex was in command mode. This code matches historic
* practice, but not 'cause it's easier.
*/
gp = sp->gp;
if (F_ISSET(gp, G_SCRIPTED))
LF_CLR(TXT_AUTOINDENT);
else {
if (LF_ISSET(TXT_AUTOINDENT)) {
LF_SET(TXT_EOFCHAR);
if (v_txt_auto(sp, sp->lno, NULL, 0, tp))
goto err;
}
txt_prompt(sp, tp, prompt, flags);
}
for (carat_st = C_NOTSET, nochange = 0;;) {
if (v_event_get(sp, &ev, 0, 0))
goto err;
/* Deal with all non-character events. */
switch (ev.e_event) {
case E_CHARACTER:
break;
case E_ERR:
goto err;
case E_REPAINT:
case E_WRESIZE:
continue;
case E_EOF:
rval = 1;
/* FALLTHROUGH */
case E_INTERRUPT:
/*
* Handle EOF/SIGINT events by discarding partially
* entered text and returning. EOF returns failure,
* E_INTERRUPT returns success.
*/
goto notlast;
default:
v_event_err(sp, &ev);
goto notlast;
}
/*
* Deal with character events.
*
* Check to see if the character fits into the input buffer.
* (Use tp->len, ignore overwrite and non-printable chars.)
*/
BINC_GOTOW(sp, tp->lb, tp->lb_len, tp->len + 1);
switch (ev.e_value) {
case K_CR:
/*
* !!!
* Historically, <carriage-return>'s in the command
* weren't special, so the ex parser would return an
* unknown command error message. However, if they
* terminated the command if they were in a map. I'm
* pretty sure this still isn't right, but it handles
* what I've seen so far.
*/
if (!F_ISSET(&ev.e_ch, CH_MAPPED))
goto ins_ch;
/* FALLTHROUGH */
case K_NL:
/*
* '\' can escape <carriage-return>/<newline>. We
* don't discard the backslash because we need it
* to get the <newline> through the ex parser.
*/
if (LF_ISSET(TXT_BACKSLASH) &&
tp->len != 0 && tp->lb[tp->len - 1] == '\\')
goto ins_ch;
/*
* CR returns from the ex command line.
*
* XXX
* Terminate with a nul, needed by filter.
*/
if (LF_ISSET(TXT_CR)) {
tp->lb[tp->len] = '\0';
goto done;
}
/*
* '.' may terminate text input mode; free the current
* TEXT.
*/
if (LF_ISSET(TXT_DOTTERM) && tp->len == tp->ai + 1 &&
tp->lb[tp->len - 1] == '.') {
notlast: TAILQ_REMOVE(tiqh, tp, q);
text_free(tp);
goto done;
}
/* Set up bookkeeping for the new line. */
if ((ntp = text_init(sp, NULL, 0, 32)) == NULL)
goto err;
ntp->lno = tp->lno + 1;
/*
* Reset the autoindent line value. 0^D keeps the ai
* line from changing, ^D changes the level, even if
* there were no characters in the old line. Note, if
* using the current tp structure, use the cursor as
* the length, the autoindent characters may have been
* erased.
*/
if (LF_ISSET(TXT_AUTOINDENT)) {
if (nochange) {
nochange = 0;
if (v_txt_auto(sp,
OOBLNO, &ait, ait.ai, ntp))
goto err;
free(ait.lb);
} else
if (v_txt_auto(sp,
OOBLNO, tp, tp->len, ntp))
goto err;
carat_st = C_NOTSET;
}
txt_prompt(sp, ntp, prompt, flags);
/*
* Swap old and new TEXT's, and insert the new TEXT
* into the queue.
*/
tp = ntp;
TAILQ_INSERT_TAIL(tiqh, tp, q);
break;
case K_CARAT: /* Delete autoindent chars. */
if (tp->len <= tp->ai && LF_ISSET(TXT_AUTOINDENT))
carat_st = C_CARATSET;
goto ins_ch;
case K_ZERO: /* Delete autoindent chars. */
if (tp->len <= tp->ai && LF_ISSET(TXT_AUTOINDENT))
carat_st = C_ZEROSET;
goto ins_ch;
case K_CNTRLD: /* Delete autoindent char. */
/*
* !!!
* Historically, the ^D command took (but then ignored)
* a count. For simplicity, we don't return it unless
* it's the first character entered. The check for len
* equal to 0 is okay, TXT_AUTOINDENT won't be set.
*/
if (LF_ISSET(TXT_CNTRLD)) {
for (cnt = 0; cnt < tp->len; ++cnt)
if (!isblank(tp->lb[cnt]))
break;
if (cnt == tp->len) {
tp->len = 1;
tp->lb[0] = ev.e_c;
tp->lb[1] = '\0';
/*
* Put out a line separator, in case
* the command fails.
*/
(void)putchar('\n');
goto done;
}
}
/*
* POSIX 1003.1b-1993, paragraph 7.1.1.9, states that
* the EOF characters are discarded if there are other
* characters to process in the line, i.e. if the EOF
* is not the first character in the line. For this
* reason, historic ex discarded the EOF characters,
* even if occurring in the middle of the input line.
* We match that historic practice.
*
* !!!
* The test for discarding in the middle of the line is
* done in the switch, because the CARAT forms are N+1,
* not N.
*
* !!!
* There's considerable magic to make the terminal code
* return the EOF character at all. See that code for
* details.
*/
if (!LF_ISSET(TXT_AUTOINDENT) || tp->len == 0)
continue;
switch (carat_st) {
case C_CARATSET: /* ^^D */
if (tp->len > tp->ai + 1)
continue;
/* Save the ai string for later. */
ait.lb = NULL;
ait.lb_len = 0;
BINC_GOTOW(sp, ait.lb, ait.lb_len, tp->ai);
MEMCPY(ait.lb, tp->lb, tp->ai);
ait.ai = ait.len = tp->ai;
carat_st = C_NOTSET;
nochange = 1;
goto leftmargin;
case C_ZEROSET: /* 0^D */
if (tp->len > tp->ai + 1)
continue;
carat_st = C_NOTSET;
leftmargin: (void)gp->scr_ex_adjust(sp, EX_TERM_CE);
tp->ai = tp->len = 0;
break;
case C_NOTSET: /* ^D */
if (tp->len > tp->ai)
continue;
if (txt_dent(sp, tp))
goto err;
break;
default:
abort();
}
/* Clear and redisplay the line. */
(void)gp->scr_ex_adjust(sp, EX_TERM_CE);
txt_prompt(sp, tp, prompt, flags);
break;
default:
/*
* See the TXT_BEAUTIFY comment in vi/v_txt_ev.c.
*
* Silently eliminate any iscntrl() character that was
* not already handled specially, except for <tab> and
* <ff>.
*/
ins_ch: if (LF_ISSET(TXT_BEAUTIFY) && ISCNTRL(ev.e_c) &&
ev.e_value != K_FORMFEED && ev.e_value != K_TAB)
break;
tp->lb[tp->len++] = ev.e_c;
break;
}
}
/* NOTREACHED */
done: return (rval);
err:
alloc_err:
return (1);
}
/*
* v_replace -- [count]r<char>
*
* !!!
* The r command in historic vi was almost beautiful in its badness. For
* example, "r<erase>" and "r<word erase>" beeped the terminal and deleted
* a single character. "Nr<carriage return>", where N was greater than 1,
* inserted a single carriage return. "r<escape>" did cancel the command,
* but "r<literal><escape>" erased a single character. To enter a literal
* <literal> character, it required three <literal> characters after the
* command. This may not be right, but at least it's not insane.
*
* PUBLIC: int v_replace __P((SCR *, VICMD *));
*/
int
v_replace(SCR *sp, VICMD *vp)
{
EVENT ev;
VI_PRIVATE *vip;
TEXT *tp;
size_t blen, len;
u_long cnt;
int quote, rval;
CHAR_T *bp;
CHAR_T *p;
vip = VIP(sp);
/*
* If the line doesn't exist, or it's empty, replacement isn't
* allowed. It's not hard to implement, but:
*
* 1: It's historic practice (vi beeped before the replacement
* character was even entered).
* 2: For consistency, this change would require that the more
* general case, "Nr", when the user is < N characters from
* the end of the line, also work, which would be a bit odd.
* 3: Replacing with a <newline> has somewhat odd semantics.
*/
if (db_get(sp, vp->m_start.lno, DBG_FATAL, &p, &len))
return (1);
if (len == 0) {
msgq(sp, M_BERR, "186|No characters to replace");
return (1);
}
/*
* Figure out how many characters to be replace. For no particular
* reason (other than that the semantics of replacing the newline
* are confusing) only permit the replacement of the characters in
* the current line. I suppose we could append replacement characters
* to the line, but I see no compelling reason to do so. Check this
* before we get the character to match historic practice, where Nr
* failed immediately if there were less than N characters from the
* cursor to the end of the line.
*/
cnt = F_ISSET(vp, VC_C1SET) ? vp->count : 1;
vp->m_stop.lno = vp->m_start.lno;
vp->m_stop.cno = vp->m_start.cno + cnt - 1;
if (vp->m_stop.cno > len - 1) {
v_eol(sp, &vp->m_start);
return (1);
}
/*
* If it's not a repeat, reset the current mode and get a replacement
* character.
*/
quote = 0;
if (!F_ISSET(vp, VC_ISDOT)) {
sp->showmode = SM_REPLACE;
if (vs_refresh(sp, 0))
return (1);
next: if (v_event_get(sp, &ev, 0, 0))
return (1);
switch (ev.e_event) {
case E_CHARACTER:
/*
* <literal_next> means escape the next character.
* <escape> means they changed their minds.
*/
if (!quote) {
if (ev.e_value == K_VLNEXT) {
quote = 1;
goto next;
}
if (ev.e_value == K_ESCAPE)
return (0);
}
vip->rlast = ev.e_c;
vip->rvalue = ev.e_value;
break;
case E_ERR:
case E_EOF:
F_SET(sp, SC_EXIT_FORCE);
return (1);
case E_INTERRUPT:
/* <interrupt> means they changed their minds. */
return (0);
case E_WRESIZE:
/* <resize> interrupts the input mode. */
v_emsg(sp, NULL, VIM_WRESIZE);
return (0);
case E_REPAINT:
if (vs_repaint(sp, &ev))
return (1);
goto next;
default:
v_event_err(sp, &ev);
return (0);
}
}
/* Copy the line. */
GET_SPACE_RETW(sp, bp, blen, len);
MEMMOVE(bp, p, len);
p = bp;
/*
* Versions of nvi before 1.57 created N new lines when they replaced
* N characters with <carriage-return> or <newline> characters. This
* is different from the historic vi, which replaced N characters with
* a single new line. Users complained, so we match historic practice.
*/
if ((!quote && vip->rvalue == K_CR) || vip->rvalue == K_NL) {
/* Set return line. */
vp->m_stop.lno = vp->m_start.lno + 1;
vp->m_stop.cno = 0;
/* The first part of the current line. */
if (db_set(sp, vp->m_start.lno, p, vp->m_start.cno))
goto err_ret;
/*
* The rest of the current line. And, of course, now it gets
* tricky. If there are characters left in the line and if
* the autoindent edit option is set, white space after the
* replaced character is discarded, autoindent is applied, and
* the cursor moves to the last indent character.
*/
p += vp->m_start.cno + cnt;
len -= vp->m_start.cno + cnt;
if (len != 0 && O_ISSET(sp, O_AUTOINDENT))
for (; len && isblank(*p); --len, ++p);
if ((tp = text_init(sp, p, len, len)) == NULL)
goto err_ret;
if (len != 0 && O_ISSET(sp, O_AUTOINDENT)) {
if (v_txt_auto(sp, vp->m_start.lno, NULL, 0, tp))
goto err_ret;
vp->m_stop.cno = tp->ai ? tp->ai - 1 : 0;
} else
vp->m_stop.cno = 0;
vp->m_stop.cno = tp->ai ? tp->ai - 1 : 0;
if (db_append(sp, 1, vp->m_start.lno, tp->lb, tp->len))
err_ret: rval = 1;
else {
text_free(tp);
rval = 0;
}
} else {
STRSET(bp + vp->m_start.cno, vip->rlast, cnt);
rval = db_set(sp, vp->m_start.lno, bp, len);
}
FREE_SPACEW(sp, bp, blen);
vp->m_final = vp->m_stop;
return (rval);
}
int main(int argc, char ** argv)
{
GR_BITMAP bitmap1fg[7]; /* mouse cursor */
GR_BITMAP bitmap1bg[7];
if (GrOpen() < 0) {
fprintf(stderr, "cannot open graphics\n");
exit(1);
}
GrGetScreenInfo(&si);
w1 = GrNewWindow(GR_ROOT_WINDOW_ID, 50, 30, si.cols - 120,
si.rows - 60, 1, WHITE, LTBLUE);
GrSelectEvents(w1, GR_EVENT_MASK_BUTTON_DOWN |
GR_EVENT_MASK_KEY_DOWN | GR_EVENT_MASK_EXPOSURE |
GR_EVENT_MASK_FOCUS_IN | GR_EVENT_MASK_FOCUS_OUT |
GR_EVENT_MASK_CLOSE_REQ);
GrMapWindow(w1);
gc1 = GrNewGC();
gc3 = GrNewGC();
GrSetGCForeground(gc1, GRAY);
GrSetGCBackground(gc1, LTBLUE);
GrSetGCFont(gc1, GrCreateFont(GR_FONT_SYSTEM_FIXED, 0, NULL));
/*GrSetGCFont(gc1, GrCreateFont(GR_FONT_OEM_FIXED, 0, NULL));*/
GrSetGCForeground(gc3, WHITE);
GrSetGCBackground(gc3, BLACK);
bitmap1fg[0] = MASK(_,_,X,_,X,_,_);
bitmap1fg[1] = MASK(_,_,_,X,_,_,_);
bitmap1fg[2] = MASK(_,_,_,X,_,_,_);
bitmap1fg[3] = MASK(_,_,_,X,_,_,_);
bitmap1fg[4] = MASK(_,_,_,X,_,_,_);
bitmap1fg[5] = MASK(_,_,_,X,_,_,_);
bitmap1fg[6] = MASK(_,_,X,_,X,_,_);
bitmap1bg[0] = MASK(_,X,X,X,X,X,_);
bitmap1bg[1] = MASK(_,_,X,X,X,_,_);
bitmap1bg[2] = MASK(_,_,X,X,X,_,_);
bitmap1bg[3] = MASK(_,_,X,X,X,_,_);
bitmap1bg[4] = MASK(_,_,X,X,X,_,_);
bitmap1bg[5] = MASK(_,_,X,X,X,_,_);
bitmap1bg[6] = MASK(_,X,X,X,X,X,_);
GrSetCursor(w1, 7, 7, 3, 3, WHITE, BLACK, bitmap1fg, bitmap1bg);
/*GrFillRect(GR_ROOT_WINDOW_ID, gc1, 0, 0, si.cols, si.rows);*/
GrSetGCForeground(gc1, BLACK);
GrSetGCBackground(gc1, WHITE);
text_init();
if (term_init() < 0) {
GrClose();
exit(1);
}
/* we want tfd events also*/
GrRegisterInput(tfd);
#if 1
GrMainLoop(HandleEvent);
#else
while(1) {
GR_EVENT ev;
GrGetNextEvent(&ev);
HandleEvent(&ev);
}
#endif
/* notreached*/
return 0;
}
int main(int argc, char *argv[])
{
int append=0;
int create=0;
int slim=0;
int sanitize=0;
int long_usage_bool=0;
int pass_prompt=0;
int projection = PROJ_SPHERE_MERC;
int expire_tiles_zoom = -1;
int expire_tiles_zoom_min = -1;
int enable_hstore = HSTORE_NONE;
int enable_hstore_index = 0;
int hstore_match_only = 0;
int enable_multi = 0;
int parallel_indexing = 1;
int flat_node_cache_enabled = 0;
#ifdef __amd64__
int alloc_chunkwise = ALLOC_SPARSE | ALLOC_DENSE;
#else
int alloc_chunkwise = ALLOC_SPARSE;
#endif
int num_procs = 1;
int droptemp = 0;
int unlogged = 0;
int excludepoly = 0;
time_t start, end;
time_t overall_start, overall_end;
time_t now;
time_t end_nodes;
time_t end_way;
time_t end_rel;
const char *expire_tiles_filename = "dirty_tiles";
const char *db = "gis";
const char *username=NULL;
const char *host=NULL;
const char *password=NULL;
const char *port = "5432";
const char *tblsmain_index = NULL; /* no default TABLESPACE for index on main tables */
const char *tblsmain_data = NULL; /* no default TABLESPACE for main tables */
const char *tblsslim_index = NULL; /* no default TABLESPACE for index on slim mode tables */
const char *tblsslim_data = NULL; /* no default TABLESPACE for slim mode tables */
const char *conninfo = NULL;
const char *prefix = "planet_osm";
const char *style = OSM2PGSQL_DATADIR "/default.style";
const char *temparg;
const char *output_backend = "pgsql";
const char *input_reader = "auto";
const char **hstore_columns = NULL;
const char *flat_nodes_file = NULL;
const char *tag_transform_script = NULL;
int n_hstore_columns = 0;
int keep_coastlines=0;
int cache = 800;
struct output_options options;
PGconn *sql_conn;
int (*streamFile)(char *, int, struct osmdata_t *);
fprintf(stderr, "osm2pgsql SVN version %s (%lubit id space)\n\n", VERSION, 8 * sizeof(osmid_t));
while (1) {
int c, option_index = 0;
static struct option long_options[] = {
{"append", 0, 0, 'a'},
{"bbox", 1, 0, 'b'},
{"create", 0, 0, 'c'},
{"database", 1, 0, 'd'},
{"latlong", 0, 0, 'l'},
{"verbose", 0, 0, 'v'},
{"slim", 0, 0, 's'},
{"prefix", 1, 0, 'p'},
{"proj", 1, 0, 'E'},
{"merc", 0, 0, 'm'},
{"oldmerc", 0, 0, 'M'},
{"utf8-sanitize", 0, 0, 'u'},
{"cache", 1, 0, 'C'},
{"username", 1, 0, 'U'},
{"password", 0, 0, 'W'},
{"host", 1, 0, 'H'},
{"port", 1, 0, 'P'},
{"tablespace-index", 1, 0, 'i'},
{"tablespace-slim-data", 1, 0, 200},
{"tablespace-slim-index", 1, 0, 201},
{"tablespace-main-data", 1, 0, 202},
{"tablespace-main-index", 1, 0, 203},
{"help", 0, 0, 'h'},
{"style", 1, 0, 'S'},
{"expire-tiles", 1, 0, 'e'},
{"expire-output", 1, 0, 'o'},
{"output", 1, 0, 'O'},
{"extra-attributes", 0, 0, 'x'},
{"hstore", 0, 0, 'k'},
{"hstore-all", 0, 0, 'j'},
{"hstore-column", 1, 0, 'z'},
{"hstore-match-only", 0, 0, 208},
{"hstore-add-index",0,0,211},
{"multi-geometry", 0, 0, 'G'},
{"keep-coastlines", 0, 0, 'K'},
{"input-reader", 1, 0, 'r'},
{"version", 0, 0, 'V'},
{"disable-parallel-indexing", 0, 0, 'I'},
{"cache-strategy", 1, 0, 204},
{"number-processes", 1, 0, 205},
{"drop", 0, 0, 206},
{"unlogged", 0, 0, 207},
{"flat-nodes",1,0,209},
{"exclude-invalid-polygon",0,0,210},
{"tag-transform-script",1,0,212},
{0, 0, 0, 0}
};
c = getopt_long (argc, argv, "ab:cd:KhlmMp:suvU:WH:P:i:IE:C:S:e:o:O:xkjGz:r:V", long_options, &option_index);
if (c == -1)
break;
switch (c) {
case 'a': append=1; break;
case 'b': osmdata.bbox=optarg; break;
case 'c': create=1; break;
case 'v': verbose=1; break;
case 's': slim=1; break;
case 'K': keep_coastlines=1; break;
case 'u': sanitize=1; break;
case 'l': projection=PROJ_LATLONG; break;
case 'm': projection=PROJ_SPHERE_MERC; break;
case 'M': projection=PROJ_MERC; break;
case 'E': projection=-atoi(optarg); break;
case 'p': prefix=optarg; break;
case 'd': db=optarg; break;
case 'C': cache = atoi(optarg); break;
case 'U': username=optarg; break;
case 'W': pass_prompt=1; break;
case 'H': host=optarg; break;
case 'P': port=optarg; break;
case 'S': style=optarg; break;
case 'i': tblsmain_index=tblsslim_index=optarg; break;
case 200: tblsslim_data=optarg; break;
case 201: tblsslim_index=optarg; break;
case 202: tblsmain_data=optarg; break;
case 203: tblsmain_index=optarg; break;
case 'e':
expire_tiles_zoom_min = atoi(optarg);
temparg = strchr(optarg, '-');
if (temparg) expire_tiles_zoom = atoi(temparg + 1);
if (expire_tiles_zoom < expire_tiles_zoom_min) expire_tiles_zoom = expire_tiles_zoom_min;
break;
case 'o': expire_tiles_filename=optarg; break;
case 'O': output_backend = optarg; break;
case 'x': osmdata.extra_attributes=1; break;
case 'k': enable_hstore=HSTORE_NORM; break;
case 208: hstore_match_only = 1; break;
case 'j': enable_hstore=HSTORE_ALL; break;
case 'z':
n_hstore_columns++;
hstore_columns = (const char**)realloc(hstore_columns, sizeof(char *) * n_hstore_columns);
hstore_columns[n_hstore_columns-1] = optarg;
break;
case 'G': enable_multi=1; break;
case 'r': input_reader = optarg; break;
case 'h': long_usage_bool=1; break;
case 'I':
#ifdef HAVE_PTHREAD
parallel_indexing=0;
#endif
break;
case 204:
if (strcmp(optarg,"dense") == 0) alloc_chunkwise = ALLOC_DENSE;
else if (strcmp(optarg,"chunk") == 0) alloc_chunkwise = ALLOC_DENSE | ALLOC_DENSE_CHUNK;
else if (strcmp(optarg,"sparse") == 0) alloc_chunkwise = ALLOC_SPARSE;
else if (strcmp(optarg,"optimized") == 0) alloc_chunkwise = ALLOC_DENSE | ALLOC_SPARSE;
else {fprintf(stderr, "ERROR: Unrecognized cache strategy %s.\n", optarg); exit(EXIT_FAILURE); }
break;
case 205:
#ifdef HAVE_FORK
num_procs = atoi(optarg);
#else
fprintf(stderr, "WARNING: osm2pgsql was compiled without fork, only using one process!\n");
#endif
break;
case 206: droptemp = 1; break;
case 207: unlogged = 1; break;
case 209:
flat_node_cache_enabled = 1;
flat_nodes_file = optarg;
break;
case 210: excludepoly = 1; exclude_broken_polygon(); break;
case 211: enable_hstore_index = 1; break;
case 212: tag_transform_script = optarg; break;
case 'V': exit(EXIT_SUCCESS);
case '?':
default:
short_usage(argv[0]);
exit(EXIT_FAILURE);
}
}
if (long_usage_bool) {
long_usage(argv[0]);
exit(EXIT_SUCCESS);
}
if (argc == optind) { /* No non-switch arguments */
short_usage(argv[0]);
exit(EXIT_FAILURE);
}
if (append && create) {
fprintf(stderr, "Error: --append and --create options can not be used at the same time!\n");
exit(EXIT_FAILURE);
}
if (droptemp && !slim) {
fprintf(stderr, "Error: --drop only makes sense with --slim.\n");
exit(EXIT_FAILURE);
}
if (unlogged && !create) {
fprintf(stderr, "Warning: --unlogged only makes sense with --create; ignored.\n");
unlogged = 0;
}
if (enable_hstore == HSTORE_NONE && !n_hstore_columns && hstore_match_only)
{
fprintf(stderr, "Warning: --hstore-match-only only makes sense with --hstore, --hstore-all, or --hstore-column; ignored.\n");
hstore_match_only = 0;
}
if (enable_hstore_index && enable_hstore == HSTORE_NONE && !n_hstore_columns) {
fprintf(stderr, "Warning: --hstore-add-index only makes sense with hstore enabled.\n");
enable_hstore_index = 0;
}
if (cache < 0) cache = 0;
if (num_procs < 1) num_procs = 1;
if (pass_prompt)
password = simple_prompt("Password:"******"PGPASS");
}
conninfo = build_conninfo(db, username, password, host, port);
sql_conn = PQconnectdb(conninfo);
if (PQstatus(sql_conn) != CONNECTION_OK) {
fprintf(stderr, "Error: Connection to database failed: %s\n", PQerrorMessage(sql_conn));
exit(EXIT_FAILURE);
}
if (unlogged && PQserverVersion(sql_conn) < 90100) {
fprintf(stderr, "Error: --unlogged works only with PostgreSQL 9.1 and above, but\n");
fprintf(stderr, "you are using PostgreSQL %d.%d.%d.\n", PQserverVersion(sql_conn) / 10000, (PQserverVersion(sql_conn) / 100) % 100, PQserverVersion(sql_conn) % 100);
exit(EXIT_FAILURE);
}
PQfinish(sql_conn);
text_init();
initList(&osmdata.tags);
osmdata.count_node = osmdata.max_node = 0;
osmdata.count_way = osmdata.max_way = 0;
osmdata.count_rel = osmdata.max_rel = 0;
LIBXML_TEST_VERSION
project_init(projection);
fprintf(stderr, "Using projection SRS %d (%s)\n",
project_getprojinfo()->srs, project_getprojinfo()->descr );
if (parse_bbox(&osmdata))
return 1;
options.conninfo = conninfo;
options.prefix = prefix;
options.append = append;
options.slim = slim;
options.projection = project_getprojinfo()->srs;
options.scale = (projection==PROJ_LATLONG)?10000000:100;
options.mid = slim ? &mid_pgsql : &mid_ram;
options.cache = cache;
options.style = style;
options.tblsmain_index = tblsmain_index;
options.tblsmain_data = tblsmain_data;
options.tblsslim_index = tblsslim_index;
options.tblsslim_data = tblsslim_data;
options.expire_tiles_zoom = expire_tiles_zoom;
options.expire_tiles_zoom_min = expire_tiles_zoom_min;
options.expire_tiles_filename = expire_tiles_filename;
options.enable_multi = enable_multi;
options.enable_hstore = enable_hstore;
options.enable_hstore_index = enable_hstore_index;
options.hstore_match_only = hstore_match_only;
options.hstore_columns = hstore_columns;
options.n_hstore_columns = n_hstore_columns;
options.keep_coastlines = keep_coastlines;
options.parallel_indexing = parallel_indexing;
options.alloc_chunkwise = alloc_chunkwise;
options.num_procs = num_procs;
options.droptemp = droptemp;
options.unlogged = unlogged;
options.flat_node_cache_enabled = flat_node_cache_enabled;
options.flat_node_file = flat_nodes_file;
options.excludepoly = excludepoly;
options.tag_transform_script = tag_transform_script;
if (strcmp("pgsql", output_backend) == 0) {
osmdata.out = &out_pgsql;
} else if (strcmp("gazetteer", output_backend) == 0) {
osmdata.out = &out_gazetteer;
} else if (strcmp("null", output_backend) == 0) {
osmdata.out = &out_null;
} else {
fprintf(stderr, "Output backend `%s' not recognised. Should be one of [pgsql, gazetteer, null].\n", output_backend);
exit(EXIT_FAILURE);
}
options.out = osmdata.out;
if (strcmp("auto", input_reader) != 0) {
if (strcmp("libxml2", input_reader) == 0) {
streamFile = &streamFileXML2;
} else if (strcmp("primitive", input_reader) == 0) {
streamFile = &streamFilePrimitive;
#ifdef BUILD_READER_PBF
} else if (strcmp("pbf", input_reader) == 0) {
streamFile = &streamFilePbf;
#endif
} else if (strcmp("o5m", input_reader) == 0) {
streamFile = &streamFileO5m;
} else {
fprintf(stderr, "Input parser `%s' not recognised. Should be one of [libxml2, primitive, o5m"
#ifdef BUILD_READER_PBF
", pbf"
#endif
"].\n", input_reader);
exit(EXIT_FAILURE);
}
}
time(&overall_start);
osmdata.out->start(&options);
realloc_nodes(&osmdata);
realloc_members(&osmdata);
if (sizeof(int*) == 4 && options.slim != 1) {
fprintf(stderr, "\n!! You are running this on 32bit system, so at most\n");
fprintf(stderr, "!! 3GB of RAM can be used. If you encounter unexpected\n");
fprintf(stderr, "!! exceptions during import, you should try running in slim\n");
fprintf(stderr, "!! mode using parameter -s.\n");
}
while (optind < argc) {
/* if input_reader is not forced by -r switch try to auto-detect it
by file extension */
if (strcmp("auto", input_reader) == 0) {
if (strcasecmp(".pbf",argv[optind]+strlen(argv[optind])-4) == 0) {
#ifdef BUILD_READER_PBF
streamFile = &streamFilePbf;
#else
fprintf(stderr, "ERROR: PBF support has not been compiled into this version of osm2pgsql, please either compile it with pbf support or use one of the other input formats\n");
exit(EXIT_FAILURE);
#endif
} else if (strcasecmp(".o5m",argv[optind]+strlen(argv[optind])-4) == 0 || strcasecmp(".o5c",argv[optind]+strlen(argv[optind])-4) == 0) {
streamFile = &streamFileO5m;
} else {
streamFile = &streamFileXML2;
}
}
fprintf(stderr, "\nReading in file: %s\n", argv[optind]);
time(&start);
if (streamFile(argv[optind], sanitize, &osmdata) != 0)
exit_nicely();
time(&end);
fprintf(stderr, " parse time: %ds\n", (int)(end - start));
optind++;
}
xmlCleanupParser();
xmlMemoryDump();
if (osmdata.count_node || osmdata.count_way || osmdata.count_rel) {
time(&now);
end_nodes = osmdata.start_way > 0 ? osmdata.start_way : now;
end_way = osmdata.start_rel > 0 ? osmdata.start_rel : now;
end_rel = now;
fprintf(stderr, "\n");
fprintf(stderr, "Node stats: total(%" PRIdOSMID "), max(%" PRIdOSMID ") in %is\n", osmdata.count_node, osmdata.max_node,
osmdata.count_node > 0 ? (int)(end_nodes - osmdata.start_node) : 0);
fprintf(stderr, "Way stats: total(%" PRIdOSMID "), max(%" PRIdOSMID ") in %is\n", osmdata.count_way, osmdata.max_way,
osmdata.count_way > 0 ? (int)(end_way - osmdata.start_way) : 0);
fprintf(stderr, "Relation stats: total(%" PRIdOSMID "), max(%" PRIdOSMID ") in %is\n", osmdata.count_rel, osmdata.max_rel,
osmdata.count_rel > 0 ? (int)(end_rel - osmdata.start_rel) : 0);
}
osmdata.out->stop();
free(osmdata.nds);
free(osmdata.members);
/* free the column pointer buffer */
free(hstore_columns);
project_exit();
text_exit();
fprintf(stderr, "\n");
time(&overall_end);
fprintf(stderr, "Osm2pgsql took %ds overall\n", (int)(overall_end - overall_start));
return 0;
}
int main(int argc, char *argv[])
{
clock_t rdp_finish_time, rdp_start_time = clock();
int
rdp_symbol_statistics = 0, /* show symbol_ table statistics flag */
rdp_line_echo_all = 0, /* make a listing on all passes flag */
rdp_filter = 0, /* filter flag */
rdp_line_echo = 0, /* make listing flag */
rdp_lexicalise = 0; /* print lexicalised output flag */
unsigned long rdp_textsize = 35000l; /* size of scanner text array */
unsigned long rdp_tabwidth = 8l; /* tab expansion width */
char* rdp_vcg_filename = NULL; /* filename for -V option */
rdp_tree_node_data* rdp_tree = (rdp_tree_node_data*) graph_insert_graph("RDP derivation tree"); /* hook for derivation tree */
rdp_tree_node_data* rdp_tree_root;
arg_message("Minitree compiler V1.50 (c) Adrian Johnstone 1997\n" RDP_STAMP "\n\n""Usage: minitree [options] source[.m]");
arg_message("");
arg_boolean('f', "Filter mode (read from stdin and write to stdout)", &rdp_filter);
arg_boolean('l', "Make a listing", &rdp_line_echo);
arg_boolean('L', "Print lexicalised source file", &rdp_lexicalise);
arg_string ('o', "Write output to filename", &rdp_outputfilename);
arg_boolean('s', "Echo each scanner symbol as it is read", &rdp_symbol_echo);
arg_boolean('S', "Print summary symbol table statistics", &rdp_symbol_statistics);
arg_numeric('t', "Tab expansion width (default 8)", &rdp_tabwidth);
arg_numeric('T', "Text buffer size in bytes for scanner (default 20000)", &rdp_textsize);
arg_boolean('v', "Set verbose mode", &rdp_verbose);
arg_string ('V', "Write derivation tree to filename in VCG format", &rdp_vcg_filename);
rdp_sourcefilenames = arg_process(argc, argv);
/* Fix up filetypes */
for (rdp_sourcefilenumber = 0; rdp_sourcefilenames[rdp_sourcefilenumber] != NULL; rdp_sourcefilenumber++)
rdp_sourcefilenames[rdp_sourcefilenumber] = text_default_filetype(rdp_sourcefilenames[rdp_sourcefilenumber], "m");
if (rdp_filter)
{
rdp_sourcefilenames[0] = "-";
rdp_outputfilename = "-";
rdp_sourcefilenames[1] = NULL; /* make sure no further filenames are taken from the array */
}
if ((rdp_sourcefilename = rdp_sourcefilenames[0]) == NULL)
arg_help("no source files specified");
if (rdp_sourcefilenames[1] != NULL)
text_message(TEXT_FATAL, "multiple source files not allowed\n");
text_init(rdp_textsize, 25, 100, (int) rdp_tabwidth);
scan_init(0, 0, 0, rdp_symbol_echo, rdp_tokens);
if (rdp_lexicalise)
scan_lexicalise();
mini = symbol_new_table("mini", 101, 31, symbol_compare_string, symbol_hash_string, symbol_print_string);
rdp_set_initialise();
rdp_load_keywords();
if (rdp_verbose)
text_printf("\nMinitree compiler V1.50 (c) Adrian Johnstone 1997\n" RDP_STAMP "\n\n");
for (rdp_pass = 1; rdp_pass <= RDP_PASSES; rdp_pass++)
{
rdp_tree_update = rdp_pass == RDP_PASSES;
text_echo(rdp_line_echo_all || (rdp_line_echo && rdp_pass == RDP_PASSES));
for (rdp_sourcefilenumber = 0; (rdp_sourcefilename = rdp_sourcefilenames[rdp_sourcefilenumber]) != NULL; rdp_sourcefilenumber++)
{
if (text_open(rdp_sourcefilename) == NULL)
arg_help("unable to open source file");
text_get_char();
scan_();
program(rdp_tree_root = rdp_add_node("program", rdp_tree)); /* call parser at top level */
if (text_total_errors() != 0)
text_message(TEXT_FATAL, "error%s detected in source file ''\n", text_total_errors() == 1 ? "" : "s", rdp_sourcefilename); /* crash quietly */
graph_epsilon_prune_rdp_tree(rdp_tree_root, sizeof(rdp_tree_edge_data));
}
}
rdp_sourcefilename = rdp_sourcefilenames[0]; /* Reset filename to first file in the list */
graph_set_root(rdp_tree, rdp_tree_root);
if (rdp_vcg_filename != NULL)
{
FILE *rdp_vcg_file;
if (*rdp_vcg_filename == '\0') /* No filename supplied */
rdp_vcg_filename = "rdparser";
rdp_vcg_file = fopen((rdp_vcg_filename = text_default_filetype(rdp_vcg_filename, "vcg")), "w");
if (rdp_vcg_file == NULL)
text_message(TEXT_FATAL, "unable to open VCG file '%s' for write\n", rdp_vcg_filename);
if (rdp_verbose)
text_message(TEXT_INFO, "Dumping derivation tree to VCG file '%s'\n", rdp_vcg_filename);
text_redirect(rdp_vcg_file);
graph_vcg(rdp_tree, NULL, scan_vcg_print_node, scan_vcg_print_edge);
text_redirect(stdout);
fclose(rdp_vcg_file);
}
code_generate(rdp_sourcefilename, rdp_outputfilename, rdp_tree);
if (rdp_symbol_statistics)
{
symbol_print_all_table_statistics(11);
symbol_print_all_table();
}
text_print_total_errors();
if (rdp_verbose)
{
rdp_finish_time = clock();
text_message(TEXT_INFO, "%.3f CPU seconds used\n", ((double) (rdp_finish_time-rdp_start_time)) / CLOCKS_PER_SEC);
}
return rdp_error_return;
}
//extern void drawModelSetMax(void);
int glInit(void){
cvar_register(&cvar_gl_MSAA_Samples);
cvar_pset(&cvar_gl_MSAA_Samples, "0");
// console_printf("cvar id is %i\n", cvar_gl_MSAA_Samples.myid);
// console_printf("cvar name is %s\n", cvar_gl_MSAA_Samples.name);
// console_printf("cvar value is %s\n", cvar_gl_MSAA_Samples.valuestring);
glewExperimental = TRUE;
GLenum glewError = glewInit();
CHECKGLERROR
if(glewError != GLEW_OK){
console_printf("ERROR with the glew: %s\n", glewGetErrorString(glewError));
return FALSE;
}
shader_init();
CHECKGLERROR
if(!shader_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
texture_init();
CHECKGLERROR
if(!texture_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
framebuffer_init();
CHECKGLERROR
if(!framebuffer_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
vbo_init();
CHECKGLERROR
if(!vbo_ok){
return FALSE;
//todo call some sort of shutdown of everything
}
ubo_init();
CHECKGLERROR
if(!ubo_ok){
return FALSE;
//todo call some sort of shutdown of everything
}
anim_init();
CHECKGLERROR
if(!anim_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
model_init();
CHECKGLERROR
if(!model_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
/*
initParticleSystem(128);
if(!particlesOK){
//todo call some sort of shutdown of everything
return FALSE;
}
*/
light_init();
CHECKGLERROR
if(!light_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
lighttile_init();
CHECKGLERROR
if(!lighttile_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
viewport_init();
CHECKGLERROR
if(!viewport_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
text_init();
CHECKGLERROR
if(!text_ok){
//todo call some sort of shutdown of everything
return FALSE;
}
rendermodel_init();
CHECKGLERROR
//todo errorcheck
drawbb_init();
CHECKGLERROR
//todo errorcheck
states_enableForce(GL_MULTISAMPLE);
glClearDepth(1.0);
glClearColor(0.0, 0.0, 0.0, 0.0);
CHECKGLERROR
// states_disableForce(GL_FOG);
states_enableForce(GL_DEPTH_TEST);
CHECKGLERROR
// glDepthFunc(GL_LESS);
states_depthFunc(GL_LESS);
states_enableForce(GL_CULL_FACE);
states_cullFace(GL_BACK);
// states_depthMask(GL_TRUE);
int maxSamples = 0, maxIntSamples = 0, maxColorTextureSamples = 0, maxDepthTextureSamples = 0;
glGetIntegerv(GL_MAX_SAMPLES, &maxSamples);
glGetIntegerv(GL_MAX_INTEGER_SAMPLES, &maxIntSamples);
glGetIntegerv(GL_MAX_COLOR_TEXTURE_SAMPLES, &maxColorTextureSamples);
glGetIntegerv(GL_MAX_DEPTH_TEXTURE_SAMPLES, &maxDepthTextureSamples);
maxMSAASamples = maxSamples;
if(maxIntSamples < maxMSAASamples) maxMSAASamples = maxIntSamples;
if(maxColorTextureSamples < maxMSAASamples) maxMSAASamples = maxColorTextureSamples;
if(maxDepthTextureSamples < maxMSAASamples) maxMSAASamples = maxDepthTextureSamples;
console_printf("Max multisample samples: %i\n", maxMSAASamples);
cam = createAndAddViewportRPOINT("cam", 1);
camid = cam->myid;
cam->outfbid = findFramebufferByNameRINT("screen");
unsigned char dflags[] = {3, 7, 3};
// unsigned char drb = FRAMEBUFFERRBFLAGSDEPTH| 2;
unsigned char drb = FRAMEBUFFERRBFLAGSDEPTH;
unsigned char dcount = 3;
cam->dfbid = createAndAddFramebufferRINT("screend", dcount, drb, dflags);
resizeViewport(cam, 800, 600);
screenWidth = 800;
screenHeight = 600;
glGenBuffers(1, &instancevbo);
glGenBuffers(1, &instancevbo2);
//temporary
CHECKGLERROR
vbo_t * tvbo = createAndAddVBORPOINT("text", 2);
textvbo = tvbo->myid;
textshaderid = shader_createAndAddRINT("text");
fsblendshaderid = shader_createAndAddRINT("fsblend");
depthonlyid = shader_createAndAddRINT("depthmodel");
forwardmodelid = shader_createAndAddRINT("forwardmodel");
fsquadmodel = model_findByNameRINT("fsquad");
readyRenderQueueBuffers();
return TRUE; // so far so good
}
int main(int argc, char *argv[])
{
int append=0;
int create=0;
int slim=0;
int sanitize=0;
int long_usage_bool=0;
int pass_prompt=0;
int projection = PROJ_SPHERE_MERC;
int expire_tiles_zoom = -1;
int expire_tiles_zoom_min = -1;
int enable_hstore = 0;
int enable_multi = 0;
const char *expire_tiles_filename = "dirty_tiles";
const char *db = "gis";
const char *username=NULL;
const char *host=NULL;
const char *password=NULL;
const char *port = "5432";
const char *tblsindex = "pg_default"; // default TABLESPACE for index
const char *conninfo = NULL;
const char *prefix = "planet_osm";
const char *style = OSM2PGSQL_DATADIR "/default.style";
const char *temparg;
const char *output_backend = "pgsql";
const char *input_reader = "auto";
const char **hstore_columns = NULL;
int n_hstore_columns = 0;
int cache = 800;
struct output_options options;
PGconn *sql_conn;
int (*streamFile)(char *, int, struct osmdata_t *);
printf("osm2pgsql SVN version %s\n\n", VERSION);
while (1) {
int c, option_index = 0;
static struct option long_options[] = {
{"append", 0, 0, 'a'},
{"bbox", 1, 0, 'b'},
{"create", 0, 0, 'c'},
{"database", 1, 0, 'd'},
{"latlong", 0, 0, 'l'},
{"verbose", 0, 0, 'v'},
{"slim", 0, 0, 's'},
{"prefix", 1, 0, 'p'},
{"proj", 1, 0, 'E'},
{"merc", 0, 0, 'm'},
{"oldmerc", 0, 0, 'M'},
{"utf8-sanitize", 0, 0, 'u'},
{"cache", 1, 0, 'C'},
{"username", 1, 0, 'U'},
{"password", 0, 0, 'W'},
{"host", 1, 0, 'H'},
{"port", 1, 0, 'P'},
{"tablespace-index", 1, 0, 'i'},
{"help", 0, 0, 'h'},
{"style", 1, 0, 'S'},
{"expire-tiles", 1, 0, 'e'},
{"expire-output", 1, 0, 'o'},
{"output", 1, 0, 'O'},
{"extra-attributes", 0, 0, 'x'},
{"hstore", 0, 0, 'k'},
{"hstore-column", 1, 0, 'z'},
{"multi-geometry", 0, 0, 'G'},
{"input-reader", 1, 0, 'r'},
{"version", 0, 0, 'V'},
{0, 0, 0, 0}
};
c = getopt_long (argc, argv, "ab:cd:hlmMp:suvU:WH:P:i:E:C:S:e:o:O:xkGz:r:V", long_options, &option_index);
if (c == -1)
break;
switch (c) {
case 'a':
append=1;
break;
case 'b':
osmdata.bbox=optarg;
break;
case 'c':
create=1;
break;
case 'v':
verbose=1;
break;
case 's':
slim=1;
break;
case 'u':
sanitize=1;
break;
case 'l':
projection=PROJ_LATLONG;
break;
case 'm':
projection=PROJ_SPHERE_MERC;
break;
case 'M':
projection=PROJ_MERC;
break;
case 'E':
projection=-atoi(optarg);
break;
case 'p':
prefix=optarg;
break;
case 'd':
db=optarg;
break;
case 'C':
cache = atoi(optarg);
break;
case 'U':
username=optarg;
break;
case 'W':
pass_prompt=1;
break;
case 'H':
host=optarg;
break;
case 'P':
port=optarg;
break;
case 'S':
style=optarg;
break;
case 'i':
tblsindex=optarg;
break;
case 'e':
expire_tiles_zoom_min = atoi(optarg);
temparg = strchr(optarg, '-');
if (temparg) expire_tiles_zoom = atoi(temparg + 1);
if (expire_tiles_zoom < expire_tiles_zoom_min) expire_tiles_zoom = expire_tiles_zoom_min;
break;
case 'o':
expire_tiles_filename=optarg;
break;
case 'O':
output_backend = optarg;
break;
case 'x':
osmdata.extra_attributes=1;
break;
case 'k':
enable_hstore=1;
break;
case 'z':
n_hstore_columns++;
hstore_columns = (const char**)realloc(hstore_columns, sizeof(&n_hstore_columns) * n_hstore_columns);
hstore_columns[n_hstore_columns-1] = optarg;
break;
case 'G':
enable_multi=1;
break;
case 'r':
input_reader = optarg;
break;
case 'h':
long_usage_bool=1;
break;
case 'V':
exit(EXIT_SUCCESS);
case '?':
default:
short_usage(argv[0]);
exit(EXIT_FAILURE);
}
}
if (long_usage_bool) {
long_usage(argv[0]);
exit(EXIT_SUCCESS);
}
if (argc == optind) { // No non-switch arguments
short_usage(argv[0]);
exit(EXIT_FAILURE);
}
if (append && create) {
fprintf(stderr, "Error: --append and --create options can not be used at the same time!\n");
exit(EXIT_FAILURE);
}
if( cache < 0 ) cache = 0;
if (pass_prompt)
password = simple_prompt("Password:"******"PGPASS");
}
conninfo = build_conninfo(db, username, password, host, port);
sql_conn = PQconnectdb(conninfo);
if (PQstatus(sql_conn) != CONNECTION_OK) {
fprintf(stderr, "Connection to database failed: %s\n", PQerrorMessage(sql_conn));
exit(EXIT_FAILURE);
}
PQfinish(sql_conn);
text_init();
initList(&osmdata.tags);
osmdata.count_node = osmdata.max_node = 0;
osmdata.count_way = osmdata.max_way = 0;
osmdata.count_rel = osmdata.max_rel = 0;
LIBXML_TEST_VERSION
project_init(projection);
fprintf(stderr, "Using projection SRS %d (%s)\n",
project_getprojinfo()->srs, project_getprojinfo()->descr );
if (parse_bbox(&osmdata))
return 1;
options.conninfo = conninfo;
options.prefix = prefix;
options.append = append;
options.slim = slim;
options.projection = project_getprojinfo()->srs;
options.scale = (projection==PROJ_LATLONG)?10000000:100;
options.mid = slim ? &mid_pgsql : &mid_ram;
options.cache = cache;
options.style = style;
options.tblsindex = tblsindex;
options.expire_tiles_zoom = expire_tiles_zoom;
options.expire_tiles_zoom_min = expire_tiles_zoom_min;
options.expire_tiles_filename = expire_tiles_filename;
options.enable_multi = enable_multi;
options.enable_hstore = enable_hstore;
options.hstore_columns = hstore_columns;
options.n_hstore_columns = n_hstore_columns;
if (strcmp("pgsql", output_backend) == 0) {
osmdata.out = &out_pgsql;
} else if (strcmp("gazetteer", output_backend) == 0) {
osmdata.out = &out_gazetteer;
} else if (strcmp("null", output_backend) == 0) {
osmdata.out = &out_null;
} else {
fprintf(stderr, "Output backend `%s' not recognised. Should be one of [pgsql, gazetteer, null].\n", output_backend);
exit(EXIT_FAILURE);
}
if (strcmp("auto", input_reader) != 0) {
if (strcmp("libxml2", input_reader) == 0) {
streamFile = &streamFileXML2;
} else if (strcmp("primitive", input_reader) == 0) {
streamFile = &streamFilePrimitive;
#ifdef BUILD_READER_PBF
} else if (strcmp("pbf", input_reader) == 0) {
streamFile = &streamFilePbf;
#endif
} else {
fprintf(stderr, "Input parser `%s' not recognised. Should be one of [libxml2, primitive"
#ifdef BUILD_READER_PBF
", pbf"
#endif
"].\n", input_reader);
exit(EXIT_FAILURE);
}
}
osmdata.out->start(&options);
realloc_nodes(&osmdata);
realloc_members(&osmdata);
if (sizeof(int*) == 4 && options.slim != 1) {
fprintf(stderr, "\n!! You are running this on 32bit system, so at most\n");
fprintf(stderr, "!! 3GB of RAM can be used. If you encounter unexpected\n");
fprintf(stderr, "!! exceptions during import, you should try running in slim\n");
fprintf(stderr, "!! mode using parameter -s.\n");
}
while (optind < argc) {
/* if input_reader is not forced by -r switch try to auto-detect it
by file extension */
if (strcmp("auto", input_reader) == 0) {
#ifdef BUILD_READER_PBF
if (strcasecmp(".pbf",argv[optind]+strlen(argv[optind])-4) == 0) {
streamFile = &streamFilePbf;
} else {
streamFile = &streamFileXML2;
}
#else
streamFile = &streamFileXML2;
#endif
}
time_t start, end;
fprintf(stderr, "\nReading in file: %s\n", argv[optind]);
time(&start);
if (streamFile(argv[optind], sanitize, &osmdata) != 0)
exit_nicely();
time(&end);
fprintf(stderr, " parse time: %ds\n", (int)(end - start));
optind++;
}
xmlCleanupParser();
xmlMemoryDump();
if (osmdata.count_node || osmdata.count_way || osmdata.count_rel) {
fprintf(stderr, "\n");
fprintf(stderr, "Node stats: total(%d), max(%d)\n", osmdata.count_node, osmdata.max_node);
fprintf(stderr, "Way stats: total(%d), max(%d)\n", osmdata.count_way, osmdata.max_way);
fprintf(stderr, "Relation stats: total(%d), max(%d)\n", osmdata.count_rel, osmdata.max_rel);
}
osmdata.out->stop();
free(osmdata.nds);
free(osmdata.members);
// free the column pointer buffer
free(hstore_columns);
project_exit();
text_exit();
fprintf(stderr, "\n");
return 0;
}
int main(
int argc,
char *argv[])
{
char *fnames[32];
int nr_files = 0;
FILE *obj = NULL;
TEXT_RLD tr;
char *objname = NULL;
char *lstname = NULL;
int arg;
int i;
STACK stack;
int errcount;
if (argc <= 1) {
print_help();
exit(EXIT_FAILURE);
}
for (arg = 1; arg < argc; arg++)
if (*argv[arg] == '-') {
char *cp;
cp = argv[arg] + 1;
if (!stricmp(cp, "h")) {
print_help();
} else if (!stricmp(cp, "v")) {
print_version(stderr);
} else if (!stricmp(cp, "e")) {
/* Followed by options to enable */
/* Since /SHOW and /ENABL option names don't overlap,
I consolidate. */
if(arg >= argc-1 || !isalpha((unsigned char)*argv[arg+1])) {
usage("-e must be followed by an option to enable\n");
}
upcase(argv[++arg]);
enable_tf(argv[arg], 1);
} else if (!stricmp(cp, "d")) {
/* Followed by an option to disable */
if(arg >= argc-1 || !isalpha((unsigned char)*argv[arg+1])) {
usage("-d must be followed by an option to disable\n");
}
upcase(argv[++arg]);
enable_tf(argv[arg], 0);
} else if (!stricmp(cp, "m")) {
/* Macro library */
/* This option gives the name of an RT-11 compatible
macro library from which .MCALLed macros can be
found. */
if(arg >= argc-1 || *argv[arg+1] == '-') {
usage("-m must be followed by a macro library file name\n");
}
arg++;
int allow_olb = strcmp(argv[argc-1], "-x") == 0;
mlbs[nr_mlbs] = mlb_open(argv[arg], allow_olb);
if (mlbs[nr_mlbs] == NULL) {
fprintf(stderr, "Unable to register macro library %s\n", argv[arg]);
exit(EXIT_FAILURE);
}
nr_mlbs++;
} else if (!stricmp(cp, "p")) {
/* P for search path */
/* The -p option gives the name of a directory in
which .MCALLed macros may be found. */ {
if(arg >= argc-1 || *argv[arg+1] == '-') {
usage("-p must be followed by a macro search directory\n");
}
append_env("MCALL", argv[arg+1]);
arg++;
}
} else if (!stricmp(cp, "I")) {
/* I for include path */
/* The -I option gives the name of a directory in
which .included files may be found. */ {
if(arg >= argc-1 || *argv[arg+1] == '-') {
usage("-I must be followed by a include file search directory\n");
}
append_env("INCLUDE", argv[arg+1]);
arg++;
}
} else if (!stricmp(cp, "o")) {
/* The -o option gives the object file name (.OBJ) */
if(arg >= argc-1 || *argv[arg+1] == '-') {
usage("-o must be followed by the object file name\n");
}
++arg;
objname = argv[arg];
} else if (!stricmp(cp, "l")) {
/* The option -l gives the listing file name (.LST) */
/* -l - enables listing to stdout. */
if(arg >= argc-1 ||
(argv[arg+1][0] == '-' && argv[arg+1][1] != '\0')) {
usage("-l must be followed by the listing file name (- for standard output)\n");
}
lstname = argv[++arg];
if (strcmp(lstname, "-") == 0)
lstfile = stdout;
else
lstfile = fopen(lstname, "w");
} else if (!stricmp(cp, "x")) {
/* The -x option invokes macro11 to expand the
contents of the registered macro libraries (see -m)
into individual .MAC files in the current
directory. No assembly of input is done. This
must be the last command line option. */
int m;
if(arg != argc-1) {
usage("-x must be the last option\n");
}
for (m = 0; m < nr_mlbs; m++)
mlb_extract(mlbs[m]);
return EXIT_SUCCESS;
} else if (!stricmp(cp, "ysl")) {
/* set symbol_len */
if (arg >= argc-1) {
usage("-s must be followed by a number\n");
} else {
char *s = argv[++arg];
char *endp;
int sl = strtol(s, &endp, 10);
if (*endp || sl < SYMMAX_DEFAULT || sl > SYMMAX_MAX) {
usage("-s must be followed by a number\n");
}
symbol_len = sl;
}
} else if (!stricmp(cp, "yus")) {
/* allow underscores */
symbol_allow_underscores = 1;
} else if (!stricmp(cp, "yl1")) {
/* list the first pass, in addition to the second */
list_pass_0++;
} else if (!stricmp(cp, "yd")) {
enabl_debug++;
} else {
fprintf(stderr, "Unknown option %s\n", argv[arg]);
print_help();
exit(EXIT_FAILURE);
}
} else {
fnames[nr_files++] = argv[arg];
}
if (objname) {
obj = fopen(objname, "wb");
if (obj == NULL)
return EXIT_FAILURE;
}
add_symbols(&blank_section);
text_init(&tr, NULL, 0);
module_name = memcheck(strdup(".MAIN."));
xfer_address = new_ex_lit(1); /* The undefined transfer address */
stack_init(&stack);
/* Push the files onto the input stream in reverse order */
for (i = nr_files - 1; i >= 0; --i) {
STREAM *str = new_file_stream(fnames[i]);
if (str == NULL) {
report(NULL, "Unable to open file %s\n", fnames[i]);
exit(EXIT_FAILURE);
}
stack_push(&stack, str);
}
DOT = 0;
current_pc->section = &blank_section;
last_dot_section = NULL;
pass = 0;
stmtno = 0;
lsb = 0;
next_lsb = 1;
lsb_used = 0;
last_macro_lsb = -1;
last_locsym = 32767;
last_cond = -1;
sect_sp = -1;
suppressed = 0;
assemble_stack(&stack, &tr);
if (list_pass_0 && lstfile) {
list_symbol_table();
}
#if 0
if (enabl_debug > 1)
dump_all_macros();
#endif
assert(stack.top == NULL);
migrate_implicit(); /* Migrate the implicit globals */
write_globals(obj); /* Write the global symbol dictionary */
#if 0
sym_hist(&symbol_st, "symbol_st"); /* Draw a symbol table histogram */
#endif
text_init(&tr, obj, 0);
stack_init(&stack); /* Superfluous... */
/* Re-push the files onto the input stream in reverse order */
for (i = nr_files - 1; i >= 0; --i) {
STREAM *str = new_file_stream(fnames[i]);
if (str == NULL) {
report(NULL, "Unable to open file %s\n", fnames[i]);
exit(EXIT_FAILURE);
}
stack_push(&stack, str);
}
DOT = 0;
current_pc->section = &blank_section;
last_dot_section = NULL;
pass = 1;
stmtno = 0;
lsb = 0;
next_lsb = 1;
lsb_used = 0;
last_macro_lsb = -1;
last_locsym = 32767;
pop_cond(-1);
sect_sp = -1;
suppressed = 0;
errcount = assemble_stack(&stack, &tr);
text_flush(&tr);
while (last_cond >= 0) {
report(NULL, "%s:%d: Unterminated conditional\n", conds[last_cond].file, conds[last_cond].line);
pop_cond(last_cond - 1);
errcount++;
}
for (i = 0; i < nr_mlbs; i++)
mlb_close(mlbs[i]);
write_endmod(obj);
if (obj != NULL)
fclose(obj);
if (errcount > 0)
fprintf(stderr, "%d Errors\n", errcount);
if (lstfile) {
list_symbol_table();
}
if (lstfile && strcmp(lstname, "-") != 0)
fclose(lstfile);
return errcount > 0 ? EXIT_FAILURE : EXIT_SUCCESS;
}
/**
* @brief ui_loop_ggs
*
* GGS main loop. Here the input from both the user and
* GGS server is interpreted.
*
* @param ui User Interface.
*/
void ui_loop_ggs(UI *ui) {
char *cmd = NULL, *param = NULL;
Text text[1];
GGSClient *client = ui->ggs;
ui->mode = 3;
text_init(text);
for (;;) {
relax(10);
/* look for a user event */
if (ui_event_peek(ui, &cmd, ¶m)) {
/* stop the search */
if (strcmp(cmd, "stop") == 0) {
if (ui->play[0].state == IS_THINKING) play_stop(ui->play);
else if (ui->play[1].state == IS_THINKING) play_stop(ui->play + 1);
/* repeat a cmd <n> times */
} else if (strcmp(cmd, "loop") == 0) {
free(client->loop->cmd);
errno = 0;
client->loop->cmd = string_duplicate(parse_int(param, &client->loop->i));
if (errno) client->loop->i = 100;
if (client->loop->i > 0) {
info("<loop %d>\n", client->loop->i);
--client->loop->i;
ggs_client_send(client, "%s\n", client->loop->cmd);
}
/* exit from ggs */
} else if (strcmp(cmd, "quit") == 0 || strcmp(cmd, "q") == 0) {
ggs_client_send(client, "tell .%s Bye bye!\n", client->me);
ggs_client_send(client, "quit\n");
free(cmd); free(param);
return;
/* send the command to ggs */
} else {
ggs_client_send(client, "%s %s\n", cmd, param);
}
}
/* stay on line... */
ggs_client_refresh(client);
/* look for a ggs event */
if (!ggs_event_peek(&client->event, text)) {
continue;
}
text_print(text, stdout);
if (ggs_log->f) text_print(text, ggs_log->f);
/* login */
if (ggs_login(text)) {
ggs_client_send(client, "%s\n", options.ggs_login);
/* password */
} else if (ggs_password(text)) {
ggs_client_send(client, "%s\n", options.ggs_password);
ggs_client_send(client, "vt100 -\n");
ggs_client_send(client, "bell -t -tc -tg -n -nc -ng -ni -nn\n");
ggs_client_send(client, "verbose -news -faq -help -ack\n");
ggs_client_send(client, "chann %%\n");
ggs_client_send(client, "chann + .chat\n");
ggs_client_send(client, "chann + .%s\n", client->me);
ggs_client_send(client, "tell .%s Hello!\n", client->me);
/* os on */
} else if (ggs_os_on(text)) {
printf("[received GGS_OS_ON]\n");
ggs_client_send(client, "tell /os trust +\n" );
ggs_client_send(client, "tell /os rated +\n" );
ggs_client_send(client, "tell /os request +\n" );
ggs_client_send(client, "tell /os client -\n" );
ggs_client_send(client, "tell /os open %d\n", options.ggs_open);
ggs_client_send(client, "mso\n" );
/* os off */
} else if (ggs_os_off(text)) {
printf("[received GGS_OS_OFF]\n");
/* match on */
} else if (ggs_match_on(client->match_on, text)) {
if (ggs_has_player(client->match_on->player, client->me)) {
printf("[received GGS_MATCH_ON]\n");
client->is_playing = true;
ggs_client_send(client, "tell /os open 0\n" );
} else {
printf("[received GGS_WATCH_ON]\n");
}
/* match off */
} else if (ggs_match_off(client->match_off, text)) {
if (ggs_has_player(client->match_off->player, client->me)) {
printf("[received GGS_MATCH_OFF]\n");
if (!client->match_on->match_type->is_rand) {
if (client->match_on->match_type->is_synchro) {
printf("[store match #1]\n");
play_store(ui->play);
printf("[store match #2]\n");
play_store(ui->play + 1);
} else {
printf("[store match]\n");
play_store(ui->play);
}
if (ui->book->need_saving) {
book_save(ui->book, options.book_file);
ui->book->need_saving = false;
}
}
client->is_playing = false;
ggs_client_send(client, "tell /os open %d\n", options.ggs_open);
if (client->loop->i > 0) {
info("<loop %d>\n", client->loop->i);
--client->loop->i;
client->loop->delay = 10000 + real_clock(); // wait 10 sec.
}
} else {
printf("[received GGS_WATCH_OFF]\n");
}
/* board join/update */
} else if (ggs_board(client->board, text)) {
if (ggs_has_player(client->board->player, client->me)) {
if (client->board->is_join) ui_ggs_join(ui);
else ui_ggs_update(ui);
} else {
printf("[received GGS_WATCH_BOARD]\n");
}
/* request */
} else if (ggs_request(client->request, text)) {
printf("[received GGS_REQUEST]\n");
/* admin on */
} else if (ggs_admin(client->admin, text)) {
printf("[received GGS_ADMIN_CMD]\n");
ggs_client_send(client, client->admin->command);
ggs_client_send(client, "\ntell %s command processed\n", client->admin->name);
/* To request Saio a game later */
} else if (ggs_saio_delay(text, &client->once->delay)) {
printf("[received GGS_SAIO_DELAY]\n");
free(client->once->cmd); client->once->cmd = NULL;
if (cmd != NULL && param != NULL) {
if (strcmp(cmd, "loop") == 0) {
client->once->cmd = string_duplicate(client->loop->cmd);
} else {
client->once->cmd = (char*) malloc(strlen(cmd) + strlen(param) + 3);
sprintf(client->once->cmd, "%s %s\n", cmd, param);
}
printf("[received GGS_SAIO_DELAY, retry request in %.1f s]\n", 0.001 * (client->once->delay - real_clock()));
} else {
client->once->delay = 0;
}
/* READY */
} else if (ggs_ready(text)) {
/* ALERT */
} else if (ggs_alert(text)) {
printf("[received ALERT]\n");
/* Other messages */
} else {
}
text_free(text);
}
}
int main(int argc, char *argv[])
{
clock_t rdp_finish_time, rdp_start_time = clock();
int
rdp_symbol_statistics = 0, /* show symbol_ table statistics flag */
rdp_line_echo_all = 0, /* make a listing on all passes flag */
rdp_filter = 0, /* filter flag */
rdp_line_echo = 0, /* make listing flag */
rdp_lexicalise = 0; /* print lexicalised output flag */
unsigned long rdp_textsize = 35000l; /* size of scanner text array */
unsigned long rdp_tabwidth = 8l; /* tab expansion width */
char* rdp_vcg_filename = NULL; /* filename for -V option */
arg_message("rdparser\n" RDP_STAMP "\n\n""Usage: regex [options] source");
arg_message("");
arg_boolean('f', "Filter mode (read from stdin and write to stdout)", &rdp_filter);
arg_boolean('l', "Make a listing", &rdp_line_echo);
arg_boolean('L', "Print lexicalised source file", &rdp_lexicalise);
arg_string ('o', "Write output to filename", &rdp_outputfilename);
arg_boolean('s', "Echo each scanner symbol as it is read", &rdp_symbol_echo);
arg_boolean('S', "Print summary symbol table statistics", &rdp_symbol_statistics);
arg_numeric('t', "Tab expansion width (default 8)", &rdp_tabwidth);
arg_numeric('T', "Text buffer size in bytes for scanner (default 20000)", &rdp_textsize);
arg_boolean('v', "Set verbose mode", &rdp_verbose);
arg_string ('V', "Write derivation tree to filename in VCG format", &rdp_vcg_filename);
rdp_sourcefilenames = arg_process(argc, argv);
/* Fix up filetypes */
for (rdp_sourcefilenumber = 0; rdp_sourcefilenames[rdp_sourcefilenumber] != NULL; rdp_sourcefilenumber++)
rdp_sourcefilenames[rdp_sourcefilenumber] = text_default_filetype(rdp_sourcefilenames[rdp_sourcefilenumber], "");
if (rdp_filter)
{
rdp_sourcefilenames[0] = "-";
rdp_outputfilename = "-";
rdp_sourcefilenames[1] = NULL; /* make sure no further filenames are taken from the array */
}
if ((rdp_sourcefilename = rdp_sourcefilenames[0]) == NULL)
arg_help("no source files specified");
if (rdp_sourcefilenames[1] != NULL)
text_message(TEXT_FATAL, "multiple source files not allowed\n");
text_init(rdp_textsize, 25, 100, (int) rdp_tabwidth);
scan_init(0, 0, 0, rdp_symbol_echo, rdp_tokens);
if (rdp_lexicalise)
scan_lexicalise();
rdp_set_initialise();
rdp_load_keywords();
if (rdp_verbose)
text_printf("\nrdparser\n" RDP_STAMP "\n\n");
for (rdp_pass = 1; rdp_pass <= RDP_PASSES; rdp_pass++)
{
text_echo(rdp_line_echo_all || (rdp_line_echo && rdp_pass == RDP_PASSES));
for (rdp_sourcefilenumber = 0; (rdp_sourcefilename = rdp_sourcefilenames[rdp_sourcefilenumber]) != NULL; rdp_sourcefilenumber++)
{
if (text_open(rdp_sourcefilename) == NULL)
arg_help("unable to open source file");
text_get_char();
scan_();
reg(); /* call parser at top level */
if (text_total_errors() != 0)
text_message(TEXT_FATAL, "error%s detected in source file ''\n", text_total_errors() == 1 ? "" : "s", rdp_sourcefilename); /* crash quietly */
}
}
rdp_sourcefilename = rdp_sourcefilenames[0]; /* Reset filename to first file in the list */
if (rdp_symbol_statistics)
{
symbol_print_all_table_statistics(11);
symbol_print_all_table();
}
text_print_total_errors();
if (rdp_verbose)
{
rdp_finish_time = clock();
text_message(TEXT_INFO, "%.3f CPU seconds used\n", ((double) (rdp_finish_time-rdp_start_time)) / CLOCKS_PER_SEC);
}
return rdp_error_return;
}
int os_main(int argc, char* argv[])
{
adv_crtc_container selected;
adv_crtc_container_iterator i;
const char* opt_rc;
adv_bool opt_log;
adv_bool opt_logsync;
int j;
adv_error res;
char* section_map[1];
char buffer[1024];
opt_rc = 0;
opt_log = 0;
opt_logsync = 0;
the_advance = advance_mame;
the_sound_flag = 1;
the_config = conf_init();
if (os_init(the_config)!=0) {
target_err("Error initializing the OS support.\n");
goto err_conf;
}
video_reg(the_config, 1);
monitor_register(the_config);
crtc_container_register(the_config);
generate_interpolate_register(the_config);
gtf_register(the_config);
inputb_reg(the_config, 1);
inputb_reg_driver_all(the_config);
/* MSDOS requires a special driver sub set */
#ifndef __MSDOS__
video_reg_driver_all(the_config);
#endif
if (conf_input_args_load(the_config, 1, "", &argc, argv, error_callback, 0) != 0)
goto err_os;
for(j=1;j<argc;++j) {
if (target_option_compare(argv[j], "rc") && j+1<argc) {
opt_rc = argv[++j];
} else if (target_option_compare(argv[j], "log")) {
opt_log = 1;
} else if (target_option_compare(argv[j], "logsync")) {
opt_logsync = 1;
} else if (target_option_compare(argv[j], "nosound")) {
the_sound_flag = 0;
} else if (target_option_compare(argv[j], "advmamev")) {
the_advance = advance_mame;
} else if (target_option_compare(argv[j], "advmessv")) {
the_advance = advance_mess;
} else if (target_option_compare(argv[j], "advpacv")) {
the_advance = advance_pac;
} else if (target_option_compare(argv[j], "advmenuv")) {
the_advance = advance_menu;
#ifdef __MSDOS__
} else if (target_option_compare(argv[j], "vgav")) {
the_advance = advance_vga;
} else if (target_option_compare(argv[j], "vbev")) {
the_advance = advance_vbe;
#endif
#ifdef __WIN32__
} else if (target_option_compare(argv[j], "videowv")) {
the_advance = advance_videow;
#endif
} else {
target_err("Unknown option %s\n", argv[j]);
goto err;
}
}
#ifdef __MSDOS__
/* WARNING the MSDOS drivers are registered after the command line management. */
/* It implyes that you cannot specify any driver options on the command line */
msdos_rut();
if (the_advance == advance_vga) {
if (the_advance_vga_active) {
target_err("The AdvanceVGA utility is active. Disable it before running vgav.\n");
goto err;
}
video_reg_driver(the_config, &video_vgaline_driver);
} else if (the_advance == advance_vbe) {
if (the_advance_vbe_active) {
target_err("The AdvanceVBE utility is active. Disable it before running vbev.\n");
goto err;
}
video_reg_driver(the_config, &video_vbeline_driver);
video_reg_driver(the_config, &video_vgaline_driver); /* for the text modes */
} else {
video_reg_driver_all(the_config);
}
#endif
if (!opt_rc) {
switch (the_advance) {
case advance_vbe : opt_rc = "vbe.rc"; break;
case advance_vga : opt_rc = "vga.rc"; break;
case advance_menu : opt_rc = file_config_file_home("advmenu.rc"); break;
case advance_mame : opt_rc = file_config_file_home("advmame.rc"); break;
case advance_mess : opt_rc = file_config_file_home("advmess.rc"); break;
case advance_pac : opt_rc = file_config_file_home("advpac.rc"); break;
case advance_videow : opt_rc = file_config_file_home("videow.rc"); break;
default : opt_rc = "advv.rc"; break;
}
}
if (access(opt_rc, R_OK)!=0) {
target_err("Configuration file %s not found.\n", opt_rc);
goto err_os;
}
if (conf_input_file_load_adv(the_config, 0, opt_rc, opt_rc, 1, 1, STANDARD, sizeof(STANDARD)/sizeof(STANDARD[0]), error_callback, 0) != 0)
goto err_os;
if (opt_log || opt_logsync) {
const char* log = "advv.log";
remove(log);
log_init(log, opt_logsync);
}
log_std(("v: %s %s\n", __DATE__, __TIME__));
section_map[0] = "";
conf_section_set(the_config, section_map, 1);
if (video_load(the_config, "") != 0) {
target_err("Error loading the video options from the configuration file %s.\n", opt_rc);
target_err("%s\n", error_get());
goto err_os;
}
if (inputb_load(the_config) != 0) {
target_err("%s\n", error_get());
goto err_os;
}
/* NOTE: After this command all the target_err() string must */
/* have \n\r at the end to ensure correct newline in graphics mode. */
if (os_inner_init("AdvanceVIDEO") != 0) {
goto err_os;
}
if (adv_video_init() != 0) {
target_err("%s\n\r", error_get());
troubleshotting();
goto err_os_inner;
}
if (video_blit_init() != 0) {
target_err("%s\n\r", error_get());
goto err_video;
}
if (the_advance != advance_vbe && the_advance != advance_vga) {
if ((video_mode_generate_driver_flags(VIDEO_DRIVER_FLAGS_MODE_GRAPH_MASK, 0) & VIDEO_DRIVER_FLAGS_PROGRAMMABLE_CLOCK) == 0) {
target_err("No active video driver is able to program your video board.\n\r");
troubleshotting();
goto err_blit;
}
}
if (inputb_init() != 0) {
target_err("%s\n\r", error_get());
goto err_blit;
}
if (monitor_load(the_config, &the_monitor) != 0) {
target_err("Error loading the clock options from the configuration file %s.\n\r", opt_rc);
target_err("%s\n\r", error_get());
goto err_input;
}
monitor_print(buffer, sizeof(buffer), &the_monitor);
log_std(("v: clock %s\n", buffer));
/* load generate_linear config */
res = generate_interpolate_load(the_config, &the_interpolate);
if (res<0) {
target_err("Error loading the format options from the configuration file %s.\n\r", opt_rc);
target_err("%s\n\r", error_get());
goto err_input;
}
if (res>0) {
generate_default_vga(&the_interpolate.map[0].gen);
the_interpolate.map[0].hclock = 31500;
the_interpolate.mac = 1;
}
/* load generate_linear config */
res = gtf_load(the_config, &the_gtf);
if (res<0) {
target_err("Error loading the gtf options from the configuration file %s.\n\r", opt_rc);
target_err("%s\n\r", error_get());
goto err_input;
}
if (res>0) {
gtf_default_vga(&the_gtf);
}
/* all mode */
crtc_container_init(&selected);
/* insert modes */
crtc_container_insert_default_all(&selected);
/* sort */
crtc_container_init(&the_modes);
for(crtc_container_iterator_begin(&i, &selected);!crtc_container_iterator_is_end(&i);crtc_container_iterator_next(&i)) {
adv_crtc* crtc = crtc_container_iterator_get(&i);
crtc_container_insert_sort(&the_modes, crtc, crtc_compare);
}
crtc_container_done(&selected);
/* load selected */
crtc_container_init(&selected);
if (crtc_container_load(the_config, &selected) != 0) {
target_err("%s\n\r", error_get());
goto err_input;
}
/* union set */
for(crtc_container_iterator_begin(&i, &selected);!crtc_container_iterator_is_end(&i);crtc_container_iterator_next(&i)) {
adv_crtc* crtc = crtc_container_iterator_get(&i);
adv_bool has = crtc_container_has(&the_modes, crtc, crtc_compare) != 0;
if (has)
crtc_container_remove(&the_modes, crtc_select_by_compare, crtc);
crtc->user_flags |= MODE_FLAGS_USER_BIT0;
crtc_container_insert_sort(&the_modes, crtc, crtc_compare);
}
crtc_container_done(&selected);
the_modes_modified = 0;
if (text_init(&the_modes, &the_monitor) != 0) {
goto err_input;
}
if (inputb_enable(0) != 0) {
goto err_text;
}
sound_signal();
menu_run();
log_std(("v: shutdown\n"));
inputb_disable();
text_done();
crtc_container_done(&the_modes);
inputb_done();
video_blit_done();
adv_video_done();
os_inner_done();
log_std(("v: the end\n"));
if (opt_log || opt_logsync) {
log_done();
}
os_done();
conf_save(the_config, 0, 0, error_callback, 0);
conf_done(the_config);
return EXIT_SUCCESS;
err_text:
text_done();
err_input:
inputb_done();
err_blit:
video_blit_done();
err_video:
adv_video_done();
err_os_inner:
os_inner_done();
err_os:
if (opt_log || opt_logsync) {
log_done();
}
os_done();
err_conf:
conf_done(the_config);
err:
return EXIT_FAILURE;
}
