1 files changed, 137 insertions, 0 deletions
diff --git a/ldap/libraries/liblitekey/keycheck.c b/ldap/libraries/liblitekey/keycheck.c
new file mode 100644
index 00000000..4f3ee505
--- /dev/null
+++ b/ldap/libraries/liblitekey/keycheck.c
@@ -0,0 +1,137 @@
+/** BEGIN COPYRIGHT BLOCK
+ * Copyright 2001 Sun Microsystems, Inc.
+ * Portions copyright 1999, 2001-2003 Netscape Communications Corporation.
+ * All rights reserved.
+ * END COPYRIGHT BLOCK **/
+/*
+ * keycheck.c
+ */
+
+
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#include <litekey.h>
+
+#define DS_NORMAL_MAGIC_KEY	119
+#define	DS_LITE_MAGIC_KEY	326
+#define FILE_PATHSEP '/'
+#define BUFSIZE 800
+
+/*
+ * is_directory_lite
+ *
+ *	Checks if the directory server installation is a normal or a
+ * 	lite.  The decision is made based on the key in the key file.
+ *
+ *   Input:
+ *	char	*root;		Pathname to install root
+ *   Returns:
+ *		1  - yes, it's LITE server
+ *		0  - No; it's fully paid (normal)  server.
+ *
+ */
+int is_directory_lite( char *root)
+{
+
+	char	buf[40];
+	char	*bufp = buf;
+	FILE	*fp = NULL;
+	int	key =0;
+	char	*nsroot;
+	char	pathname[BUFSIZE];
+
+	return DS_NORMAL_TYPE; /* richm: no more lite mode in DS 5.0 */
+#if 0 /* no more lite mode */
+	/* There are 3 ways to determine if the server is FULL or LITE.
+	 * 1) Use NETSITE_ROOT variable
+	 * 2) Use the root path provided 
+	 * 3) Look at the current directory
+	 * 
+	 * If all of them fails, then it's LITE.
+	*/
+	nsroot = getenv("NETSITE_ROOT");
+
+	if ( (NULL == root) && (NULL == nsroot)) {
+		/* case 3 */
+		sprintf ( pathname, "slapd.key" );
+	} else if (NULL == nsroot) {
+		/* case 2 */
+		sprintf ( pathname, "%s%cbin%cslapd%cserver%cslapd.key",
+				root, FILE_PATHSEP,FILE_PATHSEP,
+				FILE_PATHSEP, FILE_PATHSEP);
+	} else {
+		/* case 1 */
+		sprintf ( pathname, "%s%cbin%cslapd%cserver%cslapd.key",
+				nsroot, FILE_PATHSEP,FILE_PATHSEP,
+				FILE_PATHSEP, FILE_PATHSEP);
+	}
+
+
+	/* First read from the key file */
+	if ((fp = fopen ( pathname, "r")) == NULL )
+		return DS_LITE_TYPE;
+
+	if ( fgets(buf, 40, fp) == NULL)
+		return DS_LITE_TYPE;
+
+	fclose (fp );
+
+	/* The key is in the format: "key:123456" */
+	bufp +=4;
+	key = atoi (  (const char *) bufp );
+
+	/* Now we have the key. Determine which one it is */
+	if (  0 == (key % DS_NORMAL_MAGIC_KEY))
+		return DS_NORMAL_TYPE;
+	else if ( 0 == (key % DS_LITE_MAGIC_KEY) )
+		return DS_LITE_TYPE;
+
+	/* By defualt, it's lite */
+	return DS_LITE_TYPE;
+#endif /* no more lite mode */
+}
+
+/*
+ * generate_lite_key
+ * 	Generate a key for the product that is being used.
+ *
+ *   Input:
+ *	type  DS_NORMAL_TYPE	- Normal
+ *	      DS_LITE_TYPE	- Lite
+ *   Returns:
+ *	a int key.
+ *
+ */
+int generate_directory_key( int type)
+{
+
+	int key = 0;
+	int val;
+
+	val = rand();
+
+	if (type == DS_NORMAL_TYPE )
+		key = val * DS_NORMAL_MAGIC_KEY;
+	else if (type == DS_LITE_TYPE )
+		key = val * DS_LITE_MAGIC_KEY;
+
+	return key;
+}
+
+/*
+ * is_key_validNormalKey
+ * 
+ * Check if the key ia a valid normal key or not.
+ */
+int 
+is_key_validNormalKey ( int key )
+{
+
+	if (key <= 0 ) return 0;
+
+	if (0 == ( key % DS_NORMAL_MAGIC_KEY ))
+		return 1;
+
+	return 0;
+}