10 void regscr_testa(void);
11 void regscr_testb(void);
13 static void proc_screen_script(struct demoscreen *scr, struct ts_node *node);
14 static void proc_track(struct ts_node *node, const char *pname);
15 static long io_read(void *buf, size_t bytes, void *uptr);
16 static void del_rbnode(struct rbnode *node, void *cls);
19 int dsys_init(const char *fname)
22 struct ts_io io = {0};
23 struct ts_node *ts, *tsnode;
24 struct demoscreen *scr;
26 memset(&dsys, 0, sizeof dsys);
27 if(!(dsys.trackmap = rb_create(RB_KEY_STRING))) {
30 rb_set_delete_func(dsys.trackmap, del_rbnode, 0);
32 dsys.track = darr_alloc(0, sizeof *dsys.track);
33 dsys.value = darr_alloc(0, sizeof *dsys.value);
38 for(i=0; i<dsys.num_screens; i++) {
39 if(dsys.screens[i]->init() == -1) {
40 fprintf(stderr, "failed to initialize demo screen: %s\n", dsys.screens[i]->name);
45 if(!fname || !(io.data = ass_fopen(fname, "rb"))) {
46 dsys_run_screen(dsys.screens[0]);
51 if(!(ts = ts_load_io(&io)) || strcmp(ts->name, "demo") != 0) {
53 fprintf(stderr, "failed to read demoscript\n");
57 tsnode = ts->child_list;
59 if(strcmp(tsnode->name, "screen") == 0 &&
60 (scr = dsys_find_screen(ts_get_attr_str(tsnode, "name", 0)))) {
61 proc_screen_script(scr, tsnode);
63 } else if(strcmp(tsnode->name, "track") == 0) {
64 proc_track(tsnode, 0);
66 tsnode = tsnode->next;
73 static void proc_screen_script(struct demoscreen *scr, struct ts_node *node)
79 attr = node->attr_list;
81 if(sscanf(attr->name, "key_%ld", &tm) == 1 && attr->val.type == TS_NUMBER) {
82 anm_set_value(&scr->track, tm, attr->val.fnum);
87 sub = node->child_list;
89 if(strcmp(sub->name, "track") == 0) {
90 proc_track(sub, scr->name);
96 static void proc_track(struct ts_node *node, const char *pname)
102 struct anm_track *trk;
104 if(!(name = (char*)ts_get_attr_str(node, "name", 0))) {
108 buf = alloca(strlen(name) + strlen(pname) + 2);
109 sprintf(buf, "%s.%s", pname, name);
113 if((tidx = dsys_add_track(name)) == -1) {
116 trk = dsys.track + tidx;
118 attr = node->attr_list;
120 if(sscanf(attr->name, "key_%ld", &tm) == 1 && attr->val.type == TS_NUMBER) {
121 anm_set_value(trk, tm, attr->val.fnum);
127 static long io_read(void *buf, size_t bytes, void *uptr)
129 return ass_fread(buf, 1, bytes, uptr);
133 void dsys_destroy(void)
137 for(i=0; i<dsys.num_screens; i++) {
138 anm_destroy_track(&dsys.screens[i]->track);
139 if(dsys.screens[i]->destroy) {
140 dsys.screens[i]->destroy();
143 dsys.num_screens = 0;
145 darr_free(dsys.track);
146 darr_free(dsys.value);
147 rb_free(dsys.trackmap);
150 void dsys_update(void)
152 int i, j, sort_needed = 0;
153 struct demoscreen *scr;
155 dsys.tmsec = time_msec;
158 for(i=0; i<dsys.num_screens; i++) {
159 scr = dsys.screens[i];
160 scr->vis = anm_get_value(&scr->track, dsys.tmsec);
162 if(scr->vis > 0.0f) {
164 if(scr->start) scr->start();
167 if(scr->update) scr->update(dsys.tmsec);
169 if(dsys.num_act && scr->prio != dsys.act[dsys.num_act - 1]->prio) {
172 dsys.act[dsys.num_act++] = scr;
175 if(scr->stop) scr->stop();
182 for(i=0; i<dsys.num_act; i++) {
183 for(j=i+1; j<dsys.num_act; j++) {
184 if(dsys.act[j]->prio > dsys.act[j - 1]->prio) {
185 void *tmp = dsys.act[j];
186 dsys.act[j] = dsys.act[j - 1];
187 dsys.act[j - 1] = tmp;
193 /* evaluate tracks */
194 for(i=0; i<dsys.num_tracks; i++) {
195 dsys.value[i] = anm_get_value(dsys.track + i, dsys.tmsec);
199 /* TODO: do something about draw ordering of the active screens */
203 for(i=0; i<dsys.num_act; i++) {
216 void dsys_seek_abs(long tm)
220 void dsys_seek_rel(long dt)
224 void dsys_seek_norm(float t)
229 struct demoscreen *dsys_find_screen(const char *name)
235 for(i=0; i<dsys.num_screens; i++) {
236 if(strcmp(dsys.screens[i]->name, name) == 0) {
237 return dsys.screens[i];
243 void dsys_run_screen(struct demoscreen *scr)
248 if(dsys.num_act == 1 && dsys.act[0] == scr) return;
250 for(i=0; i<dsys.num_act; i++) {
251 if(dsys.act[i]->stop) dsys.act[i]->stop();
252 dsys.act[i]->active = 0;
258 if(scr->start) scr->start();
263 int dsys_add_screen(struct demoscreen *scr)
265 if(!scr->name || !scr->init || !scr->draw) {
266 fprintf(stderr, "dsys_add_screen: invalid screen\n");
269 if(anm_init_track(&scr->track) == -1) {
270 fprintf(stderr, "dsys_add_screen: failed to initialize keyframe track\n");
273 anm_set_track_interpolator(&scr->track, ANM_INTERP_LINEAR);
274 anm_set_track_extrapolator(&scr->track, ANM_EXTRAP_CLAMP);
275 anm_set_track_default(&scr->track, 0);
277 dsys.screens[dsys.num_screens++] = scr;
281 int dsys_add_track(const char *name)
283 struct anm_track trk;
286 if(rb_find(dsys.trackmap, (char*)name)) {
287 fprintf(stderr, "ignoring duplicate track: %s\n", name);
291 idx = darr_size(dsys.track);
292 darr_push(dsys.track, &trk);
293 darr_pushf(dsys.value, 0);
295 anm_init_track(dsys.track + idx);
297 if(rb_insert(dsys.trackmap, (char*)strdup_nf(name), (void*)(intptr_t)idx) == -1) {
298 fprintf(stderr, "failed to insert to track map: %s\n", name);
301 dsys.num_tracks = idx + 1;
305 int dsys_find_track(const char *name)
307 struct rbnode *n = rb_find(dsys.trackmap, (char*)name);
310 return (intptr_t)n->data;
313 float dsys_value(const char *name)
315 int idx = dsys_find_track(name);
316 return idx == -1 ? 0.0f : dsys.value[idx];
319 static void del_rbnode(struct rbnode *node, void *cls)