packages/net/samba3/patches/130-owrt_smbpasswd.patch

Index: samba-3.0.24/source/Makefile
===================================================================
--- samba-3.0.24.orig/source/Makefile	2008-08-07 15:56:45.000000000 +0200
+++ samba-3.0.24/source/Makefile	2008-08-07 15:56:45.000000000 +0200
@@ -1015,9 +1015,9 @@
 
 MY_PASS_OBJ = libsmb/smbdes.o lib/md4.o lib/arc4.o
 
-bin/smbpasswd: utils/avm_smbpasswd.o $(MY_PASS_OBJ)
+bin/smbpasswd: utils/owrt_smbpasswd.o $(MY_PASS_OBJ)
 	@echo Linking $@
-	@$(CC) $(FLAGS)  -o $@ utils/avm_smbpasswd.o $(MY_PASS_OBJ) \
+	@$(CC) $(FLAGS)  -o $@ utils/owrt_smbpasswd.o $(MY_PASS_OBJ) \
 		-L$(TARGETFS)/lib
 
  
Index: samba-3.0.24/source/utils/owrt_smbpasswd.c
===================================================================
--- /dev/null	1970-01-01 00:00:00.000000000 +0000
+++ samba-3.0.24/source/utils/owrt_smbpasswd.c	2008-08-07 15:58:25.000000000 +0200
@@ -0,0 +1,195 @@
+/*
+ * Copyright (C) John Crispin <blogic@openwrt.org>
+ *
+ * This program is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by the
+ * Free Software Foundation; either version 2 of the License, or (at your
+ * option) any later version.
+ * 
+ * This program is distributed in the hope that it will be useful, but WITHOUT
+ * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
+ * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
+ * more details.
+ * 
+ * You should have received a copy of the GNU General Public License along with
+ * this program; if not, write to the Free Software Foundation, Inc., 675
+ * Mass Ave, Cambridge, MA 02139, USA.  */
+
+#include "includes.h"
+#include <endian.h>
+
+void E_md4hash(const char *passwd, uchar p16[16])
+{
+	int len;
+	smb_ucs2_t wpwd[129];
+	int i;
+
+	len = strlen(passwd);
+	for (i = 0; i < len; i++) {
+#if __BYTE_ORDER == __LITTLE_ENDIAN
+		wpwd[i] = (unsigned char)passwd[i];
+#else
+		wpwd[i] = (unsigned char)passwd[i] << 8;
+#endif
+	}
+	wpwd[i] = 0;
+
+	len = len * sizeof(int16);
+	mdfour(p16, (unsigned char *)wpwd, len);
+	ZERO_STRUCT(wpwd);
+}
+
+/* returns -1 if user is not present in /etc/passwd*/
+int find_uid_for_user(char *user)
+{
+	char t[256];
+	FILE *fp = fopen("/etc/passwd", "r");
+	int ret = -1;
+
+	if(!fp)
+	{
+		printf("failed to open /etc/passwd");
+		goto out;
+	}
+
+	while(!feof(fp))
+	{
+		if(fgets(t, 255, fp))
+		{
+			char *p1, *p2;
+			p1 = strchr(t, ':');
+			if(p1 && (p1 - t == strlen(user)) && (strncmp(t, user, strlen(user))) == 0)
+			{
+				p1 = strchr(t, ':');
+				if(!p1)
+					goto out;
+				p2 = strchr(++p1, ':');
+				if(!p2)
+					goto out;
+				p1 = strchr(++p2, ':');
+				if(!p1)
+					goto out;
+				*p1 = '\0';
+				ret = atoi(p2);
+				goto out;
+			}
+		}
+	}
+	printf("No valid user found in /etc/passwd\n");
+
+out:
+	if(fp)
+		fclose(fp);
+	return ret;
+}
+
+void insert_user_in_smbpasswd(char *user, char *line)
+{
+	char t[256];
+	FILE *fp = fopen("/etc/samba/smbpasswd", "r+");
+
+	if(!fp)
+	{
+		printf("failed to open /etc/samba/smbpasswd");
+		goto out;
+	}
+
+	while(!feof(fp))
+	{
+		if(fgets(t, 255, fp))
+		{
+			char *p;
+			p = strchr(t, ':');
+			if(p && (p - t == strlen(user)) && (strncmp(t, user, strlen(user))) == 0)
+			{
+				fseek(fp, -strlen(line), SEEK_CUR);
+				break;
+			}
+		}
+	}
+
+	fprintf(fp, line);
+
+out:
+	if(fp)
+		fclose(fp);
+}
+
+void delete_user_from_smbpasswd(char *user)
+{
+	char t[256];
+	FILE *fp = fopen("/etc/samba/smbpasswd", "r+");
+
+	if(!fp)
+	{
+		printf("failed to open /etc/samba/smbpasswd");
+		goto out;
+	}
+
+	while(!feof(fp))
+	{
+		if(fgets(t, 255, fp))
+		{
+			char *p;
+			p = strchr(t, ':');
+			if(p && (p - t == strlen(user)) && (strncmp(t, user, strlen(user))) == 0)
+			{
+				fpos_t r_pos, w_pos;
+				char t2[256];
+				fgetpos(fp, &r_pos);
+				w_pos = r_pos;
+				w_pos.__pos -= strlen(t);
+				while(fgets(t2, 256, fp))
+				{
+					fsetpos(fp, &w_pos);
+					fputs(t2, fp);
+					r_pos.__pos += strlen(t2);
+					w_pos.__pos += strlen(t2);
+					fsetpos(fp, &r_pos);
+				}
+				ftruncate(fileno(fp), w_pos.__pos);
+				break;
+			}
+		}
+	}
+
+out:
+	if(fp)
+		fclose(fp);
+}
+
+int main(int argc, char **argv)
+{
+	unsigned uid;
+	uchar new_nt_p16[NT_HASH_LEN];
+	int g;
+	int smbpasswd_present;
+	char smbpasswd_line[256];
+	char *s;
+
+	if(argc != 3)
+	{
+		printf("usage for openwrt_smbpasswd - \n\t%s USERNAME PASSWD\n\t%s -del USERNAME\n", argv[0], argv[0]);
+		exit(1);
+	}
+	if(strcmp(argv[1], "-del") == 0)
+	{
+		printf("deleting user %s\n", argv[2]);
+		delete_user_from_smbpasswd(argv[2]);
+		return 0;
+	}
+	uid = find_uid_for_user(argv[1]);
+	if(uid == -1)
+		exit(2);
+
+	E_md4hash(argv[2], new_nt_p16);
+	s = smbpasswd_line;
+	s += snprintf(s, 256 - (s - smbpasswd_line), "%s:%u:XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX:", argv[1], uid);
+	for(g = 0; g < 16; g++)
+		s += snprintf(s, 256 - (s - smbpasswd_line), "%02X", new_nt_p16[g]);
+	snprintf(s, 256 - (s - smbpasswd_line), ":[U          ]:LCT-00000001:\n");
+
+	insert_user_in_smbpasswd(argv[1], smbpasswd_line);
+
+	return 0;
+}