| /* Licensed to the Apache Software Foundation (ASF) under one or more |
| * contributor license agreements. See the NOTICE file distributed with |
| * this work for additional information regarding copyright ownership. |
| * The ASF licenses this file to You under the Apache License, Version 2.0 |
| * (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.apache.org/licenses/LICENSE-2.0 |
| * |
| * Unless required by applicable law or agreed to in writing, software |
| * distributed under the License is distributed on an "AS IS" BASIS, |
| * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. |
| * See the License for the specific language governing permissions and |
| * limitations under the License. |
| */ |
| |
| #include <assert.h> |
| #include <stdlib.h> |
| |
| #include <apr_lib.h> |
| #include <apr_strings.h> |
| #include <apr_tables.h> |
| #include <apr_time.h> |
| #include <apr_date.h> |
| |
| #include "md_json.h" |
| #include "md.h" |
| #include "md_crypt.h" |
| #include "md_log.h" |
| #include "md_store.h" |
| #include "md_result.h" |
| #include "md_reg.h" |
| #include "md_util.h" |
| #include "md_status.h" |
| |
| #define MD_STATUS_WITH_SCTS 0 |
| |
| /**************************************************************************************************/ |
| /* certificate status information */ |
| |
| static apr_status_t status_get_cert_json(md_json_t **pjson, const md_cert_t *cert, apr_pool_t *p) |
| { |
| char ts[APR_RFC822_DATE_LEN]; |
| const char *finger; |
| apr_status_t rv = APR_SUCCESS; |
| md_json_t *json; |
| |
| json = md_json_create(p); |
| apr_rfc822_date(ts, md_cert_get_not_before(cert)); |
| md_json_sets(ts, json, MD_KEY_VALID_FROM, NULL); |
| apr_rfc822_date(ts, md_cert_get_not_after(cert)); |
| md_json_sets(ts, json, MD_KEY_VALID_UNTIL, NULL); |
| md_json_sets(md_cert_get_serial_number(cert, p), json, MD_KEY_SERIAL, NULL); |
| if (APR_SUCCESS != (rv = md_cert_to_sha256_fingerprint(&finger, cert, p))) goto leave; |
| md_json_sets(finger, json, MD_KEY_SHA256_FINGERPRINT, NULL); |
| |
| #if MD_STATUS_WITH_SCTS |
| do { |
| apr_array_header_t *scts; |
| const char *hex; |
| const md_sct *sct; |
| md_json_t *sctj; |
| int i; |
| |
| scts = apr_array_make(p, 5, sizeof(const md_sct*)); |
| if (APR_SUCCESS == md_cert_get_ct_scts(scts, p, cert)) { |
| for (i = 0; i < scts->nelts; ++i) { |
| sct = APR_ARRAY_IDX(scts, i, const md_sct*); |
| sctj = md_json_create(p); |
| |
| apr_rfc822_date(ts, sct->timestamp); |
| md_json_sets(ts, sctj, "signed", NULL); |
| md_json_setl(sct->version, sctj, MD_KEY_VERSION, NULL); |
| md_data_to_hex(&hex, 0, p, sct->logid); |
| md_json_sets(hex, sctj, "logid", NULL); |
| md_data_to_hex(&hex, 0, p, sct->signature); |
| md_json_sets(hex, sctj, "signature", NULL); |
| md_json_sets(md_nid_get_sname(sct->signature_type_nid), sctj, "signature-type", NULL); |
| md_json_addj(sctj, json, "scts", NULL); |
| } |
| } |
| while (0); |
| #endif |
| leave: |
| *pjson = (APR_SUCCESS == rv)? json : NULL; |
| return rv; |
| } |
| |
| /**************************************************************************************************/ |
| /* md status information */ |
| |
| static apr_status_t get_staging_cert_json(md_json_t **pjson, apr_pool_t *p, |
| md_reg_t *reg, const md_t *md) |
| { |
| md_json_t *json = NULL; |
| apr_array_header_t *certs; |
| md_cert_t *cert; |
| apr_status_t rv = APR_SUCCESS; |
| |
| rv = md_pubcert_load(md_reg_store_get(reg), MD_SG_STAGING, md->name, &certs, p); |
| if (APR_STATUS_IS_ENOENT(rv)) { |
| rv = APR_SUCCESS; |
| goto leave; |
| } |
| else if (APR_SUCCESS != rv) { |
| goto leave; |
| } |
| cert = APR_ARRAY_IDX(certs, 0, md_cert_t *); |
| rv = status_get_cert_json(&json, cert, p); |
| leave: |
| *pjson = (APR_SUCCESS == rv)? json : NULL; |
| return rv; |
| } |
| |
| static apr_status_t job_loadj(md_json_t **pjson, const char *name, |
| struct md_reg_t *reg, apr_pool_t *p) |
| { |
| md_store_t *store = md_reg_store_get(reg); |
| return md_store_load_json(store, MD_SG_STAGING, name, MD_FN_JOB, pjson, p); |
| } |
| |
| apr_status_t md_status_get_md_json(md_json_t **pjson, const md_t *md, |
| md_reg_t *reg, apr_pool_t *p) |
| { |
| md_json_t *mdj, *jobj, *certj; |
| int renew; |
| const md_pubcert_t *pubcert; |
| const md_cert_t *cert; |
| apr_status_t rv = APR_SUCCESS; |
| |
| mdj = md_to_json(md, p); |
| if (APR_SUCCESS == md_reg_get_pubcert(&pubcert, reg, md, p)) { |
| cert = APR_ARRAY_IDX(pubcert->certs, 0, const md_cert_t*); |
| if (APR_SUCCESS != (rv = status_get_cert_json(&certj, cert, p))) goto leave; |
| md_json_setj(certj, mdj, MD_KEY_CERT, NULL); |
| } |
| |
| renew = md_reg_should_renew(reg, md, p); |
| md_json_setb(renew, mdj, MD_KEY_RENEW, NULL); |
| if (renew) { |
| rv = job_loadj(&jobj, md->name, reg, p); |
| if (APR_SUCCESS == rv) { |
| rv = get_staging_cert_json(&certj, p, reg, md); |
| if (APR_SUCCESS != rv) goto leave; |
| if (certj) md_json_setj(certj, jobj, MD_KEY_CERT, NULL); |
| md_json_setj(jobj, mdj, MD_KEY_RENEWAL, NULL); |
| } |
| else if (APR_STATUS_IS_ENOENT(rv)) rv = APR_SUCCESS; |
| else goto leave; |
| } |
| leave: |
| *pjson = (APR_SUCCESS == rv)? mdj : NULL; |
| return rv; |
| } |
| |
| apr_status_t md_status_get_json(md_json_t **pjson, apr_array_header_t *mds, |
| md_reg_t *reg, apr_pool_t *p) |
| { |
| md_json_t *json, *mdj; |
| apr_status_t rv = APR_SUCCESS; |
| const md_t *md; |
| int i; |
| |
| json = md_json_create(p); |
| md_json_sets(MOD_MD_VERSION, json, MD_KEY_VERSION, NULL); |
| for (i = 0; i < mds->nelts; ++i) { |
| md = APR_ARRAY_IDX(mds, i, const md_t *); |
| rv = md_status_get_md_json(&mdj, md, reg, p); |
| if (APR_SUCCESS != rv) goto leave; |
| md_json_addj(mdj, json, MD_KEY_MDS, NULL); |
| } |
| leave: |
| *pjson = (APR_SUCCESS == rv)? json : NULL; |
| return rv; |
| } |
| |
| /**************************************************************************************************/ |
| /* drive job persistence */ |
| |
| md_job_t *md_job_make(apr_pool_t *p, const char *name) |
| { |
| md_job_t *job = apr_pcalloc(p, sizeof(*job)); |
| job->name = apr_pstrdup(p, name); |
| job->p = p; |
| return job; |
| } |
| |
| static void md_job_from_json(md_job_t *job, md_json_t *json, apr_pool_t *p) |
| { |
| const char *s; |
| |
| /* not good, this is malloced from a temp pool */ |
| /*job->name = md_json_gets(json, MD_KEY_NAME, NULL);*/ |
| job->finished = md_json_getb(json, MD_KEY_FINISHED, NULL); |
| s = md_json_dups(p, json, MD_KEY_NEXT_RUN, NULL); |
| if (s && *s) job->next_run = apr_date_parse_rfc(s); |
| s = md_json_dups(p, json, MD_KEY_LAST_RUN, NULL); |
| if (s && *s) job->last_run = apr_date_parse_rfc(s); |
| s = md_json_dups(p, json, MD_KEY_VALID_FROM, NULL); |
| if (s && *s) job->valid_from = apr_date_parse_rfc(s); |
| job->error_runs = (int)md_json_getl(json, MD_KEY_ERRORS, NULL); |
| if (md_json_has_key(json, MD_KEY_LAST, NULL)) { |
| job->last_result = md_result_from_json(md_json_getcj(json, MD_KEY_LAST, NULL), p); |
| } |
| job->log = md_json_getj(json, MD_KEY_LOG, NULL); |
| } |
| |
| static void job_to_json(md_json_t *json, const md_job_t *job, |
| md_result_t *result, apr_pool_t *p) |
| { |
| char ts[APR_RFC822_DATE_LEN]; |
| |
| md_json_sets(job->name, json, MD_KEY_NAME, NULL); |
| md_json_setb(job->finished, json, MD_KEY_FINISHED, NULL); |
| if (job->next_run > 0) { |
| apr_rfc822_date(ts, job->next_run); |
| md_json_sets(ts, json, MD_KEY_NEXT_RUN, NULL); |
| } |
| if (job->last_run > 0) { |
| apr_rfc822_date(ts, job->last_run); |
| md_json_sets(ts, json, MD_KEY_LAST_RUN, NULL); |
| } |
| if (job->valid_from > 0) { |
| apr_rfc822_date(ts, job->valid_from); |
| md_json_sets(ts, json, MD_KEY_VALID_FROM, NULL); |
| } |
| md_json_setl(job->error_runs, json, MD_KEY_ERRORS, NULL); |
| if (!result) result = job->last_result; |
| if (result) { |
| md_json_setj(md_result_to_json(result, p), json, MD_KEY_LAST, NULL); |
| } |
| if (job->log) md_json_setj(job->log, json, MD_KEY_LOG, NULL); |
| } |
| |
| apr_status_t md_job_load(md_job_t *job, md_reg_t *reg, |
| md_store_group_t group, apr_pool_t *p) |
| { |
| md_store_t *store = md_reg_store_get(reg); |
| md_json_t *jprops; |
| apr_status_t rv; |
| |
| rv = md_store_load_json(store, group, job->name, MD_FN_JOB, &jprops, p); |
| if (APR_SUCCESS == rv) { |
| md_job_from_json(job, jprops, p); |
| } |
| return rv; |
| } |
| |
| apr_status_t md_job_save(md_job_t *job, struct md_reg_t *reg, |
| md_store_group_t group, md_result_t *result, |
| apr_pool_t *p) |
| { |
| md_store_t *store = md_reg_store_get(reg); |
| md_json_t *jprops; |
| apr_status_t rv; |
| |
| jprops = md_json_create(p); |
| job_to_json(jprops, job, result, p); |
| rv = md_store_save_json(store, p, group, job->name, MD_FN_JOB, jprops, 0); |
| return rv; |
| } |
| |
| void md_job_log_append(md_job_t *job, const char *type, |
| const char *status, const char *detail) |
| { |
| md_json_t *entry; |
| char ts[APR_RFC822_DATE_LEN]; |
| |
| entry = md_json_create(job->p); |
| apr_rfc822_date(ts, apr_time_now()); |
| md_json_sets(ts, entry, MD_KEY_WHEN, NULL); |
| md_json_sets(type, entry, MD_KEY_TYPE, NULL); |
| if (status) md_json_sets(status, entry, MD_KEY_STATUS, NULL); |
| if (detail) md_json_sets(detail, entry, MD_KEY_DETAIL, NULL); |
| if (!job->log) job->log = md_json_create(job->p); |
| md_json_insertj(entry, 0, job->log, MD_KEY_ENTRIES, NULL); |
| } |
| |
| typedef struct { |
| md_job_t *job; |
| const char *type; |
| md_json_t *entry; |
| size_t index; |
| } log_find_ctx; |
| |
| static int find_first_log_entry(void *baton, size_t index, md_json_t *entry) |
| { |
| log_find_ctx *ctx = baton; |
| const char *etype; |
| |
| etype = md_json_gets(entry, MD_KEY_TYPE, NULL); |
| if (etype == ctx->type || (etype && ctx->type && !strcmp(etype, ctx->type))) { |
| ctx->entry = entry; |
| ctx->index = index; |
| return 0; |
| } |
| return 1; |
| } |
| |
| md_json_t *md_job_log_get_latest(md_job_t *job, const char *type) |
| |
| { |
| log_find_ctx ctx; |
| ctx.job = job; |
| ctx.type = type; |
| memset(&ctx, 0, sizeof(ctx)); |
| if (job->log) md_json_itera(find_first_log_entry, &ctx, job->log, MD_KEY_ENTRIES, NULL); |
| return ctx.entry; |
| } |
| |
| apr_time_t md_job_log_get_time_of_latest(md_job_t *job, const char *type) |
| { |
| md_json_t *entry; |
| const char *s; |
| |
| entry = md_job_log_get_latest(job, type); |
| if (entry) { |
| s = md_json_gets(entry, MD_KEY_WHEN, NULL); |
| if (s) return apr_date_parse_rfc(s); |
| } |
| return 0; |
| } |
| |
| void md_status_take_stock(md_json_t **pjson, apr_array_header_t *mds, |
| md_reg_t *reg, apr_pool_t *p) |
| { |
| const md_t *md; |
| md_job_t job; |
| int i, complete, renewing, errored, ready, total; |
| md_json_t *json; |
| |
| json = md_json_create(p); |
| complete = renewing = errored = ready = total = 0; |
| for (i = 0; i < mds->nelts; ++i) { |
| md = APR_ARRAY_IDX(mds, i, const md_t *); |
| ++total; |
| switch (md->state) { |
| case MD_S_COMPLETE: ++complete; /* fall through */ |
| case MD_S_INCOMPLETE: |
| if (md_reg_should_renew(reg, md, p)) { |
| ++renewing; |
| memset(&job, 0, sizeof(job)); |
| job.name = md->name; |
| if (APR_SUCCESS == md_job_load(&job, reg, MD_SG_STAGING, p)) { |
| if (job.error_runs > 0 |
| || (job.last_result && job.last_result->status != APR_SUCCESS)) { |
| ++errored; |
| } |
| else if (job.finished) { |
| ++ready; |
| } |
| } |
| } |
| break; |
| default: ++errored; break; |
| } |
| } |
| md_json_setl(total, json, MD_KEY_TOTAL, NULL); |
| md_json_setl(complete, json, MD_KEY_COMPLETE, NULL); |
| md_json_setl(renewing, json, MD_KEY_RENEWING, NULL); |
| md_json_setl(errored, json, MD_KEY_ERRORED, NULL); |
| md_json_setl(ready, json, MD_KEY_READY, NULL); |
| *pjson = json; |
| } |
