/*
This file is part of GNUnet.
Copyright (C) 2012-2013 GNUnet e.V.
GNUnet is free software: you can redistribute it and/or modify it
under the terms of the GNU Affero General Public License as published
by the Free Software Foundation, either version 3 of the License,
or (at your option) any later version.
GNUnet 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
Affero General Public License for more details.
You should have received a copy of the GNU Affero General Public License
along with this program. If not, see .
SPDX-License-Identifier: AGPL3.0-or-later
*/
/**
* @file gnunet-credential.c
* @brief command line tool to access command line Credential service
* @author Martin Schanzenbach
*/
#include "platform.h"
#include
#include
#include
#include
#include "credential_misc.h"
#include "delegate_misc.h"
#include "credential_serialization.h"
/**
* Configuration we are using.
*/
static const struct GNUNET_CONFIGURATION_Handle *cfg;
/**
* Handle to the namestore.
*/
static struct GNUNET_NAMESTORE_Handle *ns;
/**
* Private key for the our zone.
*/
static struct GNUNET_CRYPTO_EcdsaPrivateKey zone_pkey;
/**
* EgoLookup
*/
static struct GNUNET_IDENTITY_EgoLookup *el;
/**
* Handle to Credential service.
*/
static struct GNUNET_CREDENTIAL_Handle *credential;
/**
* Desired timeout for the lookup (default is no timeout).
*/
static struct GNUNET_TIME_Relative timeout;
/**
* Handle to verify request
*/
static struct GNUNET_CREDENTIAL_Request *verify_request;
/**
* Handle to collect request
*/
static struct GNUNET_CREDENTIAL_Request *collect_request;
/**
* Task scheduled to handle timeout.
*/
static struct GNUNET_SCHEDULER_Task *tt;
/**
* Subject pubkey string
*/
static char *subject;
/**
* Subject credential string
*/
static char *subject_credential;
/**
* Credential TTL
*/
static char *expiration;
/**
* Subject key
*/
struct GNUNET_CRYPTO_EcdsaPublicKey subject_pkey;
/**
* Issuer key
*/
struct GNUNET_CRYPTO_EcdsaPublicKey issuer_pkey;
/**
* Issuer pubkey string
*/
static char *issuer_key;
/**
* ego
*/
static char *ego_name;
/**
* Issuer attribute
*/
static char *issuer_attr;
/**
* Verify mode
*/
static int verify;
/**
* Issue mode
*/
static int create_cred;
/**
* Collect mode
*/
static int collect;
/**
* Create mode
*/
static int create_is;
/**
* Create mode
*/
static int create_ss;
/**
* Create mode
*/
static int sign_ss;
/**
* Signed issue credentials
*/
static char *extension;
/**
* Queue entry for the 'add' operation.
*/
static struct GNUNET_NAMESTORE_QueueEntry *add_qe;
/**
* Value in binary format.
*/
static void *data;
/**
* Number of bytes in #data.
*/
static size_t data_size;
/**
* Type string converted to DNS type value.
*/
static uint32_t type;
/**
* Type of the record to add/remove, NULL to remove all.
*/
static char *typestring;
/**
* Expiration string converted to numeric value.
*/
static uint64_t etime;
/**
* Is expiration time relative or absolute time?
*/
static int etime_is_rel = GNUNET_SYSERR;
/**
* Task run on shutdown. Cleans up everything.
*
* @param cls unused
*/
static void
do_shutdown (void *cls)
{
if (NULL != verify_request)
{
GNUNET_CREDENTIAL_request_cancel (verify_request);
verify_request = NULL;
}
if (NULL != credential)
{
GNUNET_CREDENTIAL_disconnect (credential);
credential = NULL;
}
if (NULL != tt)
{
GNUNET_SCHEDULER_cancel (tt);
tt = NULL;
}
if (NULL != el)
{
GNUNET_IDENTITY_ego_lookup_cancel (el);
el = NULL;
}
if (NULL != add_qe)
{
GNUNET_NAMESTORE_cancel (add_qe);
add_qe = NULL;
}
if (NULL != ns)
{
GNUNET_NAMESTORE_disconnect (ns);
ns = NULL;
}
}
/**
* Task run on timeout. Triggers shutdown.
*
* @param cls unused
*/
static void
do_timeout (void *cls)
{
tt = NULL;
GNUNET_SCHEDULER_shutdown ();
}
static void
handle_collect_result (void *cls,
unsigned int d_count,
struct GNUNET_CREDENTIAL_Delegation *dc,
unsigned int c_count,
struct GNUNET_CREDENTIAL_Credential *cred)
{
int i;
char* line;
verify_request = NULL;
if (NULL != cred)
{
for (i=0;idata = data;
rde->data_size = data_size;
rde->record_type = type;
// Flags not required , TODO what have we said we do with that now? Look it up in my writing
/*if (1 == is_shadow)
rde->flags |= GNUNET_GNSRECORD_RF_SHADOW_RECORD;
if (1 != is_public)
rde->flags |= GNUNET_GNSRECORD_RF_PRIVATE;*/
rde->expiration_time = etime;
if (GNUNET_YES == etime_is_rel)
rde->flags |= GNUNET_GNSRECORD_RF_RELATIVE_EXPIRATION;
else if (GNUNET_NO != etime_is_rel)
rde->expiration_time = GNUNET_TIME_UNIT_FOREVER_ABS.abs_value_us;
GNUNET_assert (NULL != rec_name);
add_qe = GNUNET_NAMESTORE_records_store (ns,
&zone_pkey,
rec_name,
rd_count + 1,
rde,
&add_continuation,
&add_qe);
return;
}
static void
store_cb (void *cls,
const struct GNUNET_IDENTITY_Ego *ego)
{
const struct GNUNET_CONFIGURATION_Handle *cfg = cls;
el = NULL;
ns = GNUNET_NAMESTORE_connect (cfg);
if (NULL == ns)
{
GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
_("Failed to connect to namestore\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
// Key handling
zone_pkey = *GNUNET_IDENTITY_ego_get_private_key (ego);
// Check relevant cmdline parameters
if (NULL == issuer_attr)
{
fprintf (stderr, "Missing option -attribute for operation 'create'.\n");
GNUNET_SCHEDULER_shutdown ();
return;
}
if (NULL == subject)
{
fprintf (stderr, "Missing option -subject for operation 'create'.'\n");
GNUNET_SCHEDULER_shutdown ();
return;
}
// String to value conversion for storage
if (GNUNET_OK != GNUNET_GNSRECORD_string_to_value (type,
subject,
&data,
&data_size))
{
fprintf (stderr, "Value `%s' invalid for record type `%s'\n",
subject,
typestring);
GNUNET_SCHEDULER_shutdown ();
return;
}
// Take care of expiration
if (NULL == expiration)
{
fprintf (stderr, "Missing option -e for operation 'create'\n");
GNUNET_SCHEDULER_shutdown ();
return;
}
if (GNUNET_OK != parse_expiration (expiration,
&etime_is_rel,
&etime))
{
fprintf (stderr, "Invalid time format `%s'\n",
expiration);
GNUNET_SCHEDULER_shutdown ();
return;
}
// Start lookup
add_qe = GNUNET_NAMESTORE_records_lookup (ns,
&zone_pkey,
issuer_attr,
&error_cb,
NULL,
&get_existing_record,
NULL);
return;
}
static void
sign_cb (void *cls,
const struct GNUNET_IDENTITY_Ego *ego)
{
const struct GNUNET_CRYPTO_EcdsaPrivateKey *privkey;
struct GNUNET_CREDENTIAL_Delegate *crd;
struct GNUNET_TIME_Absolute etime_abs;
struct GNUNET_TIME_Relative etime_rel;
char *res;
el = NULL;
// work on expiration time
if (NULL == expiration)
{
fprintf (stderr, "Please specify a TTL\n");
GNUNET_SCHEDULER_shutdown ();
return;
} else if (GNUNET_OK == GNUNET_STRINGS_fancy_time_to_relative (expiration, &etime_rel))
{
etime_abs = GNUNET_TIME_relative_to_absolute (etime_rel);
} else if (GNUNET_OK != GNUNET_STRINGS_fancy_time_to_absolute (expiration, &etime_abs))
{
fprintf (stderr, "%s is not a valid ttl!\n", expiration);
GNUNET_SCHEDULER_shutdown ();
return;
}
// if contains a space - split it by the first space only - assume first entry is subject followed by attribute(s)
char *space;
int idx;
char *subject_pubkey_str;
char *subject_attr;
space = strchr(subject, ' ');
if(NULL == space)
{
// only contains subject key e.g. A.a <- B
subject_pubkey_str = subject;
subject_attr = '\0';
} else {
// subject contains: key attr1.attr2.attr3...
// split subject into subject_pubkey_str and subject_attr
idx = (int)(space - subject);
subject_pubkey_str = GNUNET_malloc(idx+1);
GNUNET_memcpy(subject_pubkey_str, subject, idx);
subject_pubkey_str[idx] = '\0';
int sub_attr_len = strlen(subject) - idx - 1;
// +1 for the \0
subject_attr = GNUNET_malloc(sub_attr_len + 1);
// +1 to remove the space "key attr" (or whatever separator)
GNUNET_memcpy(subject_attr, subject + idx + 1, sub_attr_len);
subject_attr[sub_attr_len] = '\0';
}
// work on keys
privkey = GNUNET_IDENTITY_ego_get_private_key (ego);
if (GNUNET_OK != GNUNET_CRYPTO_ecdsa_public_key_from_string (subject_pubkey_str,
strlen (subject_pubkey_str),
&subject_pkey))
{
fprintf (stderr, "Subject public key `%s' is not well-formed\n", subject_pubkey_str);
GNUNET_SCHEDULER_shutdown ();
return;
}
// Sign delegate
crd = GNUNET_CREDENTIAL_delegate_issue (privkey,
&subject_pkey,
issuer_attr,
subject_attr,
&etime_abs);
res = GNUNET_CREDENTIAL_delegate_to_string (crd);
GNUNET_free (crd);
printf ("%s;%s\n", expiration, res);
GNUNET_free_non_null (ego_name);
ego_name = NULL;
GNUNET_SCHEDULER_shutdown ();
}
/**
* Main function that will be run.
*
* @param cls closure
* @param args remaining command-line arguments
* @param cfgfile name of the configuration file used (for saving, can be NULL!)
* @param c configuration
*/
static void
run (void *cls,
char *const *args,
const char *cfgfile,
const struct GNUNET_CONFIGURATION_Handle *c)
{
cfg = c;
tt = GNUNET_SCHEDULER_add_delayed (timeout,
&do_timeout, NULL);
GNUNET_SCHEDULER_add_shutdown (&do_shutdown, NULL);
if (GNUNET_YES == create_is) {
if (NULL == ego_name) {
fprintf (stderr, "ego required\n");
GNUNET_SCHEDULER_shutdown ();
return;
}
// Lookup ego, on success call store_cb and store as ATTRIBUTE type
type = GNUNET_GNSRECORD_TYPE_ATTRIBUTE;
el = GNUNET_IDENTITY_ego_lookup (cfg,
ego_name,
&store_cb,
(void *) cfg);
return;
}
if (GNUNET_YES == create_ss) {
// check if signed parameter has been passed in cmd line call
if (NULL == extension) {
fprintf (stderr, "'extension' required\n");
GNUNET_SCHEDULER_shutdown ();
return;
}
// parses all the passed parameters
parse_cmdl_param(extension);
type = GNUNET_GNSRECORD_TYPE_DELEGATE;
subject = extension;
issuer_attr = GNUNET_GNS_EMPTY_LABEL_AT;
// Store subject side
el = GNUNET_IDENTITY_ego_lookup (cfg,
ego_name,
&store_cb,
(void *) cfg);
return;
}
if (GNUNET_YES == sign_ss) {
if (NULL == ego_name) {
fprintf (stderr, "ego required\n");
GNUNET_SCHEDULER_shutdown ();
return;
}
if (NULL == subject)
{
fprintf (stderr, "Subject public key needed\n");
GNUNET_SCHEDULER_shutdown ();
return;
}
// lookup ego and call function sign_cb on success
el = GNUNET_IDENTITY_ego_lookup (cfg,
ego_name,
&sign_cb,
(void *) cfg);
return;
}
if (GNUNET_YES == collect) {
if (NULL == issuer_key)
{
fprintf (stderr,
_("Issuer public key not well-formed\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
credential = GNUNET_CREDENTIAL_connect (cfg);
if (NULL == credential)
{
fprintf (stderr,
_("Failed to connect to CREDENTIAL\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
if (NULL == issuer_attr)
{
fprintf (stderr,
_("You must provide issuer the attribute\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
if (NULL == ego_name) {
fprintf (stderr,
_("ego required\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
el = GNUNET_IDENTITY_ego_lookup (cfg,
ego_name,
&identity_cb,
(void *) cfg);
return;
}
if (NULL == subject)
{
fprintf (stderr,
_("Subject public key needed\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
if (GNUNET_OK !=
GNUNET_CRYPTO_ecdsa_public_key_from_string (subject,
strlen (subject),
&subject_pkey))
{
fprintf (stderr,
_("Subject public key `%s' is not well-formed\n"),
subject);
GNUNET_SCHEDULER_shutdown ();
return;
}
if (GNUNET_YES == verify) {
if (NULL == issuer_key)
{
fprintf (stderr,
_("Issuer public key not well-formed\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
if (GNUNET_OK !=
GNUNET_CRYPTO_ecdsa_public_key_from_string (issuer_key,
strlen (issuer_key),
&issuer_pkey))
{
fprintf (stderr,
_("Issuer public key `%s' is not well-formed\n"),
issuer_key);
GNUNET_SCHEDULER_shutdown ();
return;
}
credential = GNUNET_CREDENTIAL_connect (cfg);
if (NULL == credential)
{
fprintf (stderr,
_("Failed to connect to CREDENTIAL\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
if (NULL == issuer_attr || NULL == subject_credential)
{
fprintf (stderr,
_("You must provide issuer and subject attributes\n"));
GNUNET_SCHEDULER_shutdown ();
return;
}
//Subject credentials are comma separated
char *tmp = GNUNET_strdup (subject_credential);
char *tok = strtok (tmp, ",");
if (NULL == tok)
{
fprintf (stderr,
"Invalid subject credentials\n");
GNUNET_free (tmp);
GNUNET_SCHEDULER_shutdown ();
return;
}
int count = 1;
int i;
while (NULL != (tok = strtok(NULL, ",")))
count++;
struct GNUNET_CREDENTIAL_Credential credentials[count];
struct GNUNET_CREDENTIAL_Credential *cred;
GNUNET_free (tmp);
tmp = GNUNET_strdup (subject_credential);
tok = strtok (tmp, ",");
for (i=0;iissuer_attribute);
tok = strtok(NULL, ",");
GNUNET_free (cred);
}
verify_request = GNUNET_CREDENTIAL_verify(credential,
&issuer_pkey,
issuer_attr, //TODO argument
&subject_pkey,
count,
credentials,
&handle_verify_result,
NULL);
for (i=0;i