PIC/TCP-IP%20stack/Helpers.c

/*********************************************************************
 *
 *                  Helper Functions for Microchip TCP/IP Stack
 *
 *********************************************************************
 * FileName:        Helpers.C
 * Dependencies:    compiler.h
 *                  helpers.h
 * Processor:       PIC18
 * Complier:        MCC18 v1.00.50 or higher
 *                  HITECH PICC-18 V8.10PL1 or higher
 * Company:         Microchip Technology, Inc.
 *
 * Software License Agreement
 *
 * The software supplied herewith by Microchip Technology Incorporated
 * (the “Company”) for its PICmicro® Microcontroller is intended and
 * supplied to you, the Company’s customer, for use solely and
 * exclusively on Microchip PICmicro Microcontroller products. The
 * software is owned by the Company and/or its supplier, and is
 * protected under applicable copyright laws. All rights are reserved.
 * Any use in violation of the foregoing restrictions may subject the
 * user to criminal sanctions under applicable laws, as well as to
 * civil liability for the breach of the terms and conditions of this
 * license.
 *
 * THIS SOFTWARE IS PROVIDED IN AN “AS IS” CONDITION. NO WARRANTIES,
 * WHETHER EXPRESS, IMPLIED OR STATUTORY, INCLUDING, BUT NOT LIMITED
 * TO, IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
 * PARTICULAR PURPOSE APPLY TO THIS SOFTWARE. THE COMPANY SHALL NOT,
 * IN ANY CIRCUMSTANCES, BE LIABLE FOR SPECIAL, INCIDENTAL OR
 * CONSEQUENTIAL DAMAGES, FOR ANY REASON WHATSOEVER.
 *
 * HiTech PICC18 Compiler Options excluding device selection:
 *                  -FAKELOCAL -G -E -C
 *
 *
 *
 * Author               Date    Comment
 *~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 * Nilesh Rajbharti     5/17/01 Original        (Rev 1.0)
 * Nilesh Rajbharti     2/9/02  Cleanup
 * Nilesh Rajbharti     6/25/02 Rewritten CalcIPChecksum() to avoid
 *                              multi-byte shift operation.
 ********************************************************************/

#include "compiler.h"
#include "helpers.h"


WORD swaps(WORD v)
{
    WORD_VAL t;
    BYTE b;

    t.Val   = v;
    b       = t.v[1];
    t.v[1]  = t.v[0];
    t.v[0]  = b;

    return t.Val;
}


DWORD swapl(DWORD v)
{
    BYTE b;
    DWORD myV;
    DWORD_VAL *myP;

    myV     = v;
    myP     = (DWORD_VAL*)&myV;

    b       = myP->v[3];
    myP->v[3] = myP->v[0];
    myP->v[0] = b;

    b       = myP->v[2];
    myP->v[2] = myP->v[1];
    myP->v[1] = b;

    return myV;

}

WORD CalcIPChecksum(BYTE* buffer, WORD count)
{
    WORD i;
    WORD *val;

    union
    {
        DWORD Val;
        struct
        {
            WORD_VAL LSB;
            WORD_VAL MSB;
        } words;
    } tempSum, sum;

    sum.Val = 0;

    i = count >> 1;
    val = (WORD *)buffer;

    while( i-- )
        sum.Val += *val++;

    if ( count & 1 )
        sum.Val += *(BYTE *)val;

    tempSum.Val = sum.Val;

    while( (i = tempSum.words.MSB.Val) != 0 )
    {
        sum.words.MSB.Val = 0;
        sum.Val = (DWORD)sum.words.LSB.Val + (DWORD)i;
        tempSum.Val = sum.Val;
    }

    return (~sum.words.LSB.Val);
}


#if defined(HITECH_C18)
char *strupr (char *s)
{
    char c;
    char *t;

    t = s;
    while( (c = *t) )
    {
        if ( (c >= 'a' && c <= 'z') )
            *t -= ('a' - 'A');
    t++;
    }
    return s;
}
#endif


#if defined(HITECH_C18)
void *mymemcpy(void * d1, const void * s1, register unsigned char n)
{

    register char *     d;
    register const char *   s;

    s = s1;
    d = d1;
    while(n--)
        *d++ = *s++;
    return d1;
}
#endif
1	/*********************************************************************
2	*
3	* Helper Functions for Microchip TCP/IP Stack
4	*
5	*********************************************************************
6	* FileName: Helpers.C
7	* Dependencies: compiler.h
8	* helpers.h
9	* Processor: PIC18
10	* Complier: MCC18 v1.00.50 or higher
11	* HITECH PICC-18 V8.10PL1 or higher
12	* Company: Microchip Technology, Inc.
13	*
14	* Software License Agreement
15	*
16	* The software supplied herewith by Microchip Technology Incorporated
17	* (the “Company”) for its PICmicro® Microcontroller is intended and
18	* supplied to you, the Company’s customer, for use solely and
19	* exclusively on Microchip PICmicro Microcontroller products. The
20	* software is owned by the Company and/or its supplier, and is
21	* protected under applicable copyright laws. All rights are reserved.
22	* Any use in violation of the foregoing restrictions may subject the
23	* user to criminal sanctions under applicable laws, as well as to
24	* civil liability for the breach of the terms and conditions of this
25	* license.
26	*
27	* THIS SOFTWARE IS PROVIDED IN AN “AS IS” CONDITION. NO WARRANTIES,
28	* WHETHER EXPRESS, IMPLIED OR STATUTORY, INCLUDING, BUT NOT LIMITED
29	* TO, IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
30	* PARTICULAR PURPOSE APPLY TO THIS SOFTWARE. THE COMPANY SHALL NOT,
31	* IN ANY CIRCUMSTANCES, BE LIABLE FOR SPECIAL, INCIDENTAL OR
32	* CONSEQUENTIAL DAMAGES, FOR ANY REASON WHATSOEVER.
33	*
34	* HiTech PICC18 Compiler Options excluding device selection:
35	* -FAKELOCAL -G -E -C
36	*
37	*
38	*
39	* Author Date Comment
40	*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
41	* Nilesh Rajbharti 5/17/01 Original (Rev 1.0)
42	* Nilesh Rajbharti 2/9/02 Cleanup
43	* Nilesh Rajbharti 6/25/02 Rewritten CalcIPChecksum() to avoid
44	* multi-byte shift operation.
45	********************************************************************/
46
47	#include "compiler.h"
48	#include "helpers.h"
49
50
51	WORD swaps(WORD v)
52	{
53	WORD_VAL t;
54	BYTE b;
55
56	t.Val = v;
57	b = t.v[1];
58	t.v[1] = t.v[0];
59	t.v[0] = b;
60
61	return t.Val;
62	}
63
64
65	DWORD swapl(DWORD v)
66	{
67	BYTE b;
68	DWORD myV;
69	DWORD_VAL *myP;
70
71	myV = v;
72	myP = (DWORD_VAL*)&myV;
73
74	b = myP->v[3];
75	myP->v[3] = myP->v[0];
76	myP->v[0] = b;
77
78	b = myP->v[2];
79	myP->v[2] = myP->v[1];
80	myP->v[1] = b;
81
82	return myV;
83
84	}
85
86	WORD CalcIPChecksum(BYTE* buffer, WORD count)
87	{
88	WORD i;
89	WORD *val;
90
91	union
92	{
93	DWORD Val;
94	struct
95	{
96	WORD_VAL LSB;
97	WORD_VAL MSB;
98	} words;
99	} tempSum, sum;
100
101	sum.Val = 0;
102
103	i = count >> 1;
104	val = (WORD *)buffer;
105
106	while( i-- )
107	sum.Val += *val++;
108
109	if ( count & 1 )
110	sum.Val += (BYTE )val;
111
112	tempSum.Val = sum.Val;
113
114	while( (i = tempSum.words.MSB.Val) != 0 )
115	{
116	sum.words.MSB.Val = 0;
117	sum.Val = (DWORD)sum.words.LSB.Val + (DWORD)i;
118	tempSum.Val = sum.Val;
119	}
120
121	return (~sum.words.LSB.Val);
122	}
123
124
125	#if defined(HITECH_C18)
126	char strupr (char s)
127	{
128	char c;
129	char *t;
130
131	t = s;
132	while( (c = *t) )
133	{
134	if ( (c >= 'a' && c <= 'z') )
135	*t -= ('a' - 'A');
136	t++;
137	}
138	return s;
139	}
140	#endif
141
142
143	#if defined(HITECH_C18)
144	void mymemcpy(void d1, const void * s1, register unsigned char n)
145	{
146
147	register char * d;
148	register const char * s;
149
150	s = s1;
151	d = d1;
152	while(n--)
153	d++ = s++;
154	return d1;
155	}
156	#endif