PennMUSH Community

root/1.8.3/trunk/hdrs/mushdb.h

Revision 1032, 7.2 kB (checked in by shawnw, 1 year ago)

Merged 1.8.3p4 into trunk

Line 
1 /** \file mushdb.h
2  *
3  * \brief Macros for getting information about objects
4  */
5
6 #include "config.h"
7 #include "copyrite.h"
8
9 #ifndef __DB_H
10 #define __DB_H
11
12 /* Power macros */
13 #include <stdio.h>
14 #include "flags.h"
15
16 #define Builder(x)       (command_check_byname(x, "@dig"))
17 #define Guest(x)         has_power_by_name(x,"GUEST",NOTYPE)
18 #define Tel_Anywhere(x)  (Hasprivs(x) || has_power_by_name(x,"TPORT_ANYWHERE",NOTYPE))
19 #define Tel_Anything(x)  (Hasprivs(x) || has_power_by_name(x,"TPORT_ANYTHING",NOTYPE))
20 #define See_All(x)       (Hasprivs(x) || has_power_by_name(x,"SEE_ALL",NOTYPE))
21 #define Priv_Who(x)      (Hasprivs(x) || has_power_by_name(x,"SEE_ALL",NOTYPE))
22 #define Can_Hide(x)      (Hasprivs(x) || has_power_by_name(x,"HIDE",NOTYPE))
23 #define Can_Login(x)     (Hasprivs(x) || has_power_by_name(x,"LOGIN",NOTYPE))
24 #define Can_Idle(x)      (Hasprivs(x) || has_power_by_name(x,"IDLE",NOTYPE))
25 #define Long_Fingers(x)  (Hasprivs(x) || has_power_by_name(x,"LONG_FINGERS",NOTYPE))
26 #define Open_Anywhere(x) (Hasprivs(x) || has_power_by_name(x,"OPEN_ANYWHERE",NOTYPE))
27 #define Link_Anywhere(x)  (Hasprivs(x) || has_power_by_name(x,"LINK_ANYWHERE",NOTYPE))
28 #define Can_Boot(x)      (Hasprivs(x) || has_power_by_name(x,"BOOT",NOTYPE))
29 #define Can_Nspemit(x)   (Wizard(x) || has_power_by_name(x,"CAN_NSPEMIT",NOTYPE))
30 #define Do_Quotas(x)     (Wizard(x) || has_power_by_name(x,"QUOTAS",NOTYPE))
31 #define Change_Poll(x)   (Wizard(x) || has_power_by_name(x,"POLL",NOTYPE))
32 #define HugeQueue(x)     (Wizard(x) || has_power_by_name(x,"QUEUE",NOTYPE))
33 #define LookQueue(x)     (Hasprivs(x) || has_power_by_name(x,"SEE_QUEUE",NOTYPE))
34 #define HaltAny(x)       (Wizard(x) || has_power_by_name(x,"HALT",NOTYPE))
35 #define NoPay(x)         (God(x) || has_power_by_name(x,"NO_PAY",NOTYPE) || \
36                                 ((!Mistrust(x) && has_power_by_name(Owner(x),"NO_PAY",NOTYPE))))
37 #define Moneybags(x)    (NoPay(x) || Hasprivs(x))
38 #define NoQuota(x)       (Hasprivs(x) || Hasprivs(Owner(x)) || \
39                                 has_power_by_name(x,"NO_QUOTA",NOTYPE) || \
40                                 ((!Mistrust(x) && has_power_by_name(Owner(x), "NO_QUOTA", NOTYPE))))
41 #define NoKill(x)        (Hasprivs(x) || Hasprivs(Owner(x)) || \
42                                 has_power_by_name(x,"UNKILLABLE",NOTYPE) || \
43                                 ((!Mistrust(x) && has_power_by_name(Owner(x),"UNKILLABLE",NOTYPE))))
44 #define Search_All(x)    (Hasprivs(x) || has_power_by_name(x,"SEARCH",NOTYPE))
45 #define Global_Funcs(x)  (Hasprivs(x) || has_power_by_name(x,"FUNCTIONS",NOTYPE))
46 #define Create_Player(x) (Wizard(x) || has_power_by_name(x,"PLAYER_CREATE",NOTYPE))
47 #define Can_Announce(x)  (Wizard(x) || has_power_by_name(x,"ANNOUNCE",NOTYPE))
48 #define Can_Cemit(x)     (command_check_byname(x, "@cemit"))
49
50 #define Pemit_All(x)    (Wizard(x) || has_power_by_name(x,"PEMIT_ALL",NOTYPE))
51 #define Sql_Ok(x)       (Wizard(x) || has_power_by_name(x, "SQL_OK", NOTYPE))
52 #define Can_Debit(x)    (Wizard(x) || has_power_by_name(x, "DEBIT", NOTYPE))
53 #define Many_Attribs(x)    (has_power_by_name(x, "MANY_ATTRIBS", NOTYPE))
54 #define Can_Pueblo_Send(x)       (Wizard(x) || has_power_by_name(x, "PUEBLO_SEND", NOTYPE))
55
56 /* Permission macros */
57 #define Can_See_Flag(p,t,f) ((!(f->perms & (F_DARK | F_MDARK | F_ODARK | F_DISABLED)) || \
58                                ((!Mistrust(p) && (Owner(p) == Owner(t))) && \
59                                 !(f->perms & (F_DARK | F_MDARK | F_DISABLED))) || \
60                              (See_All(p) && !(f->perms & (F_DARK | F_DISABLED))) || \
61                              God(p)))
62
63 /* Can p locate x? */
64 bool unfindable(dbref);
65 #define Can_Locate(p,x) \
66     (controls(p,x) || nearby(p,x) || See_All(p) \
67   || (command_check_byname(p, "@whereis") && (IsPlayer(x) && !Unfind(x) \
68                      && !unfindable(Location(x)))))
69
70
71 #define Can_Examine(p,x)    (controls(p,x) || See_All(p) || \
72         (Visual(x) && eval_lock(p,x,Examine_Lock)))
73 #define can_link(p,x)  (controls(p,x) || \
74                         (IsExit(x) && (Location(x) == NOTHING)))
75
76 /* Can p link an exit to x? */
77 #define can_link_to(p,x) \
78      (GoodObject(x) \
79    && (controls(p,x) || Link_Anywhere(p) || \
80        (LinkOk(x) && eval_lock(p,x,Link_Lock))) \
81    && (!NO_LINK_TO_OBJECT || IsRoom(x)))
82
83 /* can p access attribute a on object x? */
84 #define Can_Read_Attr(p,x,a)   \
85    (!AF_Internal(a) && \
86     (See_All(p) || can_read_attr_internal((p),(x),(a))))
87
88 /** can p look at object x? */
89 #define can_look_at(p, x) \
90       (Long_Fingers(p) || nearby(p, x) || \
91             (nearby(p, Location(x)) && \
92                    (!Opaque(Location(x)) || controls(p, Location(x)))) || \
93             (nearby(Location(p), x) && \
94                    (!Opaque(Location(p)) || controls(p, Location(p)))))
95
96
97 #define Is_Visible_Attr(x,a)   \
98    (!AF_Internal(a) && can_read_attr_internal(NOTHING,(x),(a)))
99
100 /* can p write attribute a on object x, assuming p may modify x?
101  * Must be (1) God, or (2) a non-internal, non-safe flag and
102  * (2a) a Wizard or (2b) a non-wizard attrib and (2b1) you own
103  * the attrib or (2b2) it's not atrlocked.
104  */
105 #define Can_Write_Attr(p,x,a)  \
106    (can_write_attr_internal((p),(x),(a),1))
107 #define Can_Write_Attr_Ignore_Safe(p,x,a)  \
108    (can_write_attr_internal((p),(x),(a),0))
109
110
111 /* Can p forward a message to x (via @forwardlist)? */
112 #define Can_Forward(p,x)  \
113     (controls(p,x) || Pemit_All(p) || \
114         ((getlock(x, Forward_Lock) != TRUE_BOOLEXP) && \
115          eval_lock(p, x, Forward_Lock)))
116
117 /* Can p forward a mail message to x (via @mailforwardlist)? */
118 #define Can_MailForward(p,x)  \
119     (IsPlayer(x) && (controls(p,x) || \
120         ((getlock(x, MailForward_Lock) != TRUE_BOOLEXP) && \
121          eval_lock(p, x, MailForward_Lock))))
122
123 /* Can from pass to's @lock/interact? */
124 #define Pass_Interact_Lock(from,to) \
125   (Loud(from) || eval_lock(from, to, Interact_Lock))
126
127 /* How many pennies can you have? */
128 #define Max_Pennies(p) (Guest(p) ? MAX_GUEST_PENNIES : MAX_PENNIES)
129 #define Paycheck(p) (Guest(p) ? GUEST_PAY_CHECK : PAY_CHECK)
130
131 /* DB flag macros - these should be defined whether or not the
132  * corresponding system option is defined
133  * They are successive binary numbers
134  */
135 #define DBF_NO_CHAT_SYSTEM      0x01
136 #define DBF_WARNINGS            0x02
137 #define DBF_CREATION_TIMES      0x04
138 #define DBF_NO_POWERS           0x08
139 #define DBF_NEW_LOCKS           0x10
140 #define DBF_NEW_STRINGS         0x20
141 #define DBF_TYPE_GARBAGE        0x40
142 #define DBF_SPLIT_IMMORTAL      0x80
143 #define DBF_NO_TEMPLE           0x100
144 #define DBF_LESS_GARBAGE        0x200
145 #define DBF_AF_VISUAL           0x400
146 #define DBF_VALUE_IS_COST       0x800
147 #define DBF_LINK_ANYWHERE       0x1000
148 #define DBF_NO_STARTUP_FLAG     0x2000
149 #define DBF_PANIC               0x4000
150 #define DBF_AF_NODUMP           0x8000
151 #define DBF_SPIFFY_LOCKS        0x10000
152 #define DBF_NEW_FLAGS           0x20000
153 #define DBF_NEW_POWERS          0x40000
154 #define DBF_POWERS_LOGGED       0x80000
155 #define DBF_LABELS              0x100000
156 #define DBF_SPIFFY_AF_ANSI      0x200000
157
158 /* Reboot DB flag macros - these should be defined whether or not the
159  * corresponding system option is defined
160  * They are successive binary numbers
161  */
162 #define RDBF_SCREENSIZE         0x01
163 #define RDBF_TTYPE              0x02
164 #define RDBF_PUEBLO_CHECKSUM    0x04
165
166 #endif                          /* __DB_H */
Note: See TracBrowser for help on using the browser.