[ViewVC] Diff of: cvs/deliantra/Deliantra-Client/Client.xs

Comparing deliantra/Deliantra-Client/Client.xs (file contents):
Revision 1.204 by root, Thu Jul 19 14:54:50 2007 UTC vs.
Revision 1.209 by root, Sat Jul 21 22:54:52 2007 UTC

…		…
432	}	432	}
433		433
434	/* SDL should provide this, really. */	434	/* SDL should provide this, really. */
435	#define SDLK_MODIFIER_MIN 300	435	#define SDLK_MODIFIER_MIN 300
436	#define SDLK_MODIFIER_MAX 314	436	#define SDLK_MODIFIER_MAX 314
		437
		438	/******************************************************************************/
		439
		440	static GV draw_x_gv, draw_y_gv, draw_w_gv, draw_h_gv;
		441	static GV *hover_gv;
		442
		443	static int
		444	within_widget (SV *widget, NV x, NV y)
		445	{
		446	HV *self;
		447	SV **svp;
		448	NV wx, ww, wy, wh;
		449
		450	if (!SvROK (widget))
		451	return 0;
		452
		453	self = (HV *)SvRV (widget);
		454
		455	if (SvTYPE (self) != SVt_PVHV)
		456	return 0;
		457
		458	svp = hv_fetch (self, "y", 1, 0); wy = svp ? SvNV (*svp) : 0.;
		459	if (y < wy)
		460	return 0;
		461
		462	svp = hv_fetch (self, "h", 1, 0); wh = svp ? SvNV (*svp) : 0.;
		463	if (y >= wy + wh)
		464	return 0;
		465
		466	svp = hv_fetch (self, "x", 1, 0); wx = svp ? SvNV (*svp) : 0.;
		467	if (x < wx)
		468	return 0;
		469
		470	svp = hv_fetch (self, "w", 1, 0); ww = svp ? SvNV (*svp) : 0.;
		471	if (x >= wx + ww)
		472	return 0;
		473
		474	svp = hv_fetch (self, "can_events", sizeof ("can_events") - 1, 0);
		475	if (!svp \|\| !SvTRUE (*svp))
		476	return 0;
		477
		478	return 1;
		479	}
437		480
438	MODULE = CFPlus PACKAGE = CFPlus	481	MODULE = CFPlus PACKAGE = CFPlus
439		482
440	PROTOTYPES: ENABLE	483	PROTOTYPES: ENABLE
441		484
…		…
933	#endif	976	#endif
934	}	977	}
935		978
936	MODULE = CFPlus PACKAGE = CFPlus::Font	979	MODULE = CFPlus PACKAGE = CFPlus::Font
937		980
		981	PROTOTYPES: DISABLE
		982
938	CFPlus::Font	983	CFPlus::Font
939	new_from_file (SV class, char path, int id = 0)	984	new_from_file (SV class, char path, int id = 0)
940	CODE:	985	CODE:
941	{	986	{
942	int count;	987	int count;
…		…
952	CODE:	997	CODE:
953	pango_font_description_free (self);	998	pango_font_description_free (self);
954		999
955	void	1000	void
956	make_default (CFPlus::Font self)	1001	make_default (CFPlus::Font self)
		1002	PROTOTYPE: $
957	CODE:	1003	CODE:
958	default_font = self;	1004	default_font = self;
959		1005
960	MODULE = CFPlus PACKAGE = CFPlus::Layout	1006	MODULE = CFPlus PACKAGE = CFPlus::Layout
961		1007
		1008	PROTOTYPES: DISABLE
		1009
962	void	1010	void
963	reset_glyph_cache ()	1011	reset_glyph_cache ()
		1012	PROTOTYPE:
964	CODE:	1013	CODE:
965	tc_clear ();	1014	tc_clear ();
966		1015
967	CFPlus::Layout	1016	CFPlus::Layout
968	new (SV *class)	1017	new (SV *class)
…		…
1255	flags	1304	flags
1256	);	1305	);
1257		1306
1258	MODULE = CFPlus PACKAGE = CFPlus::Texture	1307	MODULE = CFPlus PACKAGE = CFPlus::Texture
1259		1308
		1309	PROTOTYPES: ENABLE
		1310
1260	int minpot (int n)	1311	int minpot (int n)
1261		1312
1262	void	1313	void
1263	pad (SV *data_, int ow, int oh, int nw, int nh)	1314	pad (SV *data_, int ow, int oh, int nw, int nh)
1264	CODE:	1315	CODE:
…		…
1340	}	1391	}
1341	OUTPUT:	1392	OUTPUT:
1342	RETVAL	1393	RETVAL
1343		1394
1344	MODULE = CFPlus PACKAGE = CFPlus::Map	1395	MODULE = CFPlus PACKAGE = CFPlus::Map
		1396
		1397	PROTOTYPES: DISABLE
1345		1398
1346	CFPlus::Map	1399	CFPlus::Map
1347	new (SV *class)	1400	new (SV *class)
1348	CODE:	1401	CODE:
1349	New (0, RETVAL, 1, struct map);	1402	New (0, RETVAL, 1, struct map);
…		…
2181	}	2234	}
2182	}	2235	}
2183		2236
2184	MODULE = CFPlus PACKAGE = CFPlus::MixChunk	2237	MODULE = CFPlus PACKAGE = CFPlus::MixChunk
2185		2238
		2239	PROTOTYPES: DISABLE
		2240
2186	CFPlus::MixChunk	2241	CFPlus::MixChunk
2187	new_from_file (SV class, char path)	2242	new_from_file (SV class, char path)
2188	CODE:	2243	CODE:
2189	RETVAL = Mix_LoadWAV (path);	2244	RETVAL = Mix_LoadWAV (path);
2190	OUTPUT:	2245	OUTPUT:
…		…
2211		2266
2212	MODULE = CFPlus PACKAGE = CFPlus::MixMusic	2267	MODULE = CFPlus PACKAGE = CFPlus::MixMusic
2213		2268
2214	int	2269	int
2215	volume (int volume = -1)	2270	volume (int volume = -1)
		2271	PROTOTYPE: ;$
2216	CODE:	2272	CODE:
2217	RETVAL = Mix_VolumeMusic (volume);	2273	RETVAL = Mix_VolumeMusic (volume);
2218	OUTPUT:	2274	OUTPUT:
2219	RETVAL	2275	RETVAL
2220		2276
…		…
2250	RETVAL = Mix_FadeInMusicPos (self, loops, ms, position);	2306	RETVAL = Mix_FadeInMusicPos (self, loops, ms, position);
2251	OUTPUT:	2307	OUTPUT:
2252	RETVAL	2308	RETVAL
2253		2309
2254	MODULE = CFPlus PACKAGE = CFPlus::OpenGL	2310	MODULE = CFPlus PACKAGE = CFPlus::OpenGL
		2311
		2312	PROTOTYPES: ENABLE
2255		2313
2256	BOOT:	2314	BOOT:
2257	{	2315	{
2258	HV *stash = gv_stashpv ("CFPlus::OpenGL", 1);	2316	HV *stash = gv_stashpv ("CFPlus::OpenGL", 1);
2259	static const struct {	2317	static const struct {
…		…
2275	const_iv (GL_ALPHA_TEST),	2333	const_iv (GL_ALPHA_TEST),
2276	const_iv (GL_NORMALIZE),	2334	const_iv (GL_NORMALIZE),
2277	const_iv (GL_RESCALE_NORMAL),	2335	const_iv (GL_RESCALE_NORMAL),
2278	const_iv (GL_FRONT),	2336	const_iv (GL_FRONT),
2279	const_iv (GL_BACK),	2337	const_iv (GL_BACK),
		2338	const_iv (GL_AUX0),
2280	const_iv (GL_AND),	2339	const_iv (GL_AND),
2281	const_iv (GL_ONE),	2340	const_iv (GL_ONE),
2282	const_iv (GL_ZERO),	2341	const_iv (GL_ZERO),
2283	const_iv (GL_SRC_ALPHA),	2342	const_iv (GL_SRC_ALPHA),
2284	const_iv (GL_DST_ALPHA),	2343	const_iv (GL_DST_ALPHA),
…		…
2330	const_iv (GL_COLOR_LOGIC_OP),	2389	const_iv (GL_COLOR_LOGIC_OP),
2331	const_iv (GL_SEPARABLE_2D),	2390	const_iv (GL_SEPARABLE_2D),
2332	const_iv (GL_CONVOLUTION_2D),	2391	const_iv (GL_CONVOLUTION_2D),
2333	const_iv (GL_CONVOLUTION_BORDER_MODE),	2392	const_iv (GL_CONVOLUTION_BORDER_MODE),
2334	const_iv (GL_CONSTANT_BORDER),	2393	const_iv (GL_CONSTANT_BORDER),
		2394	const_iv (GL_POINTS),
2335	const_iv (GL_LINES),	2395	const_iv (GL_LINES),
2336	const_iv (GL_LINE_STRIP),	2396	const_iv (GL_LINE_STRIP),
2337	const_iv (GL_LINE_LOOP),	2397	const_iv (GL_LINE_LOOP),
2338	const_iv (GL_QUADS),	2398	const_iv (GL_QUADS),
2339	const_iv (GL_QUAD_STRIP),	2399	const_iv (GL_QUAD_STRIP),
2340	const_iv (GL_TRIANGLES),	2400	const_iv (GL_TRIANGLES),
2341	const_iv (GL_TRIANGLE_STRIP),	2401	const_iv (GL_TRIANGLE_STRIP),
2342	const_iv (GL_TRIANGLE_FAN),	2402	const_iv (GL_TRIANGLE_FAN),
		2403	const_iv (GL_POLYGON),
2343	const_iv (GL_PERSPECTIVE_CORRECTION_HINT),	2404	const_iv (GL_PERSPECTIVE_CORRECTION_HINT),
		2405	const_iv (GL_POINT_SMOOTH_HINT),
		2406	const_iv (GL_LINE_SMOOTH_HINT),
		2407	const_iv (GL_POLYGON_SMOOTH_HINT),
		2408	const_iv (GL_GENERATE_MIPMAP_HINT),
2344	const_iv (GL_FASTEST),	2409	const_iv (GL_FASTEST),
		2410	const_iv (GL_DONT_CARE),
		2411	const_iv (GL_NICEST),
2345	const_iv (GL_V2F),	2412	const_iv (GL_V2F),
2346	const_iv (GL_V3F),	2413	const_iv (GL_V3F),
2347	const_iv (GL_T2F_V3F),	2414	const_iv (GL_T2F_V3F),
2348	const_iv (GL_T2F_N3F_V3F),	2415	const_iv (GL_T2F_N3F_V3F),
2349	# undef const_iv	2416	# undef const_iv
…		…
2436	void glFrustum (double left, double right, double bottom, double top, double near_, double far_)	2503	void glFrustum (double left, double right, double bottom, double top, double near_, double far_)
2437		2504
2438	# near_ and far_ are due to microsofts buggy "c" compiler	2505	# near_ and far_ are due to microsofts buggy "c" compiler
2439	void glOrtho (double left, double right, double bottom, double top, double near_, double far_)	2506	void glOrtho (double left, double right, double bottom, double top, double near_, double far_)
2440		2507
		2508	PROTOTYPES: DISABLE
		2509
2441	void glViewport (int x, int y, int width, int height)	2510	void glViewport (int x, int y, int width, int height)
2442		2511
2443	void glScissor (int x, int y, int width, int height)	2512	void glScissor (int x, int y, int width, int height)
2444		2513
2445	void glTranslate (float x, float y, float z = 0.)	2514	void glTranslate (float x, float y, float z = 0.)
…		…
2452		2521
2453	void glRotate (float angle, float x, float y, float z)	2522	void glRotate (float angle, float x, float y, float z)
2454	CODE:	2523	CODE:
2455	glRotatef (angle, x, y, z);	2524	glRotatef (angle, x, y, z);
2456		2525
2457	void glBegin (int mode)
2458
2459	void glEnd ()
2460
2461	void glColor (float r, float g, float b, float a = 1.0)	2526	void glColor (float r, float g, float b, float a = 1.0)
2462	PROTOTYPE: @
2463	ALIAS:	2527	ALIAS:
2464	glColor_premultiply = 1	2528	glColor_premultiply = 1
2465	CODE:	2529	CODE:
2466	if (ix)	2530	if (ix)
2467	{	2531	{
…		…
2470	b *= a;	2534	b *= a;
2471	}	2535	}
2472	// microsoft visual "c" rounds instead of truncating...	2536	// microsoft visual "c" rounds instead of truncating...
2473	glColor4f (r, g, b, a);	2537	glColor4f (r, g, b, a);
2474		2538
2475	void glInterleavedArrays (int format, int stride, char *data)
2476
2477	void glDrawElements (int mode, int count, int type, char *indices)
2478
2479	# 1.2 void glDrawRangeElements (int mode, int start, int end
2480
2481	void glRasterPos (float x, float y, float z = 0.)	2539	void glRasterPos (float x, float y, float z = 0.)
2482	CODE:	2540	CODE:
2483	glRasterPos3f (0, 0, z);	2541	glRasterPos3f (0, 0, z);
2484	glBitmap (0, 0, 0, 0, x, y, 0);	2542	glBitmap (0, 0, 0, 0, x, y, 0);
2485		2543
…		…
2488	glVertex3f (x, y, z);	2546	glVertex3f (x, y, z);
2489		2547
2490	void glTexCoord (float s, float t)	2548	void glTexCoord (float s, float t)
2491	CODE:	2549	CODE:
2492	glTexCoord2f (s, t);	2550	glTexCoord2f (s, t);
		2551
		2552	PROTOTYPES: ENABLE
		2553
		2554	void glBegin (int mode)
		2555
		2556	void glEnd ()
		2557
		2558	void glPointSize (GLfloat size)
		2559
		2560	void glLineWidth (GLfloat width)
		2561
		2562	void glInterleavedArrays (int format, int stride, char *data)
		2563
		2564	void glDrawElements (int mode, int count, int type, char *indices)
		2565
		2566	# 1.2 void glDrawRangeElements (int mode, int start, int end
2493		2567
2494	void glTexEnv (int target, int pname, float param)	2568	void glTexEnv (int target, int pname, float param)
2495	CODE:	2569	CODE:
2496	glTexEnvf (target, pname, param);	2570	glTexEnvf (target, pname, param);
2497		2571
…		…
2550		2624
2551	void glEndList ()	2625	void glEndList ()
2552		2626
2553	void glCallList (int list)	2627	void glCallList (int list)
2554		2628
		2629	MODULE = CFPlus PACKAGE = CFPlus::UI::Base
		2630
		2631	PROTOTYPES: DISABLE
		2632
		2633	void
		2634	find_widget (SV *self, NV x, NV y)
		2635	PPCODE:
		2636	{
		2637	if (within_widget (self, x, y))
		2638	XPUSHs (self);
		2639	}
		2640
		2641	BOOT:
		2642	{
		2643	hover_gv = gv_fetchpv ("CFPlus::UI::HOVER", 1, SVt_NV);
		2644
		2645	draw_x_gv = gv_fetchpv ("CFPlus::UI::Base::draw_x", 1, SVt_NV);
		2646	draw_y_gv = gv_fetchpv ("CFPlus::UI::Base::draw_y", 1, SVt_NV);
		2647	draw_w_gv = gv_fetchpv ("CFPlus::UI::Base::draw_w", 1, SVt_NV);
		2648	draw_h_gv = gv_fetchpv ("CFPlus::UI::Base::draw_h", 1, SVt_NV);
		2649	}
		2650
		2651	void
		2652	draw (SV *self)
		2653	CODE:
		2654	{
		2655	HV *hv;
		2656	SV **svp;
		2657	NV x, y, w, h;
		2658	SV *draw_x_sv = GvSV (draw_x_gv);
		2659	SV *draw_y_sv = GvSV (draw_y_gv);
		2660	SV *draw_w_sv = GvSV (draw_w_gv);
		2661	SV *draw_h_sv = GvSV (draw_h_gv);
		2662	SV *hover;
		2663	double draw_x, draw_y, draw_w, draw_h;
		2664
		2665	if (!SvROK (self))
		2666	croak ("CFPlus::Base::draw: %s not a reference", SvPV_nolen (self));
		2667
		2668	hv = (HV *)SvRV (self);
		2669
		2670	if (SvTYPE (hv) != SVt_PVHV)
		2671	croak ("CFPlus::Base::draw: %s not a hashref", SvPV_nolen (self));
		2672
		2673	svp = hv_fetch (hv, "w", 1, 0); w = svp ? SvNV (*svp) : 0.;
		2674	svp = hv_fetch (hv, "h", 1, 0); h = svp ? SvNV (*svp) : 0.;
		2675
		2676	if (!h \|\| !w)
		2677	XSRETURN_EMPTY;
		2678
		2679	svp = hv_fetch (hv, "x", 1, 0); x = svp ? SvNV (*svp) : 0.;
		2680	svp = hv_fetch (hv, "y", 1, 0); y = svp ? SvNV (*svp) : 0.;
		2681
		2682	draw_x = SvNV (draw_x_sv) + x;
		2683	draw_y = SvNV (draw_y_sv) + y;
		2684
		2685	if (draw_x + w < 0 \|\| draw_x >= SvNV (draw_w_sv)
		2686	\|\| draw_y + h < 0 \|\| draw_y >= SvNV (draw_h_sv))
		2687	XSRETURN_EMPTY;
		2688
		2689	sv_setnv (draw_x_sv, draw_x);
		2690	sv_setnv (draw_y_sv, draw_y);
		2691
		2692	glPushMatrix ();
		2693	glTranslated (x, y, 0);
		2694
		2695	if (SvROK (GvSV (hover_gv)) && SvRV (GvSV (hover_gv)) == (SV *)hv)
		2696	{
		2697	svp = hv_fetch (hv, "can_hover", sizeof ("can_hover") - 1, 0);
		2698
		2699	if (svp && SvTRUE (*svp))
		2700	{
		2701	glColor4f (10.2f, 0.80.2f, 0.5*0.2f, 0.2f);
		2702	glEnable (GL_BLEND);
		2703	glBlendFunc (GL_ONE, GL_ONE_MINUS_SRC_ALPHA);
		2704	glBegin (GL_QUADS);
		2705	glVertex2f (0, 0);
		2706	glVertex2f (w, 0);
		2707	glVertex2f (w, h);
		2708	glVertex2f (0, h);
		2709	glEnd ();
		2710	glDisable (GL_BLEND);
		2711	}
		2712	}
		2713	#if 0
		2714	if ($ENV{CFPLUS_DEBUG} & 1) {
		2715	glPushMatrix;
		2716	glColor 1, 1, 0, 1;
		2717	glTranslate 0.375, 0.375;
		2718	glBegin GL_LINE_LOOP;
		2719	glVertex 0 , 0;
		2720	glVertex $self->{w} - 1, 0;
		2721	glVertex $self->{w} - 1, $self->{h} - 1;
		2722	glVertex 0 , $self->{h} - 1;
		2723	glEnd;
		2724	glPopMatrix;
		2725	#CFPlus::UI::Label->new (w => $self->{w}, h => $self->{h}, text => $self, fontsize => 0)->_draw;
		2726	}
		2727	#endif
		2728	PUSHMARK (SP);
		2729	XPUSHs (self);
		2730	PUTBACK;
		2731	call_method ("_draw", G_VOID \| G_DISCARD);
		2732	SPAGAIN;
		2733
		2734	glPopMatrix ();
		2735
		2736	draw_x = draw_x - x; sv_setnv (draw_x_sv, draw_x);
		2737	draw_y = draw_y - y; sv_setnv (draw_y_sv, draw_y);
		2738	}
		2739

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/Deliantra-Client/Client.xs (file contents): Revision 1.204 by root, Thu Jul 19 14:54:50 2007 UTC vs. Revision 1.209 by root, Sat Jul 21 22:54:52 2007 UTC

Diff Legend

Comparing deliantra/Deliantra-Client/Client.xs (file contents):
Revision 1.204 by root, Thu Jul 19 14:54:50 2007 UTC vs.
Revision 1.209 by root, Sat Jul 21 22:54:52 2007 UTC