ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/Deliantra-Client/Client.xs
(Generate patch)

Comparing deliantra/Deliantra-Client/Client.xs (file contents):
Revision 1.320 by root, Sun Nov 18 01:00:10 2018 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>
… …
195 } 200 }
196 201
197 return 0; 202 return 0;
198} 203}
199 204
200typedef struct cf_layout { 205struct 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
213typedef cf_layout *DC__Layout;
207 214
208static DC__Font default_font; 215static DC__Font default_font;
209static PangoContext *opengl_context; 216static PangoContext *opengl_context;
210static PangoFontMap *opengl_fontmap; 217static PangoFontMap *opengl_fontmap;
211 218
… …
252} 259}
253 260
254typedef uint16_t tileid; 261typedef uint16_t tileid;
255typedef uint16_t faceid; 262typedef uint16_t faceid;
256 263
257typedef struct { 264struct 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
267typedef struct { 275struct 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
274typedef struct { 283struct maprow
284{
275 int32_t c0, c1; 285 int32_t c0, c1;
276 mapcell *col; 286 mapcell *col;
277} maprow; 287};
278 288
279typedef struct map { 289struct 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
299typedef mapgrid *DC__Map;
288 300
289static char * 301static char *
290prepend (char *ptr, int sze, int inc) 302prepend (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
314static void 326static void
315need_facenum (struct map *self, faceid face) 327need_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
324static void 336static void
325need_texid (struct map *self, int texid) 337need_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
334static maprow * 346static maprow *
335map_get_row (DC__Map self, int y) 347map_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
382static mapcell * 394static mapcell *
383map_get_cell (DC__Map self, int x, int y) 395map_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
388static void 400static void
389map_clear (DC__Map self) 401map_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
416static void 428static void
417map_blank (DC__Map self, int x0, int y0, int w, int h) 429map_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
444typedef struct { 456struct 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
467typedef ska::flat_hash_map<smooth_key, IV> smooth_hash;
468
469namespace 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
449static void 480static void
450smooth_or_bits (HV *hv, smooth_key *key, IV bits) 481smooth_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
460static void 491static void
461music_finished (void) 492music_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
486static unsigned int 518static unsigned int
487div255 (unsigned int n) 519div255 (unsigned int n)
488{ 520{
489 return (n + (n >> 8)) >> 8; 521 return (n + (n >> 8)) >> 8;
490} 522}
… …
1083 OUTPUT: 1115 OUTPUT:
1084 RETVAL 1116 RETVAL
1085 1117
1086int 1118int
1087Mix_OpenAudio (int frequency = 44100, int format = MIX_DEFAULT_FORMAT, int channels = 2, int chunksize = 4096) 1119Mix_OpenAudio (int frequency = 44100, int format = MIX_DEFAULT_FORMAT, int channels = 2, int chunksize = 4096)
1088 POSTCALL: 1120 POSTCALL:
1089 Mix_HookMusicFinished (music_finished); 1121 Mix_HookMusicFinished (music_finished);
1090 Mix_ChannelFinished (channel_finished); 1122 Mix_ChannelFinished (channel_finished);
1091 1123
1092void 1124void
1093Mix_QuerySpec () 1125Mix_QuerySpec ()
… …
1870PROTOTYPES: DISABLE 1902PROTOTYPES: DISABLE
1871 1903
1872DC::Map 1904DC::Map
1873new (SV *klass) 1905new (SV *klass)
1874 CODE: 1906 CODE:
1875 New (0, RETVAL, 1, struct map); 1907 New (0, RETVAL, 1, mapgrid);
1876 RETVAL->x = 0; 1908 RETVAL->x = 0;
1877 RETVAL->y = 0; 1909 RETVAL->y = 0;
1878 RETVAL->w = 0; 1910 RETVAL->w = 0;
1879 RETVAL->h = 0; 1911 RETVAL->h = 0;
1880 RETVAL->ox = 0; 1912 RETVAL->ox = 0;
… …
1917 1949
1918void 1950void
1919set_smooth (DC::Map self, int face, int smooth, int level) 1951set_smooth (DC::Map self, int face, int smooth, int level)
1920 CODE: 1952 CODE:
1921{ 1953{
1922 tileid texid; 1954 tileid texid;
1923 maptex *tex; 1955 maptex *tex;
1924 1956
1925 if (face < 0 || face >= self->faces) 1957 if (face < 0 || face >= self->faces)
1926 return; 1958 return;
1927 1959
1928 if (smooth < 0 || smooth >= self->faces) 1960 if (smooth < 0 || smooth >= self->faces)
1929 return; 1961 return;
1930 1962
1931 texid = self->face2tile [face]; 1963 texid = self->face2tile [face];
1932 1964
1933 if (!texid) 1965 if (!texid)
1934 return; 1966 return;
1935 1967
1936 tex = self->tex + texid; 1968 tex = self->tex + texid;
… …
1969} 2001}
1970 2002
1971void 2003void
1972expire_textures (DC::Map self, int texid, int count) 2004expire_textures (DC::Map self, int texid, int count)
1973 PPCODE: 2005 PPCODE:
1974 for (; texid < self->texs && count; ++texid, --count) 2006 for (; texid < self->texs && count; ++texid, --count)
1975 { 2007 {
1976 maptex *tex = self->tex + texid; 2008 maptex *tex = self->tex + texid;
1977 2009
1978 if (tex->name) 2010 if (tex->name)
1979 { 2011 {
… …
2181 | (b << 16) 2213 | (b << 16)
2182 | (a << 24); 2214 | (a << 24);
2183 } 2215 }
2184 } 2216 }
2185 2217
2186 RETVAL = map_sv; 2218 RETVAL = map_sv;
2187} 2219}
2188 OUTPUT: 2220 OUTPUT:
2189 RETVAL 2221 RETVAL
2190 2222
2191void 2223void
2192draw (DC::Map self, int mx, int my, int sw, int sh, int Tw, int Th, U32 player = 0xffffffff, int sdx = 0, int sdy = 0) 2224draw (DC::Map self, int mx, int my, int sw, int sh, int Tw, int Th, U32 player = 0xffffffff, int sdx = 0, int sdy = 0)
2193 CODE: 2225 CODE:
2194{ 2226{
2195 int x, y, z; 2227 int x, y, z;
2196 2228
2197 HV *smooth = (HV *)sv_2mortal ((SV *)newHV ());
2198 uint32_t smooth_level[256 / 32]; // one bit for every possible smooth level
2199 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!
2200 smooth_key skey;
2201 int pl_x, pl_y; 2230 int pl_x, pl_y;
2202 maptex pl_tex; 2231 maptex pl_tex;
2203 rc_t *rc = rc_alloc (); 2232 rc_t *rc = rc_alloc ();
2204 rc_t *rc_ov = rc_alloc (); 2233 rc_t *rc_ov = rc_alloc ();
2205 rc_key_t key; 2234 rc_key_t key;
… …
2208 pl_tex.name = 0; 2237 pl_tex.name = 0;
2209 2238
2210 // that's current max. sorry. 2239 // that's current max. sorry.
2211 if (sw > 255) sw = 255; 2240 if (sw > 255) sw = 255;
2212 if (sh > 255) sh = 255; 2241 if (sh > 255) sh = 255;
2213
2214 // clear key, in case of extra padding
2215 memset (&skey, 0, sizeof (skey));
2216 2242
2217 memset (&key, 0, sizeof (key)); 2243 memset (&key, 0, sizeof (key));
2218 key.r = 255; 2244 key.r = 255;
2219 key.g = 255; 2245 key.g = 255;
2220 key.b = 255; 2246 key.b = 255;
… …
2226 my += self->y; 2252 my += self->y;
2227 2253
2228 // first pass: determine smooth_max 2254 // first pass: determine smooth_max
2229 // rather ugly, if you ask me 2255 // rather ugly, if you ask me
2230 // could also be stored inside mapcell and updated on change 2256 // could also be stored inside mapcell and updated on change
2231 memset (smooth_max, 0, sizeof (smooth_max)); 2257 memset (smooth_max, 0, sizeof (smooth_max[0]) * (sh + 1));
2232 2258
2233 for (y = 0; y < sh; y++) 2259 for (y = 0; y < sh; y++)
2234 if (0 <= y + my && y + my < self->rows) 2260 if (0 <= y + my && y + my < self->rows)
2235 { 2261 {
2236 maprow *row = self->row + (y + my); 2262 maprow *row = self->row + (y + my);
… …
2251 glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); 2277 glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
2252 glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE); 2278 glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE);
2253 2279
2254 for (z = 0; z <= 2; z++) 2280 for (z = 0; z <= 2; z++)
2255 { 2281 {
2256 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;
2257 key.texname = -1; 2285 key.texname = -1;
2258 2286
2259 for (y = 0; y < sh; y++) 2287 for (y = 0; y < sh; y++)
2260 if (0 <= y + my && y + my < self->rows) 2288 if (0 <= y + my && y + my < self->rows)
2261 { 2289 {
… …
2303 if (tex.smoothtile) 2331 if (tex.smoothtile)
2304 { 2332 {
2305 skey.tile = tex.smoothtile; 2333 skey.tile = tex.smoothtile;
2306 skey.level = tex.smoothlevel; 2334 skey.level = tex.smoothlevel;
2307 2335
2308 smooth_level [tex.smoothlevel >> 5] |= ((uint32_t)1) << (tex.smoothlevel & 31); 2336 smooth_level[tex.smoothlevel] = 1;
2309 2337
2310 // 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
2311 // shifted +1|+1 so we always stay positive. 2339 // shifted +1|+1 so we always stay positive.
2312 2340
2313 // bits is ___n cccc CCCC bbbb 2341 // bits is ___n cccc CCCC bbbb
… …
2321 2349
2322 // corners: 1 ┛· 2 ·┗ 4 ·· 8 ·· 2350 // corners: 1 ┛· 2 ·┗ 4 ·· 8 ··
2323 // ·· ·· ·┏ ┓· 2351 // ·· ·· ·┏ ┓·
2324 2352
2325 // full tile 2353 // full tile
2326 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);
2327 2355
2328 // borders 2356 // borders
2329 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);
2330 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);
2331 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);
2332 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);
2333 2361
2334 // corners 2362 // corners
2335 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);
2336 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);
2337 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);
2338 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);
2339 } 2367 }
2340 } 2368 }
2341 2369
2342 if (expect_false (z == 2) && expect_false (cell->flags)) 2370 if (expect_false (z == 2) && expect_false (cell->flags))
2343 { 2371 {
… …
2370 { 2398 {
2371 int w, b; 2399 int w, b;
2372 2400
2373 glEnable (GL_TEXTURE_2D); 2401 glEnable (GL_TEXTURE_2D);
2374 glBegin (GL_QUADS); 2402 glBegin (GL_QUADS);
2375 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)
2376 { 2406 {
2377 uint32_t smask = smooth_level [w]; 2407 smooth_key &skey = it->first;
2378 if (smask) 2408 IV bits = it->second;
2379 for (b = 0; b < 32; ++b) 2409
2380 if (smask & (((uint32_t)1) << b)) 2410 if (!(bits & 0x1000)
2411 && skey.level == level
2412 && level > smooth_max [skey.x][skey.y])
2381 { 2413 {
2382 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
2383 HE *he; 2422 if (tex.name)
2384
2385 hv_iterinit (smooth);
2386 while ((he = hv_iternext (smooth)))
2387 { 2423 {
2388 smooth_key *skey = (smooth_key *)HeKEY (he); 2424 // this time avoiding texture state changes
2389 IV bits = SvIVX (HeVAL (he)); 2425 // save gobs of state changes.
2390 2426 if (key.texname != tex.name)
2391 if (!(bits & 0x1000)
2392 && skey->level == level
2393 && level > smooth_max [skey->x][skey->y])
2394 { 2427 {
2395 maptex tex = self->tex [skey->tile];
2396 int px = (((int)skey->x) - 1) * Tw;
2397 int py = (((int)skey->y) - 1) * Th;
2398 int border = bits & 15;
2399 int corner = (bits >> 8) & ~(bits >> 4) & 15;
2400 float dx = tex.s * .0625f; // 16 images/row
2401 float dy = tex.t * .5f ; // 2 images/column
2402
2403 if (tex.name)
2404 {
2405 // this time avoiding texture state changes
2406 // save gobs of state changes.
2407 if (key.texname != tex.name)
2408 {
2409 self->tex [skey->tile].unused = 0; 2428 self->tex [skey.tile].unused = 0;
2410 2429
2411 glEnd (); 2430 glEnd ();
2412 glBindTexture (GL_TEXTURE_2D, key.texname = tex.name); 2431 glBindTexture (GL_TEXTURE_2D, key.texname = tex.name);
2413 glBegin (GL_QUADS); 2432 glBegin (GL_QUADS);
2414 } 2433 }
2415 2434
2416 if (border) 2435 if (border)
2417 { 2436 {
2418 float ox = border * dx; 2437 float ox = border * dx;
2419 2438
2420 glTexCoord2f (ox , 0.f ); glVertex2i (px , py ); 2439 glTexCoord2f (ox , 0.f ); glVertex2i (px , py );
2421 glTexCoord2f (ox , dy ); glVertex2i (px , py + Th); 2440 glTexCoord2f (ox , dy ); glVertex2i (px , py + Th);
2422 glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py + Th); 2441 glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py + Th);
2423 glTexCoord2f (ox + dx, 0.f ); glVertex2i (px + Tw, py ); 2442 glTexCoord2f (ox + dx, 0.f ); glVertex2i (px + Tw, py );
2424 } 2443 }
2425 2444
2426 if (corner) 2445 if (corner)
2427 { 2446 {
2428 float ox = corner * dx; 2447 float ox = corner * dx;
2429 2448
2430 glTexCoord2f (ox , dy ); glVertex2i (px , py ); 2449 glTexCoord2f (ox , dy ); glVertex2i (px , py );
2431 glTexCoord2f (ox , dy * 2.f); glVertex2i (px , py + Th); 2450 glTexCoord2f (ox , dy * 2.f); glVertex2i (px , py + Th);
2432 glTexCoord2f (ox + dx, dy * 2.f); glVertex2i (px + Tw, py + Th); 2451 glTexCoord2f (ox + dx, dy * 2.f); glVertex2i (px + Tw, py + Th);
2433 glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py ); 2452 glTexCoord2f (ox + dx, dy ); glVertex2i (px + Tw, py );
2434 }
2435 }
2436 } 2453 }
2437 } 2454 }
2438 } 2455 }
2439 } 2456 }
2440 2457
2441 glEnd (); 2458 glEnd ();
2442 glDisable (GL_TEXTURE_2D); 2459 glDisable (GL_TEXTURE_2D);
2443 key.texname = -1; 2460 key.texname = -1;
2444 } 2461 }
2445
2446 hv_clear (smooth);
2447 } 2462 }
2448 2463
2449 if (pl_tex.name) 2464 if (pl_tex.name)
2450 { 2465 {
2451 maptex tex = pl_tex; 2466 maptex tex = pl_tex;
… …
2720 else 2735 else
2721 *data++ = 0; 2736 *data++ = 0;
2722 } 2737 }
2723 } 2738 }
2724 2739
2725 /* if size is w*h + 5 then no data has been found */ 2740 /* if size is w*h + 5 then no data has been found */
2726 if (data - (uint8_t *)SvPVX (data_sv) != w * h + 5) 2741 if (data - (uint8_t *)SvPVX (data_sv) != w * h + 5)
2727 { 2742 {
2728 SvPOK_only (data_sv); 2743 SvPOK_only (data_sv);
2729 SvCUR_set (data_sv, data - (uint8_t *)SvPVX (data_sv)); 2744 SvCUR_set (data_sv, data - (uint8_t *)SvPVX (data_sv));
2730 } 2745 }
2731 2746
2732 RETVAL = data_sv; 2747 RETVAL = data_sv;
2733} 2748}
2734 OUTPUT: 2749 OUTPUT:
2735 RETVAL 2750 RETVAL
2736 2751
2737void 2752void
… …
3427 3442
3428void 3443void
3429find_widget (SV *self, NV x, NV y) 3444find_widget (SV *self, NV x, NV y)
3430 PPCODE: 3445 PPCODE:
3431{ 3446{
3432 if (within_widget (self, x, y)) 3447 if (within_widget (self, x, y))
3433 XPUSHs (self); 3448 XPUSHs (self);
3434} 3449}
3435 3450
3436BOOT: 3451BOOT:
3437{ 3452{
… …
3445 3460
3446void 3461void
3447draw (SV *self) 3462draw (SV *self)
3448 CODE: 3463 CODE:
3449{ 3464{
3450 HV *hv; 3465 HV *hv;
3451 SV **svp; 3466 SV **svp;
3452 NV x, y, w, h; 3467 NV x, y, w, h;
3453 SV *draw_x_sv = GvSV (draw_x_gv); 3468 SV *draw_x_sv = GvSV (draw_x_gv);
3454 SV *draw_y_sv = GvSV (draw_y_gv); 3469 SV *draw_y_sv = GvSV (draw_y_gv);
3455 SV *draw_w_sv = GvSV (draw_w_gv); 3470 SV *draw_w_sv = GvSV (draw_w_gv);
3456 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