bba34bedf9
[GB.OPENSSL] * BUG: Fix the 'sort_and_dedupe()' internal method.
114 lines
2.6 KiB
C
114 lines
2.6 KiB
C
/*
|
|
* main.c - gb.openssl main object
|
|
*
|
|
* Copyright (C) 2013-2019 Tobias Boege <tobias@gambas-buch.de>
|
|
*
|
|
* This program 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 2, or (at your option)
|
|
* any later version.
|
|
*
|
|
* This program 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 this program; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
|
|
* MA 02110-1301, USA.
|
|
*
|
|
* In addition, as a special exception, the copyright holders give
|
|
* permission to link the code of portions of this program with the
|
|
* OpenSSL library under certain conditions as described in each
|
|
* individual source file, and distribute linked combinations
|
|
* including the two.
|
|
* You must obey the GNU General Public License in all respects
|
|
* for all of the code used other than OpenSSL. If you modify
|
|
* file(s) with this exception, you may extend this exception to
|
|
* your version of the file(s), but you are not obligated to do so.
|
|
* If you do not wish to do so, delete this exception statement
|
|
* from your version. If you delete this exception statement from
|
|
* all source files in the program, then also delete it here.
|
|
*/
|
|
|
|
#define __MAIN_C
|
|
|
|
#include <openssl/evp.h>
|
|
|
|
#include "main.h"
|
|
#include "c_openssl.h"
|
|
#include "c_digest.h"
|
|
#include "c_cipher.h"
|
|
#include "c_hmac.h"
|
|
|
|
GB_INTERFACE GB EXPORT;
|
|
|
|
GB_DESC *GB_CLASSES[] EXPORT = {
|
|
COpenSSL,
|
|
|
|
CDigest,
|
|
CDigestMethod,
|
|
|
|
CCipher,
|
|
CCipherMethod,
|
|
CCipherText,
|
|
|
|
CHMac,
|
|
|
|
// CSignature,
|
|
// CSignatureMethod,
|
|
|
|
NULL
|
|
};
|
|
|
|
void sort_and_dedupe(GB_ARRAY list)
|
|
{
|
|
GB_FUNCTION sortfn, removefn;
|
|
int i;
|
|
char **data;
|
|
int count;
|
|
char *a, *b;
|
|
|
|
if (GB.GetFunction(&sortfn, list, "Sort", NULL, NULL)) {
|
|
GB.Error("Can't sort array");
|
|
return;
|
|
}
|
|
GB.Push(1, GB_T_INTEGER, GB_COMP_ASCENT | GB_COMP_NOCASE);
|
|
GB.Call(&sortfn, 1, 0);
|
|
|
|
if (GB.GetFunction(&removefn, list, "Remove", NULL, NULL)) {
|
|
GB.Error("Can't remove duplicates");
|
|
return;
|
|
}
|
|
|
|
data = (char **)GB.Array.Get(list, 0);
|
|
count = GB.Array.Count(list) - 1;
|
|
|
|
for (i = 0; i < count;)
|
|
{
|
|
a = data[i];
|
|
b = data[i + 1];
|
|
|
|
if ((a && b && !strcasecmp(a, b)) || (!a && !b))
|
|
{
|
|
GB.Push(1, GB_T_INTEGER, i);
|
|
GB.Call(&removefn, 1, 0);
|
|
count--;
|
|
}
|
|
else
|
|
{
|
|
i++;
|
|
}
|
|
}
|
|
}
|
|
|
|
int EXPORT GB_INIT()
|
|
{
|
|
return 0;
|
|
}
|
|
|
|
void EXPORT GB_EXIT()
|
|
{
|
|
EVP_cleanup();
|
|
}
|