gecko-dev/security/nss/cmd/p7content/p7content.c

313 строки
7.9 KiB
C

/*
* The contents of this file are subject to the Mozilla Public
* License Version 1.1 (the "License"); you may not use this file
* except in compliance with the License. You may obtain a copy of
* the License at http://www.mozilla.org/MPL/
*
* Software distributed under the License is distributed on an "AS
* IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
* implied. See the License for the specific language governing
* rights and limitations under the License.
*
* The Original Code is the Netscape security libraries.
*
* The Initial Developer of the Original Code is Netscape
* Communications Corporation. Portions created by Netscape are
* Copyright (C) 1994-2000 Netscape Communications Corporation. All
* Rights Reserved.
*
* Contributor(s):
*
* Alternatively, the contents of this file may be used under the
* terms of the GNU General Public License Version 2 or later (the
* "GPL"), in which case the provisions of the GPL are applicable
* instead of those above. If you wish to allow use of your
* version of this file only under the terms of the GPL and not to
* allow others to use your version of this file under the MPL,
* indicate your decision by deleting the provisions above and
* replace them with the notice and other provisions required by
* the GPL. If you do not delete the provisions above, a recipient
* may use your version of this file under either the MPL or the
* GPL.
*/
/*
* p7content -- A command to display pkcs7 content.
*
* $Id: p7content.c,v 1.1 2000/03/31 20:12:19 relyea%netscape.com Exp $
*/
#include "nspr.h"
#include "secutil.h"
#include "plgetopt.h"
#include "secpkcs7.h"
#include "cert.h"
#include "certdb.h"
#include "cdbhdl.h"
#if defined(XP_UNIX)
#include <unistd.h>
#endif
#include <stdio.h>
#include <string.h>
#if (defined(XP_WIN) && !defined(WIN32)) || (defined(__sun) && !defined(SVR4))
extern int fwrite(char *, size_t, size_t, FILE*);
extern int fprintf(FILE *, char *, ...);
#endif
extern void SEC_Init(void); /* XXX */
static void
Usage(char *progName)
{
fprintf(stderr,
"Usage: %s [-d dbdir] [-i input] [-o output]\n",
progName);
fprintf(stderr,
"%-20s Key/Cert database directory (default is ~/.netscape)\n",
"-d dbdir");
fprintf(stderr, "%-20s Define an input file to use (default is stdin)\n",
"-i input");
fprintf(stderr, "%-20s Define an output file to use (default is stdout)\n",
"-o output");
exit(-1);
}
static SECKEYKeyDBHandle *
OpenKeyDB(char *progName)
{
SECKEYKeyDBHandle *keyHandle;
keyHandle = SECU_OpenKeyDB(PR_FALSE);
if (keyHandle == NULL) {
SECU_PrintError(progName, "could not open key database");
return NULL;
}
return(keyHandle);
}
static CERTCertDBHandle certHandleStatic; /* avoid having to allocate */
static CERTCertDBHandle *
OpenCertDB(char *progName)
{
CERTCertDBHandle *certHandle;
SECStatus rv;
certHandle = &certHandleStatic;
rv = CERT_OpenCertDB(certHandle, PR_FALSE, SECU_CertDBNameCallback, NULL);
if (rv != SECSuccess) {
SECU_PrintError(progName, "could not open cert database");
return NULL;
}
return certHandle;
}
static PRBool saw_content;
static void
PrintBytes(void *arg, const char *buf, unsigned long len)
{
FILE *out;
out = arg;
fwrite (buf, len, 1, out);
saw_content = PR_TRUE;
}
/*
* XXX Someday we may want to do real policy stuff here. This allows
* anything to be decrypted, which is okay for a test program but does
* not set an example of how a real client with a real policy would
* need to do it.
*/
static PRBool
decryption_allowed(SECAlgorithmID *algid, PK11SymKey *key)
{
return PR_TRUE;
}
int
DecodeAndPrintFile(FILE *out, PRFileDesc *in, char *progName)
{
SECItem derdata;
SEC_PKCS7ContentInfo *cinfo;
SEC_PKCS7DecoderContext *dcx;
if (SECU_ReadDERFromFile(&derdata, in, PR_FALSE)) {
SECU_PrintError(progName, "error converting der");
return -1;
}
fprintf(out,
"Content printed between bars (newline added before second bar):");
fprintf(out, "\n---------------------------------------------\n");
saw_content = PR_FALSE;
dcx = SEC_PKCS7DecoderStart(PrintBytes, out, SECU_GetPassword, NULL,
NULL, NULL, decryption_allowed);
if (dcx != NULL) {
#if 0 /* Test that decoder works when data is really streaming in. */
{
unsigned long i;
for (i = 0; i < derdata.len; i++)
SEC_PKCS7DecoderUpdate(dcx, derdata.data + i, 1);
}
#else
SEC_PKCS7DecoderUpdate(dcx, derdata.data, derdata.len);
#endif
cinfo = SEC_PKCS7DecoderFinish(dcx);
}
fprintf(out, "\n---------------------------------------------\n");
if (cinfo == NULL)
return -1;
fprintf(out, "Content was%s encrypted.\n",
SEC_PKCS7ContentIsEncrypted(cinfo) ? "" : " not");
if (SEC_PKCS7ContentIsSigned(cinfo)) {
char *signer_cname, *signer_ename;
SECItem *signing_time;
if (saw_content) {
fprintf(out, "Signature is ");
PORT_SetError(0);
if (SEC_PKCS7VerifySignature(cinfo, certUsageEmailSigner, PR_FALSE))
fprintf(out, "valid.\n");
else
fprintf(out, "invalid (Reason: %s).\n",
SECU_Strerror(PORT_GetError()));
} else {
fprintf(out,
"Content is detached; signature cannot be verified.\n");
}
signer_cname = SEC_PKCS7GetSignerCommonName(cinfo);
if (signer_cname != NULL) {
fprintf(out, "The signer's common name is %s\n", signer_cname);
PORT_Free(signer_cname);
} else {
fprintf(out, "No signer common name.\n");
}
signer_ename = SEC_PKCS7GetSignerEmailAddress(cinfo);
if (signer_ename != NULL) {
fprintf(out, "The signer's email address is %s\n", signer_ename);
PORT_Free(signer_ename);
} else {
fprintf(out, "No signer email address.\n");
}
signing_time = SEC_PKCS7GetSigningTime(cinfo);
if (signing_time != NULL) {
SECU_PrintUTCTime(out, signing_time, "Signing time", 0);
} else {
fprintf(out, "No signing time included.\n");
}
} else {
fprintf(out, "Content was not signed.\n");
}
fprintf(out, "There were%s certs or crls included.\n",
SEC_PKCS7ContainsCertsOrCrls(cinfo) ? "" : " no");
SEC_PKCS7DestroyContentInfo(cinfo);
return 0;
}
/*
* Print the contents of a PKCS7 message, indicating signatures, etc.
*/
int
main(int argc, char **argv)
{
char *progName;
FILE *outFile;
PRFileDesc *inFile;
SECKEYKeyDBHandle *keyHandle;
CERTCertDBHandle *certHandle;
PLOptState *optstate;
PLOptStatus status;
progName = strrchr(argv[0], '/');
progName = progName ? progName+1 : argv[0];
inFile = NULL;
outFile = NULL;
/*
* Parse command line arguments
*/
optstate = PL_CreateOptState(argc, argv, "d:i:o:");
while ((status = PL_GetNextOpt(optstate)) == PL_OPT_OK) {
switch (optstate->option) {
case 'd':
SECU_ConfigDirectory(optstate->value);
break;
case 'i':
inFile = PR_Open(optstate->value, PR_RDONLY, 0);
if (!inFile) {
fprintf(stderr, "%s: unable to open \"%s\" for reading\n",
progName, optstate->value);
return -1;
}
break;
case 'o':
outFile = fopen(optstate->value, "w");
if (!outFile) {
fprintf(stderr, "%s: unable to open \"%s\" for writing\n",
progName, optstate->value);
return -1;
}
break;
default:
Usage(progName);
break;
}
}
if (status == PL_OPT_BAD)
Usage(progName);
if (!inFile) inFile = PR_STDIN;
if (!outFile) outFile = stdout;
/* Call the initialization routines */
PR_Init(PR_SYSTEM_THREAD, PR_PRIORITY_NORMAL, 1);
SECU_PKCS11Init(PR_FALSE);
SEC_Init();
/* open key database */
keyHandle = OpenKeyDB(progName);
if (keyHandle == NULL) {
return -1;
}
SECKEY_SetDefaultKeyDB(keyHandle);
/* open cert database */
certHandle = OpenCertDB(progName);
if (certHandle == NULL) {
return -1;
}
CERT_SetDefaultCertDB(certHandle);
if (DecodeAndPrintFile(outFile, inFile, progName)) {
SECU_PrintError(progName, "problem decoding data");
return -1;
}
return 0;
}