git.pond.sub.org Git - empserver/blob - include/loan.h

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2016, Dave Pare, Jeff Bailey, Thomas Ruschak,
   4  *                Ken Stevens, Steve McClure, Markus Armbruster
   5  *
   6  *  Empire is free software: you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation, either version 3 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18  *
  19  *  ---
  20  *
  21  *  See files README, COPYING and CREDITS in the root of the source
  22  *  tree for related information and legal notices.  It is expected
  23  *  that future projects/authors will amend these files as needed.
  24  *
  25  *  ---
  26  *
  27  *  loan.h: Definitions for loans
  28  *
  29  *  Known contributors to this file:
  30  *
  31  */
  32
  33 #ifndef LOAN_H
  34 #define LOAN_H
  35
  36 #include "file.h"
  37 #include "types.h"
  38
  39 #define MAXLOAN         100000
  40 #define SECS_PER_DAY    (60*60*24)
  41
  42 struct lonstr {
  43     /* initial part must match struct empobj */
  44     signed ef_type: 8;
  45     unsigned l_seqno: 12;
  46     unsigned l_generation: 12;
  47     int l_uid;
  48     time_t l_timestamp;
  49     /* end of part matching struct empobj */
  50     natid l_loner;              /* loan shark */
  51     natid l_lonee;              /* sucker */
  52     signed char l_status;       /* loan status */
  53     int l_irate;                /* interest rate */
  54     int l_ldur;                 /* intended duration */
  55     int l_amtpaid;              /* amount paid so far */
  56     int l_amtdue;               /* amount still owed */
  57     time_t l_lastpay;           /* date of most recent payment */
  58     time_t l_duedate;           /* date after which interest doubles, etc */
  59 };
  60
  61 #define LS_FREE         AGREE_FREE
  62 #define LS_PROPOSED     AGREE_PROPOSED
  63 #define LS_SIGNED       AGREE_SIGNED
  64
  65 extern double loan_owed(struct lonstr *loan, time_t paytime);
  66
  67 #define getloan(n, p) ef_read(EF_LOAN, (n), (p))
  68 #define putloan(n, p) ef_write(EF_LOAN, (n), (p))
  69 #define getloanp(n) ((struct lonstr *)ef_ptr(EF_LOAN, (n)))
  70
  71 #endif