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

Comparing deliantra/Deliantra-Client/Client.xs (file contents):
Revision 1.308 by root, Fri Jul 29 08:35:35 2011 UTC vs.
Revision 1.325 by root, Sun Nov 18 02:04:48 2018 UTC

…		…
15		15
16	#include "EXTERN.h"	16	#include "EXTERN.h"
17	#include "perl.h"	17	#include "perl.h"
18	#include "XSUB.h"	18	#include "XSUB.h"
19		19
		20	#include "flat_hash_map.hpp"
		21
20	#ifdef _WIN32	22	#ifdef _WIN32
21	# undef pipe	23	# undef pipe
22	// microsoft vs. C	24	// microsoft vs. C
23	# define sqrtf(x) sqrt(x)	25	# define sqrtf(x) sqrt(x)
24	# define atan2f(x,y) atan2(x,y)	26	# define atan2f(x,y) atan2(x,y)
25	# define M_PI 3.14159265f	27	# define M_PI 3.14159265f
26	#endif	28	#endif
27		29
28	#include <assert.h>	30	#include <cassert>
29	#include <math.h>	31	#include <cmath>
30	#include <string.h>	32	#include <cstring>
31	#include <stdio.h>	33	#include <cstdio>
32	#include <stdlib.h>	34	#include <cstdlib>
		35
		36	#include <utility>
		37	#include <bitset>
33		38
34	#define USE_RWOPS 1 // for SDL_mixer:LoadMUS_RW	39	#define USE_RWOPS 1 // for SDL_mixer:LoadMUS_RW
35		40
36	#include <SDL.h>	41	#include <SDL.h>
37	#include <SDL_thread.h>	42	#include <SDL_thread.h>
…		…
48	#endif	53	#endif
49		54
50	#define PANGO_ENABLE_BACKEND	55	#define PANGO_ENABLE_BACKEND
51	#define G_DISABLE_CAST_CHECKS	56	#define G_DISABLE_CAST_CHECKS
52		57
53	#include <glib/gmacros.h>	58	#include <glib.h>
54		59
55	#include <pango/pango.h>	60	#include <pango/pango.h>
56		61
57	#ifndef PANGO_VERSION_CHECK	62	#ifndef PANGO_VERSION_CHECK
58	# define PANGO_VERSION_CHECK(a,b,c) 0	63	# define PANGO_VERSION_CHECK(a,b,c) 0
…		…
184	{	189	{
185	GSList *attrs = run->item->analysis.extra_attrs;	190	GSList *attrs = run->item->analysis.extra_attrs;
186		191
187	while (attrs)	192	while (attrs)
188	{	193	{
189	PangoAttribute *attr = attrs->data;	194	PangoAttribute attr = (PangoAttribute )attrs->data;
190		195
191	if (attr->klass->type == PANGO_ATTR_SHAPE)	196	if (attr->klass->type == PANGO_ATTR_SHAPE)
192	return 1;	197	return 1;
193		198
194	attrs = attrs->next;	199	attrs = attrs->next;
195	}	200	}
196		201
197	return 0;	202	return 0;
198	}	203	}
199		204
200	typedef struct cf_layout {	205	struct cf_layout {
201	PangoLayout *pl;	206	PangoLayout *pl;
202	float r, g, b, a; // default color for rgba mode	207	float r, g, b, a; // default color for rgba mode
203	int base_height;	208	int base_height;
204	DC__Font font;	209	DC__Font font;
205	rc_t *rc;	210	rc_t *rc;
206	} *DC__Layout;	211	};
		212
		213	typedef cf_layout *DC__Layout;
207		214
208	static DC__Font default_font;	215	static DC__Font default_font;
209	static PangoContext *opengl_context;	216	static PangoContext *opengl_context;
210	static PangoFontMap *opengl_fontmap;	217	static PangoFontMap *opengl_fontmap;
211		218
212	static void	219	static void
213	substitute_func (FcPattern *pattern, gpointer data)	220	substitute_func (FcPattern *pattern, gpointer data)
214	{	221	{
215	FcPatternAddBool (pattern, FC_HINTING, 1);	222	FcPatternAddBool (pattern, FC_HINTING, 1);
216	#ifdef FC_HINT_STYLE	223	#ifdef FC_HINT_STYLE
217	FcPatternAddBool (pattern, FC_HINT_STYLE, FC_HINT_FULL);	224	FcPatternAddInteger (pattern, FC_HINT_STYLE, FC_HINT_FULL);
218	#endif	225	#endif
219	FcPatternAddBool (pattern, FC_AUTOHINT, 0);	226	FcPatternAddBool (pattern, FC_AUTOHINT, 0);
220	}	227	}
221		228
222	static void	229	static void
…		…
252	}	259	}
253		260
254	typedef uint16_t tileid;	261	typedef uint16_t tileid;
255	typedef uint16_t faceid;	262	typedef uint16_t faceid;
256		263
257	typedef struct {	264	struct maptex
		265	{
258	GLuint name;	266	GLuint name;
259	int w, h;	267	int w, h;
260	float s, t;	268	float s, t;
261	uint8_t r, g, b, a;	269	uint8_t r, g, b, a;
262	tileid smoothtile;	270	tileid smoothtile;
263	uint8_t smoothlevel;	271	uint8_t smoothlevel;
264	uint8_t unused; /* set to zero on use */	272	uint8_t unused; /* set to zero on use */
265	} maptex;	273	};
266		274
267	typedef struct {	275	struct mapcell
		276	{
268	uint32_t player;	277	uint32_t player;
269	tileid tile[3];	278	tileid tile[3];
270	uint16_t darkness;	279	uint16_t darkness;
271	uint8_t stat_width, stat_hp, flags, smoothmax;	280	uint8_t stat_width, stat_hp, flags, smoothmax;
272	} mapcell;	281	};
273		282
274	typedef struct {	283	struct maprow
		284	{
275	int32_t c0, c1;	285	int32_t c0, c1;
276	mapcell *col;	286	mapcell *col;
277	} maprow;	287	};
278		288
279	typedef struct map {	289	struct mapgrid {
280	int x, y, w, h;	290	int x, y, w, h;
281	int ox, oy; /* offset to virtual global coordinate system */	291	int ox, oy; /* offset to virtual global coordinate system */
282	int faces; tileid *face2tile; // [faceid]	292	int faces; tileid *face2tile; // [faceid]
283	int texs; maptex *tex; // [tileid]	293	int texs; maptex *tex; // [tileid]
284		294
285	int32_t rows;	295	int32_t rows;
286	maprow *row;	296	maprow *row;
287	} *DC__Map;	297	};
		298
		299	typedef mapgrid *DC__Map;
288		300
289	static char *	301	static char *
290	prepend (char *ptr, int sze, int inc)	302	prepend (char *ptr, int sze, int inc)
291	{	303	{
292	char *p;	304	char *p;
…		…
310		322
311	#define Append(type,ptr,sze,inc) (ptr) = (type )append ((char )ptr, (sze) * sizeof (type), (inc) * sizeof (type))	323	#define Append(type,ptr,sze,inc) (ptr) = (type )append ((char )ptr, (sze) * sizeof (type), (inc) * sizeof (type))
312	#define Prepend(type,ptr,sze,inc) (ptr) = (type )prepend ((char )ptr, (sze) * sizeof (type), (inc) * sizeof (type))	324	#define Prepend(type,ptr,sze,inc) (ptr) = (type )prepend ((char )ptr, (sze) * sizeof (type), (inc) * sizeof (type))
313		325
314	static void	326	static void
315	need_facenum (struct map *self, faceid face)	327	need_facenum (struct mapgrid *self, faceid face)
316	{	328	{
317	while (self->faces <= face)	329	while (self->faces <= face)
318	{	330	{
319	Append (tileid, self->face2tile, self->faces, self->faces);	331	Append (tileid, self->face2tile, self->faces, self->faces);
320	self->faces *= 2;	332	self->faces *= 2;
321	}	333	}
322	}	334	}
323		335
324	static void	336	static void
325	need_texid (struct map *self, int texid)	337	need_texid (struct mapgrid *self, int texid)
326	{	338	{
327	while (self->texs <= texid)	339	while (self->texs <= texid)
328	{	340	{
329	Append (maptex, self->tex, self->texs, self->texs);	341	Append (maptex, self->tex, self->texs, self->texs);
330	self->texs *= 2;	342	self->texs *= 2;
331	}	343	}
332	}	344	}
333		345
334	static maprow *	346	static maprow *
335	map_get_row (DC__Map self, int y)	347	map_get_row (mapgrid *self, int y)
336	{	348	{
337	if (0 > y)	349	if (0 > y)
338	{	350	{
339	int extend = - y + MAP_EXTEND_Y;	351	int extend = - y + MAP_EXTEND_Y;
340	Prepend (maprow, self->row, self->rows, extend);	352	Prepend (maprow, self->row, self->rows, extend);
…		…
378		390
379	return row->col + (x - row->c0);	391	return row->col + (x - row->c0);
380	}	392	}
381		393
382	static mapcell *	394	static mapcell *
383	map_get_cell (DC__Map self, int x, int y)	395	map_get_cell (mapgrid *self, int x, int y)
384	{	396	{
385	return row_get_cell (map_get_row (self, y), x);	397	return row_get_cell (map_get_row (self, y), x);
386	}	398	}
387		399
388	static void	400	static void
389	map_clear (DC__Map self)	401	map_clear (mapgrid *self)
390	{	402	{
391	int r;	403	int r;
392		404
393	for (r = 0; r < self->rows; r++)	405	for (r = 0; r < self->rows; r++)
394	Safefree (self->row[r].col);	406	Safefree (self->row[r].col);
…		…
412	(cell)->flags = 0; \	424	(cell)->flags = 0; \
413	(cell)->player = 0; \	425	(cell)->player = 0; \
414	} while (0)	426	} while (0)
415		427
416	static void	428	static void
417	map_blank (DC__Map self, int x0, int y0, int w, int h)	429	map_blank (mapgrid *self, int x0, int y0, int w, int h)
418	{	430	{
419	int x, y;	431	int x, y;
420	maprow *row;	432	maprow *row;
421	mapcell *cell;	433	mapcell *cell;
422		434
…		…
439	CELL_CLEAR (cell);	451	CELL_CLEAR (cell);
440	}	452	}
441	}	453	}
442	}	454	}
443		455
444	typedef struct {	456	struct smooth_key
		457	{
445	tileid tile;	458	tileid tile;
446	uint8_t x, y, level;	459	uint8_t x, y, level;
447	} smooth_key;	460
		461	bool operator == (const smooth_key &o) const
		462	{
		463	return tile == o.tile && x == o.x && y == o.y && level == o.level;
		464	}
		465	};
		466
		467	typedef ska::flat_hash_map<smooth_key, IV> smooth_hash;
		468
		469	namespace std {
		470	template <>
		471	struct hash<smooth_key>
		472	{
		473	size_t operator () (const smooth_key &v) const
		474	{
		475	return v.tile + (v.x << 8) + (v.y << 16) + (v.level << 24);
		476	}
		477	};
		478	}
448		479
449	static void	480	static void
450	smooth_or_bits (HV hv, smooth_key key, IV bits)	481	smooth_or_bits (smooth_hash &h, smooth_key &key, IV bits)
451	{	482	{
452	SV *sv = hv_fetch (hv, (char )key, sizeof (*key), 1);	483	auto &&it = h.find (key);
453		484
454	if (SvIOK (*sv))	485	if (it == h.end ())
455	SvIV_set (sv, SvIVX (sv) \| bits);	486	h.insert (std::make_pair (key, bits));
456	else	487	else
457	sv_setiv (*sv, bits);	488	it->second \|= bits;
458	}	489	}
459		490
460	static void	491	static void
461	music_finished (void)	492	music_finished (void)
462	{	493	{
…		…
481	ev.data2 = 0;	512	ev.data2 = 0;
482		513
483	SDL_PushEvent ((SDL_Event *)&ev);	514	SDL_PushEvent ((SDL_Event *)&ev);
484	}	515	}
485		516
		517	// approximately divide by 255
486	static unsigned int	518	static unsigned int
487	div255 (unsigned int n)	519	div255 (unsigned int n)
488	{	520	{
489	return (n + (n >> 8)) >> 8;	521	return (n + (n >> 8)) >> 8;
490	}	522	}
…		…
577		609
578	return mod;	610	return mod;
579	}	611	}
580		612
581	static void	613	static void
582	deliantra_main ()	614	deliantra_main (SV *real_main)
583	{	615	{
584	char *argv[] = { 0 };	616	dSP;
585	call_argv ("::main", G_DISCARD \| G_VOID, argv);	617
		618	PUSHMARK (SP);
		619	call_sv (real_main, G_DISCARD \| G_VOID);
586	}	620	}
587		621
588	#ifdef __MACOSX__	622	#ifdef __MACOSX__
		623	static SV *real_main;
		624
589	/* to due surprising braindamage on the side of SDL design, we	625	/* to due surprising braindamage on the side of SDL design, we
590	* do some mind-boggling hack here: SDL requires a custom main()	626	* do some mind-boggling hack here: SDL requires a custom main()
591	* on OS X, so... we provide one and call the original main(), which,	627	* on OS X, so... we provide one and call the original main(), which,
592	* due to share dlibrary magic, calls -lSDLmain's main, not perl's main,	628	* due to shared library magic, calls -lSDLmain's main, not perl's main,
593	* and which calls our main (== SDL_main) back.	629	* and which calls our main (== SDL_main) back.
594	*/	630	*/
595	extern C_LINKAGE int	631	extern C_LINKAGE int
596	main (int argc, char *argv[])	632	main (int argc, char *argv[])
597	{	633	{
598	deliantra_main ();	634	deliantra_main (real_main);
599	}	635	}
600		636
601	#undef main	637	#undef main
602		638
603	extern C_LINKAGE int main (int argc, char *argv[]);	639	extern C_LINKAGE int main (int argc, char *argv[]);
604		640
605	static void	641	static void
606	SDL_braino (void)	642	SDL_main_hack (SV *real_main_)
607	{	643	{
		644	real_main = real_main_;
		645
608	char *argv[] = { "deliantra client", 0 };	646	char *argv[] = { "deliantra client", 0 };
609	(main) (1, argv);	647	(main) (1, argv);
610	}	648	}
611	#else	649	#else
612	static void	650	static void
613	SDL_braino (void)	651	SDL_main_hack (SV *real_main)
614	{	652	{
615	deliantra_main ();	653	deliantra_main (real_main);
616	}	654	}
617	#endif	655	#endif
618		656
619	MODULE = Deliantra::Client PACKAGE = DC	657	MODULE = Deliantra::Client PACKAGE = DC
620		658
…		…
871	#endif	909	#endif
872	}	910	}
873		911
874	char *SDL_GetError ()	912	char *SDL_GetError ()
875		913
876	void SDL_braino ()	914	void SDL_main_hack (SV *real_main)
		915	PROTOTYPE: &
877		916
878	int SDL_Init (U32 flags)	917	int SDL_Init (U32 flags)
879		918
880	int SDL_InitSubSystem (U32 flags)	919	int SDL_InitSubSystem (U32 flags)
881		920
882	void SDL_QuitSubSystem (U32 flags)	921	void SDL_QuitSubSystem (U32 flags)
883		922
884	void SDL_Quit ()	923	void SDL_Quit ()
885		924
886	int SDL_GL_SetAttribute (int attr, int value)	925	int SDL_GL_SetAttribute (int attr, int value)
		926	C_ARGS: (SDL_GLattr)attr, value
887		927
888	int SDL_GL_GetAttribute (int attr)	928	int SDL_GL_GetAttribute (int attr)
889	CODE:	929	CODE:
890	if (SDL_GL_GetAttribute (attr, &RETVAL))	930	if (SDL_GL_GetAttribute ((SDL_GLattr)attr, &RETVAL))
891	XSRETURN_UNDEF;	931	XSRETURN_UNDEF;
892	OUTPUT:	932	OUTPUT:
893	RETVAL	933	RETVAL
894		934
895	void	935	void
…		…
950	);	990	);
951		991
952	if (RETVAL)	992	if (RETVAL)
953	{	993	{
954	av_clear (texture_av);	994	av_clear (texture_av);
955
956	SDL_WM_SetCaption ("Deliantra MORPG Client " VERSION, "Deliantra");
957	#define GL_FUNC(ptr,name) gl.name = (ptr)SDL_GL_GetProcAddress ("gl" # name);	995	#define GL_FUNC(ptr,name) gl.name = (ptr)SDL_GL_GetProcAddress ("gl" # name);
958	#include "glfunc.h"	996	#include "glfunc.h"
959	#undef GL_FUNC	997	#undef GL_FUNC
960
961	if (!gl.ActiveTexture ) gl.ActiveTexture = gl.ActiveTextureARB;	998	if (!gl.ActiveTexture ) gl.ActiveTexture = gl.ActiveTextureARB;
962	if (!gl.MultiTexCoord2f) gl.MultiTexCoord2f = gl.MultiTexCoord2fARB;	999	if (!gl.MultiTexCoord2f) gl.MultiTexCoord2f = gl.MultiTexCoord2fARB;
963	}	1000	}
964	}	1001	}
965	OUTPUT:	1002	OUTPUT:
966	RETVAL	1003	RETVAL
967		1004
968	void	1005	void
		1006	SDL_WM_SetCaption (const char title, const char icon)
		1007
		1008	void
969	SDL_GL_SwapBuffers ()	1009	SDL_GL_SwapBuffers ()
970		1010
971	char *	1011	char *
972	SDL_GetKeyName (int sym)	1012	SDL_GetKeyName (int sym)
		1013	C_ARGS: (SDLKey)sym
973		1014
974	int	1015	int
975	SDL_GetAppState ()	1016	SDL_GetAppState ()
976		1017
977	int	1018	int
978	SDL_GetModState ()	1019	SDL_GetModState ()
979		1020
		1021	int
		1022	SDL_WaitEvent ()
		1023	C_ARGS: 0
		1024
980	void	1025	void
		1026	SDL_PumpEvents ()
		1027
		1028	void
981	poll_events ()	1029	peep_events ()
982	PPCODE:	1030	PPCODE:
983	{	1031	{
984	SDL_Event ev;	1032	SDL_Event ev;
985		1033
986	SDL_PumpEvents ();	1034	SDL_PumpEvents ();
…		…
1067	OUTPUT:	1115	OUTPUT:
1068	RETVAL	1116	RETVAL
1069		1117
1070	int	1118	int
1071	Mix_OpenAudio (int frequency = 44100, int format = MIX_DEFAULT_FORMAT, int channels = 2, int chunksize = 4096)	1119	Mix_OpenAudio (int frequency = 44100, int format = MIX_DEFAULT_FORMAT, int channels = 2, int chunksize = 4096)
1072	POSTCALL:	1120	POSTCALL:
1073	Mix_HookMusicFinished (music_finished);	1121	Mix_HookMusicFinished (music_finished);
1074	Mix_ChannelFinished (channel_finished);	1122	Mix_ChannelFinished (channel_finished);
1075		1123
1076	void	1124	void
1077	Mix_QuerySpec ()	1125	Mix_QuerySpec ()
…		…
1139	OUTPUT:	1187	OUTPUT:
1140	RETVAL	1188	RETVAL
1141		1189
1142	void	1190	void
1143	IMG_Init (int flags = IMG_INIT_JPG \| IMG_INIT_PNG)	1191	IMG_Init (int flags = IMG_INIT_JPG \| IMG_INIT_PNG)
		1192
		1193	# MIX_INIT_MP3 gives smpeg + libstdc++ + libgcc_s
		1194	void
		1195	Mix_Init (int flags = MIX_INIT_MOD \| MIX_INIT_OGG)
1144		1196
1145	void	1197	void
1146	load_image_inline (SV *image_)	1198	load_image_inline (SV *image_)
1147	ALIAS:	1199	ALIAS:
1148	load_image_file = 1	1200	load_image_file = 1
…		…
1194		1246
1195	SDL_LockSurface (surface2);	1247	SDL_LockSurface (surface2);
1196	EXTEND (SP, 6);	1248	EXTEND (SP, 6);
1197	PUSHs (sv_2mortal (newSViv (surface2->w)));	1249	PUSHs (sv_2mortal (newSViv (surface2->w)));
1198	PUSHs (sv_2mortal (newSViv (surface2->h)));	1250	PUSHs (sv_2mortal (newSViv (surface2->h)));
1199	PUSHs (sv_2mortal (newSVpvn (surface2->pixels, surface2->h * surface2->pitch)));	1251	PUSHs (sv_2mortal (newSVpvn ((const char )surface2->pixels, surface2->h surface2->pitch)));
1200	PUSHs (sv_2mortal (newSViv (surface->flags & (SDL_SRCCOLORKEY \| SDL_SRCALPHA) ? GL_RGBA : GL_RGB)));	1252	PUSHs (sv_2mortal (newSViv (surface->flags & (SDL_SRCCOLORKEY \| SDL_SRCALPHA) ? GL_RGBA : GL_RGB)));
1201	PUSHs (sv_2mortal (newSViv (GL_RGBA)));	1253	PUSHs (sv_2mortal (newSViv (GL_RGBA)));
1202	PUSHs (sv_2mortal (newSViv (GL_UNSIGNED_BYTE)));	1254	PUSHs (sv_2mortal (newSViv (GL_UNSIGNED_BYTE)));
1203	SDL_UnlockSurface (surface2);	1255	SDL_UnlockSurface (surface2);
1204		1256
…		…
1276	MODULE = Deliantra::Client PACKAGE = DC::Font	1328	MODULE = Deliantra::Client PACKAGE = DC::Font
1277		1329
1278	PROTOTYPES: DISABLE	1330	PROTOTYPES: DISABLE
1279		1331
1280	DC::Font	1332	DC::Font
1281	new_from_file (SV class, char path, int id = 0)	1333	new_from_file (SV klass, char path, int id = 0)
1282	CODE:	1334	CODE:
1283	{	1335	{
1284	int count;	1336	int count;
1285	FcPattern pattern = FcFreeTypeQuery ((const FcChar8 )path, id, 0, &count);	1337	FcPattern pattern = FcFreeTypeQuery ((const FcChar8 )path, id, 0, &count);
1286	RETVAL = pango_fc_font_description_from_pattern (pattern, 0);	1338	RETVAL = pango_fc_font_description_from_pattern (pattern, 0);
…		…
1315	PROTOTYPE:	1367	PROTOTYPE:
1316	CODE:	1368	CODE:
1317	tc_restore ();	1369	tc_restore ();
1318		1370
1319	DC::Layout	1371	DC::Layout
1320	new (SV *class)	1372	new (SV *klass)
1321	CODE:	1373	CODE:
1322	New (0, RETVAL, 1, struct cf_layout);	1374	New (0, RETVAL, 1, struct cf_layout);
1323		1375
1324	RETVAL->pl = pango_layout_new (opengl_context);	1376	RETVAL->pl = pango_layout_new (opengl_context);
1325	RETVAL->r = 1.;	1377	RETVAL->r = 1.;
…		…
1474		1526
1475	void	1527	void
1476	set_height (DC::Layout self, int base_height)	1528	set_height (DC::Layout self, int base_height)
1477	CODE:	1529	CODE:
1478	if (self->base_height != base_height)	1530	if (self->base_height != base_height)
1479	{	1531	{
1480	self->base_height = base_height;	1532	self->base_height = base_height;
1481	layout_update_font (self);	1533	layout_update_font (self);
1482	}	1534	}
1483		1535
1484	void	1536	void
…		…
1848	MODULE = Deliantra::Client PACKAGE = DC::Map	1900	MODULE = Deliantra::Client PACKAGE = DC::Map
1849		1901
1850	PROTOTYPES: DISABLE	1902	PROTOTYPES: DISABLE
1851		1903
1852	DC::Map	1904	DC::Map
1853	new (SV *class)	1905	new (SV *klass)
1854	CODE:	1906	CODE:
1855	New (0, RETVAL, 1, struct map);	1907	New (0, RETVAL, 1, mapgrid);
1856	RETVAL->x = 0;	1908	RETVAL->x = 0;
1857	RETVAL->y = 0;	1909	RETVAL->y = 0;
1858	RETVAL->w = 0;	1910	RETVAL->w = 0;
1859	RETVAL->h = 0;	1911	RETVAL->h = 0;
1860	RETVAL->ox = 0;	1912	RETVAL->ox = 0;
…		…
1897		1949
1898	void	1950	void
1899	set_smooth (DC::Map self, int face, int smooth, int level)	1951	set_smooth (DC::Map self, int face, int smooth, int level)
1900	CODE:	1952	CODE:
1901	{	1953	{
1902	tileid texid;	1954	tileid texid;
1903	maptex *tex;	1955	maptex *tex;
1904		1956
1905	if (face < 0 \|\| face >= self->faces)	1957	if (face < 0 \|\| face >= self->faces)
1906	return;	1958	return;
1907		1959
1908	if (smooth < 0 \|\| smooth >= self->faces)	1960	if (smooth < 0 \|\| smooth >= self->faces)
1909	return;	1961	return;
1910		1962
1911	texid = self->face2tile [face];	1963	texid = self->face2tile [face];
1912		1964
1913	if (!texid)	1965	if (!texid)
1914	return;	1966	return;
1915		1967
1916	tex = self->tex + texid;	1968	tex = self->tex + texid;
…		…
1949	}	2001	}
1950		2002
1951	void	2003	void
1952	expire_textures (DC::Map self, int texid, int count)	2004	expire_textures (DC::Map self, int texid, int count)
1953	PPCODE:	2005	PPCODE:
1954	for (; texid < self->texs && count; ++texid, --count)	2006	for (; texid < self->texs && count; ++texid, --count)
1955	{	2007	{
1956	maptex *tex = self->tex + texid;	2008	maptex *tex = self->tex + texid;
1957		2009
1958	if (tex->name)	2010	if (tex->name)
1959	{	2011	{
…		…
2014	self->y += MAP_EXTEND_Y;	2066	self->y += MAP_EXTEND_Y;
2015	}	2067	}
2016	}	2068	}
2017		2069
2018	SV *	2070	SV *
2019	map1a_update (DC::Map self, SV *data_, int extmap)	2071	map1a_update (DC::Map self, SV *data_)
2020	CODE:	2072	CODE:
2021	{	2073	{
2022	uint8_t data = (uint8_t )SvPVbyte_nolen (data_);	2074	uint8_t data = (uint8_t )SvPVbyte_nolen (data_);
2023	uint8_t data_end = (uint8_t )SvEND (data_);	2075	uint8_t data_end = (uint8_t )SvEND (data_);
2024	mapcell *cell;	2076	mapcell *cell;
…		…
2045		2097
2046	//TODO: don't trust server data to be in-range(!)	2098	//TODO: don't trust server data to be in-range(!)
2047		2099
2048	if (flags & 8)	2100	if (flags & 8)
2049	{	2101	{
		2102	uint8_t ext, cmd;
		2103
2050	if (extmap)	2104	do
2051	{	2105	{
2052	uint8_t ext, cmd;	2106	ext = *data++;
		2107	cmd = ext & 0x7f;
2053		2108
2054	do	2109	if (cmd < 4)
		2110	cell->darkness = 255 - ext * 64 + 1; /* make sure this doesn't collide with FOW_DARKNESS */
		2111	else if (cmd == 5) // health
2055	{	2112	{
2056	ext = *data++;
2057	cmd = ext & 0x7f;
2058
2059	if (cmd < 4)
2060	cell->darkness = 255 - ext * 64 + 1; /* make sure this doesn't collide with FOW_DARKNESS */
2061	else if (cmd == 5) // health
2062	{
2063	cell->stat_width = 1;	2113	cell->stat_width = 1;
2064	cell->stat_hp = *data++;	2114	cell->stat_hp = *data++;
2065	}
2066	else if (cmd == 6) // monster width
2067	cell->stat_width = *data++ + 1;
2068	else if (cmd == 0x47)
2069	{
2070	if (*data == 1) cell->player = data [1];
2071	else if (*data == 2) cell->player = data [2] + (data [1] << 8);
2072	else if (*data == 3) cell->player = data [3] + (data [2] << 8) + (data [1] << 16);
2073	else if (*data == 4) cell->player = data [4] + (data [3] << 8) + (data [2] << 16) + (data [1] << 24);
2074
2075	data += *data + 1;
2076	}
2077	else if (cmd == 8) // cell flags
2078	cell->flags = *data++;
2079	else if (ext & 0x40) // unknown, multibyte => skip
2080	data += *data + 1;
2081	else
2082	data++;
2083	}	2115	}
2084	while (ext & 0x80);	2116	else if (cmd == 6) // monster width
		2117	cell->stat_width = *data++ + 1;
		2118	else if (cmd == 0x47)
		2119	{
		2120	if (*data == 1) cell->player = data [1];
		2121	else if (*data == 2) cell->player = data [2] + (data [1] << 8);
		2122	else if (*data == 3) cell->player = data [3] + (data [2] << 8) + (data [1] << 16);
		2123	else if (*data == 4) cell->player = data [4] + (data [3] << 8) + (data [2] << 16) + (data [1] << 24);
		2124
		2125	data += *data + 1;
		2126	}
		2127	else if (cmd == 8) // cell flags
		2128	cell->flags = *data++;
		2129	else if (ext & 0x40) // unknown, multibyte => skip
		2130	data += *data + 1;
		2131	else
		2132	data++;
2085	}	2133	}
2086	else	2134	while (ext & 0x80);
2087	cell->darkness = *data++ + 1;
2088	}	2135	}
2089		2136
2090	for (z = 0; z <= 2; ++z)	2137	for (z = 0; z <= 2; ++z)
2091	if (flags & (4 >> z))	2138	if (flags & (4 >> z))
2092	{	2139	{
…		…
2166	\| (b << 16)	2213	\| (b << 16)
2167	\| (a << 24);	2214	\| (a << 24);
2168	}	2215	}
2169	}	2216	}
2170		2217
2171	RETVAL = map_sv;	2218	RETVAL = map_sv;
2172	}	2219	}
2173	OUTPUT:	2220	OUTPUT:
2174	RETVAL	2221	RETVAL
2175		2222
2176	void	2223	void
2177	draw (DC::Map self, int mx, int my, int sw, int sh, int Tw, int Th, U32 player = 0xffffffff, int sdx = 0, int sdy = 0)	2224	draw (DC::Map self, int mx, int my, int sw, int sh, int Tw, int Th, U32 player = 0xffffffff, int sdx = 0, int sdy = 0)
2178	CODE:	2225	CODE:
2179	{	2226	{
2180	int x, y, z;	2227	int x, y, z;
2181		2228
2182	HV smooth = (HV )sv_2mortal ((SV *)newHV ());
2183	uint32_t smooth_level[256 / 32]; // one bit for every possible smooth level
2184	static uint8_t smooth_max[256][256]; // egad, fast and wasteful on memory (64k)	2229	static uint8_t smooth_max[256][256]; // egad, fast and wasteful on memory (64k), also, static!
2185	smooth_key skey;
2186	int pl_x, pl_y;	2230	int pl_x, pl_y;
2187	maptex pl_tex;	2231	maptex pl_tex;
2188	rc_t *rc = rc_alloc ();	2232	rc_t *rc = rc_alloc ();
2189	rc_t *rc_ov = rc_alloc ();	2233	rc_t *rc_ov = rc_alloc ();
2190	rc_key_t key;	2234	rc_key_t key;
…		…
2193	pl_tex.name = 0;	2237	pl_tex.name = 0;
2194		2238
2195	// that's current max. sorry.	2239	// that's current max. sorry.
2196	if (sw > 255) sw = 255;	2240	if (sw > 255) sw = 255;
2197	if (sh > 255) sh = 255;	2241	if (sh > 255) sh = 255;
2198
2199	// clear key, in case of extra padding
2200	memset (&skey, 0, sizeof (skey));
2201		2242
2202	memset (&key, 0, sizeof (key));	2243	memset (&key, 0, sizeof (key));
2203	key.r = 255;	2244	key.r = 255;
2204	key.g = 255;	2245	key.g = 255;
2205	key.b = 255;	2246	key.b = 255;
…		…
2211	my += self->y;	2252	my += self->y;
2212		2253
2213	// first pass: determine smooth_max	2254	// first pass: determine smooth_max
2214	// rather ugly, if you ask me	2255	// rather ugly, if you ask me
2215	// could also be stored inside mapcell and updated on change	2256	// could also be stored inside mapcell and updated on change
2216	memset (smooth_max, 0, sizeof (smooth_max));	2257	memset (smooth_max, 0, sizeof (smooth_max[0]) * (sh + 1));
2217		2258
2218	for (y = 0; y < sh; y++)	2259	for (y = 0; y < sh; y++)
2219	if (0 <= y + my && y + my < self->rows)	2260	if (0 <= y + my && y + my < self->rows)
2220	{	2261	{
2221	maprow *row = self->row + (y + my);	2262	maprow *row = self->row + (y + my);
…		…
2236	glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);	2277	glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
2237	glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE);	2278	glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE);
2238		2279
2239	for (z = 0; z <= 2; z++)	2280	for (z = 0; z <= 2; z++)
2240	{	2281	{
2241	memset (smooth_level, 0, sizeof (smooth_level));	2282	std::bitset<256> smooth_level; // one bit for every possible smooth level
		2283	smooth_key skey;
		2284	smooth_hash smooth;
2242	key.texname = -1;	2285	key.texname = -1;
2243		2286
2244	for (y = 0; y < sh; y++)	2287	for (y = 0; y < sh; y++)
2245	if (0 <= y + my && y + my < self->rows)	2288	if (0 <= y + my && y + my < self->rows)
2246	{	2289	{
…		…
2288	if (tex.smoothtile)	2331	if (tex.smoothtile)
2289	{	2332	{
2290	skey.tile = tex.smoothtile;	2333	skey.tile = tex.smoothtile;
2291	skey.level = tex.smoothlevel;	2334	skey.level = tex.smoothlevel;
2292		2335
2293	smooth_level [tex.smoothlevel >> 5] \|= ((uint32_t)1) << (tex.smoothlevel & 31);	2336	smooth_level[tex.smoothlevel] = 1;
2294		2337
2295	// add bits to current tile and all neighbours. skey.x\|y is	2338	// add bits to current tile and all neighbours. skey.x\|y is
2296	// shifted +1\|+1 so we always stay positive.	2339	// shifted +1\|+1 so we always stay positive.
2297		2340
2298	// bits is ___n cccc CCCC bbbb	2341	// bits is ___n cccc CCCC bbbb
…		…
2306		2349
2307	// corners: 1 ┛· 2 ·┗ 4 ·· 8 ··	2350	// corners: 1 ┛· 2 ·┗ 4 ·· 8 ··
2308	// ·· ·· ·┏ ┓·	2351	// ·· ·· ·┏ ┓·
2309		2352
2310	// full tile	2353	// full tile
2311	skey.x = x + 1; skey.y = y + 1; smooth_or_bits (smooth, &skey, 0x1000);	2354	skey.x = x + 1; skey.y = y + 1; smooth_or_bits (smooth, skey, 0x1000);
2312		2355
2313	// borders	2356	// borders
2314	skey.x = x + 2; skey.y = y + 1; smooth_or_bits (smooth, &skey, 0x0091);	2357	skey.x = x + 2; skey.y = y + 1; smooth_or_bits (smooth, skey, 0x0091);
2315	skey.x = x + 1; skey.y = y + 2; smooth_or_bits (smooth, &skey, 0x0032);	2358	skey.x = x + 1; skey.y = y + 2; smooth_or_bits (smooth, skey, 0x0032);
2316	skey.x = x ; skey.y = y + 1; smooth_or_bits (smooth, &skey, 0x0064);	2359	skey.x = x ; skey.y = y + 1; smooth_or_bits (smooth, skey, 0x0064);
2317	skey.x = x + 1; skey.y = y ; smooth_or_bits (smooth, &skey, 0x00c8);	2360	skey.x = x + 1; skey.y = y ; smooth_or_bits (smooth, skey, 0x00c8);
2318		2361
2319	// corners	2362	// corners
2320	skey.x = x + 2; skey.y = y + 2; smooth_or_bits (smooth, &skey, 0x0100);	2363	skey.x = x + 2; skey.y = y + 2; smooth_or_bits (smooth, skey, 0x0100);
2321	skey.x = x ; skey.y = y + 2; smooth_or_bits (smooth, &skey, 0x0200);	2364	skey.x = x ; skey.y = y + 2; smooth_or_bits (smooth, skey, 0x0200);
2322	skey.x = x ; skey.y = y ; smooth_or_bits (smooth, &skey, 0x0400);	2365	skey.x = x ; skey.y = y ; smooth_or_bits (smooth, skey, 0x0400);
2323	skey.x = x + 2; skey.y = y ; smooth_or_bits (smooth, &skey, 0x0800);	2366	skey.x = x + 2; skey.y = y ; smooth_or_bits (smooth, skey, 0x0800);
2324	}	2367	}
2325	}	2368	}
2326		2369
2327	if (expect_false (z == 2) && expect_false (cell->flags))	2370	if (expect_false (z == 2) && expect_false (cell->flags))
2328	{	2371	{
…		…
2355	{	2398	{
2356	int w, b;	2399	int w, b;
2357		2400
2358	glEnable (GL_TEXTURE_2D);	2401	glEnable (GL_TEXTURE_2D);
2359	glBegin (GL_QUADS);	2402	glBegin (GL_QUADS);
2360	for (w = 0; w < 256 / 32; ++w)	2403	for (int level = 0; level < smooth_level.size (); ++level)
		2404	if (smooth_level[level])
		2405	for (auto &&it = smooth.begin (); it != smooth.end (); ++it)
2361	{	2406	{
2362	uint32_t smask = smooth_level [w];	2407	smooth_key &skey = it->first;
2363	if (smask)	2408	IV bits = it->second;
2364	for (b = 0; b < 32; ++b)	2409
2365	if (smask & (((uint32_t)1) << b))	2410	if (!(bits & 0x1000)
		2411	&& skey.level == level
		2412	&& level > smooth_max [skey.x][skey.y])
2366	{	2413	{
2367	int level = (w << 5) \| b;	2414	maptex tex = self->tex [skey.tile];
		2415	int px = (((int)skey.x) - 1) * Tw;
		2416	int py = (((int)skey.y) - 1) * Th;
		2417	int border = bits & 15;
		2418	int corner = (bits >> 8) & ~(bits >> 4) & 15;
		2419	float dx = tex.s * .0625f; // 16 images/row
		2420	float dy = tex.t * .5f ; // 2 images/column
		2421
2368	HE *he;	2422	if (tex.name)
2369
2370	hv_iterinit (smooth);
2371	while ((he = hv_iternext (smooth)))
2372	{	2423	{
2373	smooth_key skey = (smooth_key )HeKEY (he);	2424	// this time avoiding texture state changes
2374	IV bits = SvIVX (HeVAL (he));	2425	// save gobs of state changes.
2375		2426	if (key.texname != tex.name)
2376	if (!(bits & 0x1000)
2377	&& skey->level == level
2378	&& level > smooth_max [skey->x][skey->y])
2379	{	2427	{
2380	maptex tex = self->tex [skey->tile];
2381	int px = (((int)skey->x) - 1) * Tw;
2382	int py = (((int)skey->y) - 1) * Th;
2383	int border = bits & 15;
2384	int corner = (bits >> 8) & ~(bits >> 4) & 15;
2385	float dx = tex.s * .0625f; // 16 images/row
2386	float dy = tex.t * .5f ; // 2 images/column
2387
2388	if (tex.name)
2389	{
2390	// this time avoiding texture state changes
2391	// save gobs of state changes.
2392	if (key.texname != tex.name)
2393	{
2394	self->tex [skey->tile].unused = 0;	2428	self->tex [skey.tile].unused = 0;
2395		2429
2396	glEnd ();	2430	glEnd ();
2397	glBindTexture (GL_TEXTURE_2D, key.texname = tex.name);	2431	glBindTexture (GL_TEXTURE_2D, key.texname = tex.name);
2398	glBegin (GL_QUADS);	2432	glBegin (GL_QUADS);
2399	}	2433	}
2400		2434
2401	if (border)	2435	if (border)
2402	{	2436	{
2403	float ox = border * dx;	2437	float ox = border * dx;
2404		2438
2405	glTexCoord2f (ox , 0.f ); glVertex2i (px , py );	2439	glTexCoord2f (ox , 0.f ); glVertex2i (px , py );
2406	glTexCoord2f (ox , dy ); glVertex2i (px , py + Th);	2440	glTexCoord2f (ox , dy ); glVertex2i (px , py + Th);
2407	glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py + Th);	2441	glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py + Th);
2408	glTexCoord2f (ox + dx, 0.f ); glVertex2i (px + Tw, py );	2442	glTexCoord2f (ox + dx, 0.f ); glVertex2i (px + Tw, py );
2409	}	2443	}
2410		2444
2411	if (corner)	2445	if (corner)
2412	{	2446	{
2413	float ox = corner * dx;	2447	float ox = corner * dx;
2414		2448
2415	glTexCoord2f (ox , dy ); glVertex2i (px , py );	2449	glTexCoord2f (ox , dy ); glVertex2i (px , py );
2416	glTexCoord2f (ox , dy * 2.f); glVertex2i (px , py + Th);	2450	glTexCoord2f (ox , dy * 2.f); glVertex2i (px , py + Th);
2417	glTexCoord2f (ox + dx, dy * 2.f); glVertex2i (px + Tw, py + Th);	2451	glTexCoord2f (ox + dx, dy * 2.f); glVertex2i (px + Tw, py + Th);
2418	glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py );	2452	glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py );
2419	}
2420	}
2421	}	2453	}
2422	}	2454	}
2423	}	2455	}
2424	}	2456	}
2425		2457
2426	glEnd ();	2458	glEnd ();
2427	glDisable (GL_TEXTURE_2D);	2459	glDisable (GL_TEXTURE_2D);
2428	key.texname = -1;	2460	key.texname = -1;
2429	}	2461	}
2430
2431	hv_clear (smooth);
2432	}	2462	}
2433		2463
2434	if (pl_tex.name)	2464	if (pl_tex.name)
2435	{	2465	{
2436	maptex tex = pl_tex;	2466	maptex tex = pl_tex;
…		…
2705	else	2735	else
2706	*data++ = 0;	2736	*data++ = 0;
2707	}	2737	}
2708	}	2738	}
2709		2739
2710	/* if size is wh + 5 then no data has been found /	2740	/* if size is wh + 5 then no data has been found /
2711	if (data - (uint8_t )SvPVX (data_sv) != w h + 5)	2741	if (data - (uint8_t )SvPVX (data_sv) != w h + 5)
2712	{	2742	{
2713	SvPOK_only (data_sv);	2743	SvPOK_only (data_sv);
2714	SvCUR_set (data_sv, data - (uint8_t *)SvPVX (data_sv));	2744	SvCUR_set (data_sv, data - (uint8_t *)SvPVX (data_sv));
2715	}	2745	}
2716		2746
2717	RETVAL = data_sv;	2747	RETVAL = data_sv;
2718	}	2748	}
2719	OUTPUT:	2749	OUTPUT:
2720	RETVAL	2750	RETVAL
2721		2751
2722	void	2752	void
…		…
2729	STRLEN len;	2759	STRLEN len;
2730	uint8_t data, end;	2760	uint8_t data, end;
2731		2761
2732	len = SvLEN (data_sv);	2762	len = SvLEN (data_sv);
2733	SvGROW (data_sv, len + 8); // reserve at least 7+ bytes more	2763	SvGROW (data_sv, len + 8); // reserve at least 7+ bytes more
2734	data = SvPVbyte_nolen (data_sv);	2764	data = (uint8_t *)SvPVbyte_nolen (data_sv);
2735	end = data + len + 8;	2765	end = data + len + 8;
2736		2766
2737	if (len < 5)	2767	if (len < 5)
2738	XSRETURN_EMPTY;	2768	XSRETURN_EMPTY;
2739		2769
…		…
2800	}	2830	}
2801		2831
2802	MODULE = Deliantra::Client PACKAGE = DC::RW	2832	MODULE = Deliantra::Client PACKAGE = DC::RW
2803		2833
2804	DC::RW	2834	DC::RW
2805	new (SV class, SV data_sv)	2835	new (SV klass, SV data_sv)
2806	CODE:	2836	CODE:
2807	{	2837	{
2808	STRLEN datalen;	2838	STRLEN datalen;
2809	char *data = SvPVbyte (data_sv, datalen);	2839	char *data = SvPVbyte (data_sv, datalen);
2810		2840
…		…
2812	}	2842	}
2813	OUTPUT:	2843	OUTPUT:
2814	RETVAL	2844	RETVAL
2815		2845
2816	DC::RW	2846	DC::RW
2817	new_from_file (SV class, const char path, const char *mode = "rb")	2847	new_from_file (SV klass, const char path, const char *mode = "rb")
2818	CODE:	2848	CODE:
2819	RETVAL = SDL_RWFromFile (path, mode);	2849	RETVAL = SDL_RWFromFile (path, mode);
2820	OUTPUT:	2850	OUTPUT:
2821	RETVAL	2851	RETVAL
2822		2852
…		…
2931	#else	2961	#else
2932	XPUSHs (sv_2mortal (newSVpv ("(sdl mixer too old)", 0)));	2962	XPUSHs (sv_2mortal (newSVpv ("(sdl mixer too old)", 0)));
2933	#endif	2963	#endif
2934		2964
2935	DC::MixChunk	2965	DC::MixChunk
2936	new (SV *class, DC::RW rwops)	2966	new (SV *klass, DC::RW rwops)
2937	CODE:	2967	CODE:
2938	RETVAL = Mix_LoadWAV_RW (rwops, 1);	2968	RETVAL = Mix_LoadWAV_RW (rwops, 1);
2939	OUTPUT:	2969	OUTPUT:
2940	RETVAL	2970	RETVAL
2941		2971
…		…
3011	RETVAL = Mix_PlayingMusic ();	3041	RETVAL = Mix_PlayingMusic ();
3012	OUTPUT:	3042	OUTPUT:
3013	RETVAL	3043	RETVAL
3014		3044
3015	DC::MixMusic	3045	DC::MixMusic
3016	new (SV *class, DC::RW rwops)	3046	new (SV *klass, DC::RW rwops)
3017	CODE:	3047	CODE:
3018	RETVAL = Mix_LoadMUS_RW (rwops);	3048	RETVAL = Mix_LoadMUS_RW (rwops);
3019	OUTPUT:	3049	OUTPUT:
3020	RETVAL	3050	RETVAL
3021		3051
…		…
3174	gl.BlendFuncSeparateEXT = 0;	3204	gl.BlendFuncSeparateEXT = 0;
3175		3205
3176	void	3206	void
3177	apple_nvidia_bug (int enable)	3207	apple_nvidia_bug (int enable)
3178		3208
3179	char *	3209	const char *
3180	gl_vendor ()	3210	gl_vendor ()
3181	CODE:	3211	CODE:
3182	RETVAL = (char *)glGetString (GL_VENDOR);	3212	RETVAL = (const char *)glGetString (GL_VENDOR);
3183	OUTPUT:	3213	OUTPUT:
3184	RETVAL	3214	RETVAL
3185		3215
3186	char *	3216	const char *
3187	gl_version ()	3217	gl_version ()
3188	CODE:	3218	CODE:
3189	RETVAL = (char *)glGetString (GL_VERSION);	3219	RETVAL = (const char *)glGetString (GL_VERSION);
3190	OUTPUT:	3220	OUTPUT:
3191	RETVAL	3221	RETVAL
3192		3222
3193	char *	3223	const char *
3194	gl_extensions ()	3224	gl_extensions ()
3195	CODE:	3225	CODE:
3196	RETVAL = (char *)glGetString (GL_EXTENSIONS);	3226	RETVAL = (const char *)glGetString (GL_EXTENSIONS);
3197	OUTPUT:	3227	OUTPUT:
3198	RETVAL	3228	RETVAL
3199		3229
3200	const char *glGetString (GLenum pname)	3230	const char *glGetString (GLenum pname)
		3231	CODE:
		3232	RETVAL = (const char *)glGetString (pname);
		3233	OUTPUT:
		3234	RETVAL
3201		3235
3202	GLint glGetInteger (GLenum pname)	3236	GLint glGetInteger (GLenum pname)
3203	CODE:	3237	CODE:
3204	glGetIntegerv (pname, &RETVAL);	3238	glGetIntegerv (pname, &RETVAL);
3205	OUTPUT:	3239	OUTPUT:
…		…
3408		3442
3409	void	3443	void
3410	find_widget (SV *self, NV x, NV y)	3444	find_widget (SV *self, NV x, NV y)
3411	PPCODE:	3445	PPCODE:
3412	{	3446	{
3413	if (within_widget (self, x, y))	3447	if (within_widget (self, x, y))
3414	XPUSHs (self);	3448	XPUSHs (self);
3415	}	3449	}
3416		3450
3417	BOOT:	3451	BOOT:
3418	{	3452	{
…		…
3426		3460
3427	void	3461	void
3428	draw (SV *self)	3462	draw (SV *self)
3429	CODE:	3463	CODE:
3430	{	3464	{
3431	HV *hv;	3465	HV *hv;
3432	SV **svp;	3466	SV **svp;
3433	NV x, y, w, h;	3467	NV x, y, w, h;
3434	SV *draw_x_sv = GvSV (draw_x_gv);	3468	SV *draw_x_sv = GvSV (draw_x_gv);
3435	SV *draw_y_sv = GvSV (draw_y_gv);	3469	SV *draw_y_sv = GvSV (draw_y_gv);
3436	SV *draw_w_sv = GvSV (draw_w_gv);	3470	SV *draw_w_sv = GvSV (draw_w_gv);
3437	SV *draw_h_sv = GvSV (draw_h_gv);	3471	SV *draw_h_sv = GvSV (draw_h_gv);

Diff Legend

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

Comparing deliantra/Deliantra-Client/Client.xs (file contents): Revision 1.308 by root, Fri Jul 29 08:35:35 2011 UTC vs. Revision 1.325 by root, Sun Nov 18 02:04:48 2018 UTC

Diff Legend

Comparing deliantra/Deliantra-Client/Client.xs (file contents):
Revision 1.308 by root, Fri Jul 29 08:35:35 2011 UTC vs.
Revision 1.325 by root, Sun Nov 18 02:04:48 2018 UTC