API tools faq
paste
Y_Less

y_stringhash

Y_Less
Mar 6th, 2011
474
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 54.81 KB | None | 0 0
raw download clone embed print report
  1. /*----------------------------------------------------------------------------*-
  2.                     ========================================
  3.                      y_stringhash - Fast string comparisons
  4.                     ========================================
  5. Description:
  6.     Allows you to hash strings at compile time to use them in a switch.
  7. Legal:
  8.     Version: MPL 1.1
  9.    
  10.     The contents of this file are subject to the Mozilla Public License Version
  11.     1.1 (the "License"); you may not use this file except in compliance with
  12.     the License. You may obtain a copy of the License at
  13.     http://www.mozilla.org/MPL/
  14.    
  15.     Software distributed under the License is distributed on an "AS IS" basis,
  16.     WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
  17.     for the specific language governing rights and limitations under the
  18.     License.
  19.    
  20.     The Original Code is the SA:MP script information include.
  21.    
  22.     The Initial Developer of the Original Code is Alex "Y_Less" Cole.
  23.     Portions created by the Initial Developer are Copyright (C) 2008
  24.     the Initial Developer. All Rights Reserved.
  25.    
  26.     Contributors:
  27.         ZeeX, koolk
  28.    
  29.     Thanks:
  30.         Peter, Cam - Support.
  31.         ZeeX - Very productive conversations.
  32.         koolk - IsPlayerinAreaEx code.
  33.         TheAlpha - Danish translation.
  34.         breadfish - German translation.
  35.         Fireburn - Dutch translation.
  36.         yom - French translation.
  37.         50p - Polish translation.
  38.         Zamaroht - Spanish translation.
  39.         Dracoblue, sintax, mabako, Xtreme, other coders - Producing other modes
  40.             for me to strive to better.
  41.         Pixels^ - Running XScripters where the idea was born.
  42.         Matite - Pestering me to release it and using it.
  43.    
  44.     Very special thanks to:
  45.         Thiadmer - PAWN.
  46.         Kye/Kalcor - SA:MP.
  47.         SA:MP Team past, present and future - SA:MP.
  48. Version:
  49.     1.6
  50. Changelog:
  51.     06/03/11:
  52.         Changed the order of some letters to better support numbers in _I.
  53.     01/03/11:
  54.         Rewrote compile-time hashes to not require commas.
  55.     25/10/10:
  56.         Updated comments.
  57.         Added to YSI 1.0.
  58.         Added FNV1 and FNV1a hashes to avoid collisions.
  59.     19/08/10:
  60.         First version.
  61. Functions:
  62.     stock:
  63.         YHash - Generate a string hash at run time.
  64. Definitions:
  65.     _H - Generate a string hash at compile time.
  66.     _I - Generate a case insensitive string hash at compile time.
  67. -*----------------------------------------------------------------------------*/
  68.  
  69. #include <YSI\internal\y_version>
  70.  
  71. // ===================
  72. //  Determine version
  73. // ===================
  74.  
  75. // Entry.
  76. #define _H (_:_H_0:_H_1
  77. #define _I (_:_H_2:_H_3
  78. // Old.
  79. #define _H_0:_H_1(%0) HASH@bernstein(%0))
  80. #define _H_2:_H_3(%0) HASHi@bernstein(%0))
  81. // New.
  82. #define _H_1<%0> _:H_Rb(%0)) //HASh@bernstein(%0)
  83. #define _H_3<%0> _:H_Rc(%0))
  84.  
  85. // Entry.
  86. #define _H@b (_:_H0@b:_H1@b
  87. #define _I@b (_:_H2@b:_H3@b
  88. // Old.
  89. #define _H0@b:_H1@b(%0) HASH@bernstein(%0))
  90. #define _H2@b:_H3@b(%0) HASHi@bernstein(%0))
  91. // New.
  92. #define _H1@b<%0> _:H_Rb(%0))
  93. #define _H3@b<%0> _:H_Rc(%0))
  94.  
  95. // Entry.
  96. #define _H@f (_:_H0@f:_H1@f
  97. #define _I@f (_:_H2@f:_H3@f
  98. // Old.
  99. #define _H0@f:_H1@f(%0) HASH@fnv1(%0))
  100. #define _H2@f:_H3@f(%0) HASHi@fnv1(%0))
  101. // New.
  102. #define _H1@f<%0> _:H_Rg(%0))
  103. #define _H3@f<%0> _:H_Rf(%0))
  104.  
  105. // Entry.
  106. #define _H@a (_:_H0@a:_H1@a
  107. #define _I@a (_:_H2@a:_H3@a
  108. // Old.
  109. #define _H0@a:_H1@a(%0) HASH@fnv1a(%0))
  110. #define _H2@a:_H3@a(%0) HASHi@fnv1a(%0))
  111. // New.
  112. #define _H1@a<%0> _:H_Ra(%0))
  113. #define _H3@a<%0> _:H_Rd(%0))
  114.  
  115. // Entry.
  116. #define HASH  (_:_H_4:_H_5
  117. #define HASHi (_:_H_6:_H_7
  118. // Old.
  119. #define _H_4:_H_5(%0,%1) HASH@%0(%1))
  120. #define _H_6:_H_7(%0,%1) HASHi@%0(%1))
  121. // New.
  122. #define _H_5:%0<%1> HASh@%0(%1))
  123. #define _H_7:%0<%1> HAShi@%0(%1))
  124.  
  125. #define HASh@bernstein(%0) (_:H_Rb(%0))
  126. #define HAShi@bernstein(%0) (_:H_Rc(%0))
  127. #define HASh@fnv1(%0) (_:H_Rg(%0))
  128. #define HAShi@fnv1(%0) (_:H_Rg(%0))
  129. #define HASh@fnv1a(%0) (_:H_Ra(%0))
  130. #define HAShi@fnv1a(%0) (_:H_Rd(%0))
  131.  
  132. // =============
  133. //  New version
  134. // =============
  135.  
  136. // ================
  137. //  Bernstein hash
  138. // ================
  139.  
  140. // ================
  141. //  Case sensitive
  142. // ================
  143.  
  144. // Do the next character test as this one failed.
  145. #define H_Sb(%0,%1) H_Nb%1(%0)
  146. // End of string test failed.
  147. #define H_Eb(%0)    hba:H_Sb(%0,a)
  148. // Do the single addition.
  149. #define H_Db(%0,%1) (_:H_Rb(%0)*33+%1)
  150. // Recurse through the string.
  151. #define H_Rb(%0)    hb:H_Eb(%0)
  152. // Test for the end of a string.
  153. #define hb:H_Eb()   -1
  154. // Find the length of a string at compile time.
  155. //#define LEN(%0) _:(H_R(%0))
  156.  
  157. // Test for the current character.
  158. #define hba:H_Sb(a%0,%1) H_Db(%0,97)
  159. #define hbb:H_Sb(b%0,%1) H_Db(%0,98)
  160. #define hbc:H_Sb(c%0,%1) H_Db(%0,99)
  161. #define hbd:H_Sb(d%0,%1) H_Db(%0,100)
  162. #define hbe:H_Sb(e%0,%1) H_Db(%0,101)
  163. #define hbf:H_Sb(f%0,%1) H_Db(%0,102)
  164. #define hbg:H_Sb(g%0,%1) H_Db(%0,103)
  165. #define hbh:H_Sb(h%0,%1) H_Db(%0,104)
  166. #define hbi:H_Sb(i%0,%1) H_Db(%0,105)
  167. #define hbj:H_Sb(j%0,%1) H_Db(%0,106)
  168. #define hbk:H_Sb(k%0,%1) H_Db(%0,107)
  169. #define hbl:H_Sb(l%0,%1) H_Db(%0,108)
  170. #define hbm:H_Sb(m%0,%1) H_Db(%0,109)
  171. #define hbn:H_Sb(n%0,%1) H_Db(%0,110)
  172. #define hbo:H_Sb(o%0,%1) H_Db(%0,111)
  173. #define hbp:H_Sb(p%0,%1) H_Db(%0,112)
  174. #define hbq:H_Sb(q%0,%1) H_Db(%0,113)
  175. #define hbr:H_Sb(r%0,%1) H_Db(%0,114)
  176. #define hbs:H_Sb(s%0,%1) H_Db(%0,115)
  177. #define hbt:H_Sb(t%0,%1) H_Db(%0,116)
  178. #define hbu:H_Sb(u%0,%1) H_Db(%0,117)
  179. #define hbv:H_Sb(v%0,%1) H_Db(%0,118)
  180. #define hbw:H_Sb(w%0,%1) H_Db(%0,119)
  181. #define hbx:H_Sb(x%0,%1) H_Db(%0,120)
  182. #define hby:H_Sb(y%0,%1) H_Db(%0,121)
  183. #define hbz:H_Sb(z%0,%1) H_Db(%0,122)
  184.  
  185. #define hbA:H_Sb(A%0,%1) H_Db(%0,65)
  186. #define hbB:H_Sb(B%0,%1) H_Db(%0,66)
  187. #define hbC:H_Sb(C%0,%1) H_Db(%0,67)
  188. #define hbD:H_Sb(D%0,%1) H_Db(%0,68)
  189. #define hbE:H_Sb(E%0,%1) H_Db(%0,69)
  190. #define hbF:H_Sb(F%0,%1) H_Db(%0,70)
  191. #define hbG:H_Sb(G%0,%1) H_Db(%0,71)
  192. #define hbH:H_Sb(H%0,%1) H_Db(%0,72)
  193. #define hbI:H_Sb(I%0,%1) H_Db(%0,73)
  194. #define hbJ:H_Sb(J%0,%1) H_Db(%0,74)
  195. #define hbK:H_Sb(K%0,%1) H_Db(%0,75)
  196. #define hbL:H_Sb(L%0,%1) H_Db(%0,76)
  197. #define hbM:H_Sb(M%0,%1) H_Db(%0,77)
  198. #define hbN:H_Sb(N%0,%1) H_Db(%0,78)
  199. #define hbO:H_Sb(O%0,%1) H_Db(%0,79)
  200. #define hbP:H_Sb(P%0,%1) H_Db(%0,80)
  201. #define hbQ:H_Sb(Q%0,%1) H_Db(%0,81)
  202. #define hbR:H_Sb(R%0,%1) H_Db(%0,82)
  203. #define hbS:H_Sb(S%0,%1) H_Db(%0,83)
  204. #define hbT:H_Sb(T%0,%1) H_Db(%0,84)
  205. #define hbU:H_Sb(U%0,%1) H_Db(%0,85)
  206. #define hbV:H_Sb(V%0,%1) H_Db(%0,86)
  207. #define hbW:H_Sb(W%0,%1) H_Db(%0,87)
  208. #define hbX:H_Sb(X%0,%1) H_Db(%0,88)
  209. #define hbY:H_Sb(Y%0,%1) H_Db(%0,89)
  210. #define hbZ:H_Sb(Z%0,%1) H_Db(%0,90)
  211.  
  212. #define hb0:H_Sb(0%0,%1) H_Db(%0,48)
  213. #define hb1:H_Sb(1%0,%1) H_Db(%0,49)
  214. #define hb2:H_Sb(2%0,%1) H_Db(%0,50)
  215. #define hb3:H_Sb(3%0,%1) H_Db(%0,51)
  216. #define hb4:H_Sb(4%0,%1) H_Db(%0,52)
  217. #define hb5:H_Sb(5%0,%1) H_Db(%0,53)
  218. #define hb6:H_Sb(6%0,%1) H_Db(%0,54)
  219. #define hb7:H_Sb(7%0,%1) H_Db(%0,55)
  220. #define hb8:H_Sb(8%0,%1) H_Db(%0,56)
  221. #define hb9:H_Sb(9%0,%1) H_Db(%0,57)
  222.  
  223. #define hb_:H_Sb(_%0,%1) H_Db(%0,95)
  224. //#define hb@:H_Sb(@%0,%1) H_Db(%0)
  225.  
  226. // Find the next character to test.
  227. #define H_Nba(%0) hbb:H_Sb(%0,b)
  228. #define H_Nbb(%0) hbc:H_Sb(%0,c)
  229. #define H_Nbc(%0) hbd:H_Sb(%0,d)
  230. #define H_Nbd(%0) hbe:H_Sb(%0,e)
  231. #define H_Nbe(%0) hbf:H_Sb(%0,f)
  232. #define H_Nbf(%0) hbg:H_Sb(%0,g)
  233. #define H_Nbg(%0) hbh:H_Sb(%0,h)
  234. #define H_Nbh(%0) hbi:H_Sb(%0,i)
  235. #define H_Nbi(%0) hbj:H_Sb(%0,j)
  236. #define H_Nbj(%0) hbk:H_Sb(%0,k)
  237. #define H_Nbk(%0) hbl:H_Sb(%0,l)
  238. #define H_Nbl(%0) hbm:H_Sb(%0,m)
  239. #define H_Nbm(%0) hbn:H_Sb(%0,n)
  240. #define H_Nbn(%0) hbo:H_Sb(%0,o)
  241. #define H_Nbo(%0) hbp:H_Sb(%0,p)
  242. #define H_Nbp(%0) hbq:H_Sb(%0,q)
  243. #define H_Nbq(%0) hbr:H_Sb(%0,r)
  244. #define H_Nbr(%0) hbs:H_Sb(%0,s)
  245. #define H_Nbs(%0) hbt:H_Sb(%0,t)
  246. #define H_Nbt(%0) hbu:H_Sb(%0,u)
  247. #define H_Nbu(%0) hbv:H_Sb(%0,v)
  248. #define H_Nbv(%0) hbw:H_Sb(%0,w)
  249. #define H_Nbw(%0) hbx:H_Sb(%0,x)
  250. #define H_Nbx(%0) hby:H_Sb(%0,y)
  251. #define H_Nby(%0) hbz:H_Sb(%0,z)
  252. #define H_Nbz(%0) hbA:H_Sb(%0,0)
  253.  
  254. #define H_NbA(%0) hbB:H_Sb(%0,B)
  255. #define H_NbB(%0) hbC:H_Sb(%0,C)
  256. #define H_NbC(%0) hbD:H_Sb(%0,D)
  257. #define H_NbD(%0) hbE:H_Sb(%0,E)
  258. #define H_NbE(%0) hbF:H_Sb(%0,F)
  259. #define H_NbF(%0) hbG:H_Sb(%0,G)
  260. #define H_NbG(%0) hbH:H_Sb(%0,H)
  261. #define H_NbH(%0) hbI:H_Sb(%0,I)
  262. #define H_NbI(%0) hbJ:H_Sb(%0,J)
  263. #define H_NbJ(%0) hbK:H_Sb(%0,K)
  264. #define H_NbK(%0) hbL:H_Sb(%0,L)
  265. #define H_NbL(%0) hbM:H_Sb(%0,M)
  266. #define H_NbM(%0) hbN:H_Sb(%0,N)
  267. #define H_NbN(%0) hbO:H_Sb(%0,O)
  268. #define H_NbO(%0) hbP:H_Sb(%0,P)
  269. #define H_NbP(%0) hbQ:H_Sb(%0,Q)
  270. #define H_NbQ(%0) hbR:H_Sb(%0,R)
  271. #define H_NbR(%0) hbS:H_Sb(%0,S)
  272. #define H_NbS(%0) hbT:H_Sb(%0,T)
  273. #define H_NbT(%0) hbU:H_Sb(%0,U)
  274. #define H_NbU(%0) hbV:H_Sb(%0,V)
  275. #define H_NbV(%0) hbW:H_Sb(%0,W)
  276. #define H_NbW(%0) hbX:H_Sb(%0,X)
  277. #define H_NbX(%0) hbY:H_Sb(%0,Y)
  278. #define H_NbY(%0) hbZ:H_Sb(%0,Z)
  279. #define H_NbZ(%0) -1
  280.  
  281. #define H_Nb0(%0) hb1:H_Sb(%0,1)
  282. #define H_Nb1(%0) hb2:H_Sb(%0,2)
  283. #define H_Nb2(%0) hb3:H_Sb(%0,3)
  284. #define H_Nb3(%0) hb4:H_Sb(%0,4)
  285. #define H_Nb4(%0) hb5:H_Sb(%0,5)
  286. #define H_Nb5(%0) hb6:H_Sb(%0,6)
  287. #define H_Nb6(%0) hb7:H_Sb(%0,7)
  288. #define H_Nb7(%0) hb8:H_Sb(%0,8)
  289. #define H_Nb8(%0) hb9:H_Sb(%0,9)
  290. #define H_Nb9(%0) hb_:H_Sb(%0,_)
  291.  
  292. #define H_Nb_(%0) hb_:H_Sb(%0,A)
  293.  
  294. // ==================
  295. //  Case insensitive
  296. // ==================
  297.  
  298. // Do the next character test as this one failed.
  299. #define H_Sc(%0,%1) H_Nc%1(%0)
  300. // End of string test failed.
  301. #define H_Ec(%0)    hca:H_Sc(%0,a)
  302. // Do the single addition.
  303. #define H_Dc(%0,%1) (_:H_Rc(%0)*33+%1)
  304. // Recurse through the string.
  305. #define H_Rc(%0)    hc:H_Ec(%0)
  306. // Test for the end of a string.
  307. #define hc:H_Ec()   -1
  308. // Find the length of a string at compile time.
  309. //#define LEN(%0) _:(I_R(%0))
  310.  
  311. // Test for the current character.
  312. #define hca:H_Sc(a%0,%1) H_Dc(%0,65)
  313. #define hcb:H_Sc(b%0,%1) H_Dc(%0,66)
  314. #define hcc:H_Sc(c%0,%1) H_Dc(%0,67)
  315. #define hcd:H_Sc(d%0,%1) H_Dc(%0,68)
  316. #define hce:H_Sc(e%0,%1) H_Dc(%0,69)
  317. #define hcf:H_Sc(f%0,%1) H_Dc(%0,70)
  318. #define hcg:H_Sc(g%0,%1) H_Dc(%0,71)
  319. #define hch:H_Sc(h%0,%1) H_Dc(%0,72)
  320. #define hci:H_Sc(i%0,%1) H_Dc(%0,73)
  321. #define hcj:H_Sc(j%0,%1) H_Dc(%0,74)
  322. #define hck:H_Sc(k%0,%1) H_Dc(%0,75)
  323. #define hcl:H_Sc(l%0,%1) H_Dc(%0,76)
  324. #define hcm:H_Sc(m%0,%1) H_Dc(%0,77)
  325. #define hcn:H_Sc(n%0,%1) H_Dc(%0,78)
  326. #define hco:H_Sc(o%0,%1) H_Dc(%0,79)
  327. #define hcp:H_Sc(p%0,%1) H_Dc(%0,80)
  328. #define hcq:H_Sc(q%0,%1) H_Dc(%0,81)
  329. #define hcr:H_Sc(r%0,%1) H_Dc(%0,82)
  330. #define hcs:H_Sc(s%0,%1) H_Dc(%0,83)
  331. #define hct:H_Sc(t%0,%1) H_Dc(%0,84)
  332. #define hcu:H_Sc(u%0,%1) H_Dc(%0,85)
  333. #define hcv:H_Sc(v%0,%1) H_Dc(%0,86)
  334. #define hcw:H_Sc(w%0,%1) H_Dc(%0,87)
  335. #define hcx:H_Sc(x%0,%1) H_Dc(%0,88)
  336. #define hcy:H_Sc(y%0,%1) H_Dc(%0,89)
  337. #define hcz:H_Sc(z%0,%1) H_Dc(%0,90)
  338.  
  339. #define hcA:H_Sc(A%0,%1) H_Dc(%0,65)
  340. #define hcB:H_Sc(B%0,%1) H_Dc(%0,66)
  341. #define hcC:H_Sc(C%0,%1) H_Dc(%0,67)
  342. #define hcD:H_Sc(D%0,%1) H_Dc(%0,68)
  343. #define hcE:H_Sc(E%0,%1) H_Dc(%0,69)
  344. #define hcF:H_Sc(F%0,%1) H_Dc(%0,70)
  345. #define hcG:H_Sc(G%0,%1) H_Dc(%0,71)
  346. #define hcH:H_Sc(H%0,%1) H_Dc(%0,72)
  347. #define hcI:H_Sc(I%0,%1) H_Dc(%0,73)
  348. #define hcJ:H_Sc(J%0,%1) H_Dc(%0,74)
  349. #define hcK:H_Sc(K%0,%1) H_Dc(%0,75)
  350. #define hcL:H_Sc(L%0,%1) H_Dc(%0,76)
  351. #define hcM:H_Sc(M%0,%1) H_Dc(%0,77)
  352. #define hcN:H_Sc(N%0,%1) H_Dc(%0,78)
  353. #define hcO:H_Sc(O%0,%1) H_Dc(%0,79)
  354. #define hcP:H_Sc(P%0,%1) H_Dc(%0,80)
  355. #define hcQ:H_Sc(Q%0,%1) H_Dc(%0,81)
  356. #define hcR:H_Sc(R%0,%1) H_Dc(%0,82)
  357. #define hcS:H_Sc(S%0,%1) H_Dc(%0,83)
  358. #define hcT:H_Sc(T%0,%1) H_Dc(%0,84)
  359. #define hcU:H_Sc(U%0,%1) H_Dc(%0,85)
  360. #define hcV:H_Sc(V%0,%1) H_Dc(%0,86)
  361. #define hcW:H_Sc(W%0,%1) H_Dc(%0,87)
  362. #define hcX:H_Sc(X%0,%1) H_Dc(%0,88)
  363. #define hcY:H_Sc(Y%0,%1) H_Dc(%0,89)
  364. #define hcZ:H_Sc(Z%0,%1) H_Dc(%0,90)
  365.  
  366. #define hc0:H_Sc(0%0,%1) H_Dc(%0,48)
  367. #define hc1:H_Sc(1%0,%1) H_Dc(%0,49)
  368. #define hc2:H_Sc(2%0,%1) H_Dc(%0,50)
  369. #define hc3:H_Sc(3%0,%1) H_Dc(%0,51)
  370. #define hc4:H_Sc(4%0,%1) H_Dc(%0,52)
  371. #define hc5:H_Sc(5%0,%1) H_Dc(%0,53)
  372. #define hc6:H_Sc(6%0,%1) H_Dc(%0,54)
  373. #define hc7:H_Sc(7%0,%1) H_Dc(%0,55)
  374. #define hc8:H_Sc(8%0,%1) H_Dc(%0,56)
  375. #define hc9:H_Sc(9%0,%1) H_Dc(%0,57)
  376.  
  377. #define hc_:H_Sc(_%0,%1) H_Dc(%0,95)
  378. //#define hc@:H_Sc(@%0,%1) H_Dc(%0)
  379.  
  380. // Find the next character to test.
  381. #define H_Nca(%0) hcb:H_Sc(%0,b)
  382. #define H_Ncb(%0) hcc:H_Sc(%0,c)
  383. #define H_Ncc(%0) hcd:H_Sc(%0,d)
  384. #define H_Ncd(%0) hce:H_Sc(%0,e)
  385. #define H_Nce(%0) hcf:H_Sc(%0,f)
  386. #define H_Ncf(%0) hcg:H_Sc(%0,g)
  387. #define H_Ncg(%0) hch:H_Sc(%0,h)
  388. #define H_Nch(%0) hci:H_Sc(%0,i)
  389. #define H_Nci(%0) hcj:H_Sc(%0,j)
  390. #define H_Ncj(%0) hck:H_Sc(%0,k)
  391. #define H_Nck(%0) hcl:H_Sc(%0,l)
  392. #define H_Ncl(%0) hcm:H_Sc(%0,m)
  393. #define H_Ncm(%0) hcn:H_Sc(%0,n)
  394. #define H_Ncn(%0) hco:H_Sc(%0,o)
  395. #define H_Nco(%0) hcp:H_Sc(%0,p)
  396. #define H_Ncp(%0) hcq:H_Sc(%0,q)
  397. #define H_Ncq(%0) hcr:H_Sc(%0,r)
  398. #define H_Ncr(%0) hcs:H_Sc(%0,s)
  399. #define H_Ncs(%0) hct:H_Sc(%0,t)
  400. #define H_Nct(%0) hcu:H_Sc(%0,u)
  401. #define H_Ncu(%0) hcv:H_Sc(%0,v)
  402. #define H_Ncv(%0) hcw:H_Sc(%0,w)
  403. #define H_Ncw(%0) hcx:H_Sc(%0,x)
  404. #define H_Ncx(%0) hcy:H_Sc(%0,y)
  405. #define H_Ncy(%0) hcz:H_Sc(%0,z)
  406. #define H_Ncz(%0) hcA:H_Sc(%0,0)
  407.  
  408. #define H_NcA(%0) hcB:H_Sc(%0,B)
  409. #define H_NcB(%0) hcC:H_Sc(%0,C)
  410. #define H_NcC(%0) hcD:H_Sc(%0,D)
  411. #define H_NcD(%0) hcE:H_Sc(%0,E)
  412. #define H_NcE(%0) hcF:H_Sc(%0,F)
  413. #define H_NcF(%0) hcG:H_Sc(%0,G)
  414. #define H_NcG(%0) hcH:H_Sc(%0,H)
  415. #define H_NcH(%0) hcI:H_Sc(%0,I)
  416. #define H_NcI(%0) hcJ:H_Sc(%0,J)
  417. #define H_NcJ(%0) hcK:H_Sc(%0,K)
  418. #define H_NcK(%0) hcL:H_Sc(%0,L)
  419. #define H_NcL(%0) hcM:H_Sc(%0,M)
  420. #define H_NcM(%0) hcN:H_Sc(%0,N)
  421. #define H_NcN(%0) hcO:H_Sc(%0,O)
  422. #define H_NcO(%0) hcP:H_Sc(%0,P)
  423. #define H_NcP(%0) hcQ:H_Sc(%0,Q)
  424. #define H_NcQ(%0) hcR:H_Sc(%0,R)
  425. #define H_NcR(%0) hcS:H_Sc(%0,S)
  426. #define H_NcS(%0) hcT:H_Sc(%0,T)
  427. #define H_NcT(%0) hcU:H_Sc(%0,U)
  428. #define H_NcU(%0) hcV:H_Sc(%0,V)
  429. #define H_NcV(%0) hcW:H_Sc(%0,W)
  430. #define H_NcW(%0) hcX:H_Sc(%0,X)
  431. #define H_NcX(%0) hcY:H_Sc(%0,Y)
  432. #define H_NcY(%0) hcZ:H_Sc(%0,Z)
  433. #define H_NcZ(%0) -1
  434.  
  435. #define H_Nc0(%0) hc1:H_Sc(%0,1)
  436. #define H_Nc1(%0) hc2:H_Sc(%0,2)
  437. #define H_Nc2(%0) hc3:H_Sc(%0,3)
  438. #define H_Nc3(%0) hc4:H_Sc(%0,4)
  439. #define H_Nc4(%0) hc5:H_Sc(%0,5)
  440. #define H_Nc5(%0) hc6:H_Sc(%0,6)
  441. #define H_Nc6(%0) hc7:H_Sc(%0,7)
  442. #define H_Nc7(%0) hc8:H_Sc(%0,8)
  443. #define H_Nc8(%0) hc9:H_Sc(%0,9)
  444. #define H_Nc9(%0) hc_:H_Sc(%0,_)
  445.  
  446. #define H_Nc_(%0) hc0:H_Sc(%0,A)
  447.  
  448. // ===========
  449. //  FNV1 hash
  450. // ===========
  451.  
  452. // ================
  453. //  Case sensitive
  454. // ================
  455.  
  456. // Do the next character test as this one failed.
  457. #define H_Sg(%0,%1) H_Ng%1(%0)
  458. // End of string test failed.
  459. #define H_Eg(%0)    hga:H_Sg(%0,a)
  460. // Do the single addition.
  461. #define H_Dg(%0,%1) (_:H_Rg(%0)*16777619^%1)
  462. // Recurse through the string.
  463. #define H_Rg(%0)    hg:H_Eg(%0)
  464. // Test for the end of a string.
  465. #define hg:H_Eg()   2166136261
  466. // Find the length of a string at compile time.
  467. //#define LEN(%0) _:(H_R(%0))
  468.  
  469. // Test for the current character.
  470. #define hga:H_Sg(a%0,%1) H_Dg(%0,97)
  471. #define hgb:H_Sg(b%0,%1) H_Dg(%0,98)
  472. #define hgc:H_Sg(c%0,%1) H_Dg(%0,99)
  473. #define hgd:H_Sg(d%0,%1) H_Dg(%0,100)
  474. #define hge:H_Sg(e%0,%1) H_Dg(%0,101)
  475. #define hgf:H_Sg(f%0,%1) H_Dg(%0,102)
  476. #define hgg:H_Sg(g%0,%1) H_Dg(%0,103)
  477. #define hgh:H_Sg(h%0,%1) H_Dg(%0,104)
  478. #define hgi:H_Sg(i%0,%1) H_Dg(%0,105)
  479. #define hgj:H_Sg(j%0,%1) H_Dg(%0,106)
  480. #define hgk:H_Sg(k%0,%1) H_Dg(%0,107)
  481. #define hgl:H_Sg(l%0,%1) H_Dg(%0,108)
  482. #define hgm:H_Sg(m%0,%1) H_Dg(%0,109)
  483. #define hgn:H_Sg(n%0,%1) H_Dg(%0,110)
  484. #define hgo:H_Sg(o%0,%1) H_Dg(%0,111)
  485. #define hgp:H_Sg(p%0,%1) H_Dg(%0,112)
  486. #define hgq:H_Sg(q%0,%1) H_Dg(%0,113)
  487. #define hgr:H_Sg(r%0,%1) H_Dg(%0,114)
  488. #define hgs:H_Sg(s%0,%1) H_Dg(%0,115)
  489. #define hgt:H_Sg(t%0,%1) H_Dg(%0,116)
  490. #define hgu:H_Sg(u%0,%1) H_Dg(%0,117)
  491. #define hgv:H_Sg(v%0,%1) H_Dg(%0,118)
  492. #define hgw:H_Sg(w%0,%1) H_Dg(%0,119)
  493. #define hgx:H_Sg(x%0,%1) H_Dg(%0,120)
  494. #define hgy:H_Sg(y%0,%1) H_Dg(%0,121)
  495. #define hgz:H_Sg(z%0,%1) H_Dg(%0,122)
  496.  
  497. #define hgA:H_Sg(A%0,%1) H_Dg(%0,65)
  498. #define hgB:H_Sg(B%0,%1) H_Dg(%0,66)
  499. #define hgC:H_Sg(C%0,%1) H_Dg(%0,67)
  500. #define hgD:H_Sg(D%0,%1) H_Dg(%0,68)
  501. #define hgE:H_Sg(E%0,%1) H_Dg(%0,69)
  502. #define hgF:H_Sg(F%0,%1) H_Dg(%0,70)
  503. #define hgG:H_Sg(G%0,%1) H_Dg(%0,71)
  504. #define hgH:H_Sg(H%0,%1) H_Dg(%0,72)
  505. #define hgI:H_Sg(I%0,%1) H_Dg(%0,73)
  506. #define hgJ:H_Sg(J%0,%1) H_Dg(%0,74)
  507. #define hgK:H_Sg(K%0,%1) H_Dg(%0,75)
  508. #define hgL:H_Sg(L%0,%1) H_Dg(%0,76)
  509. #define hgM:H_Sg(M%0,%1) H_Dg(%0,77)
  510. #define hgN:H_Sg(N%0,%1) H_Dg(%0,78)
  511. #define hgO:H_Sg(O%0,%1) H_Dg(%0,79)
  512. #define hgP:H_Sg(P%0,%1) H_Dg(%0,80)
  513. #define hgQ:H_Sg(Q%0,%1) H_Dg(%0,81)
  514. #define hgR:H_Sg(R%0,%1) H_Dg(%0,82)
  515. #define hgS:H_Sg(S%0,%1) H_Dg(%0,83)
  516. #define hgT:H_Sg(T%0,%1) H_Dg(%0,84)
  517. #define hgU:H_Sg(U%0,%1) H_Dg(%0,85)
  518. #define hgV:H_Sg(V%0,%1) H_Dg(%0,86)
  519. #define hgW:H_Sg(W%0,%1) H_Dg(%0,87)
  520. #define hgX:H_Sg(X%0,%1) H_Dg(%0,88)
  521. #define hgY:H_Sg(Y%0,%1) H_Dg(%0,89)
  522. #define hgZ:H_Sg(Z%0,%1) H_Dg(%0,90)
  523.  
  524. #define hg0:H_Sg(0%0,%1) H_Dg(%0,48)
  525. #define hg1:H_Sg(1%0,%1) H_Dg(%0,49)
  526. #define hg2:H_Sg(2%0,%1) H_Dg(%0,50)
  527. #define hg3:H_Sg(3%0,%1) H_Dg(%0,51)
  528. #define hg4:H_Sg(4%0,%1) H_Dg(%0,52)
  529. #define hg5:H_Sg(5%0,%1) H_Dg(%0,53)
  530. #define hg6:H_Sg(6%0,%1) H_Dg(%0,54)
  531. #define hg7:H_Sg(7%0,%1) H_Dg(%0,55)
  532. #define hg8:H_Sg(8%0,%1) H_Dg(%0,56)
  533. #define hg9:H_Sg(9%0,%1) H_Dg(%0,57)
  534.  
  535. #define hg_:H_Sg(_%0,%1) H_Dg(%0,95)
  536. //#define hg@:H_Sg(@%0,%1) H_Dg(%0)
  537.  
  538. // Find the next character to test.
  539. #define H_Nga(%0) hgb:H_Sg(%0,b)
  540. #define H_Ngb(%0) hgc:H_Sg(%0,c)
  541. #define H_Ngc(%0) hgd:H_Sg(%0,d)
  542. #define H_Ngd(%0) hge:H_Sg(%0,e)
  543. #define H_Nge(%0) hgf:H_Sg(%0,f)
  544. #define H_Ngf(%0) hgg:H_Sg(%0,g)
  545. #define H_Ngg(%0) hgh:H_Sg(%0,h)
  546. #define H_Ngh(%0) hgi:H_Sg(%0,i)
  547. #define H_Ngi(%0) hgj:H_Sg(%0,j)
  548. #define H_Ngj(%0) hgk:H_Sg(%0,k)
  549. #define H_Ngk(%0) hgl:H_Sg(%0,l)
  550. #define H_Ngl(%0) hgm:H_Sg(%0,m)
  551. #define H_Ngm(%0) hgn:H_Sg(%0,n)
  552. #define H_Ngn(%0) hgo:H_Sg(%0,o)
  553. #define H_Ngo(%0) hgp:H_Sg(%0,p)
  554. #define H_Ngp(%0) hgq:H_Sg(%0,q)
  555. #define H_Ngq(%0) hgr:H_Sg(%0,r)
  556. #define H_Ngr(%0) hgs:H_Sg(%0,s)
  557. #define H_Ngs(%0) hgt:H_Sg(%0,t)
  558. #define H_Ngt(%0) hgu:H_Sg(%0,u)
  559. #define H_Ngu(%0) hgv:H_Sg(%0,v)
  560. #define H_Ngv(%0) hgw:H_Sg(%0,w)
  561. #define H_Ngw(%0) hgx:H_Sg(%0,x)
  562. #define H_Ngx(%0) hgy:H_Sg(%0,y)
  563. #define H_Ngy(%0) hgz:H_Sg(%0,z)
  564. #define H_Ngz(%0) hgA:H_Sg(%0,0)
  565.  
  566. #define H_NgA(%0) hgB:H_Sg(%0,B)
  567. #define H_NgB(%0) hgC:H_Sg(%0,C)
  568. #define H_NgC(%0) hgD:H_Sg(%0,D)
  569. #define H_NgD(%0) hgE:H_Sg(%0,E)
  570. #define H_NgE(%0) hgF:H_Sg(%0,F)
  571. #define H_NgF(%0) hgG:H_Sg(%0,G)
  572. #define H_NgG(%0) hgH:H_Sg(%0,H)
  573. #define H_NgH(%0) hgI:H_Sg(%0,I)
  574. #define H_NgI(%0) hgJ:H_Sg(%0,J)
  575. #define H_NgJ(%0) hgK:H_Sg(%0,K)
  576. #define H_NgK(%0) hgL:H_Sg(%0,L)
  577. #define H_NgL(%0) hgM:H_Sg(%0,M)
  578. #define H_NgM(%0) hgN:H_Sg(%0,N)
  579. #define H_NgN(%0) hgO:H_Sg(%0,O)
  580. #define H_NgO(%0) hgP:H_Sg(%0,P)
  581. #define H_NgP(%0) hgQ:H_Sg(%0,Q)
  582. #define H_NgQ(%0) hgR:H_Sg(%0,R)
  583. #define H_NgR(%0) hgS:H_Sg(%0,S)
  584. #define H_NgS(%0) hgT:H_Sg(%0,T)
  585. #define H_NgT(%0) hgU:H_Sg(%0,U)
  586. #define H_NgU(%0) hgV:H_Sg(%0,V)
  587. #define H_NgV(%0) hgW:H_Sg(%0,W)
  588. #define H_NgW(%0) hgX:H_Sg(%0,X)
  589. #define H_NgX(%0) hgY:H_Sg(%0,Y)
  590. #define H_NgY(%0) hgZ:H_Sg(%0,Z)
  591. #define H_NgZ(%0) 2166136261
  592.  
  593. #define H_Ng0(%0) hg1:H_Sg(%0,1)
  594. #define H_Ng1(%0) hg2:H_Sg(%0,2)
  595. #define H_Ng2(%0) hg3:H_Sg(%0,3)
  596. #define H_Ng3(%0) hg4:H_Sg(%0,4)
  597. #define H_Ng4(%0) hg5:H_Sg(%0,5)
  598. #define H_Ng5(%0) hg6:H_Sg(%0,6)
  599. #define H_Ng6(%0) hg7:H_Sg(%0,7)
  600. #define H_Ng7(%0) hg8:H_Sg(%0,8)
  601. #define H_Ng8(%0) hg9:H_Sg(%0,9)
  602. #define H_Ng9(%0) hg_:H_Sg(%0,_)
  603.  
  604. #define H_Ng_(%0) hg0:H_Sg(%0,A)
  605.  
  606. // ==================
  607. //  Case insensitive
  608. // ==================
  609.  
  610. // Do the next character test as this one failed.
  611. #define H_Sf(%0,%1) H_Nf%1(%0)
  612. // End of string test failed.
  613. #define H_Ef(%0)    hfa:H_Sf(%0,a)
  614. // Do the single addition.
  615. #define H_Df(%0,%1) (_:H_Rf(%0)*16777619^%1)
  616. // Recurse through the string.
  617. #define H_Rf(%0)    hf:H_Ef(%0)
  618. // Test for the end of a string.
  619. #define hf:H_Ef()   2166136261
  620. // Find the length of a string at compile time.
  621. //#define LEN(%0) _:(I_R(%0))
  622.  
  623. // Test for the current character.
  624. #define hfa:H_Sf(a%0,%1) H_Df(%0,65)
  625. #define hfb:H_Sf(b%0,%1) H_Df(%0,66)
  626. #define hfc:H_Sf(c%0,%1) H_Df(%0,67)
  627. #define hfd:H_Sf(d%0,%1) H_Df(%0,68)
  628. #define hfe:H_Sf(e%0,%1) H_Df(%0,69)
  629. #define hff:H_Sf(f%0,%1) H_Df(%0,70)
  630. #define hfg:H_Sf(g%0,%1) H_Df(%0,71)
  631. #define hfh:H_Sf(h%0,%1) H_Df(%0,72)
  632. #define hfi:H_Sf(i%0,%1) H_Df(%0,73)
  633. #define hfj:H_Sf(j%0,%1) H_Df(%0,74)
  634. #define hfk:H_Sf(k%0,%1) H_Df(%0,75)
  635. #define hfl:H_Sf(l%0,%1) H_Df(%0,76)
  636. #define hfm:H_Sf(m%0,%1) H_Df(%0,77)
  637. #define hfn:H_Sf(n%0,%1) H_Df(%0,78)
  638. #define hfo:H_Sf(o%0,%1) H_Df(%0,79)
  639. #define hfp:H_Sf(p%0,%1) H_Df(%0,80)
  640. #define hfq:H_Sf(q%0,%1) H_Df(%0,81)
  641. #define hfr:H_Sf(r%0,%1) H_Df(%0,82)
  642. #define hfs:H_Sf(s%0,%1) H_Df(%0,83)
  643. #define hft:H_Sf(t%0,%1) H_Df(%0,84)
  644. #define hfu:H_Sf(u%0,%1) H_Df(%0,85)
  645. #define hfv:H_Sf(v%0,%1) H_Df(%0,86)
  646. #define hfw:H_Sf(w%0,%1) H_Df(%0,87)
  647. #define hfx:H_Sf(x%0,%1) H_Df(%0,88)
  648. #define hfy:H_Sf(y%0,%1) H_Df(%0,89)
  649. #define hfz:H_Sf(z%0,%1) H_Df(%0,90)
  650.  
  651. #define hfA:H_Sf(A%0,%1) H_Df(%0,65)
  652. #define hfB:H_Sf(B%0,%1) H_Df(%0,66)
  653. #define hfC:H_Sf(C%0,%1) H_Df(%0,67)
  654. #define hfD:H_Sf(D%0,%1) H_Df(%0,68)
  655. #define hfE:H_Sf(E%0,%1) H_Df(%0,69)
  656. #define hfF:H_Sf(F%0,%1) H_Df(%0,70)
  657. #define hfG:H_Sf(G%0,%1) H_Df(%0,71)
  658. #define hfH:H_Sf(H%0,%1) H_Df(%0,72)
  659. #define hfI:H_Sf(I%0,%1) H_Df(%0,73)
  660. #define hfJ:H_Sf(J%0,%1) H_Df(%0,74)
  661. #define hfK:H_Sf(K%0,%1) H_Df(%0,75)
  662. #define hfL:H_Sf(L%0,%1) H_Df(%0,76)
  663. #define hfM:H_Sf(M%0,%1) H_Df(%0,77)
  664. #define hfN:H_Sf(N%0,%1) H_Df(%0,78)
  665. #define hfO:H_Sf(O%0,%1) H_Df(%0,79)
  666. #define hfP:H_Sf(P%0,%1) H_Df(%0,80)
  667. #define hfQ:H_Sf(Q%0,%1) H_Df(%0,81)
  668. #define hfR:H_Sf(R%0,%1) H_Df(%0,82)
  669. #define hfS:H_Sf(S%0,%1) H_Df(%0,83)
  670. #define hfT:H_Sf(T%0,%1) H_Df(%0,84)
  671. #define hfU:H_Sf(U%0,%1) H_Df(%0,85)
  672. #define hfV:H_Sf(V%0,%1) H_Df(%0,86)
  673. #define hfW:H_Sf(W%0,%1) H_Df(%0,87)
  674. #define hfX:H_Sf(X%0,%1) H_Df(%0,88)
  675. #define hfY:H_Sf(Y%0,%1) H_Df(%0,89)
  676. #define hfZ:H_Sf(Z%0,%1) H_Df(%0,90)
  677.  
  678. #define hf0:H_Sf(0%0,%1) H_Df(%0,48)
  679. #define hf1:H_Sf(1%0,%1) H_Df(%0,49)
  680. #define hf2:H_Sf(2%0,%1) H_Df(%0,50)
  681. #define hf3:H_Sf(3%0,%1) H_Df(%0,51)
  682. #define hf4:H_Sf(4%0,%1) H_Df(%0,52)
  683. #define hf5:H_Sf(5%0,%1) H_Df(%0,53)
  684. #define hf6:H_Sf(6%0,%1) H_Df(%0,54)
  685. #define hf7:H_Sf(7%0,%1) H_Df(%0,55)
  686. #define hf8:H_Sf(8%0,%1) H_Df(%0,56)
  687. #define hf9:H_Sf(9%0,%1) H_Df(%0,57)
  688.  
  689. #define hf_:H_Sf(_%0,%1) H_Df(%0,95)
  690. //#define hf@:H_Sf(@%0,%1) H_Df(%0)
  691.  
  692. // Find the next character to test.
  693. #define H_Nfa(%0) hfb:H_Sf(%0,b)
  694. #define H_Nfb(%0) hfc:H_Sf(%0,c)
  695. #define H_Nfc(%0) hfd:H_Sf(%0,d)
  696. #define H_Nfd(%0) hfe:H_Sf(%0,e)
  697. #define H_Nfe(%0) hff:H_Sf(%0,f)
  698. #define H_Nff(%0) hfg:H_Sf(%0,g)
  699. #define H_Nfg(%0) hfh:H_Sf(%0,h)
  700. #define H_Nfh(%0) hfi:H_Sf(%0,i)
  701. #define H_Nfi(%0) hfj:H_Sf(%0,j)
  702. #define H_Nfj(%0) hfk:H_Sf(%0,k)
  703. #define H_Nfk(%0) hfl:H_Sf(%0,l)
  704. #define H_Nfl(%0) hfm:H_Sf(%0,m)
  705. #define H_Nfm(%0) hfn:H_Sf(%0,n)
  706. #define H_Nfn(%0) hfo:H_Sf(%0,o)
  707. #define H_Nfo(%0) hfp:H_Sf(%0,p)
  708. #define H_Nfp(%0) hfq:H_Sf(%0,q)
  709. #define H_Nfq(%0) hfr:H_Sf(%0,r)
  710. #define H_Nfr(%0) hfs:H_Sf(%0,s)
  711. #define H_Nfs(%0) hft:H_Sf(%0,t)
  712. #define H_Nft(%0) hfu:H_Sf(%0,u)
  713. #define H_Nfu(%0) hfv:H_Sf(%0,v)
  714. #define H_Nfv(%0) hfw:H_Sf(%0,w)
  715. #define H_Nfw(%0) hfx:H_Sf(%0,x)
  716. #define H_Nfx(%0) hfy:H_Sf(%0,y)
  717. #define H_Nfy(%0) hfz:H_Sf(%0,z)
  718. #define H_Nfz(%0) hfA:H_Sf(%0,0)
  719.  
  720. #define H_NfA(%0) hfB:H_Sf(%0,B)
  721. #define H_NfB(%0) hfC:H_Sf(%0,C)
  722. #define H_NfC(%0) hfD:H_Sf(%0,D)
  723. #define H_NfD(%0) hfE:H_Sf(%0,E)
  724. #define H_NfE(%0) hfF:H_Sf(%0,F)
  725. #define H_NfF(%0) hfG:H_Sf(%0,G)
  726. #define H_NfG(%0) hfH:H_Sf(%0,H)
  727. #define H_NfH(%0) hfI:H_Sf(%0,I)
  728. #define H_NfI(%0) hfJ:H_Sf(%0,J)
  729. #define H_NfJ(%0) hfK:H_Sf(%0,K)
  730. #define H_NfK(%0) hfL:H_Sf(%0,L)
  731. #define H_NfL(%0) hfM:H_Sf(%0,M)
  732. #define H_NfM(%0) hfN:H_Sf(%0,N)
  733. #define H_NfN(%0) hfO:H_Sf(%0,O)
  734. #define H_NfO(%0) hfP:H_Sf(%0,P)
  735. #define H_NfP(%0) hfQ:H_Sf(%0,Q)
  736. #define H_NfQ(%0) hfR:H_Sf(%0,R)
  737. #define H_NfR(%0) hfS:H_Sf(%0,S)
  738. #define H_NfS(%0) hfT:H_Sf(%0,T)
  739. #define H_NfT(%0) hfU:H_Sf(%0,U)
  740. #define H_NfU(%0) hfV:H_Sf(%0,V)
  741. #define H_NfV(%0) hfW:H_Sf(%0,W)
  742. #define H_NfW(%0) hfX:H_Sf(%0,X)
  743. #define H_NfX(%0) hfY:H_Sf(%0,Y)
  744. #define H_NfY(%0) hfZ:H_Sf(%0,Z)
  745. #define H_NfZ(%0) 2166136261
  746.  
  747. #define H_Nf0(%0) hf1:H_Sf(%0,1)
  748. #define H_Nf1(%0) hf2:H_Sf(%0,2)
  749. #define H_Nf2(%0) hf3:H_Sf(%0,3)
  750. #define H_Nf3(%0) hf4:H_Sf(%0,4)
  751. #define H_Nf4(%0) hf5:H_Sf(%0,5)
  752. #define H_Nf5(%0) hf6:H_Sf(%0,6)
  753. #define H_Nf6(%0) hf7:H_Sf(%0,7)
  754. #define H_Nf7(%0) hf8:H_Sf(%0,8)
  755. #define H_Nf8(%0) hf9:H_Sf(%0,9)
  756. #define H_Nf9(%0) hf_:H_Sf(%0,_)
  757.  
  758. #define H_Nf_(%0) hf0:H_Sf(%0,A)
  759.  
  760. // ============
  761. //  FNV1a hash
  762. // ============
  763.  
  764. // ================
  765. //  Case sensitive
  766. // ================
  767.  
  768. // Do the next character test as this one failed.
  769. #define H_Sa(%0,%1) H_Na%1(%0)
  770. // End of string test failed.
  771. #define H_Ea(%0)    haa:H_Sa(%0,a)
  772. // Do the single addition.
  773. #define H_Da(%0,%1) ((_:H_Ra(%0)^%1)*16777619)
  774. // Recurse through the string.
  775. #define H_Ra(%0)    ha:H_Ea(%0)
  776. // Test for the end of a string.
  777. #define ha:H_Ea()   2166136261
  778. // Find the length of a string at compile time.
  779. //#define LEN(%0) _:(H_R(%0))
  780.  
  781. // Test for the current character.
  782. #define haa:H_Sa(a%0,%1) H_Da(%0,97)
  783. #define hab:H_Sa(b%0,%1) H_Da(%0,98)
  784. #define hac:H_Sa(c%0,%1) H_Da(%0,99)
  785. #define had:H_Sa(d%0,%1) H_Da(%0,100)
  786. #define hae:H_Sa(e%0,%1) H_Da(%0,101)
  787. #define haf:H_Sa(f%0,%1) H_Da(%0,102)
  788. #define hag:H_Sa(g%0,%1) H_Da(%0,103)
  789. #define hah:H_Sa(h%0,%1) H_Da(%0,104)
  790. #define hai:H_Sa(i%0,%1) H_Da(%0,105)
  791. #define haj:H_Sa(j%0,%1) H_Da(%0,106)
  792. #define hak:H_Sa(k%0,%1) H_Da(%0,107)
  793. #define hal:H_Sa(l%0,%1) H_Da(%0,108)
  794. #define ham:H_Sa(m%0,%1) H_Da(%0,109)
  795. #define han:H_Sa(n%0,%1) H_Da(%0,110)
  796. #define hao:H_Sa(o%0,%1) H_Da(%0,111)
  797. #define hap:H_Sa(p%0,%1) H_Da(%0,112)
  798. #define haq:H_Sa(q%0,%1) H_Da(%0,113)
  799. #define har:H_Sa(r%0,%1) H_Da(%0,114)
  800. #define has:H_Sa(s%0,%1) H_Da(%0,115)
  801. #define hat:H_Sa(t%0,%1) H_Da(%0,116)
  802. #define hau:H_Sa(u%0,%1) H_Da(%0,117)
  803. #define hav:H_Sa(v%0,%1) H_Da(%0,118)
  804. #define haw:H_Sa(w%0,%1) H_Da(%0,119)
  805. #define hax:H_Sa(x%0,%1) H_Da(%0,120)
  806. #define hay:H_Sa(y%0,%1) H_Da(%0,121)
  807. #define haz:H_Sa(z%0,%1) H_Da(%0,122)
  808.  
  809. #define haA:H_Sa(A%0,%1) H_Da(%0,65)
  810. #define haB:H_Sa(B%0,%1) H_Da(%0,66)
  811. #define haC:H_Sa(C%0,%1) H_Da(%0,67)
  812. #define haD:H_Sa(D%0,%1) H_Da(%0,68)
  813. #define haE:H_Sa(E%0,%1) H_Da(%0,69)
  814. #define haF:H_Sa(F%0,%1) H_Da(%0,70)
  815. #define haG:H_Sa(G%0,%1) H_Da(%0,71)
  816. #define haH:H_Sa(H%0,%1) H_Da(%0,72)
  817. #define haI:H_Sa(I%0,%1) H_Da(%0,73)
  818. #define haJ:H_Sa(J%0,%1) H_Da(%0,74)
  819. #define haK:H_Sa(K%0,%1) H_Da(%0,75)
  820. #define haL:H_Sa(L%0,%1) H_Da(%0,76)
  821. #define haM:H_Sa(M%0,%1) H_Da(%0,77)
  822. #define haN:H_Sa(N%0,%1) H_Da(%0,78)
  823. #define haO:H_Sa(O%0,%1) H_Da(%0,79)
  824. #define haP:H_Sa(P%0,%1) H_Da(%0,80)
  825. #define haQ:H_Sa(Q%0,%1) H_Da(%0,81)
  826. #define haR:H_Sa(R%0,%1) H_Da(%0,82)
  827. #define haS:H_Sa(S%0,%1) H_Da(%0,83)
  828. #define haT:H_Sa(T%0,%1) H_Da(%0,84)
  829. #define haU:H_Sa(U%0,%1) H_Da(%0,85)
  830. #define haV:H_Sa(V%0,%1) H_Da(%0,86)
  831. #define haW:H_Sa(W%0,%1) H_Da(%0,87)
  832. #define haX:H_Sa(X%0,%1) H_Da(%0,88)
  833. #define haY:H_Sa(Y%0,%1) H_Da(%0,89)
  834. #define haZ:H_Sa(Z%0,%1) H_Da(%0,90)
  835.  
  836. #define ha0:H_Sa(0%0,%1) H_Da(%0,48)
  837. #define ha1:H_Sa(1%0,%1) H_Da(%0,49)
  838. #define ha2:H_Sa(2%0,%1) H_Da(%0,50)
  839. #define ha3:H_Sa(3%0,%1) H_Da(%0,51)
  840. #define ha4:H_Sa(4%0,%1) H_Da(%0,52)
  841. #define ha5:H_Sa(5%0,%1) H_Da(%0,53)
  842. #define ha6:H_Sa(6%0,%1) H_Da(%0,54)
  843. #define ha7:H_Sa(7%0,%1) H_Da(%0,55)
  844. #define ha8:H_Sa(8%0,%1) H_Da(%0,56)
  845. #define ha9:H_Sa(9%0,%1) H_Da(%0,57)
  846.  
  847. #define ha_:H_Sa(_%0,%1) H_Da(%0,95)
  848. //#define ha@:H_Sa(@%0,%1) H_Da(%0)
  849.  
  850. // Find the next character to test.
  851. #define H_Naa(%0) hab:H_Sa(%0,b)
  852. #define H_Nab(%0) hac:H_Sa(%0,c)
  853. #define H_Nac(%0) had:H_Sa(%0,d)
  854. #define H_Nad(%0) hae:H_Sa(%0,e)
  855. #define H_Nae(%0) haf:H_Sa(%0,f)
  856. #define H_Naf(%0) hag:H_Sa(%0,g)
  857. #define H_Nag(%0) hah:H_Sa(%0,h)
  858. #define H_Nah(%0) hai:H_Sa(%0,i)
  859. #define H_Nai(%0) haj:H_Sa(%0,j)
  860. #define H_Naj(%0) hak:H_Sa(%0,k)
  861. #define H_Nak(%0) hal:H_Sa(%0,l)
  862. #define H_Nal(%0) ham:H_Sa(%0,m)
  863. #define H_Nam(%0) han:H_Sa(%0,n)
  864. #define H_Nan(%0) hao:H_Sa(%0,o)
  865. #define H_Nao(%0) hap:H_Sa(%0,p)
  866. #define H_Nap(%0) haq:H_Sa(%0,q)
  867. #define H_Naq(%0) har:H_Sa(%0,r)
  868. #define H_Nar(%0) has:H_Sa(%0,s)
  869. #define H_Nas(%0) hat:H_Sa(%0,t)
  870. #define H_Nat(%0) hau:H_Sa(%0,u)
  871. #define H_Nau(%0) hav:H_Sa(%0,v)
  872. #define H_Nav(%0) haw:H_Sa(%0,w)
  873. #define H_Naw(%0) hax:H_Sa(%0,x)
  874. #define H_Nax(%0) hay:H_Sa(%0,y)
  875. #define H_Nay(%0) haz:H_Sa(%0,z)
  876. #define H_Naz(%0) haA:H_Sa(%0,0)
  877.  
  878. #define H_NaA(%0) haB:H_Sa(%0,B)
  879. #define H_NaB(%0) haC:H_Sa(%0,C)
  880. #define H_NaC(%0) haD:H_Sa(%0,D)
  881. #define H_NaD(%0) haE:H_Sa(%0,E)
  882. #define H_NaE(%0) haF:H_Sa(%0,F)
  883. #define H_NaF(%0) haG:H_Sa(%0,G)
  884. #define H_NaG(%0) haH:H_Sa(%0,H)
  885. #define H_NaH(%0) haI:H_Sa(%0,I)
  886. #define H_NaI(%0) haJ:H_Sa(%0,J)
  887. #define H_NaJ(%0) haK:H_Sa(%0,K)
  888. #define H_NaK(%0) haL:H_Sa(%0,L)
  889. #define H_NaL(%0) haM:H_Sa(%0,M)
  890. #define H_NaM(%0) haN:H_Sa(%0,N)
  891. #define H_NaN(%0) haO:H_Sa(%0,O)
  892. #define H_NaO(%0) haP:H_Sa(%0,P)
  893. #define H_NaP(%0) haQ:H_Sa(%0,Q)
  894. #define H_NaQ(%0) haR:H_Sa(%0,R)
  895. #define H_NaR(%0) haS:H_Sa(%0,S)
  896. #define H_NaS(%0) haT:H_Sa(%0,T)
  897. #define H_NaT(%0) haU:H_Sa(%0,U)
  898. #define H_NaU(%0) haV:H_Sa(%0,V)
  899. #define H_NaV(%0) haW:H_Sa(%0,W)
  900. #define H_NaW(%0) haX:H_Sa(%0,X)
  901. #define H_NaX(%0) haY:H_Sa(%0,Y)
  902. #define H_NaY(%0) haZ:H_Sa(%0,Z)
  903. #define H_NaZ(%0) 2166136261
  904.  
  905. #define H_Na0(%0) ha1:H_Sa(%0,1)
  906. #define H_Na1(%0) ha2:H_Sa(%0,2)
  907. #define H_Na2(%0) ha3:H_Sa(%0,3)
  908. #define H_Na3(%0) ha4:H_Sa(%0,4)
  909. #define H_Na4(%0) ha5:H_Sa(%0,5)
  910. #define H_Na5(%0) ha6:H_Sa(%0,6)
  911. #define H_Na6(%0) ha7:H_Sa(%0,7)
  912. #define H_Na7(%0) ha8:H_Sa(%0,8)
  913. #define H_Na8(%0) ha9:H_Sa(%0,9)
  914. #define H_Na9(%0) ha_:H_Sa(%0,_)
  915.  
  916. #define H_Na_(%0) ha0:H_Sa(%0,A)
  917.  
  918. // ==================
  919. //  Case insensitive
  920. // ==================
  921.  
  922. // Do the next character test as this one failed.
  923. #define H_Sd(%0,%1) H_Nd%1(%0)
  924. // End of string test failed.
  925. #define H_Ed(%0)    hda:H_Sd(%0,a)
  926. // Do the single addition.
  927. #define H_Dd(%0,%1) ((_:H_Rd(%0)^%1)*16777619)
  928. // Recurse through the string.
  929. #define H_Rd(%0)    hd:H_Ed(%0)
  930. // Test for the end of a string.
  931. #define hd:H_Ed()   2166136261
  932. // Find the length of a string at compile time.
  933. //#define LEN(%0) _:(I_R(%0))
  934.  
  935. // Test for the current character.
  936. #define hda:H_Sd(a%0,%1) H_Dd(%0,65)
  937. #define hdb:H_Sd(b%0,%1) H_Dd(%0,66)
  938. #define hdc:H_Sd(c%0,%1) H_Dd(%0,67)
  939. #define hdd:H_Sd(d%0,%1) H_Dd(%0,68)
  940. #define hde:H_Sd(e%0,%1) H_Dd(%0,69)
  941. #define hdf:H_Sd(f%0,%1) H_Dd(%0,70)
  942. #define hdg:H_Sd(g%0,%1) H_Dd(%0,71)
  943. #define hdh:H_Sd(h%0,%1) H_Dd(%0,72)
  944. #define hdi:H_Sd(i%0,%1) H_Dd(%0,73)
  945. #define hdj:H_Sd(j%0,%1) H_Dd(%0,74)
  946. #define hdk:H_Sd(k%0,%1) H_Dd(%0,75)
  947. #define hdl:H_Sd(l%0,%1) H_Dd(%0,76)
  948. #define hdm:H_Sd(m%0,%1) H_Dd(%0,77)
  949. #define hdn:H_Sd(n%0,%1) H_Dd(%0,78)
  950. #define hdo:H_Sd(o%0,%1) H_Dd(%0,79)
  951. #define hdp:H_Sd(p%0,%1) H_Dd(%0,80)
  952. #define hdq:H_Sd(q%0,%1) H_Dd(%0,81)
  953. #define hdr:H_Sd(r%0,%1) H_Dd(%0,82)
  954. #define hds:H_Sd(s%0,%1) H_Dd(%0,83)
  955. #define hdt:H_Sd(t%0,%1) H_Dd(%0,84)
  956. #define hdu:H_Sd(u%0,%1) H_Dd(%0,85)
  957. #define hdv:H_Sd(v%0,%1) H_Dd(%0,86)
  958. #define hdw:H_Sd(w%0,%1) H_Dd(%0,87)
  959. #define hdx:H_Sd(x%0,%1) H_Dd(%0,88)
  960. #define hdy:H_Sd(y%0,%1) H_Dd(%0,89)
  961. #define hdz:H_Sd(z%0,%1) H_Dd(%0,90)
  962.  
  963. #define hdA:H_Sd(A%0,%1) H_Dd(%0,65)
  964. #define hdB:H_Sd(B%0,%1) H_Dd(%0,66)
  965. #define hdC:H_Sd(C%0,%1) H_Dd(%0,67)
  966. #define hdD:H_Sd(D%0,%1) H_Dd(%0,68)
  967. #define hdE:H_Sd(E%0,%1) H_Dd(%0,69)
  968. #define hdF:H_Sd(F%0,%1) H_Dd(%0,70)
  969. #define hdG:H_Sd(G%0,%1) H_Dd(%0,71)
  970. #define hdH:H_Sd(H%0,%1) H_Dd(%0,72)
  971. #define hdI:H_Sd(I%0,%1) H_Dd(%0,73)
  972. #define hdJ:H_Sd(J%0,%1) H_Dd(%0,74)
  973. #define hdK:H_Sd(K%0,%1) H_Dd(%0,75)
  974. #define hdL:H_Sd(L%0,%1) H_Dd(%0,76)
  975. #define hdM:H_Sd(M%0,%1) H_Dd(%0,77)
  976. #define hdN:H_Sd(N%0,%1) H_Dd(%0,78)
  977. #define hdO:H_Sd(O%0,%1) H_Dd(%0,79)
  978. #define hdP:H_Sd(P%0,%1) H_Dd(%0,80)
  979. #define hdQ:H_Sd(Q%0,%1) H_Dd(%0,81)
  980. #define hdR:H_Sd(R%0,%1) H_Dd(%0,82)
  981. #define hdS:H_Sd(S%0,%1) H_Dd(%0,83)
  982. #define hdT:H_Sd(T%0,%1) H_Dd(%0,84)
  983. #define hdU:H_Sd(U%0,%1) H_Dd(%0,85)
  984. #define hdV:H_Sd(V%0,%1) H_Dd(%0,86)
  985. #define hdW:H_Sd(W%0,%1) H_Dd(%0,87)
  986. #define hdX:H_Sd(X%0,%1) H_Dd(%0,88)
  987. #define hdY:H_Sd(Y%0,%1) H_Dd(%0,89)
  988. #define hdZ:H_Sd(Z%0,%1) H_Dd(%0,90)
  989.  
  990. #define hd0:H_Sd(0%0,%1) H_Dd(%0,48)
  991. #define hd1:H_Sd(1%0,%1) H_Dd(%0,49)
  992. #define hd2:H_Sd(2%0,%1) H_Dd(%0,50)
  993. #define hd3:H_Sd(3%0,%1) H_Dd(%0,51)
  994. #define hd4:H_Sd(4%0,%1) H_Dd(%0,52)
  995. #define hd5:H_Sd(5%0,%1) H_Dd(%0,53)
  996. #define hd6:H_Sd(6%0,%1) H_Dd(%0,54)
  997. #define hd7:H_Sd(7%0,%1) H_Dd(%0,55)
  998. #define hd8:H_Sd(8%0,%1) H_Dd(%0,56)
  999. #define hd9:H_Sd(9%0,%1) H_Dd(%0,57)
  1000.  
  1001. #define hd_:H_Sd(_%0,%1) H_Dd(%0,95)
  1002. //#define hd@:H_Sd(@%0,%1) H_Dd(%0)
  1003.  
  1004. // Find the next character to test.
  1005. #define H_Nda(%0) hdb:H_Sd(%0,b)
  1006. #define H_Ndb(%0) hdc:H_Sd(%0,c)
  1007. #define H_Ndc(%0) hdd:H_Sd(%0,d)
  1008. #define H_Ndd(%0) hde:H_Sd(%0,e)
  1009. #define H_Nde(%0) hdf:H_Sd(%0,f)
  1010. #define H_Ndf(%0) hdg:H_Sd(%0,g)
  1011. #define H_Ndg(%0) hdh:H_Sd(%0,h)
  1012. #define H_Ndh(%0) hdi:H_Sd(%0,i)
  1013. #define H_Ndi(%0) hdj:H_Sd(%0,j)
  1014. #define H_Ndj(%0) hdk:H_Sd(%0,k)
  1015. #define H_Ndk(%0) hdl:H_Sd(%0,l)
  1016. #define H_Ndl(%0) hdm:H_Sd(%0,m)
  1017. #define H_Ndm(%0) hdn:H_Sd(%0,n)
  1018. #define H_Ndn(%0) hdo:H_Sd(%0,o)
  1019. #define H_Ndo(%0) hdp:H_Sd(%0,p)
  1020. #define H_Ndp(%0) hdq:H_Sd(%0,q)
  1021. #define H_Ndq(%0) hdr:H_Sd(%0,r)
  1022. #define H_Ndr(%0) hds:H_Sd(%0,s)
  1023. #define H_Nds(%0) hdt:H_Sd(%0,t)
  1024. #define H_Ndt(%0) hdu:H_Sd(%0,u)
  1025. #define H_Ndu(%0) hdv:H_Sd(%0,v)
  1026. #define H_Ndv(%0) hdw:H_Sd(%0,w)
  1027. #define H_Ndw(%0) hdx:H_Sd(%0,x)
  1028. #define H_Ndx(%0) hdy:H_Sd(%0,y)
  1029. #define H_Ndy(%0) hdz:H_Sd(%0,z)
  1030. #define H_Ndz(%0) hdA:H_Sd(%0,0)
  1031.  
  1032. #define H_NdA(%0) hdB:H_Sd(%0,B)
  1033. #define H_NdB(%0) hdC:H_Sd(%0,C)
  1034. #define H_NdC(%0) hdD:H_Sd(%0,D)
  1035. #define H_NdD(%0) hdE:H_Sd(%0,E)
  1036. #define H_NdE(%0) hdF:H_Sd(%0,F)
  1037. #define H_NdF(%0) hdG:H_Sd(%0,G)
  1038. #define H_NdG(%0) hdH:H_Sd(%0,H)
  1039. #define H_NdH(%0) hdI:H_Sd(%0,I)
  1040. #define H_NdI(%0) hdJ:H_Sd(%0,J)
  1041. #define H_NdJ(%0) hdK:H_Sd(%0,K)
  1042. #define H_NdK(%0) hdL:H_Sd(%0,L)
  1043. #define H_NdL(%0) hdM:H_Sd(%0,M)
  1044. #define H_NdM(%0) hdN:H_Sd(%0,N)
  1045. #define H_NdN(%0) hdO:H_Sd(%0,O)
  1046. #define H_NdO(%0) hdP:H_Sd(%0,P)
  1047. #define H_NdP(%0) hdQ:H_Sd(%0,Q)
  1048. #define H_NdQ(%0) hdR:H_Sd(%0,R)
  1049. #define H_NdR(%0) hdS:H_Sd(%0,S)
  1050. #define H_NdS(%0) hdT:H_Sd(%0,T)
  1051. #define H_NdT(%0) hdU:H_Sd(%0,U)
  1052. #define H_NdU(%0) hdV:H_Sd(%0,V)
  1053. #define H_NdV(%0) hdW:H_Sd(%0,W)
  1054. #define H_NdW(%0) hdX:H_Sd(%0,X)
  1055. #define H_NdX(%0) hdY:H_Sd(%0,Y)
  1056. #define H_NdY(%0) hdZ:H_Sd(%0,Z)
  1057. #define H_NdZ(%0) 2166136261
  1058.  
  1059. #define H_Nd0(%0) hd1:H_Sd(%0,1)
  1060. #define H_Nd1(%0) hd2:H_Sd(%0,2)
  1061. #define H_Nd2(%0) hd3:H_Sd(%0,3)
  1062. #define H_Nd3(%0) hd4:H_Sd(%0,4)
  1063. #define H_Nd4(%0) hd5:H_Sd(%0,5)
  1064. #define H_Nd5(%0) hd6:H_Sd(%0,6)
  1065. #define H_Nd6(%0) hd7:H_Sd(%0,7)
  1066. #define H_Nd7(%0) hd8:H_Sd(%0,8)
  1067. #define H_Nd8(%0) hd9:H_Sd(%0,9)
  1068. #define H_Nd9(%0) hd_:H_Sd(%0,_)
  1069.  
  1070. #define H_Nd_(%0) hd0:H_Sd(%0,A)
  1071.  
  1072. // =============
  1073. //  Old version
  1074. // =============
  1075.  
  1076. // ================
  1077. //  Case sensitive
  1078. // ================
  1079.  
  1080. // These are the default values
  1081. //#define HASH(%0,%1) HASH@%0(%1)
  1082.  
  1083. /*#define _H@b HASH@bernstein
  1084. #define _H@f HASH@fnv1
  1085. #define _H@a HASH@fnv1a*/
  1086.  
  1087. // ================
  1088. //  Bernstein hash
  1089. // ================
  1090.  
  1091. // Signify the end with two "@" symbols.
  1092. #define HASH@bernstein(%0) _REHASH@b(%0,@,@)
  1093.  
  1094. // Internal call.
  1095. #define _REHASH@b(%0,%1) _HASH@b_%0(%1)
  1096.  
  1097. // The bit that actually does the work.
  1098. #define _DOHASH@b(%0,%1,%2) (_HASH@b_%1(%2)*33+%0)
  1099.  
  1100. // Space.
  1101. #define _HASH@b_(%0) _DOHASH@b(32,%0)
  1102.  
  1103. // Numbers.
  1104. #define _HASH@b_0(%0) _DOHASH@b(48,%0)
  1105. #define _HASH@b_1(%0) _DOHASH@b(49,%0)
  1106. #define _HASH@b_2(%0) _DOHASH@b(50,%0)
  1107. #define _HASH@b_3(%0) _DOHASH@b(51,%0)
  1108. #define _HASH@b_4(%0) _DOHASH@b(52,%0)
  1109. #define _HASH@b_5(%0) _DOHASH@b(53,%0)
  1110. #define _HASH@b_6(%0) _DOHASH@b(54,%0)
  1111. #define _HASH@b_7(%0) _DOHASH@b(55,%0)
  1112. #define _HASH@b_8(%0) _DOHASH@b(56,%0)
  1113. #define _HASH@b_9(%0) _DOHASH@b(57,%0)
  1114.  
  1115. // Upper case letters.
  1116. #define _HASH@b_A(%0) _DOHASH@b(65,%0)
  1117. #define _HASH@b_B(%0) _DOHASH@b(66,%0)
  1118. #define _HASH@b_C(%0) _DOHASH@b(67,%0)
  1119. #define _HASH@b_D(%0) _DOHASH@b(68,%0)
  1120. #define _HASH@b_E(%0) _DOHASH@b(69,%0)
  1121. #define _HASH@b_F(%0) _DOHASH@b(70,%0)
  1122. #define _HASH@b_G(%0) _DOHASH@b(71,%0)
  1123. #define _HASH@b_H(%0) _DOHASH@b(72,%0)
  1124. #define _HASH@b_I(%0) _DOHASH@b(73,%0)
  1125. #define _HASH@b_J(%0) _DOHASH@b(74,%0)
  1126. #define _HASH@b_K(%0) _DOHASH@b(75,%0)
  1127. #define _HASH@b_L(%0) _DOHASH@b(76,%0)
  1128. #define _HASH@b_M(%0) _DOHASH@b(77,%0)
  1129. #define _HASH@b_N(%0) _DOHASH@b(78,%0)
  1130. #define _HASH@b_O(%0) _DOHASH@b(79,%0)
  1131. #define _HASH@b_P(%0) _DOHASH@b(80,%0)
  1132. #define _HASH@b_Q(%0) _DOHASH@b(81,%0)
  1133. #define _HASH@b_R(%0) _DOHASH@b(82,%0)
  1134. #define _HASH@b_S(%0) _DOHASH@b(83,%0)
  1135. #define _HASH@b_T(%0) _DOHASH@b(84,%0)
  1136. #define _HASH@b_U(%0) _DOHASH@b(85,%0)
  1137. #define _HASH@b_V(%0) _DOHASH@b(86,%0)
  1138. #define _HASH@b_W(%0) _DOHASH@b(87,%0)
  1139. #define _HASH@b_X(%0) _DOHASH@b(88,%0)
  1140. #define _HASH@b_Y(%0) _DOHASH@b(89,%0)
  1141. #define _HASH@b_Z(%0) _DOHASH@b(90,%0)
  1142.  
  1143. // Underscore.
  1144. #define _HASH@b__(%0) _DOHASH@b(95,%0)
  1145.  
  1146. // Lower case letters.
  1147. #define _HASH@b_a(%0) _DOHASH@b(97,%0)
  1148. #define _HASH@b_b(%0) _DOHASH@b(98,%0)
  1149. #define _HASH@b_c(%0) _DOHASH@b(99,%0)
  1150. #define _HASH@b_d(%0) _DOHASH@b(100,%0)
  1151. #define _HASH@b_e(%0) _DOHASH@b(101,%0)
  1152. #define _HASH@b_f(%0) _DOHASH@b(102,%0)
  1153. #define _HASH@b_g(%0) _DOHASH@b(103,%0)
  1154. #define _HASH@b_h(%0) _DOHASH@b(104,%0)
  1155. #define _HASH@b_i(%0) _DOHASH@b(105,%0)
  1156. #define _HASH@b_j(%0) _DOHASH@b(106,%0)
  1157. #define _HASH@b_k(%0) _DOHASH@b(107,%0)
  1158. #define _HASH@b_l(%0) _DOHASH@b(108,%0)
  1159. #define _HASH@b_m(%0) _DOHASH@b(109,%0)
  1160. #define _HASH@b_n(%0) _DOHASH@b(110,%0)
  1161. #define _HASH@b_o(%0) _DOHASH@b(111,%0)
  1162. #define _HASH@b_p(%0) _DOHASH@b(112,%0)
  1163. #define _HASH@b_q(%0) _DOHASH@b(113,%0)
  1164. #define _HASH@b_r(%0) _DOHASH@b(114,%0)
  1165. #define _HASH@b_s(%0) _DOHASH@b(115,%0)
  1166. #define _HASH@b_t(%0) _DOHASH@b(116,%0)
  1167. #define _HASH@b_u(%0) _DOHASH@b(117,%0)
  1168. #define _HASH@b_v(%0) _DOHASH@b(118,%0)
  1169. #define _HASH@b_w(%0) _DOHASH@b(119,%0)
  1170. #define _HASH@b_x(%0) _DOHASH@b(120,%0)
  1171. #define _HASH@b_y(%0) _DOHASH@b(121,%0)
  1172. #define _HASH@b_z(%0) _DOHASH@b(122,%0)
  1173.  
  1174. // String end.
  1175. #define _HASH@b_@(%0) -1
  1176.  
  1177. // ===========
  1178. //  FNV1 hash
  1179. // ===========
  1180.  
  1181. // Signify the end with two "@" symbols.
  1182. #define HASH@fnv1(%0) _REHASH@f(%0,@,@)
  1183.  
  1184. // Internal call.
  1185. #define _REHASH@f(%0,%1) _HASH@f_%0(%1)
  1186.  
  1187. // The bit that actually does the work.
  1188. #define _DOHASH@f(%0,%1,%2) (_HASH@f_%1(%2)*16777619^%0)
  1189.  
  1190. // Space.
  1191. #define _HASH@f_(%0) _DOHASH@f(32,%0)
  1192.  
  1193. // Numbers.
  1194. #define _HASH@f_0(%0) _DOHASH@f(48,%0)
  1195. #define _HASH@f_1(%0) _DOHASH@f(49,%0)
  1196. #define _HASH@f_2(%0) _DOHASH@f(50,%0)
  1197. #define _HASH@f_3(%0) _DOHASH@f(51,%0)
  1198. #define _HASH@f_4(%0) _DOHASH@f(52,%0)
  1199. #define _HASH@f_5(%0) _DOHASH@f(53,%0)
  1200. #define _HASH@f_6(%0) _DOHASH@f(54,%0)
  1201. #define _HASH@f_7(%0) _DOHASH@f(55,%0)
  1202. #define _HASH@f_8(%0) _DOHASH@f(56,%0)
  1203. #define _HASH@f_9(%0) _DOHASH@f(57,%0)
  1204.  
  1205. // Upper case letters.
  1206. #define _HASH@f_A(%0) _DOHASH@f(65,%0)
  1207. #define _HASH@f_B(%0) _DOHASH@f(66,%0)
  1208. #define _HASH@f_C(%0) _DOHASH@f(67,%0)
  1209. #define _HASH@f_D(%0) _DOHASH@f(68,%0)
  1210. #define _HASH@f_E(%0) _DOHASH@f(69,%0)
  1211. #define _HASH@f_F(%0) _DOHASH@f(70,%0)
  1212. #define _HASH@f_G(%0) _DOHASH@f(71,%0)
  1213. #define _HASH@f_H(%0) _DOHASH@f(72,%0)
  1214. #define _HASH@f_I(%0) _DOHASH@f(73,%0)
  1215. #define _HASH@f_J(%0) _DOHASH@f(74,%0)
  1216. #define _HASH@f_K(%0) _DOHASH@f(75,%0)
  1217. #define _HASH@f_L(%0) _DOHASH@f(76,%0)
  1218. #define _HASH@f_M(%0) _DOHASH@f(77,%0)
  1219. #define _HASH@f_N(%0) _DOHASH@f(78,%0)
  1220. #define _HASH@f_O(%0) _DOHASH@f(79,%0)
  1221. #define _HASH@f_P(%0) _DOHASH@f(80,%0)
  1222. #define _HASH@f_Q(%0) _DOHASH@f(81,%0)
  1223. #define _HASH@f_R(%0) _DOHASH@f(82,%0)
  1224. #define _HASH@f_S(%0) _DOHASH@f(83,%0)
  1225. #define _HASH@f_T(%0) _DOHASH@f(84,%0)
  1226. #define _HASH@f_U(%0) _DOHASH@f(85,%0)
  1227. #define _HASH@f_V(%0) _DOHASH@f(86,%0)
  1228. #define _HASH@f_W(%0) _DOHASH@f(87,%0)
  1229. #define _HASH@f_X(%0) _DOHASH@f(88,%0)
  1230. #define _HASH@f_Y(%0) _DOHASH@f(89,%0)
  1231. #define _HASH@f_Z(%0) _DOHASH@f(90,%0)
  1232.  
  1233. // Underscore.
  1234. #define _HASH@f__(%0) _DOHASH@f(95,%0)
  1235.  
  1236. // Lower case letters.
  1237. #define _HASH@f_a(%0) _DOHASH@f(97,%0)
  1238. #define _HASH@f_b(%0) _DOHASH@f(98,%0)
  1239. #define _HASH@f_c(%0) _DOHASH@f(99,%0)
  1240. #define _HASH@f_d(%0) _DOHASH@f(100,%0)
  1241. #define _HASH@f_e(%0) _DOHASH@f(101,%0)
  1242. #define _HASH@f_f(%0) _DOHASH@f(102,%0)
  1243. #define _HASH@f_g(%0) _DOHASH@f(103,%0)
  1244. #define _HASH@f_h(%0) _DOHASH@f(104,%0)
  1245. #define _HASH@f_i(%0) _DOHASH@f(105,%0)
  1246. #define _HASH@f_j(%0) _DOHASH@f(106,%0)
  1247. #define _HASH@f_k(%0) _DOHASH@f(107,%0)
  1248. #define _HASH@f_l(%0) _DOHASH@f(108,%0)
  1249. #define _HASH@f_m(%0) _DOHASH@f(109,%0)
  1250. #define _HASH@f_n(%0) _DOHASH@f(110,%0)
  1251. #define _HASH@f_o(%0) _DOHASH@f(111,%0)
  1252. #define _HASH@f_p(%0) _DOHASH@f(112,%0)
  1253. #define _HASH@f_q(%0) _DOHASH@f(113,%0)
  1254. #define _HASH@f_r(%0) _DOHASH@f(114,%0)
  1255. #define _HASH@f_s(%0) _DOHASH@f(115,%0)
  1256. #define _HASH@f_t(%0) _DOHASH@f(116,%0)
  1257. #define _HASH@f_u(%0) _DOHASH@f(117,%0)
  1258. #define _HASH@f_v(%0) _DOHASH@f(118,%0)
  1259. #define _HASH@f_w(%0) _DOHASH@f(119,%0)
  1260. #define _HASH@f_x(%0) _DOHASH@f(120,%0)
  1261. #define _HASH@f_y(%0) _DOHASH@f(121,%0)
  1262. #define _HASH@f_z(%0) _DOHASH@f(122,%0)
  1263.  
  1264. // String end.
  1265. #define _HASH@f_@(%0) 2166136261
  1266.  
  1267. // ============
  1268. //  FNV1a hash
  1269. // ============
  1270.  
  1271. // Signify the end with two "@" symbols.
  1272. #define HASH@fnv1a(%0) _REHASH@a(%0,@,@)
  1273.  
  1274. // Internal call.
  1275. #define _REHASH@a(%0,%1) _HASH@a_%0(%1)
  1276.  
  1277. // The bit that actually does the work.
  1278. #define _DOHASH@a(%0,%1,%2) ((_HASH@a_%1(%2)^%0)*16777619)
  1279.  
  1280. // Space.
  1281. #define _HASH@a_(%0) _DOHASH@a(32,%0)
  1282.  
  1283. // Numbers.
  1284. #define _HASH@a_0(%0) _DOHASH@a(48,%0)
  1285. #define _HASH@a_1(%0) _DOHASH@a(49,%0)
  1286. #define _HASH@a_2(%0) _DOHASH@a(50,%0)
  1287. #define _HASH@a_3(%0) _DOHASH@a(51,%0)
  1288. #define _HASH@a_4(%0) _DOHASH@a(52,%0)
  1289. #define _HASH@a_5(%0) _DOHASH@a(53,%0)
  1290. #define _HASH@a_6(%0) _DOHASH@a(54,%0)
  1291. #define _HASH@a_7(%0) _DOHASH@a(55,%0)
  1292. #define _HASH@a_8(%0) _DOHASH@a(56,%0)
  1293. #define _HASH@a_9(%0) _DOHASH@a(57,%0)
  1294.  
  1295. // Upper case letters.
  1296. #define _HASH@a_A(%0) _DOHASH@a(65,%0)
  1297. #define _HASH@a_B(%0) _DOHASH@a(66,%0)
  1298. #define _HASH@a_C(%0) _DOHASH@a(67,%0)
  1299. #define _HASH@a_D(%0) _DOHASH@a(68,%0)
  1300. #define _HASH@a_E(%0) _DOHASH@a(69,%0)
  1301. #define _HASH@a_F(%0) _DOHASH@a(70,%0)
  1302. #define _HASH@a_G(%0) _DOHASH@a(71,%0)
  1303. #define _HASH@a_H(%0) _DOHASH@a(72,%0)
  1304. #define _HASH@a_I(%0) _DOHASH@a(73,%0)
  1305. #define _HASH@a_J(%0) _DOHASH@a(74,%0)
  1306. #define _HASH@a_K(%0) _DOHASH@a(75,%0)
  1307. #define _HASH@a_L(%0) _DOHASH@a(76,%0)
  1308. #define _HASH@a_M(%0) _DOHASH@a(77,%0)
  1309. #define _HASH@a_N(%0) _DOHASH@a(78,%0)
  1310. #define _HASH@a_O(%0) _DOHASH@a(79,%0)
  1311. #define _HASH@a_P(%0) _DOHASH@a(80,%0)
  1312. #define _HASH@a_Q(%0) _DOHASH@a(81,%0)
  1313. #define _HASH@a_R(%0) _DOHASH@a(82,%0)
  1314. #define _HASH@a_S(%0) _DOHASH@a(83,%0)
  1315. #define _HASH@a_T(%0) _DOHASH@a(84,%0)
  1316. #define _HASH@a_U(%0) _DOHASH@a(85,%0)
  1317. #define _HASH@a_V(%0) _DOHASH@a(86,%0)
  1318. #define _HASH@a_W(%0) _DOHASH@a(87,%0)
  1319. #define _HASH@a_X(%0) _DOHASH@a(88,%0)
  1320. #define _HASH@a_Y(%0) _DOHASH@a(89,%0)
  1321. #define _HASH@a_Z(%0) _DOHASH@a(90,%0)
  1322.  
  1323. // Underscore.
  1324. #define _HASH@a__(%0) _DOHASH@a(95,%0)
  1325.  
  1326. // Lower case letters.
  1327. #define _HASH@a_a(%0) _DOHASH@a(97,%0)
  1328. #define _HASH@a_b(%0) _DOHASH@a(98,%0)
  1329. #define _HASH@a_c(%0) _DOHASH@a(99,%0)
  1330. #define _HASH@a_d(%0) _DOHASH@a(100,%0)
  1331. #define _HASH@a_e(%0) _DOHASH@a(101,%0)
  1332. #define _HASH@a_f(%0) _DOHASH@a(102,%0)
  1333. #define _HASH@a_g(%0) _DOHASH@a(103,%0)
  1334. #define _HASH@a_h(%0) _DOHASH@a(104,%0)
  1335. #define _HASH@a_i(%0) _DOHASH@a(105,%0)
  1336. #define _HASH@a_j(%0) _DOHASH@a(106,%0)
  1337. #define _HASH@a_k(%0) _DOHASH@a(107,%0)
  1338. #define _HASH@a_l(%0) _DOHASH@a(108,%0)
  1339. #define _HASH@a_m(%0) _DOHASH@a(109,%0)
  1340. #define _HASH@a_n(%0) _DOHASH@a(110,%0)
  1341. #define _HASH@a_o(%0) _DOHASH@a(111,%0)
  1342. #define _HASH@a_p(%0) _DOHASH@a(112,%0)
  1343. #define _HASH@a_q(%0) _DOHASH@a(113,%0)
  1344. #define _HASH@a_r(%0) _DOHASH@a(114,%0)
  1345. #define _HASH@a_s(%0) _DOHASH@a(115,%0)
  1346. #define _HASH@a_t(%0) _DOHASH@a(116,%0)
  1347. #define _HASH@a_u(%0) _DOHASH@a(117,%0)
  1348. #define _HASH@a_v(%0) _DOHASH@a(118,%0)
  1349. #define _HASH@a_w(%0) _DOHASH@a(119,%0)
  1350. #define _HASH@a_x(%0) _DOHASH@a(120,%0)
  1351. #define _HASH@a_y(%0) _DOHASH@a(121,%0)
  1352. #define _HASH@a_z(%0) _DOHASH@a(122,%0)
  1353.  
  1354. // String end.
  1355. #define _HASH@a_@(%0) 2166136261
  1356.  
  1357. // ==================
  1358. //  Case insensitive
  1359. // ==================
  1360.  
  1361. // These are the default values
  1362. //#define HASHi(%0,%1) HASHi@%0(%1)
  1363.  
  1364. //#define _I(%0) _REHASib(%0,@,@)
  1365.  
  1366. /*#define _I@b HASHi@bernstein
  1367. #define _I@f HASHi@fnv1
  1368. #define _I@a HASHi@fnv1a*/
  1369.  
  1370. // ================
  1371. //  Bernstein hash
  1372. // ================
  1373.  
  1374. // Signify the end with two "@" symbols.
  1375. #define HASHi@bernstein(%0) _REHASH@ib(%0,@,@)
  1376.  
  1377. // Internal call.
  1378. #define _REHASH@ib(%0,%1) _HASH@ib_%0(%1)
  1379.  
  1380. // The bit that actually does the work.
  1381. #define _DOHASH@ib(%0,%1,%2) (_HASH@ib_%1(%2)*33+%0)
  1382.  
  1383. // Space.
  1384. #define _HASH@ib_(%0) _DOHASH@ib(32,%0)
  1385.  
  1386. // Numbers.
  1387. #define _HASH@ib_0(%0) _DOHASH@ib(48,%0)
  1388. #define _HASH@ib_1(%0) _DOHASH@ib(49,%0)
  1389. #define _HASH@ib_2(%0) _DOHASH@ib(50,%0)
  1390. #define _HASH@ib_3(%0) _DOHASH@ib(51,%0)
  1391. #define _HASH@ib_4(%0) _DOHASH@ib(52,%0)
  1392. #define _HASH@ib_5(%0) _DOHASH@ib(53,%0)
  1393. #define _HASH@ib_6(%0) _DOHASH@ib(54,%0)
  1394. #define _HASH@ib_7(%0) _DOHASH@ib(55,%0)
  1395. #define _HASH@ib_8(%0) _DOHASH@ib(56,%0)
  1396. #define _HASH@ib_9(%0) _DOHASH@ib(57,%0)
  1397.  
  1398. // Upper case letters.
  1399. #define _HASH@ib_A(%0) _DOHASH@ib(65,%0)
  1400. #define _HASH@ib_B(%0) _DOHASH@ib(66,%0)
  1401. #define _HASH@ib_C(%0) _DOHASH@ib(67,%0)
  1402. #define _HASH@ib_D(%0) _DOHASH@ib(68,%0)
  1403. #define _HASH@ib_E(%0) _DOHASH@ib(69,%0)
  1404. #define _HASH@ib_F(%0) _DOHASH@ib(70,%0)
  1405. #define _HASH@ib_G(%0) _DOHASH@ib(71,%0)
  1406. #define _HASH@ib_H(%0) _DOHASH@ib(72,%0)
  1407. #define _HASH@ib_I(%0) _DOHASH@ib(73,%0)
  1408. #define _HASH@ib_J(%0) _DOHASH@ib(74,%0)
  1409. #define _HASH@ib_K(%0) _DOHASH@ib(75,%0)
  1410. #define _HASH@ib_L(%0) _DOHASH@ib(76,%0)
  1411. #define _HASH@ib_M(%0) _DOHASH@ib(77,%0)
  1412. #define _HASH@ib_N(%0) _DOHASH@ib(78,%0)
  1413. #define _HASH@ib_O(%0) _DOHASH@ib(79,%0)
  1414. #define _HASH@ib_P(%0) _DOHASH@ib(80,%0)
  1415. #define _HASH@ib_Q(%0) _DOHASH@ib(81,%0)
  1416. #define _HASH@ib_R(%0) _DOHASH@ib(82,%0)
  1417. #define _HASH@ib_S(%0) _DOHASH@ib(83,%0)
  1418. #define _HASH@ib_T(%0) _DOHASH@ib(84,%0)
  1419. #define _HASH@ib_U(%0) _DOHASH@ib(85,%0)
  1420. #define _HASH@ib_V(%0) _DOHASH@ib(86,%0)
  1421. #define _HASH@ib_W(%0) _DOHASH@ib(87,%0)
  1422. #define _HASH@ib_X(%0) _DOHASH@ib(88,%0)
  1423. #define _HASH@ib_Y(%0) _DOHASH@ib(89,%0)
  1424. #define _HASH@ib_Z(%0) _DOHASH@ib(90,%0)
  1425.  
  1426. // Underscore.
  1427. #define _HASH@ib__(%0) _DOHASH@ib(95,%0)
  1428.  
  1429. // Lower case letters.
  1430. #define _HASH@ib_a(%0) _DOHASH@ib(65,%0)
  1431. #define _HASH@ib_b(%0) _DOHASH@ib(66,%0)
  1432. #define _HASH@ib_c(%0) _DOHASH@ib(67,%0)
  1433. #define _HASH@ib_d(%0) _DOHASH@ib(68,%0)
  1434. #define _HASH@ib_e(%0) _DOHASH@ib(69,%0)
  1435. #define _HASH@ib_f(%0) _DOHASH@ib(70,%0)
  1436. #define _HASH@ib_g(%0) _DOHASH@ib(71,%0)
  1437. #define _HASH@ib_h(%0) _DOHASH@ib(72,%0)
  1438. #define _HASH@ib_i(%0) _DOHASH@ib(73,%0)
  1439. #define _HASH@ib_j(%0) _DOHASH@ib(74,%0)
  1440. #define _HASH@ib_k(%0) _DOHASH@ib(75,%0)
  1441. #define _HASH@ib_l(%0) _DOHASH@ib(76,%0)
  1442. #define _HASH@ib_m(%0) _DOHASH@ib(77,%0)
  1443. #define _HASH@ib_n(%0) _DOHASH@ib(78,%0)
  1444. #define _HASH@ib_o(%0) _DOHASH@ib(79,%0)
  1445. #define _HASH@ib_p(%0) _DOHASH@ib(80,%0)
  1446. #define _HASH@ib_q(%0) _DOHASH@ib(81,%0)
  1447. #define _HASH@ib_r(%0) _DOHASH@ib(82,%0)
  1448. #define _HASH@ib_s(%0) _DOHASH@ib(83,%0)
  1449. #define _HASH@ib_t(%0) _DOHASH@ib(84,%0)
  1450. #define _HASH@ib_u(%0) _DOHASH@ib(85,%0)
  1451. #define _HASH@ib_v(%0) _DOHASH@ib(86,%0)
  1452. #define _HASH@ib_w(%0) _DOHASH@ib(87,%0)
  1453. #define _HASH@ib_x(%0) _DOHASH@ib(88,%0)
  1454. #define _HASH@ib_y(%0) _DOHASH@ib(89,%0)
  1455. #define _HASH@ib_z(%0) _DOHASH@ib(90,%0)
  1456.  
  1457. // String end.
  1458. #define _HASH@ib_@(%0) -1
  1459.  
  1460. // ===========
  1461. //  FNV1 hash
  1462. // ===========
  1463.  
  1464. // Signify the end with two "@" symbols.
  1465. #define HASHi@fnv1(%0) _REHASH@if(%0,@,@)
  1466.  
  1467. // Internal call.
  1468. #define _REHASH@if(%0,%1) _HASH@if_%0(%1)
  1469.  
  1470. // The bit that actually does the work.
  1471. #define _DOHASH@if(%0,%1,%2) (_HASH@if_%1(%2)*16777619^%0)
  1472.  
  1473. // Space.
  1474. #define _HASH@if_(%0) _DOHASH@if(32,%0)
  1475.  
  1476. // Numbers.
  1477. #define _HASH@if_0(%0) _DOHASH@if(48,%0)
  1478. #define _HASH@if_1(%0) _DOHASH@if(49,%0)
  1479. #define _HASH@if_2(%0) _DOHASH@if(50,%0)
  1480. #define _HASH@if_3(%0) _DOHASH@if(51,%0)
  1481. #define _HASH@if_4(%0) _DOHASH@if(52,%0)
  1482. #define _HASH@if_5(%0) _DOHASH@if(53,%0)
  1483. #define _HASH@if_6(%0) _DOHASH@if(54,%0)
  1484. #define _HASH@if_7(%0) _DOHASH@if(55,%0)
  1485. #define _HASH@if_8(%0) _DOHASH@if(56,%0)
  1486. #define _HASH@if_9(%0) _DOHASH@if(57,%0)
  1487.  
  1488. // Upper case letters.
  1489. #define _HASH@if_A(%0) _DOHASH@if(65,%0)
  1490. #define _HASH@if_B(%0) _DOHASH@if(66,%0)
  1491. #define _HASH@if_C(%0) _DOHASH@if(67,%0)
  1492. #define _HASH@if_D(%0) _DOHASH@if(68,%0)
  1493. #define _HASH@if_E(%0) _DOHASH@if(69,%0)
  1494. #define _HASH@if_F(%0) _DOHASH@if(70,%0)
  1495. #define _HASH@if_G(%0) _DOHASH@if(71,%0)
  1496. #define _HASH@if_H(%0) _DOHASH@if(72,%0)
  1497. #define _HASH@if_I(%0) _DOHASH@if(73,%0)
  1498. #define _HASH@if_J(%0) _DOHASH@if(74,%0)
  1499. #define _HASH@if_K(%0) _DOHASH@if(75,%0)
  1500. #define _HASH@if_L(%0) _DOHASH@if(76,%0)
  1501. #define _HASH@if_M(%0) _DOHASH@if(77,%0)
  1502. #define _HASH@if_N(%0) _DOHASH@if(78,%0)
  1503. #define _HASH@if_O(%0) _DOHASH@if(79,%0)
  1504. #define _HASH@if_P(%0) _DOHASH@if(80,%0)
  1505. #define _HASH@if_Q(%0) _DOHASH@if(81,%0)
  1506. #define _HASH@if_R(%0) _DOHASH@if(82,%0)
  1507. #define _HASH@if_S(%0) _DOHASH@if(83,%0)
  1508. #define _HASH@if_T(%0) _DOHASH@if(84,%0)
  1509. #define _HASH@if_U(%0) _DOHASH@if(85,%0)
  1510. #define _HASH@if_V(%0) _DOHASH@if(86,%0)
  1511. #define _HASH@if_W(%0) _DOHASH@if(87,%0)
  1512. #define _HASH@if_X(%0) _DOHASH@if(88,%0)
  1513. #define _HASH@if_Y(%0) _DOHASH@if(89,%0)
  1514. #define _HASH@if_Z(%0) _DOHASH@if(90,%0)
  1515.  
  1516. // Underscore.
  1517. #define _HASH@if__(%0) _DOHASH@if(95,%0)
  1518.  
  1519. // Lower case letters.
  1520. #define _HASH@if_a(%0) _DOHASH@if(65,%0)
  1521. #define _HASH@if_b(%0) _DOHASH@if(66,%0)
  1522. #define _HASH@if_c(%0) _DOHASH@if(67,%0)
  1523. #define _HASH@if_d(%0) _DOHASH@if(68,%0)
  1524. #define _HASH@if_e(%0) _DOHASH@if(69,%0)
  1525. #define _HASH@if_f(%0) _DOHASH@if(70,%0)
  1526. #define _HASH@if_g(%0) _DOHASH@if(71,%0)
  1527. #define _HASH@if_h(%0) _DOHASH@if(72,%0)
  1528. #define _HASH@if_i(%0) _DOHASH@if(73,%0)
  1529. #define _HASH@if_j(%0) _DOHASH@if(74,%0)
  1530. #define _HASH@if_k(%0) _DOHASH@if(75,%0)
  1531. #define _HASH@if_l(%0) _DOHASH@if(76,%0)
  1532. #define _HASH@if_m(%0) _DOHASH@if(77,%0)
  1533. #define _HASH@if_n(%0) _DOHASH@if(78,%0)
  1534. #define _HASH@if_o(%0) _DOHASH@if(79,%0)
  1535. #define _HASH@if_p(%0) _DOHASH@if(80,%0)
  1536. #define _HASH@if_q(%0) _DOHASH@if(81,%0)
  1537. #define _HASH@if_r(%0) _DOHASH@if(82,%0)
  1538. #define _HASH@if_s(%0) _DOHASH@if(83,%0)
  1539. #define _HASH@if_t(%0) _DOHASH@if(84,%0)
  1540. #define _HASH@if_u(%0) _DOHASH@if(85,%0)
  1541. #define _HASH@if_v(%0) _DOHASH@if(86,%0)
  1542. #define _HASH@if_w(%0) _DOHASH@if(87,%0)
  1543. #define _HASH@if_x(%0) _DOHASH@if(88,%0)
  1544. #define _HASH@if_y(%0) _DOHASH@if(89,%0)
  1545. #define _HASH@if_z(%0) _DOHASH@if(90,%0)
  1546.  
  1547. // String end.
  1548. #define _HASH@if_@(%0) 2166136261
  1549.  
  1550. // ============
  1551. //  FNV1a hash
  1552. // ============
  1553.  
  1554. // Signify the end with two "@" symbols.
  1555. #define HASHi@fnv1a(%0) _REHASH@ia(%0,@,@)
  1556.  
  1557. // Internal call.
  1558. #define _REHASH@ia(%0,%1) _HASH@ia_%0(%1)
  1559.  
  1560. // The bit that actually does the work.
  1561. #define _DOHASH@ia(%0,%1,%2) ((_HASH@ia_%1(%2)^%0)*16777619)
  1562.  
  1563. // Space.
  1564. #define _HASH@ia_(%0) _DOHASH@ia(32,%0)
  1565.  
  1566. // Numbers.
  1567. #define _HASH@ia_0(%0) _DOHASH@ia(48,%0)
  1568. #define _HASH@ia_1(%0) _DOHASH@ia(49,%0)
  1569. #define _HASH@ia_2(%0) _DOHASH@ia(50,%0)
  1570. #define _HASH@ia_3(%0) _DOHASH@ia(51,%0)
  1571. #define _HASH@ia_4(%0) _DOHASH@ia(52,%0)
  1572. #define _HASH@ia_5(%0) _DOHASH@ia(53,%0)
  1573. #define _HASH@ia_6(%0) _DOHASH@ia(54,%0)
  1574. #define _HASH@ia_7(%0) _DOHASH@ia(55,%0)
  1575. #define _HASH@ia_8(%0) _DOHASH@ia(56,%0)
  1576. #define _HASH@ia_9(%0) _DOHASH@ia(57,%0)
  1577.  
  1578. // Upper case letters.
  1579. #define _HASH@ia_A(%0) _DOHASH@ia(65,%0)
  1580. #define _HASH@ia_B(%0) _DOHASH@ia(66,%0)
  1581. #define _HASH@ia_C(%0) _DOHASH@ia(67,%0)
  1582. #define _HASH@ia_D(%0) _DOHASH@ia(68,%0)
  1583. #define _HASH@ia_E(%0) _DOHASH@ia(69,%0)
  1584. #define _HASH@ia_F(%0) _DOHASH@ia(70,%0)
  1585. #define _HASH@ia_G(%0) _DOHASH@ia(71,%0)
  1586. #define _HASH@ia_H(%0) _DOHASH@ia(72,%0)
  1587. #define _HASH@ia_I(%0) _DOHASH@ia(73,%0)
  1588. #define _HASH@ia_J(%0) _DOHASH@ia(74,%0)
  1589. #define _HASH@ia_K(%0) _DOHASH@ia(75,%0)
  1590. #define _HASH@ia_L(%0) _DOHASH@ia(76,%0)
  1591. #define _HASH@ia_M(%0) _DOHASH@ia(77,%0)
  1592. #define _HASH@ia_N(%0) _DOHASH@ia(78,%0)
  1593. #define _HASH@ia_O(%0) _DOHASH@ia(79,%0)
  1594. #define _HASH@ia_P(%0) _DOHASH@ia(80,%0)
  1595. #define _HASH@ia_Q(%0) _DOHASH@ia(81,%0)
  1596. #define _HASH@ia_R(%0) _DOHASH@ia(82,%0)
  1597. #define _HASH@ia_S(%0) _DOHASH@ia(83,%0)
  1598. #define _HASH@ia_T(%0) _DOHASH@ia(84,%0)
  1599. #define _HASH@ia_U(%0) _DOHASH@ia(85,%0)
  1600. #define _HASH@ia_V(%0) _DOHASH@ia(86,%0)
  1601. #define _HASH@ia_W(%0) _DOHASH@ia(87,%0)
  1602. #define _HASH@ia_X(%0) _DOHASH@ia(88,%0)
  1603. #define _HASH@ia_Y(%0) _DOHASH@ia(89,%0)
  1604. #define _HASH@ia_Z(%0) _DOHASH@ia(90,%0)
  1605.  
  1606. // Underscore.
  1607. #define _HASH@ia__(%0) _DOHASH@ia(95,%0)
  1608.  
  1609. // Lower case letters.
  1610. #define _HASH@ia_a(%0) _DOHASH@ia(65,%0)
  1611. #define _HASH@ia_b(%0) _DOHASH@ia(66,%0)
  1612. #define _HASH@ia_c(%0) _DOHASH@ia(67,%0)
  1613. #define _HASH@ia_d(%0) _DOHASH@ia(68,%0)
  1614. #define _HASH@ia_e(%0) _DOHASH@ia(69,%0)
  1615. #define _HASH@ia_f(%0) _DOHASH@ia(70,%0)
  1616. #define _HASH@ia_g(%0) _DOHASH@ia(71,%0)
  1617. #define _HASH@ia_h(%0) _DOHASH@ia(72,%0)
  1618. #define _HASH@ia_i(%0) _DOHASH@ia(73,%0)
  1619. #define _HASH@ia_j(%0) _DOHASH@ia(74,%0)
  1620. #define _HASH@ia_k(%0) _DOHASH@ia(75,%0)
  1621. #define _HASH@ia_l(%0) _DOHASH@ia(76,%0)
  1622. #define _HASH@ia_m(%0) _DOHASH@ia(77,%0)
  1623. #define _HASH@ia_n(%0) _DOHASH@ia(78,%0)
  1624. #define _HASH@ia_o(%0) _DOHASH@ia(79,%0)
  1625. #define _HASH@ia_p(%0) _DOHASH@ia(80,%0)
  1626. #define _HASH@ia_q(%0) _DOHASH@ia(81,%0)
  1627. #define _HASH@ia_r(%0) _DOHASH@ia(82,%0)
  1628. #define _HASH@ia_s(%0) _DOHASH@ia(83,%0)
  1629. #define _HASH@ia_t(%0) _DOHASH@ia(84,%0)
  1630. #define _HASH@ia_u(%0) _DOHASH@ia(85,%0)
  1631. #define _HASH@ia_v(%0) _DOHASH@ia(86,%0)
  1632. #define _HASH@ia_w(%0) _DOHASH@ia(87,%0)
  1633. #define _HASH@ia_x(%0) _DOHASH@ia(88,%0)
  1634. #define _HASH@ia_y(%0) _DOHASH@ia(89,%0)
  1635. #define _HASH@ia_z(%0) _DOHASH@ia(90,%0)
  1636.  
  1637. // String end.
  1638. #define _HASH@ia_@(%0) 2166136261
  1639.  
  1640. // ============
  1641. //  Other code
  1642. // ============
  1643.  
  1644. enum e_HASH_TYPE
  1645. {
  1646.     hash_bernstein,
  1647.     hash_fnv1,
  1648.     hash_fnv1a
  1649. }
  1650.  
  1651. /*----------------------------------------------------------------------------*-
  1652. Function:
  1653.     Hash
  1654. Params:
  1655.     str - The string to hash.
  1656.     sensitive - Wether the hash is case sensitive or not.
  1657. Return:
  1658.     The reverse Bernstein hash of the string.
  1659. Notes:
  1660.     Based on Bernstein hash, but backwards to match the macros.  The only
  1661.     characters which can be used in the compile time version of this code are:
  1662.     a-z, A-Z, 0-9, _ and space.
  1663.  
  1664. native Hash(str[]);
  1665.  
  1666. -*----------------------------------------------------------------------------*/
  1667.  
  1668. stock YHash(const str[], bool:sensitive = true, e_HASH_TYPE:type = hash_bernstein, len = -1)
  1669. {
  1670.     if (len == -1)
  1671.     {
  1672.         len = strlen(str);
  1673.     }
  1674.     switch (type)
  1675.     {
  1676.         case hash_bernstein:
  1677.         {
  1678.             new
  1679.                 hash = -1;
  1680.             if (sensitive)
  1681.             {
  1682.                 while (len--)
  1683.                 {
  1684.                     hash = hash * 33 + str[len];
  1685.                 }
  1686.             }
  1687.             else
  1688.             {
  1689.                 while (len--)
  1690.                 {
  1691.                     new
  1692.                         ch = str[len];
  1693.                     if ('a' <= ch <= 'z')
  1694.                     {
  1695.                         ch &= ~0x20;
  1696.                     }
  1697.                     hash = hash * 33 + ch;
  1698.                 }
  1699.             }
  1700.             return hash;
  1701.         }
  1702.         case hash_fnv1:
  1703.         {
  1704.             new
  1705.                 hash = 2166136261;
  1706.             if (sensitive)
  1707.             {
  1708.                 while (len--)
  1709.                 {
  1710.                     hash = hash * 16777619 ^ str[len];
  1711.                 }
  1712.             }
  1713.             else
  1714.             {
  1715.                 while (len--)
  1716.                 {
  1717.                     new
  1718.                         ch = str[len];
  1719.                     if ('a' <= ch <= 'z')
  1720.                     {
  1721.                         ch &= ~0x20;
  1722.                     }
  1723.                     hash = hash * 16777619 ^ ch;
  1724.                 }
  1725.             }
  1726.             return hash;
  1727.         }
  1728.         case hash_fnv1a:
  1729.         {
  1730.             new
  1731.                 hash = 2166136261;
  1732.             if (sensitive)
  1733.             {
  1734.                 while (len--)
  1735.                 {
  1736.                     hash = (hash ^ str[len]) * 16777619;
  1737.                 }
  1738.             }
  1739.             else
  1740.             {
  1741.                 while (len--)
  1742.                 {
  1743.                     new
  1744.                         ch = str[len];
  1745.                     if ('a' <= ch <= 'z')
  1746.                     {
  1747.                         ch &= ~0x20;
  1748.                     }
  1749.                     hash = (hash ^ ch) * 16777619;
  1750.                 }
  1751.             }
  1752.             return hash;
  1753.         }
  1754.     }
  1755.     return -1;
  1756. }
Advertisement
Add Comment
Please, Sign In to add comment
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!