2018/20180707_cgi_web_tools_aux_exe/auxfuncs.c

//$Header$
//********************************************************************************
//Copyright (c) 2003, 2018 David T. Ashley.
//********************************************************************************
//This file is part of "arith_large_cgi", a program that is designed to be
//invoked by a PHP script as part of serving a web page that performs
//calculations involving large integers.  (A secondary compiled program is
//used because a compiled program can perform certain  calculation-intensive
//tasks far more efficiently than a PHP script.)  This program is provided by
//David T. Ashley (dashley@gmail.com) under the MIT License (reproduced
//immediately below).
//********************************************************************************
//Permission is hereby granted, free of charge, to any person obtaining a copy
//of this software and associated documentation files (the "Software"), to deal
//in the Software without restriction, including without limitation the rights
//to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
//copies of the Software, and to permit persons to whom the Software is
//furnished to do so, subject to the following conditions:
//
//The above copyright notice and this permission notice shall be included in all
//copies or substantial portions of the Software.
//
//THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
//IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
//FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
//AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
//LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
//OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
//SOFTWARE.
//********************************************************************************
//
#define MODULE_AUXFUNCS

#include <assert.h>
#include <ctype.h>
#include <stddef.h>
#include <stdio.h>
#include <string.h>
#include <time.h>

#include "auxfuncs.h"


/******************************************************************/
/***  CHARACTER CLASSIFICATION FUNCTIONS   ************************/
/******************************************************************/
int AUXFUNCS_is_digit(char c)
   {
   if ((c >= '0') && (c <= '9'))
      return(1);
   else
      return(0);
   }

int AUXFUNCS_digit_to_val(char digit)
{
  switch (digit)
    {
    case '0':  return(0);
      break;
    case '1':  return(1);
      break;
    case '2':  return(2);
      break;
    case '3':  return(3);
      break;
    case '4':  return(4);
      break;
    case '5':  return(5);
      break;
    case '6':  return(6);
      break;
    case '7':  return(7);
      break;
    case '8':  return(8);
      break;
    case '9':  return(9);
      break;
    default:   return(-1);
      break;
    }
}

/******************************************************************/
/***  INTEGER SIZE_T FUNCTIONS             ************************/
/******************************************************************/
size_t AUXFUNCS_size_t_min(size_t a, size_t b)
   {
   if (a < b)
      return(a);
   else
      return(b);
   }

size_t AUXFUNCS_size_t_max(size_t a, size_t b)
   {
   if (a > b)
      return(a);
   else
      return(b);
   }


/******************************************************************/
/***  CONTRACTING STRING FUNCTIONS  *******************************/
/******************************************************************/
void AUXFUNCS_remove_non_digits(char *s)
   {
   char *src;
   char *dst;

   src = s;
   dst = s;

   while(*src)
      {
      if (AUXFUNCS_is_digit(*src))
         {
         *dst = *src;
         dst++;
         }
      src++;
      }

   *dst = 0;
   }

void AUXFUNCS_remove_leading_zeros(char *s)
   {
   char *src;
   char *dst;

   src = s;
   dst = s;

   while((*src) && (*src == '0'))
      {
      src++;
      }

   while(*src)
      {
      *dst = *src;
      src++;
      dst++;
      }

   *dst = 0;
   }


/******************************************************************/
/***  VERSION CONTROL IDENTITY FUNCTIONS   ************************/
/******************************************************************/
const char *AUXFUNCS_cvcinfo(void)
   {
   return("$Header$");
   }

const char *AUXFUNCS_hvcinfo(void)
   {
   return(AUXFUNCS_H_VERSION);
   }

//********************************************************************************
// End of AUXFUNCS.C.
//********************************************************************************
1	dashley	172	//$Header$
2			//********************************************************************************
3	dashley	175	//Copyright (c) 2003, 2018 David T. Ashley.
4	dashley	172	//********************************************************************************
5	dashley	175	//This file is part of "arith_large_cgi", a program that is designed to be
6			//invoked by a PHP script as part of serving a web page that performs
7			//calculations involving large integers. (A secondary compiled program is
8			//used because a compiled program can perform certain calculation-intensive
9			//tasks far more efficiently than a PHP script.) This program is provided by
10			//David T. Ashley (dashley@gmail.com) under the MIT License (reproduced
11			//immediately below).
12			//********************************************************************************
13			//Permission is hereby granted, free of charge, to any person obtaining a copy
14			//of this software and associated documentation files (the "Software"), to deal
15			//in the Software without restriction, including without limitation the rights
16			//to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
17			//copies of the Software, and to permit persons to whom the Software is
18			//furnished to do so, subject to the following conditions:
19	dashley	172	//
20	dashley	175	//The above copyright notice and this permission notice shall be included in all
21			//copies or substantial portions of the Software.
22	dashley	172	//
23	dashley	175	//THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
24			//IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
25			//FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
26			//AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
27			//LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
28			//OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
29			//SOFTWARE.
30	dashley	172	//********************************************************************************
31			//
32			#define MODULE_AUXFUNCS
33
34			#include <assert.h>
35			#include <ctype.h>
36			#include <stddef.h>
37			#include <stdio.h>
38			#include <string.h>
39			#include <time.h>
40
41			#include "auxfuncs.h"
42
43
44			/******************************************************************/
45			/* CHARACTER CLASSIFICATION FUNCTIONS **********************/
46			/******************************************************************/
47			int AUXFUNCS_is_digit(char c)
48			{
49			if ((c >= '0') && (c <= '9'))
50			return(1);
51			else
52			return(0);
53			}
54
55			int AUXFUNCS_digit_to_val(char digit)
56			{
57			switch (digit)
58			{
59			case '0': return(0);
60			break;
61			case '1': return(1);
62			break;
63			case '2': return(2);
64			break;
65			case '3': return(3);
66			break;
67			case '4': return(4);
68			break;
69			case '5': return(5);
70			break;
71			case '6': return(6);
72			break;
73			case '7': return(7);
74			break;
75			case '8': return(8);
76			break;
77			case '9': return(9);
78			break;
79			default: return(-1);
80			break;
81			}
82			}
83
84			/******************************************************************/
85			/* INTEGER SIZE_T FUNCTIONS **********************/
86			/******************************************************************/
87			size_t AUXFUNCS_size_t_min(size_t a, size_t b)
88			{
89			if (a < b)
90			return(a);
91			else
92			return(b);
93			}
94
95			size_t AUXFUNCS_size_t_max(size_t a, size_t b)
96			{
97			if (a > b)
98			return(a);
99			else
100			return(b);
101			}
102
103
104			/******************************************************************/
105			/* CONTRACTING STRING FUNCTIONS *****************************/
106			/******************************************************************/
107			void AUXFUNCS_remove_non_digits(char *s)
108			{
109			char *src;
110			char *dst;
111
112			src = s;
113			dst = s;
114
115			while(*src)
116			{
117			if (AUXFUNCS_is_digit(*src))
118			{
119			dst = src;
120			dst++;
121			}
122			src++;
123			}
124
125			*dst = 0;
126			}
127
128			void AUXFUNCS_remove_leading_zeros(char *s)
129			{
130			char *src;
131			char *dst;
132
133			src = s;
134			dst = s;
135
136			while((src) && (src == '0'))
137			{
138			src++;
139			}
140
141			while(*src)
142			{
143			dst = src;
144			src++;
145			dst++;
146			}
147
148			*dst = 0;
149			}
150
151
152			/******************************************************************/
153			/* VERSION CONTROL IDENTITY FUNCTIONS **********************/
154			/******************************************************************/
155			const char *AUXFUNCS_cvcinfo(void)
156			{
157			return("$Header$");
158			}
159
160			const char *AUXFUNCS_hvcinfo(void)
161			{
162			return(AUXFUNCS_H_VERSION);
163			}
164
165			//********************************************************************************
166			// End of AUXFUNCS.C.
167			//********************************************************************************