ITS#5341 GnuTLS ciphersuite parsing

diff --git a/libraries/libldap/tls.c b/libraries/libldap/tls.c
index 93405ebe2d6e3fb5f734d89ae0bc1e9f1058842f..a40601b784128c3f2f9db48e3a52ad20bf0048ec 100644 (file)
--- a/libraries/libldap/tls.c
+++ b/libraries/libldap/tls.c
@@ -307,6 +307,7 @@ tls_parse_ciphers( tls_ctx *ctx, char *suites )
                        /* unrecognized cipher suite */
                        return -1;
                }
+               ptr += len + 1;
        } while (end);
 
        /* Space for all 3 lists */
@@ -348,6 +349,7 @@ tls_parse_ciphers( tls_ctx *ctx, char *suites )
                                break;
                        }
                }
+               ptr += len + 1;
        } while (end);
        kx[nkx] = 0;
        cipher[ncipher] = 0;