blob: 9a83cecbe8de5a7facb6147c674d299fb024e0be (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
|
/*
* V A X S H O R T
*
* Code to manipulate 16-bit integers in VAX order in a
* machine independent manner.
*
* (VAX is a trademark of Digital Equipment Corporation)
*
* Author -
* Michael John Muuss
*
* Source -
* SECAD/VLD Computing Consortium, Bldg 394
* The U. S. Army Ballistic Research Laboratory
* Aberdeen Proving Ground, Maryland 21005-5066
*
* Distribution Status -
* Public Domain, Distribution Unlimited.
*/
#include "vaxshort.h"
/*
* V A X _ G S H O R T
*
* Obtain a 16-bit signed integer from two adjacent characters,
* stored in VAX order, regardless of word alignment.
*/
int
vax_gshort(char *msgp)
{
register unsigned char *p = (unsigned char *) msgp;
register int i;
if( (i = (p[1] << 8) | p[0]) & 0x8000 )
return(i | ~0xFFFF); /* Sign extend */
return(i);
}
/*
* V A X _ P S H O R T
*/
char *
vax_pshort(char *msgp, unsigned short s)
{
msgp[0] = s & 0xFF;
msgp[1] = s >> 8;
return(msgp+2);
}
|
