File: Crypto.pmod

package info (click to toggle)
pike7 7.0.361-3
  • links: PTS
  • area: main
  • in suites: woody
  • size: 14,876 kB
  • ctags: 12,334
  • sloc: ansic: 142,667; makefile: 1,526; sh: 1,035; lisp: 290; sed: 34; perl: 3
file content (24 lines) | stat: -rw-r--r-- 482 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
/* Crypto.pmod
 *
 */

static private mixed crypto_module;

mixed `[](string name)
{
//  return (::`[](name) || ((program) ("Crypto/" + name)));
    catch {
      return (crypto_module[name]
	      || ((program) ("Crypto/" + name))
	      || ((object) ("Crypto/" + name + ".pmod")));
    };
    return ([])[0];	// UNDEFINED
}

void create()
{
  catch { crypto_module=master()->resolv("_Crypto"); };
  if(!crypto_module)
    crypto_module=master()->resolv("_Lobotomized_Crypto");
}