1da2e3ebdSchin /***********************************************************************
2da2e3ebdSchin * *
3da2e3ebdSchin * This software is part of the ast package *
4*3e14f97fSRoger A. Faulkner * Copyright (c) 1985-2010 AT&T Intellectual Property *
5da2e3ebdSchin * and is licensed under the *
6da2e3ebdSchin * Common Public License, Version 1.0 *
77c2fbfb3SApril Chin * by AT&T Intellectual Property *
8da2e3ebdSchin * *
9da2e3ebdSchin * A copy of the License is available at *
10da2e3ebdSchin * http://www.opensource.org/licenses/cpl1.0.txt *
11da2e3ebdSchin * (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
12da2e3ebdSchin * *
13da2e3ebdSchin * Information and Software Systems Research *
14da2e3ebdSchin * AT&T Research *
15da2e3ebdSchin * Florham Park NJ *
16da2e3ebdSchin * *
17da2e3ebdSchin * Glenn Fowler <gsf@research.att.com> *
18da2e3ebdSchin * David Korn <dgk@research.att.com> *
19da2e3ebdSchin * Phong Vo <kpv@research.att.com> *
20da2e3ebdSchin * *
21da2e3ebdSchin ***********************************************************************/
22da2e3ebdSchin #pragma prototyped
23da2e3ebdSchin /*
24da2e3ebdSchin * Glenn Fowler
25da2e3ebdSchin * AT&T Research
26da2e3ebdSchin *
27da2e3ebdSchin * internal representation conversion support
28da2e3ebdSchin */
29da2e3ebdSchin
30da2e3ebdSchin #include <ast.h>
31da2e3ebdSchin #include <swap.h>
32da2e3ebdSchin
33da2e3ebdSchin /*
34da2e3ebdSchin * return the swap operation for external to internal conversion
35da2e3ebdSchin * if size<0 then (-size) used and (-size==4)&&(op==3) => op=7
36da2e3ebdSchin * this is a workaround for 4 byte magic predicting 8 byte swap
37da2e3ebdSchin */
38da2e3ebdSchin
39da2e3ebdSchin int
swapop(const void * internal,const void * external,int size)40da2e3ebdSchin swapop(const void* internal, const void* external, int size)
41da2e3ebdSchin {
42da2e3ebdSchin register int op;
43da2e3ebdSchin register int z;
44da2e3ebdSchin char tmp[sizeof(intmax_t)];
45da2e3ebdSchin
46da2e3ebdSchin if ((z = size) < 0)
47da2e3ebdSchin z = -z;
48da2e3ebdSchin if (z <= 1)
49da2e3ebdSchin return 0;
50da2e3ebdSchin if (z <= sizeof(intmax_t))
51da2e3ebdSchin for (op = 0; op < z; op++)
52da2e3ebdSchin if (!memcmp(internal, swapmem(op, external, tmp, z), z))
53da2e3ebdSchin {
54da2e3ebdSchin if (size < 0 && z == 4 && op == 3)
55da2e3ebdSchin op = 7;
56da2e3ebdSchin return op;
57da2e3ebdSchin }
58da2e3ebdSchin return -1;
59da2e3ebdSchin }
60