d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

prevent sign-extension in unpack when needed

Browse source
This commit is contained in:
ceriel 1991-02-19 12:13:08 +00:00
parent c40ca6ebbd
commit d16c25fc80
2 changed files with 20 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lang/pc/libpc/pac.c
View file

@ -47,6 +47,14 @@ _pac(ad,zd,zp,i,ap) int i; struct descr *ad,*zd; char *zp,*ap; {
assert(ad->size == EM_WSIZE); assert(ad->size == EM_WSIZE);
while (--i >= 0) while (--i >= 0)
*zp++ = *aptmp++; *zp++ = *aptmp++;
#if EM_WSIZE > 2
} else if (zd->size == 2) {
int *aptmp = (int *)ap;
short *zptmp = (short *) zp;
assert(ad->size == EM_WSIZE);
while (--i >= 0)
*zptmp++ = *aptmp++;
#endif
} else { } else {
assert(ad->size == zd->size); assert(ad->size == zd->size);
while (--i >= 0) while (--i >= 0)

14
lang/pc/libpc/unp.c
View file

@ -34,7 +34,7 @@ struct descr {
int size; int size;
}; };
_unp(ad,zd,i,ap,zp) int i; struct descr *ad,*zd; char *ap,*zp; { _unp(ad,zd,i,ap,zp,noext) int i; struct descr *ad,*zd; char *ap,*zp; int noext; {
if (zd->diff > ad->diff || if (zd->diff > ad->diff ||
(i -= ad->low) < 0 || (i -= ad->low) < 0 ||
@ -46,7 +46,17 @@ _unp(ad,zd,i,ap,zp) int i; struct descr *ad,*zd; char *ap,*zp; {
int *aptmp = (int *) ap; int *aptmp = (int *) ap;
assert(ad->size == EM_WSIZE); assert(ad->size == EM_WSIZE);
while (--i >= 0) while (--i >= 0)
*aptmp++ = *zp++; if (noext) *aptmp++ = *zp++ & 0377;
else *aptmp++ = *zp++;
#if EM_WSIZE > 2
} else if (zd->size == 2) {
int *aptmp = (int *) ap;
short *zptmp = (short *) zp;
assert(ad->size == EM_WSIZE);
while (--i >= 0)
if (noext) *aptmp++ = *zptmp++ & 0177777;
else *aptmp++ = *zptmp++;
#endif
} else { } else {
assert(ad->size == zd->size); assert(ad->size == zd->size);
while (--i >= 0) while (--i >= 0)