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.41 by root, Sat Apr 15 01:52:53 2006 UTC vs.
Revision 1.48 by root, Tue Apr 18 00:14:16 2006 UTC

1#ifdef _WIN32
2# include <malloc.h>
3#endif
4
1#include "EXTERN.h" 5#include "EXTERN.h"
2#include "perl.h" 6#include "perl.h"
3#include "XSUB.h" 7#include "XSUB.h"
4 8
5#include <string.h> 9#include <string.h>
13 17
14#include <pango/pango.h> 18#include <pango/pango.h>
15#include <pango/pangofc-fontmap.h> 19#include <pango/pangofc-fontmap.h>
16#include <pango/pangoft2.h> 20#include <pango/pangoft2.h>
17 21
22#ifndef _WIN32
18#include <sys/types.h> 23# include <sys/types.h>
19#include <sys/socket.h> 24# include <sys/socket.h>
20#include <netinet/in.h> 25# include <netinet/in.h>
21#include <netinet/tcp.h> 26# include <netinet/tcp.h>
22
23#include <inttypes.h> 27# include <inttypes.h>
28#else
29 typedef unsigned char uint8_t;
30 typedef unsigned short uint16_t;
31 typedef unsigned int uint32_t;
32 typedef signed char int8_t;
33 typedef signed short int16_t;
34 typedef signed int int32_t;
35#endif
24 36
25#define FOW_DARKNESS 32 37#define FOW_DARKNESS 32
26 38
27#define MAP_EXTEND_X 32 39#define MAP_EXTEND_X 32
28#define MAP_EXTEND_Y 512 40#define MAP_EXTEND_Y 512
47{ 59{
48 /* use a random scale factor to account for unknown descenders, 0.8 works 60 /* use a random scale factor to account for unknown descenders, 0.8 works
49 * reasonably well with bitstream vera 61 * reasonably well with bitstream vera
50 */ 62 */
51 PangoFontDescription *font = pango_context_get_font_description (context); 63 PangoFontDescription *font = pango_context_get_font_description (context);
52 pango_font_description_set_absolute_size (font, self->base_height * (PANGO_SCALE * 8 / 10)); 64
65 int height = self->base_height * (PANGO_SCALE * 8 / 10);
66
67 if (pango_font_description_get_size (font) != height)
68 {
69 pango_font_description_set_absolute_size (font, height);
70 pango_layout_context_changed (self->pl);
71 }
53} 72}
54 73
55static void 74static void
56layout_get_pixel_size (CFClient__Layout self, int *w, int *h) 75layout_get_pixel_size (CFClient__Layout self, int *w, int *h)
57{ 76{
61 80
62 *w = (*w + 3) & ~3; 81 *w = (*w + 3) & ~3;
63 if (!*w) *w = 1; 82 if (!*w) *w = 1;
64 if (!*h) *h = 1; 83 if (!*h) *h = 1;
65} 84}
85
86typedef uint16_t mapface;
66 87
67typedef struct { 88typedef struct {
68 GLint name; 89 GLint name;
69 int w, h; 90 int w, h;
70 float s, t; 91 float s, t;
71 uint8_t r, g, b, a; 92 uint8_t r, g, b, a;
72} mapface; 93} maptex;
73 94
74typedef struct { 95typedef struct {
75 int16_t darkness; 96 int16_t darkness;
76 uint16_t face[3]; 97 mapface face[3];
77} mapcell; 98} mapcell;
78 99
79typedef struct { 100typedef struct {
80 int32_t c0, c1; 101 int32_t c0, c1;
81 mapcell *col; 102 mapcell *col;
82} maprow; 103} maprow;
83 104
84typedef struct map { 105typedef struct map {
85 int x, y, w, h; 106 int x, y, w, h;
86 int vx, vy; 107 int ox, oy; /* offset to virtual global coordinate system */
87 int faces; 108 int faces;
88 mapface *face; 109 mapface *face;
89 110
111 int texs;
112 maptex *tex;
113
90 uint32_t rows; 114 int32_t rows;
91 maprow *row; 115 maprow *row;
92} *CFClient__Map; 116} *CFClient__Map;
93 117
94static char * 118static char *
95prepend (char *ptr, int sze, int inc) 119prepend (char *ptr, int sze, int inc)
114} 138}
115 139
116#define Append(type,ptr,sze,inc) (ptr) = (type *)append ((char *)ptr, (sze) * sizeof (type), (inc) * sizeof (type)) 140#define Append(type,ptr,sze,inc) (ptr) = (type *)append ((char *)ptr, (sze) * sizeof (type), (inc) * sizeof (type))
117#define Prepend(type,ptr,sze,inc) (ptr) = (type *)prepend ((char *)ptr, (sze) * sizeof (type), (inc) * sizeof (type)) 141#define Prepend(type,ptr,sze,inc) (ptr) = (type *)prepend ((char *)ptr, (sze) * sizeof (type), (inc) * sizeof (type))
118 142
143static maprow *
144map_get_row (CFClient__Map self, int y)
145{
146 if (0 > y)
147 {
148 int extend = - y + MAP_EXTEND_Y;
149 Prepend (maprow, self->row, self->rows, extend);
150
151 self->rows += extend;
152 self->y += extend;
153 y += extend;
154 }
155 else if (y >= self->rows)
156 {
157 int extend = y - self->rows + MAP_EXTEND_Y;
158 Append (maprow, self->row, self->rows, extend);
159 self->rows += extend;
160 }
161
162 return self->row + y;
163}
164
165static mapcell *
166row_get_cell (maprow *row, int x)
167{
168 if (!row->col)
169 {
170 Newz (0, row->col, MAP_EXTEND_X, mapcell);
171 row->c0 = x - MAP_EXTEND_X / 4;
172 row->c1 = row->c0 + MAP_EXTEND_X;
173 }
174
175 if (row->c0 > x)
176 {
177 int extend = row->c0 - x + MAP_EXTEND_X;
178 Prepend (mapcell, row->col, row->c1 - row->c0, extend);
179 row->c0 -= extend;
180 }
181 else if (x >= row->c1)
182 {
183 int extend = x - row->c1 + MAP_EXTEND_X;
184 Append (mapcell, row->col, row->c1 - row->c0, extend);
185 row->c1 += extend;
186 }
187
188 return row->col + (x - row->c0);
189}
190
191static mapcell *
192map_get_cell (CFClient__Map self, int x, int y)
193{
194 return row_get_cell (map_get_row (self, y), x);
195}
196
119static void 197static void
120map_clear (CFClient__Map self) 198map_clear (CFClient__Map self)
121{ 199{
122 int r; 200 int r;
123 201
126 204
127 Safefree (self->row); 205 Safefree (self->row);
128 206
129 self->x = 0; 207 self->x = 0;
130 self->y = 0; 208 self->y = 0;
131 self->vx = 0; 209 self->ox = 0;
132 self->vy = 0; 210 self->oy = 0;
133 self->row = 0; 211 self->row = 0;
134 self->rows = 0; 212 self->rows = 0;
135} 213}
136 214
137static void 215static void
138map_blank (CFClient__Map self, int x0, int y0, int w, int h) 216map_blank (CFClient__Map self, int x0, int y0, int w, int h)
139{ 217{
140 int x, y; 218 int x, y;
219 maprow *row;
141 220
142 for (y = y0; y < y0 + h; y++) 221 for (y = y0; y < y0 + h; y++)
143 if (y >= 0) 222 if (y >= 0)
144 { 223 {
145 if (y >= self->rows) 224 if (y >= self->rows)
146 break; 225 break;
147 226
148 maprow *row = self->row + y; 227 row = self->row + y;
149 228
150 for (x = x0; x < x0 + w; x++) 229 for (x = x0; x < x0 + w; x++)
151 if (x >= row->c0) 230 if (x >= row->c0)
152 { 231 {
153 if (x >= row->c1) 232 if (x >= row->c1)
170} 249}
171 250
172void 251void
173lowdelay (int fd, int val = 1) 252lowdelay (int fd, int val = 1)
174 CODE: 253 CODE:
254#ifndef _WIN32
175 setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)); 255 setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val));
256#endif
176 257
177char * 258char *
178gl_version () 259gl_version ()
179 CODE: 260 CODE:
180 RETVAL = (char *)glGetString (GL_VERSION); 261 RETVAL = (char *)glGetString (GL_VERSION);
332 char *text = SvPVutf8 (text_, textlen); 413 char *text = SvPVutf8 (text_, textlen);
333 414
334 pango_layout_set_markup (self->pl, text, textlen); 415 pango_layout_set_markup (self->pl, text, textlen);
335} 416}
336 417
418SV *
419get_text (CFClient::Layout self)
420 CODE:
421 RETVAL = newSVpv (pango_layout_get_text (self->pl), 0);
422 SvUTF8_on (RETVAL);
423 OUTPUT:
424 RETVAL
425
337void 426void
338set_height (CFClient::Layout self, int base_height) 427set_height (CFClient::Layout self, int base_height)
339 CODE: 428 CODE:
340 self->base_height = base_height; 429 self->base_height = base_height;
341 430
454 543
455CFClient::Map 544CFClient::Map
456new (SV *class, int map_width, int map_height) 545new (SV *class, int map_width, int map_height)
457 CODE: 546 CODE:
458 New (0, RETVAL, 1, struct map); 547 New (0, RETVAL, 1, struct map);
459 RETVAL->x = 0; 548 RETVAL->x = 0;
460 RETVAL->y = 0; 549 RETVAL->y = 0;
461 RETVAL->w = map_width; 550 RETVAL->w = map_width;
462 RETVAL->h = map_height; 551 RETVAL->h = map_height;
463 RETVAL->vx = 0; 552 RETVAL->ox = 0;
464 RETVAL->vy = 0; 553 RETVAL->oy = 0;
465 RETVAL->faces = 8192; 554 RETVAL->faces = 8192;
466 Newz (0, RETVAL->face, RETVAL->faces, mapface); 555 Newz (0, RETVAL->face, RETVAL->faces, mapface);
556 RETVAL->texs = 8192;
557 Newz (0, RETVAL->tex, RETVAL->texs, maptex);
467 RETVAL->rows = 0; 558 RETVAL->rows = 0;
468 RETVAL->row = 0; 559 RETVAL->row = 0;
469 OUTPUT: 560 OUTPUT:
470 RETVAL 561 RETVAL
471 562
482clear (CFClient::Map self) 573clear (CFClient::Map self)
483 CODE: 574 CODE:
484 map_clear (self); 575 map_clear (self);
485 576
486void 577void
487set_texture (CFClient::Map self, int face, int name, int w, int h, float s, float t, int r, int g, int b, int a) 578set_face (CFClient::Map self, int face, int texid)
488 CODE: 579 CODE:
489{ 580{
490 while (self->faces < face) 581 while (self->faces <= face)
491 { 582 {
492 Append (mapface, self->face, self->faces, self->faces); 583 Append (mapface, self->face, self->faces, self->faces);
493 self->faces *= 2; 584 self->faces *= 2;
494 } 585 }
495 586
496 mapface *f = self->face + face; 587 self->face [face] = texid;
588}
497 589
590void
591set_texture (CFClient::Map self, int texid, int name, int w, int h, float s, float t, int r, int g, int b, int a)
592 CODE:
593{
594 while (self->texs <= texid)
595 {
596 Append (maptex, self->tex, self->texs, self->texs);
597 self->texs *= 2;
598 }
599
600 {
601 maptex *tex = self->tex + texid;
602
498 f->name = name; 603 tex->name = name;
499 f->w = w; 604 tex->w = w;
500 f->h = h; 605 tex->h = h;
501 f->s = s; 606 tex->s = s;
502 f->t = t; 607 tex->t = t;
503 f->r = r; 608 tex->r = r;
504 f->g = g; 609 tex->g = g;
505 f->b = b; 610 tex->b = b;
506 f->a = a; 611 tex->a = a;
612 }
507} 613}
614
615int
616ox (CFClient::Map self)
617 ALIAS:
618 oy = 1
619 CODE:
620 switch (ix)
621 {
622 case 0: RETVAL = self->ox; break;
623 case 1: RETVAL = self->oy; break;
624 }
625 OUTPUT:
626 RETVAL
508 627
509void 628void
510scroll (CFClient::Map self, int dx, int dy) 629scroll (CFClient::Map self, int dx, int dy)
511 CODE: 630 CODE:
512{ 631{
518 if (dy > 0) 637 if (dy > 0)
519 map_blank (self, self->x, self->y, self->w, dy - 1); 638 map_blank (self, self->x, self->y, self->w, dy - 1);
520 else if (dy < 0) 639 else if (dy < 0)
521 map_blank (self, self->x, self->y + self->h + dy + 1, self->w, 1 - dy); 640 map_blank (self, self->x, self->y + self->h + dy + 1, self->w, 1 - dy);
522 641
523 self->x += dx; 642 self->ox += dx; self->x += dx;
524 self->y += dy; 643 self->oy += dy; self->y += dy;
525 644
526 while (self->y < 0) 645 while (self->y < 0)
527 { 646 {
528 Prepend (maprow, self->row, self->rows, MAP_EXTEND_Y); 647 Prepend (maprow, self->row, self->rows, MAP_EXTEND_Y);
529 648
536map1a_update (CFClient::Map self, SV *data_) 655map1a_update (CFClient::Map self, SV *data_)
537 CODE: 656 CODE:
538{ 657{
539 uint8_t *data = (uint8_t *)SvPVbyte_nolen (data_); 658 uint8_t *data = (uint8_t *)SvPVbyte_nolen (data_);
540 uint8_t *data_end = (uint8_t *)SvEND (data_); 659 uint8_t *data_end = (uint8_t *)SvEND (data_);
541 660 mapcell *cell;
661 int x, y, flags;
662
542 while (data < data_end) 663 while (data < data_end)
543 { 664 {
544 int flags = (data [0] << 8) + data [1]; data += 2; 665 flags = (data [0] << 8) + data [1]; data += 2;
545 666
546 int x = ((flags >> 10) & 63) + self->x; 667 x = ((flags >> 10) & 63) + self->x;
547 int y = ((flags >> 4) & 63) + self->y; 668 y = ((flags >> 4) & 63) + self->y;
548 669
549 while (y >= self->rows) 670 cell = map_get_cell (self, x, y);
550 {
551 Prepend (maprow, self->row, self->rows, MAP_EXTEND_Y);
552
553 self->rows += MAP_EXTEND_Y;
554 }
555
556 maprow *row = self->row + y;
557
558 if (!row->col)
559 {
560 Newz (0, row->col, MAP_EXTEND_X, mapcell);
561 row->c0 = self->x - MAP_EXTEND_X / 4;
562 row->c1 = row->c0 + MAP_EXTEND_X;
563 }
564
565 if (row->c0 > x)
566 {
567 int extend = row->c0 - x + MAP_EXTEND_X;
568 Prepend (mapcell, row->col, row->c1 - row->c0, extend);
569 row->c0 -= extend;
570 }
571 else if (x >= row->c1)
572 {
573 int extend = x - row->c1 + MAP_EXTEND_X;
574 Append (mapcell, row->col, row->c1 - row->c0, extend);
575 row->c1 += extend;
576 }
577
578 assert (y >= 0);
579 assert (y < self->rows);
580 assert (x >= row->c0);
581 assert (x < row->c1);
582 mapcell *cell = row->col + (x - row->c0);
583 671
584 if (flags & 15) 672 if (flags & 15)
585 { 673 {
586 if (cell->darkness < 0 && x < self->w && y < self->h) 674 if (cell->darkness < 0)
587 { 675 {
588 cell->darkness = 0; 676 cell->darkness = 0;
589 cell->face [0] = 0; 677 cell->face [0] = 0;
590 cell->face [1] = 0; 678 cell->face [1] = 0;
591 cell->face [2] = 0; 679 cell->face [2] = 0;
592 } 680 }
593 681
594 cell->darkness = flags & 8 ? *data++ : 255; 682 cell->darkness = flags & 8 ? *data++ : 255;
683
684 //TODO: don't trust server data to be in-range(!)
595 685
596 if (flags & 4) 686 if (flags & 4)
597 { 687 {
598 cell->face [0] = (data [0] << 8) + data [1]; data += 2; 688 cell->face [0] = self->face [(data [0] << 8) + data [1]]; data += 2;
599 } 689 }
600 690
601 if (flags & 2) 691 if (flags & 2)
602 { 692 {
603 cell->face [1] = (data [0] << 8) + data [1]; data += 2; 693 cell->face [1] = self->face [(data [0] << 8) + data [1]]; data += 2;
604 } 694 }
605 695
606 if (flags & 1) 696 if (flags & 1)
607 { 697 {
608 cell->face [2] = (data [0] << 8) + data [1]; data += 2; 698 cell->face [2] = self->face [(data [0] << 8) + data [1]]; data += 2;
609 } 699 }
610 } 700 }
611 else 701 else
612 cell->darkness = -1; 702 cell->darkness = -1;
613 } 703 }
643 { 733 {
644 mapcell *cell = row->col + (x - row->c0); 734 mapcell *cell = row->col + (x - row->c0);
645 735
646 for (z = 0; z <= 0; z++) 736 for (z = 0; z <= 0; z++)
647 { 737 {
648 uint16_t face = cell->face [z]; 738 mapface face = cell->face [z];
649 739
650 if (face) 740 if (face)
651 { 741 {
652 mapface tex = self->face [face]; 742 maptex tex = self->tex [face];
653 int a0 = 255 - tex.a; 743 int a0 = 255 - tex.a;
654 int a1 = tex.a; 744 int a1 = tex.a;
655 745
656 r = (r * a0 + tex.r * a1) / 255; 746 r = (r * a0 + tex.r * a1) / 255;
657 g = (g * a0 + tex.g * a1) / 255; 747 g = (g * a0 + tex.g * a1) / 255;
675 765
676void 766void
677draw (CFClient::Map self, int shift_x, int shift_y, int x0, int y0, int sw, int sh) 767draw (CFClient::Map self, int shift_x, int shift_y, int x0, int y0, int sw, int sh)
678 PPCODE: 768 PPCODE:
679{ 769{
770 int vx, vy;
771 int x, y, z;
772 int last_name;
773 mapface face;
680 int sw4 = (sw + 3) & ~3; 774 int sw4 = (sw + 3) & ~3;
681 SV *darkness_sv = sv_2mortal (newSV (sw4 * sh)); 775 SV *darkness_sv = sv_2mortal (newSV (sw4 * sh));
682 uint8_t *darkness = (uint8_t *)SvPVX (darkness_sv); 776 uint8_t *darkness = (uint8_t *)SvPVX (darkness_sv);
683 777
778 memset (darkness, 255, sw4 * sh);
684 SvPOK_only (darkness_sv); 779 SvPOK_only (darkness_sv);
685 SvCUR_set (darkness_sv, sw4 * sh); 780 SvCUR_set (darkness_sv, sw4 * sh);
686 781
687 int vx = self->x + (self->w - sw) / 2 - shift_x; 782 vx = self->x + (self->w - sw) / 2 - shift_x;
688 int vy = self->y + (self->h - sh) / 2 - shift_y; 783 vy = self->y + (self->h - sh) / 2 - shift_y;
689 784
690 if (0)
691 { 785 /*
692 int vx = self->vx = self->w >= sw 786 int vx = self->vx = self->w >= sw
693 ? self->x + (self->w - sw) / 2 787 ? self->x + (self->w - sw) / 2
694 : MIN (self->x, MAX (self->x + self->w - sw + 1, self->vx)); 788 : MIN (self->x, MAX (self->x + self->w - sw + 1, self->vx));
695 789
696 int vy = self->vy = self->h >= sh 790 int vy = self->vy = self->h >= sh
697 ? self->y + (self->h - sh) / 2 791 ? self->y + (self->h - sh) / 2
698 : MIN (self->y, MAX (self->y + self->h - sh + 1, self->vy)); 792 : MIN (self->y, MAX (self->y + self->h - sh + 1, self->vy));
699 } 793 */
700 794
701 glColor4ub (255, 255, 255, 255); 795 glColor4ub (255, 255, 255, 255);
702 796
703 glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); 797 glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
704 glEnable (GL_BLEND); 798 glEnable (GL_BLEND);
705 glEnable (GL_TEXTURE_2D); 799 glEnable (GL_TEXTURE_2D);
706 glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE); 800 glTexEnvi (GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_REPLACE);
707 801
708 int x, y, z;
709
710 int last_name = 0;
711
712 glBegin (GL_QUADS); 802 glBegin (GL_QUADS);
803
804 last_name = 0;
713 805
714 for (z = 0; z < 3; z++) 806 for (z = 0; z < 3; z++)
715 for (y = 0; y < sh; y++) 807 for (y = 0; y < sh; y++)
716 if (0 <= y + vy && y + vy < self->rows) 808 if (0 <= y + vy && y + vy < self->rows)
717 { 809 {
724 816
725 darkness[y * sw4 + x] = cell->darkness < 0 817 darkness[y * sw4 + x] = cell->darkness < 0
726 ? 255 - FOW_DARKNESS 818 ? 255 - FOW_DARKNESS
727 : 255 - cell->darkness; 819 : 255 - cell->darkness;
728 820
729 uint16_t face = cell->face [z]; 821 face = cell->face [z];
730 822
731 if (face) 823 if (face)
732 { 824 {
733 mapface tex = self->face [face]; 825 maptex tex = self->tex [face];
734 826
735 int px = (x + 1) * 32 - tex.w; 827 int px = (x + 1) * 32 - tex.w;
736 int py = (y + 1) * 32 - tex.h; 828 int py = (y + 1) * 32 - tex.h;
737 829
738 if (last_name != tex.name) 830 if (last_name != tex.name)
760 PUSHs (sv_2mortal (newSViv (sw4))); 852 PUSHs (sv_2mortal (newSViv (sw4)));
761 PUSHs (sv_2mortal (newSViv (sh))); 853 PUSHs (sv_2mortal (newSViv (sh)));
762 PUSHs (darkness_sv); 854 PUSHs (darkness_sv);
763} 855}
764 856
857SV *
858get_rect (CFClient::Map self, int x0, int y0, int w, int h)
859 CODE:
860{
861 int x, y, x1, y1;
862 SV *data_sv = newSV (w * h * 7 + 5);
863 uint8_t *data = (uint8_t *)SvPVX (data_sv);
864
865 *data++ = 0; /* version 0 format */
866 *data++ = w >> 8; *data++ = w;
867 *data++ = h >> 8; *data++ = h;
868
869 // we need to do this 'cause we don't keep an absolute coord system for rows
870 // TODO: treat rows as we treat
871 map_get_row (self, y0 + self->y - self->oy);//D
872 map_get_row (self, y0 + self->y - self->oy + h - 1);//D
873
874 x0 += self->x - self->ox;
875 y0 += self->y - self->oy;
876
877 x1 = x0 + w;
878 y1 = y0 + h;
879
880 for (y = y0; y < y1; y++)
881 {
882 maprow *row = 0 <= y && y < self->rows
883 ? self->row + y
884 : 0;
885
886 for (x = x0; x < x1; x++)
887 {
888 if (row && row->c0 <= x && x < row->c1)
889 {
890 mapcell *cell = row->col + (x - row->c0);
891 uint8_t flags = 0;
892
893 if (cell->face [0]) flags |= 1;
894 if (cell->face [1]) flags |= 2;
895 if (cell->face [2]) flags |= 4;
896
897 *data++ = flags;
898
899 if (flags & 1)
900 {
901 *data++ = cell->face [0] >> 8;
902 *data++ = cell->face [0];
903 }
904
905 if (flags & 2)
906 {
907 *data++ = cell->face [1] >> 8;
908 *data++ = cell->face [1];
909 }
910
911 if (flags & 4)
912 {
913 *data++ = cell->face [2] >> 8;
914 *data++ = cell->face [2];
915 }
916 }
917 else
918 *data++ = 0;
919 }
920 }
921
922 SvPOK_only (data_sv);
923 SvCUR_set (data_sv, data - (uint8_t *)SvPVX (data_sv));
924 RETVAL = data_sv;
925}
926 OUTPUT:
927 RETVAL
928
929void
930set_rect (CFClient::Map self, int x0, int y0, uint8_t *data)
931 PPCODE:
932{
933 int x, y, z;
934 int w, h;
935 int x1, y1;
936
937 if (*data++ != 0)
938 return; /* version mismatch */
939
940 w = *data++ << 8; w |= *data++;
941 h = *data++ << 8; h |= *data++;
942
943 // we need to do this 'cause we don't keep an absolute coord system for rows
944 // TODO: treat rows as we treat
945 map_get_row (self, y0 + self->y - self->oy);//D
946 map_get_row (self, y0 + self->y - self->oy + h - 1);//D
947
948 x0 += self->x - self->ox;
949 y0 += self->y - self->oy;
950
951 x1 = x0 + w;
952 y1 = y0 + h;
953
954 for (y = y0; y < y1; y++)
955 {
956 maprow *row = map_get_row (self, y);
957
958 for (x = x0; x < x1; x++)
959 {
960 uint8_t flags = *data++;
961
962 if (flags)
963 {
964 mapface face[3] = { 0, 0, 0 };
965
966 mapcell *cell = row_get_cell (row, x);
967
968 if (flags & 1) { face[0] = *data++ << 8; face[0] |= *data++; }
969 if (flags & 2) { face[1] = *data++ << 8; face[1] |= *data++; }
970 if (flags & 4) { face[2] = *data++ << 8; face[2] |= *data++; }
971
972 if (cell->darkness <= 0)
973 {
974 cell->darkness = -1;
975
976 for (z = 0; z <= 2; z++)
977 {
978 cell->face[z] = face[z];
979
980 if (face[z] && (face[z] >= self->texs || !self->tex[face [z]].name))
981 XPUSHs (sv_2mortal (newSViv (face[z])));
982 }
983 }
984 }
985 }
986 }
987}
988

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines