gcd.c
上传用户:lyxiangda
上传日期:2007-01-12
资源大小:3042k
文件大小:3k
源码类别:

CA认证

开发平台:

WINDOWS

  1. /*
  2.  *  gcd.c
  3.  *
  4.  *  Greatest common divisor
  5.  *
  6.  * The contents of this file are subject to the Mozilla Public
  7.  * License Version 1.1 (the "License"); you may not use this file
  8.  * except in compliance with the License. You may obtain a copy of
  9.  * the License at http://www.mozilla.org/MPL/
  10.  *
  11.  * Software distributed under the License is distributed on an "AS
  12.  * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
  13.  * implied. See the License for the specific language governing
  14.  * rights and limitations under the License.
  15.  *
  16.  * The Original Code is the MPI Arbitrary Precision Integer Arithmetic
  17.  * library.
  18.  *
  19.  * The Initial Developer of the Original Code is Michael J. Fromberger.
  20.  * Portions created by Michael J. Fromberger are 
  21.  * Copyright (C) 1998, 1999, 2000 Michael J. Fromberger. 
  22.  * All Rights Reserved.
  23.  *
  24.  * Contributor(s):
  25.  *
  26.  * Alternatively, the contents of this file may be used under the
  27.  * terms of the GNU General Public License Version 2 or later (the
  28.  * "GPL"), in which case the provisions of the GPL are applicable
  29.  * instead of those above.  If you wish to allow use of your
  30.  * version of this file only under the terms of the GPL and not to
  31.  * allow others to use your version of this file under the MPL,
  32.  * indicate your decision by deleting the provisions above and
  33.  * replace them with the notice and other provisions required by
  34.  * the GPL.  If you do not delete the provisions above, a recipient
  35.  * may use your version of this file under either the MPL or the GPL.
  36.  *
  37.  *  $Id: gcd.c,v 1.1 2000/07/14 00:44:56 nelsonb%netscape.com Exp $
  38.  */
  39. #include <stdio.h>
  40. #include <stdlib.h>
  41. #include <string.h>
  42. #include "mpi.h"
  43. char     *g_prog = NULL;
  44. void print_mp_int(mp_int *mp, FILE *ofp);
  45. int main(int argc, char *argv[]) 
  46. {
  47.   mp_int   a, b, x, y;
  48.   mp_err   res;
  49.   int      ext = 0;
  50.   g_prog = argv[0];
  51.   if(argc < 3) {
  52.     fprintf(stderr, "Usage: %s <a> <b>n", g_prog);
  53.     return 1;
  54.   }
  55.   mp_init(&a); mp_read_radix(&a, argv[1], 10);
  56.   mp_init(&b); mp_read_radix(&b, argv[2], 10);
  57.   /* If we were called 'xgcd', compute x, y so that g = ax + by */
  58.   if(strcmp(g_prog, "xgcd") == 0) {
  59.     ext = 1;
  60.     mp_init(&x); mp_init(&y);
  61.   }
  62.   if(ext) {
  63.     if((res = mp_xgcd(&a, &b, &a, &x, &y)) != MP_OKAY) {
  64.       fprintf(stderr, "%s: error: %sn", g_prog, mp_strerror(res));
  65.       mp_clear(&a); mp_clear(&b);
  66.       mp_clear(&x); mp_clear(&y);
  67.       return 1;
  68.     }
  69.   } else {
  70.     if((res = mp_gcd(&a, &b, &a)) != MP_OKAY) {
  71.       fprintf(stderr, "%s: error: %sn", g_prog,
  72.       mp_strerror(res));
  73.       mp_clear(&a); mp_clear(&b);
  74.       return 1;
  75.     }
  76.   }
  77.   print_mp_int(&a, stdout); 
  78.   if(ext) {
  79.     fputs("x = ", stdout); print_mp_int(&x, stdout); 
  80.     fputs("y = ", stdout); print_mp_int(&y, stdout); 
  81.   }
  82.   mp_clear(&a); mp_clear(&b);
  83.   if(ext) {
  84.     mp_clear(&x);
  85.     mp_clear(&y);
  86.   }
  87.   return 0;
  88. }
  89. void print_mp_int(mp_int *mp, FILE *ofp)
  90. {
  91.   char  *buf;
  92.   int    len;
  93.   len = mp_radix_size(mp, 10);
  94.   buf = calloc(len, sizeof(char));
  95.   mp_todecimal(mp, buf);
  96.   fprintf(ofp, "%sn", buf);
  97.   free(buf);
  98. }