LCOV - code coverage report
Current view: top level - lib/scram - parser.c (source / functions) Hit Total Coverage
Test: GNU SASL Lines: 188 254 74.0 %
Date: 2010-09-27 Functions: 5 5 100.0 %
Legend: Lines: hit not hit | Branches: + taken - not taken # not executed Branches: 126 230 54.8 %

           Branch data     Line data    Source code
       1                 :            : /* parser.c --- SCRAM parser.
       2                 :            :  * Copyright (C) 2009, 2010  Simon Josefsson
       3                 :            :  *
       4                 :            :  * This file is part of GNU SASL Library.
       5                 :            :  *
       6                 :            :  * GNU SASL Library is free software; you can redistribute it and/or
       7                 :            :  * modify it under the terms of the GNU Lesser General Public License
       8                 :            :  * as published by the Free Software Foundation; either version 2.1 of
       9                 :            :  * the License, or (at your option) any later version.
      10                 :            :  *
      11                 :            :  * GNU SASL Library is distributed in the hope that it will be useful,
      12                 :            :  * but WITHOUT ANY WARRANTY; without even the implied warranty of
      13                 :            :  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
      14                 :            :  * Lesser General Public License for more details.
      15                 :            :  *
      16                 :            :  * You should have received a copy of the GNU Lesser General Public
      17                 :            :  * License along with GNU SASL Library; if not, write to the Free
      18                 :            :  * Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
      19                 :            :  * Boston, MA 02110-1301, USA.
      20                 :            :  *
      21                 :            :  */
      22                 :            : 
      23                 :            : #ifdef HAVE_CONFIG_H
      24                 :            : # include "config.h"
      25                 :            : #endif
      26                 :            : 
      27                 :            : /* Get prototypes. */
      28                 :            : #include "parser.h"
      29                 :            : 
      30                 :            : /* Get malloc, free. */
      31                 :            : #include <stdlib.h>
      32                 :            : 
      33                 :            : /* Get memcpy, strlen. */
      34                 :            : #include <string.h>
      35                 :            : 
      36                 :            : /* Get validator. */
      37                 :            : #include "validate.h"
      38                 :            : 
      39                 :            : /* Get c_isalpha. */
      40                 :            : #include "c-ctype.h"
      41                 :            : 
      42                 :            : static char *
      43                 :         33 : unescape (const char *str, size_t len)
      44                 :            : {
      45                 :         33 :   char *out = malloc (len + 1);
      46                 :         33 :   char *p = out;
      47                 :            : 
      48         [ -  + ]:         33 :   if (!out)
      49                 :          0 :     return NULL;
      50                 :            : 
      51 [ +  + ][ +  - ]:        195 :   while (len > 0 && *str)
      52                 :            :     {
      53 [ +  + ][ +  + ]:        162 :       if (len >= 3 && str[0] == '=' && str[1] == '2' && str[2] == 'C')
         [ +  + ][ +  - ]
      54                 :            :         {
      55                 :         22 :           *p++ = ',';
      56                 :         22 :           str += 3;
      57                 :         22 :           len -= 3;
      58                 :            :         }
      59 [ +  + ][ +  + ]:        140 :       else if (len >= 3 && str[0] == '=' && str[1] == '3' && str[2] == 'D')
         [ +  - ][ +  - ]
      60                 :            :         {
      61                 :         20 :           *p++ = '=';
      62                 :         20 :           str += 3;
      63                 :         20 :           len -= 3;
      64                 :            :         }
      65                 :            :       else
      66                 :            :         {
      67                 :        120 :           *p++ = *str;
      68                 :        120 :           str++;
      69                 :        120 :           len--;
      70                 :            :         }
      71                 :            :     }
      72                 :         33 :   *p = '\0';
      73                 :            : 
      74                 :         33 :   return out;
      75                 :            : }
      76                 :            : 
      77                 :            : int
      78                 :         26 : scram_parse_client_first (const char *str, size_t len,
      79                 :            :                           struct scram_client_first *cf)
      80                 :            : {
      81                 :            :   /* Minimum client first string is 'n,,n=a,r=b'. */
      82         [ +  + ]:         26 :   if (strnlen (str, len) < 10)
      83                 :          4 :     return -1;
      84                 :            : 
      85 [ +  - ][ +  + ]:         22 :   if (len == 0 || (*str != 'n' && *str != 'y'))
                 [ -  + ]
      86                 :            :       /* FIXME support channel bindings */
      87                 :          0 :       return -1;
      88                 :         22 :   cf->cbflag = *str;
      89                 :         22 :   str++, len--;
      90                 :            : 
      91 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != ',')
      92                 :          0 :     return -1;
      93                 :         22 :   str++, len--;
      94                 :            : 
      95         [ -  + ]:         22 :   if (len == 0)
      96                 :          0 :     return -1;
      97         [ +  + ]:         22 :   if (*str == 'a')
      98                 :            :     {
      99                 :            :       const char *p;
     100                 :            :       size_t l;
     101                 :            : 
     102                 :         11 :       str++, len--;
     103 [ +  - ][ -  + ]:         11 :       if (len == 0 || *str != '=')
     104                 :          0 :         return -1;
     105                 :         11 :       str++, len--;
     106                 :            : 
     107                 :         11 :       p = memchr (str, ',', len);
     108         [ -  + ]:         11 :       if (!p)
     109                 :          0 :         return -1;
     110                 :            : 
     111                 :         11 :       l = p - str;
     112         [ -  + ]:         11 :       if (len < l)
     113                 :          0 :         return -1;
     114                 :            : 
     115                 :         11 :       cf->authzid = unescape (str, l);
     116         [ -  + ]:         11 :       if (!cf->authzid)
     117                 :          0 :         return -1;
     118                 :            : 
     119                 :         11 :       str = p;
     120                 :         11 :       len -= l;
     121                 :            :     }
     122                 :            : 
     123 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != ',')
     124                 :          0 :     return -1;
     125                 :         22 :   str++, len--;
     126                 :            : 
     127 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != 'n')
     128                 :          0 :     return -1;
     129                 :         22 :   str++, len--;
     130                 :            : 
     131 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != '=')
     132                 :          0 :     return -1;
     133                 :         22 :   str++, len--;
     134                 :            : 
     135                 :            :   {
     136                 :            :     const char *p;
     137                 :            :     size_t l;
     138                 :            : 
     139                 :         22 :     p = memchr (str, ',', len);
     140         [ -  + ]:         22 :     if (!p)
     141                 :          0 :       return -1;
     142                 :            : 
     143                 :         22 :     l = p - str;
     144         [ -  + ]:         22 :     if (len < l)
     145                 :          0 :       return -1;
     146                 :            : 
     147                 :         22 :     cf->username = unescape (str, l);
     148         [ -  + ]:         22 :     if (!cf->username)
     149                 :          0 :       return -1;
     150                 :            : 
     151                 :         22 :     str = p;
     152                 :         22 :     len -= l;
     153                 :            :   }
     154                 :            : 
     155 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != ',')
     156                 :          0 :     return -1;
     157                 :         22 :   str++, len--;
     158                 :            : 
     159 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != 'r')
     160                 :          0 :     return -1;
     161                 :         22 :   str++, len--;
     162                 :            : 
     163 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != '=')
     164                 :          0 :     return -1;
     165                 :         22 :   str++, len--;
     166                 :            : 
     167                 :            :   {
     168                 :            :     const char *p;
     169                 :            :     size_t l;
     170                 :            : 
     171                 :         22 :     p = memchr (str, ',', len);
     172         [ +  + ]:         22 :     if (!p)
     173                 :         20 :       p = str + len;
     174         [ -  + ]:         22 :     if (!p)
     175                 :          0 :       return -1;
     176                 :            : 
     177                 :         22 :     l = p - str;
     178         [ -  + ]:         22 :     if (len < l)
     179                 :          0 :       return -1;
     180                 :            : 
     181                 :         22 :     cf->client_nonce = malloc (l + 1);
     182         [ -  + ]:         22 :     if (!cf->client_nonce)
     183                 :          0 :       return -1;
     184                 :            : 
     185                 :         22 :     memcpy (cf->client_nonce, str, l);
     186                 :         22 :     cf->client_nonce[l] = '\0';
     187                 :            : 
     188                 :         22 :     str = p;
     189                 :         22 :     len -= l;
     190                 :            :   }
     191                 :            : 
     192                 :            :   /* FIXME check that any extension fields follow valid syntax. */
     193                 :            : 
     194         [ -  + ]:         22 :   if (scram_valid_client_first (cf) < 0)
     195                 :          0 :     return -1;
     196                 :            : 
     197                 :         26 :   return 0;
     198                 :            : }
     199                 :            : 
     200                 :            : int
     201                 :         22 : scram_parse_server_first (const char *str, size_t len,
     202                 :            :                           struct scram_server_first *sf)
     203                 :            : {
     204                 :            :   /* Minimum server first string is 'r=ab,s=biws,i=1'. */
     205         [ -  + ]:         22 :   if (strnlen (str, len) < 15)
     206                 :          0 :     return -1;
     207                 :            : 
     208 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != 'r')
     209                 :          0 :     return -1;
     210                 :         22 :   str++, len--;
     211                 :            : 
     212 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != '=')
     213                 :          0 :     return -1;
     214                 :         22 :   str++, len--;
     215                 :            : 
     216                 :            :   {
     217                 :            :     const char *p;
     218                 :            :     size_t l;
     219                 :            : 
     220                 :         22 :     p = memchr (str, ',', len);
     221         [ -  + ]:         22 :     if (!p)
     222                 :          0 :       return -1;
     223                 :            : 
     224                 :         22 :     l = p - str;
     225         [ -  + ]:         22 :     if (len < l)
     226                 :          0 :       return -1;
     227                 :            : 
     228                 :         22 :     sf->nonce = malloc (l + 1);
     229         [ -  + ]:         22 :     if (!sf->nonce)
     230                 :          0 :       return -1;
     231                 :            : 
     232                 :         22 :     memcpy (sf->nonce, str, l);
     233                 :         22 :     sf->nonce[l] = '\0';
     234                 :            : 
     235                 :         22 :     str = p;
     236                 :         22 :     len -= l;
     237                 :            :   }
     238                 :            : 
     239 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != ',')
     240                 :          0 :     return -1;
     241                 :         22 :   str++, len--;
     242                 :            : 
     243 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != 's')
     244                 :          0 :     return -1;
     245                 :         22 :   str++, len--;
     246                 :            : 
     247 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != '=')
     248                 :          0 :     return -1;
     249                 :         22 :   str++, len--;
     250                 :            : 
     251                 :            :   {
     252                 :            :     const char *p;
     253                 :            :     size_t l;
     254                 :            : 
     255                 :         22 :     p = memchr (str, ',', len);
     256         [ -  + ]:         22 :     if (!p)
     257                 :          0 :       return -1;
     258                 :            : 
     259                 :         22 :     l = p - str;
     260         [ -  + ]:         22 :     if (len < l)
     261                 :          0 :       return -1;
     262                 :            : 
     263                 :         22 :     sf->salt = malloc (l + 1);
     264         [ -  + ]:         22 :     if (!sf->salt)
     265                 :          0 :       return -1;
     266                 :            : 
     267                 :         22 :     memcpy (sf->salt, str, l);
     268                 :         22 :     sf->salt[l] = '\0';
     269                 :            : 
     270                 :         22 :     str = p;
     271                 :         22 :     len -= l;
     272                 :            :   }
     273                 :            : 
     274 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != ',')
     275                 :          0 :     return -1;
     276                 :         22 :   str++, len--;
     277                 :            : 
     278 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != 'i')
     279                 :          0 :     return -1;
     280                 :         22 :   str++, len--;
     281                 :            : 
     282 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != '=')
     283                 :          0 :     return -1;
     284                 :         22 :   str++, len--;
     285                 :            : 
     286                 :         22 :   sf->iter = 0;
     287 [ +  + ][ +  - ]:        110 :   for (; len > 0 && *str >= '0' && *str <= '9'; str++, len--)
                 [ +  - ]
     288                 :            :     {
     289                 :         88 :       size_t last_iter = sf->iter;
     290                 :            : 
     291                 :         88 :       sf->iter = sf->iter * 10 + (*str - '0');
     292                 :            : 
     293                 :            :       /* Protect against wrap arounds. */
     294         [ -  + ]:         88 :       if (sf->iter < last_iter)
     295                 :          0 :         return -1;
     296                 :            :     }
     297                 :            : 
     298 [ -  + ][ #  # ]:         22 :   if (len > 0 && *str != ',')
     299                 :          0 :     return -1;
     300                 :            : 
     301                 :            :   /* FIXME check that any extension fields follow valid syntax. */
     302                 :            : 
     303         [ -  + ]:         22 :   if (scram_valid_server_first (sf) < 0)
     304                 :          0 :     return -1;
     305                 :            : 
     306                 :         22 :   return 0;
     307                 :            : }
     308                 :            : 
     309                 :            : int
     310                 :         22 : scram_parse_client_final (const char *str, size_t len,
     311                 :            :                           struct scram_client_final *cl)
     312                 :            : {
     313                 :            :   /* Minimum client final string is 'c=biws,r=ab,p=ab=='. */
     314         [ -  + ]:         22 :   if (strnlen (str, len) < 18)
     315                 :          0 :     return -1;
     316                 :            : 
     317 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != 'c')
     318                 :          0 :     return -1;
     319                 :         22 :   str++, len--;
     320                 :            : 
     321 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != '=')
     322                 :          0 :     return -1;
     323                 :         22 :   str++, len--;
     324                 :            : 
     325                 :            :   {
     326                 :            :     const char *p;
     327                 :            :     size_t l;
     328                 :            : 
     329                 :         22 :     p = memchr (str, ',', len);
     330         [ -  + ]:         22 :     if (!p)
     331                 :          0 :       return -1;
     332                 :            : 
     333                 :         22 :     l = p - str;
     334         [ -  + ]:         22 :     if (len < l)
     335                 :          0 :       return -1;
     336                 :            : 
     337                 :         22 :     cl->cbind = malloc (l + 1);
     338         [ -  + ]:         22 :     if (!cl->cbind)
     339                 :          0 :       return -1;
     340                 :            : 
     341                 :         22 :     memcpy (cl->cbind, str, l);
     342                 :         22 :     cl->cbind[l] = '\0';
     343                 :            : 
     344                 :         22 :     str = p;
     345                 :         22 :     len -= l;
     346                 :            :   }
     347                 :            : 
     348 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != ',')
     349                 :          0 :     return -1;
     350                 :         22 :   str++, len--;
     351                 :            : 
     352 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != 'r')
     353                 :          0 :     return -1;
     354                 :         22 :   str++, len--;
     355                 :            : 
     356 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != '=')
     357                 :          0 :     return -1;
     358                 :         22 :   str++, len--;
     359                 :            : 
     360                 :            :   {
     361                 :            :     const char *p;
     362                 :            :     size_t l;
     363                 :            : 
     364                 :         22 :     p = memchr (str, ',', len);
     365         [ -  + ]:         22 :     if (!p)
     366                 :          0 :       return -1;
     367                 :            : 
     368                 :         22 :     l = p - str;
     369         [ -  + ]:         22 :     if (len < l)
     370                 :          0 :       return -1;
     371                 :            : 
     372                 :         22 :     cl->nonce = malloc (l + 1);
     373         [ -  + ]:         22 :     if (!cl->nonce)
     374                 :          0 :       return -1;
     375                 :            : 
     376                 :         22 :     memcpy (cl->nonce, str, l);
     377                 :         22 :     cl->nonce[l] = '\0';
     378                 :            : 
     379                 :         22 :     str = p;
     380                 :         22 :     len -= l;
     381                 :            :   }
     382                 :            : 
     383 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != ',')
     384                 :          0 :     return -1;
     385                 :         22 :   str++, len--;
     386                 :            : 
     387                 :            :   /* Ignore extensions. */
     388 [ +  - ][ +  - ]:         26 :   while (len > 0 && c_isalpha (*str) && *str != 'p')
                 [ +  + ]
     389                 :            :     {
     390                 :            :       const char *p;
     391                 :            :       size_t l;
     392                 :            : 
     393                 :          4 :       str++, len--;
     394                 :            : 
     395 [ +  - ][ -  + ]:          4 :       if (len == 0 || *str != '=')
     396                 :          0 :         return -1;
     397                 :          4 :       str++, len--;
     398                 :            : 
     399                 :          4 :       p = memchr (str, ',', len);
     400         [ -  + ]:          4 :       if (!p)
     401                 :          0 :         return -1;
     402                 :          4 :       p++;
     403                 :            : 
     404                 :          4 :       l = p - str;
     405         [ -  + ]:          4 :       if (len < l)
     406                 :          0 :         return -1;
     407                 :            : 
     408                 :          4 :       str = p;
     409                 :          4 :       len -= l;
     410                 :            :     }
     411                 :            : 
     412 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != 'p')
     413                 :          0 :     return -1;
     414                 :         22 :   str++, len--;
     415                 :            : 
     416 [ +  - ][ -  + ]:         22 :   if (len == 0 || *str != '=')
     417                 :          0 :     return -1;
     418                 :         22 :   str++, len--;
     419                 :            : 
     420                 :            :   /* Sanity check proof. */
     421         [ -  + ]:         22 :   if (memchr (str, '\0', len))
     422                 :          0 :     return -1;
     423                 :            : 
     424                 :         22 :   cl->proof = malloc (len + 1);
     425         [ -  + ]:         22 :   if (!cl->proof)
     426                 :          0 :     return -1;
     427                 :            : 
     428                 :         22 :   memcpy (cl->proof, str, len);
     429                 :         22 :   cl->proof[len] = '\0';
     430                 :            : 
     431         [ -  + ]:         22 :   if (scram_valid_client_final (cl) < 0)
     432                 :          0 :     return -1;
     433                 :            : 
     434                 :         22 :   return 0;
     435                 :            : }
     436                 :            : 
     437                 :            : int
     438                 :         16 : scram_parse_server_final (const char *str, size_t len,
     439                 :            :                           struct scram_server_final *sl)
     440                 :            : {
     441                 :            :   /* Minimum client final string is 'v=ab=='. */
     442         [ -  + ]:         16 :   if (strnlen (str, len) < 6)
     443                 :          0 :     return -1;
     444                 :            : 
     445 [ +  - ][ -  + ]:         16 :   if (len == 0 || *str != 'v')
     446                 :          0 :     return -1;
     447                 :         16 :   str++, len--;
     448                 :            : 
     449 [ +  - ][ -  + ]:         16 :   if (len == 0 || *str != '=')
     450                 :          0 :     return -1;
     451                 :         16 :   str++, len--;
     452                 :            : 
     453                 :            :   /* Sanity check proof. */
     454         [ -  + ]:         16 :   if (memchr (str, '\0', len))
     455                 :          0 :     return -1;
     456                 :            : 
     457                 :         16 :   sl->verifier = malloc (len + 1);
     458         [ -  + ]:         16 :   if (!sl->verifier)
     459                 :          0 :     return -1;
     460                 :            : 
     461                 :         16 :   memcpy (sl->verifier, str, len);
     462                 :         16 :   sl->verifier[len] = '\0';
     463                 :            : 
     464         [ -  + ]:         16 :   if (scram_valid_server_final (sl) < 0)
     465                 :          0 :     return -1;
     466                 :            : 
     467                 :         16 :   return 0;
     468                 :            : }

Generated by: LCOV version 1.8