/*
This file is part of Anastasis
Copyright (C) 2022 Anastasis SARL
Anastasis is free software; you can redistribute it and/or modify it under the
terms of the GNU General Public License as published by the Free Software
Foundation; either version 3, or (at your option) any later version.
Anastasis is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
A PARTICULAR PURPOSE. See the GNU General Public License for more details.
You should have received a copy of the GNU General Public License along with
Anastasis; see the file COPYING.GPL. If not, see
*/
/**
* @file reducer/validation_FR_INSEE.c
* @brief Validation for French INSEE Numbers
* @author Christian Grothoff
*/
#include
#include
#include
/**
* Function to validate a French INSEE number.
*
* See https://en.wikipedia.org/wiki/INSEE_code
*
* Note that we do not implement checks on the month
* and also allow non-binary prefixes.
*
* @param insee_number social security number to validate (input)
* @return true if validation passed, else false
*/
bool
FR_INSEE_check (const char *insee_number)
{
char pfx[14];
unsigned long long num;
unsigned int cc;
char dum;
if (strlen (insee_number) != 15)
return false;
memcpy (pfx,
insee_number,
13);
pfx[13] = '\0';
if (1 !=
sscanf (pfx,
"%llu%c",
&num,
&dum))
return false;
if (1 !=
sscanf (&insee_number[13],
"%u%c",
&cc,
&dum))
return false;
if (97 - cc != num % 97)
return false;
return true;
}