1 # Copyright (c) 1999-2000 Jason Gunthorpe <jgg@debian.org>
2 # Copyright (c) 2001-2003 Ryan Murray <rmurray@debian.org>
3 # Copyright (c) 2004-2005 Joey Schulze <joey@infodrom.org>
4 # Copyright (c) 2008 Peter Palfrader <peter@palfrader.org>
5 # Copyright (c) 2008 Thomas Viehmann <tv@beamnet.de>
7 # This program is free software; you can redistribute it and/or modify
8 # it under the terms of the GNU General Public License as published by
9 # the Free Software Foundation; either version 2 of the License, or
10 # (at your option) any later version.
12 # This program is distributed in the hope that it will be useful,
13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 # GNU General Public License for more details.
17 # You should have received a copy of the GNU General Public License
18 # along with this program; if not, write to the Free Software
19 # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 # Some routines and configuration that are used by the ldap progams
22 import termios, re, imp, ldap, sys, crypt, rfc822, pwd, os, getpass
28 File = open("/etc/userdir-ldap/userdir-ldap.conf");
30 File = open("userdir-ldap.conf");
31 ConfModule = imp.load_source("userdir_config","/etc/userdir-ldap.conf",File);
35 BaseDn = ConfModule.basedn;
36 HostBaseDn = ConfModule.hostbasedn;
37 LDAPServer = ConfModule.ldaphost;
38 EmailAppend = ConfModule.emailappend;
39 AdminUser = ConfModule.adminuser;
40 GenerateDir = ConfModule.generatedir;
41 AllowedGroupsPreload = ConfModule.allowedgroupspreload;
42 HomePrefix = ConfModule.homeprefix;
43 DefaultGID = ConfModule.defaultgid;
44 TemplatesDir = ConfModule.templatesdir;
45 PassDir = ConfModule.passdir;
46 Ech_ErrorLog = ConfModule.ech_errorlog;
47 Ech_MainLog = ConfModule.ech_mainlog;
48 HostDomain = getattr(ConfModule, "hostdomain", EmailAppend)
51 UseSSL = ConfModule.usessl;
52 except AttributeError:
56 BaseBaseDn = ConfModule.basebasedn;
57 except AttributeError:
60 # Break up the keyring list
61 userdir_gpg.SetKeyrings(ConfModule.keyrings.split(":"))
63 # This is a list of common last-name prefixes
64 LastNamesPre = {"van": None, "von": None, "le": None, "de": None, "di": None};
66 # This is a list of common groups on Debian hosts
73 # ObjectClasses for different object types
74 UserObjectClasses = ("top", "inetOrgPerson", "debianAccount", "shadowAccount", "debianDeveloper")
75 RoleObjectClasses = ("top", "debianAccount", "shadowAccount", "debianRoleAccount")
76 GroupObjectClasses = ("top", "debianGroup")
78 # SSH Key splitting. The result is:
79 # (options,size,modulous,exponent,comment)
80 SSHAuthSplit = re.compile('^(.* )?(\d+) (\d+) (\d+) ?(.+)$');
81 SSH2AuthSplit = re.compile('^(.* )?ssh-(dss|rsa) ([a-zA-Z0-9=/+]+) ?(.+)$');
82 #'^([^\d](?:[^ "]+(?:".*")?)*)? ?(\d+) (\d+) (\d+) (.+)$');
84 AddressSplit = re.compile("(.*).*<([^@]*)@([^>]*)>");
86 # Safely get an attribute from a tuple representing a dn and an attribute
87 # list. It returns the first attribute if there are multi.
88 def GetAttr(DnRecord,Attribute,Default = ""):
90 return DnRecord[1][Attribute][0];
97 # Return a printable email address from the attributes.
98 def EmailAddress(DnRecord):
99 cn = GetAttr(DnRecord,"cn");
100 sn = GetAttr(DnRecord,"sn");
101 uid = GetAttr(DnRecord,"uid");
102 if cn == "" and sn == "":
103 return "<" + uid + "@" + EmailAppend + ">";
104 return cn + " " + sn + " <" + uid + "@" + EmailAppend + ">"
106 # Show a dump like ldapsearch
107 def PrettyShow(DnRecord):
109 List = DnRecord[1].keys();
112 Rec = DnRecord[1][x];
114 Result = Result + "%s: %s\n" % (x,i);
117 def connectLDAP(server = None):
121 l = ldap.open(server);
127 def passwdAccessLDAP(BaseDn, AdminUser):
129 Ask for the AdminUser's password and connect to the LDAP server.
130 Returns the connection handle.
132 print "Accessing LDAP directory as '" + AdminUser + "'";
134 if 'LDAP_PASSWORD' in os.environ:
135 Password = os.environ['LDAP_PASSWORD']
137 Password = getpass.getpass(AdminUser + "'s password: ")
139 if len(Password) == 0:
143 UserDn = "uid=" + AdminUser + "," + BaseDn;
145 # Connect to the ldap server
147 l.simple_bind_s(UserDn,Password);
148 except ldap.INVALID_CREDENTIALS:
149 if 'LDAP_PASSWORD' in os.environ:
150 print "password in environment does not work"
151 del os.environ['LDAP_PASSWORD']
156 # Split up a name into multiple components. This tries to best guess how
159 Words = re.split(" ", Name.strip())
161 # Insert an empty middle name
162 if (len(Words) == 2):
167 # Put a dot after any 1 letter words, must be an initial
168 for x in range(0,len(Words)):
169 if len(Words[x]) == 1:
170 Words[x] = Words[x] + '.';
172 # If a word starts with a -, ( or [ we assume it marks the start of some
173 # Non-name information and remove the remainder of the string
174 for x in range(0,len(Words)):
175 if len(Words[x]) != 0 and (Words[x][0] == '-' or \
176 Words[x][0] == '(' or Words[x][0] == '['):
180 # Merge any of the middle initials
181 while len(Words) > 2 and len(Words[2]) == 2 and Words[2][1] == '.':
182 Words[1] = Words[1] + Words[2];
185 while len(Words) < 2:
188 # Merge any of the last name prefixes into one big last name
189 while LastNamesPre.has_key(Words[-2].lower()):
190 Words[-1] = Words[-2] + " " + Words[-1];
193 # Fix up a missing middle name after lastname globbing
194 if (len(Words) == 2):
197 # If the name is multi-word then we glob them all into the last name and
198 # do not worry about a middle name
200 Words[2] = " ".join(Words[1:])
203 return (Words[0].strip(), Words[1].strip(), Words[2].strip());
205 # Compute a random password using /dev/urandom
207 # Generate a 10 character random string
208 SaltVals = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ/.";
209 Rand = open("/dev/urandom");
211 for i in range(0,15):
212 Password = Password + SaltVals[ord(Rand.read(1)[0]) % len(SaltVals)];
215 # Compute the MD5 crypted version of the given password
216 def HashPass(Password):
217 # Hash it telling glibc to use the MD5 algorithm - if you dont have
218 # glibc then just change Salt = "$1$" to Salt = "";
219 SaltVals = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789/.";
221 Rand = open("/dev/urandom");
222 for x in range(0,10):
223 Salt = Salt + SaltVals[ord(Rand.read(1)[0]) % len(SaltVals)];
224 Pass = crypt.crypt(Password,Salt);
226 raise "Password Error", "MD5 password hashing failed, not changing the password!";
229 # Sync with the server, we count the number of async requests that are pending
230 # and make sure result has been called that number of times
231 def FlushOutstanding(l,Outstanding,Fast=0):
232 # Sync with the remote end
234 print "Waiting for",Outstanding,"requests:",
235 while (Outstanding > 0):
237 if Fast == 0 or Outstanding > 50:
238 sys.stdout.write(".",);
240 if (l.result(ldap.RES_ANY,1) != (None,None)):
241 Outstanding = Outstanding - 1;
243 if (l.result(ldap.RES_ANY,1,0) != (None,None)):
244 Outstanding = Outstanding - 1;
247 except ldap.TYPE_OR_VALUE_EXISTS:
248 Outstanding = Outstanding - 1;
249 except ldap.NO_SUCH_ATTRIBUTE:
250 Outstanding = Outstanding - 1;
251 except ldap.NO_SUCH_OBJECT:
252 Outstanding = Outstanding - 1;
257 # Convert a lat/long attribute into Decimal degrees
258 def DecDegree(Posn,Anon=0):
259 Parts = re.match('[-+]?(\d*)\\.?(\d*)',Posn).groups();
262 if (abs(Val) >= 1806060.0):
263 raise ValueError,"Too Big";
266 if abs(Val) >= 18060.0 or len(Parts[0]) > 5:
268 Secs = Val - long(Val);
269 Val = long(Val)/100.0;
270 Min = Val - long(Val);
271 Val = long(Val) + (Min*100.0 + Secs*100.0/60.0)/60.0;
274 elif abs(Val) >= 180 or len(Parts[0]) > 3:
276 Min = Val - long(Val);
277 Val = long(Val) + Min*100.0/60.0;
287 def FormatSSH2Auth(Str):
288 Match = SSH2AuthSplit.match(Str);
290 return "<unknown format>";
294 return "ssh-%s %s..%s %s"%(G[1],G[2][:8],G[2][-8:],G[3]);
295 return "%s ssh-%s %s..%s %s"%(G[0],G[1],G[2][:8],G[2][-8:],G[3]);
297 def FormatSSHAuth(Str):
298 Match = SSHAuthSplit.match(Str);
300 return FormatSSH2Auth(Str);
305 return "%s %s %s..%s %s"%(G[1],G[2],G[3][:8],G[3][-8:],G[4]);
306 return "%s %s %s %s..%s %s"%(G[0],G[1],G[2],G[3][:8],G[3][-8:],G[4]);
308 def FormatPGPKey(Str):
314 while (I < len(Str)):
316 Res = "%s %s%s "%(Res,Str[I],Str[I+1]);
318 Res = "%s%s%s "%(Res,Str[I],Str[I+1]);
320 elif (len(Str) == 40):
323 while (I < len(Str)):
325 Res = "%s %s%s%s%s "%(Res,Str[I],Str[I+1],Str[I+2],Str[I+3]);
327 Res = "%s%s%s%s%s "%(Res,Str[I],Str[I+1],Str[I+2],Str[I+3]);
333 # Take an email address and split it into 3 parts, (Name,UID,Domain)
334 def SplitEmail(Addr):
335 # Is not an email address at all
336 if Addr.find('@') == -1:
339 Res1 = rfc822.AddrlistClass(Addr).getaddress();
344 return (Res1[0],"","");
346 # If there is no @ then the address was not parsed well. Try the alternate
347 # Parsing scheme. This is particularly important when scanning PGP keys.
348 Res2 = Res1[1].split("@");
350 Match = AddressSplit.match(Addr);
353 return Match.groups();
355 return (Res1[0],Res2[0],Res2[1]);
357 # Convert the PGP name string to a uid value. The return is a tuple of
358 # (uid,[message strings]). UnknownMpa is a hash from email to uid that
359 # overrides normal searching.
360 def GetUID(l,Name,UnknownMap = {}):
361 # Crack up the email address into a best guess first/middle/last name
362 (cn,mn,sn) = NameSplit(re.sub('["]','',Name[0]))
364 # Brackets anger the ldap searcher
365 cn = re.sub('[(")]','?',cn);
366 sn = re.sub('[(")]','?',sn);
368 # First check the unknown map for the email address
369 if UnknownMap.has_key(Name[1] + '@' + Name[2]):
370 Stat = "unknown map hit for "+str(Name);
371 return (UnknownMap[Name[1] + '@' + Name[2]],[Stat]);
373 # Then the cruft component (ie there was no email address to match)
374 if UnknownMap.has_key(Name[2]):
375 Stat = "unknown map hit for"+str(Name);
376 return (UnknownMap[Name[2]],[Stat]);
378 # Then the name component (another ie there was no email address to match)
379 if UnknownMap.has_key(Name[0]):
380 Stat = "unknown map hit for"+str(Name);
381 return (UnknownMap[Name[0]],[Stat]);
383 # Search for a possible first/last name hit
385 Attrs = l.search_s(BaseDn,ldap.SCOPE_ONELEVEL,"(&(cn=%s)(sn=%s))"%(cn,sn),["uid"]);
386 except ldap.FILTER_ERROR:
387 Stat = "Filter failure: (&(cn=%s)(sn=%s))"%(cn,sn);
388 return (None,[Stat]);
390 # Try matching on the email address
391 if (len(Attrs) != 1):
393 Attrs = l.search_s(BaseDn,ldap.SCOPE_ONELEVEL,"emailforward=%s"%(Name[2]),["uid"]);
394 except ldap.FILTER_ERROR:
397 # Hmm, more than one/no return
398 if (len(Attrs) != 1):
399 # Key claims a local address
400 if Name[2] == EmailAppend:
402 # Pull out the record for the claimed user
403 Attrs = l.search_s(BaseDn,ldap.SCOPE_ONELEVEL,"(uid=%s)"%(Name[1]),["uid","sn","cn"]);
405 # We require the UID surname to be someplace in the key name, this
406 # deals with special purpose keys like 'James Troup (Alternate Debian key)'
407 # Some people put their names backwards on their key too.. check that as well
408 if len(Attrs) == 1 and \
409 ( sn.lower().find(Attrs[0][1]["sn"][0].lower()) != -1 or \
410 cn.lower().find(Attrs[0][1]["sn"][0].lower()) != -1 ):
411 Stat = EmailAppend+" hit for "+str(Name);
412 return (Name[1],[Stat]);
414 # Attempt to give some best guess suggestions for use in editing the
416 Attrs = l.search_s(BaseDn,ldap.SCOPE_ONELEVEL,"(sn~=%s)"%(sn),["uid","sn","cn"]);
420 Stat = ["None for %s"%(str(Name))];
422 Stat.append("But might be: %s %s <%s@debian.org>"%(x[1]["cn"][0],x[1]["sn"][0],x[1]["uid"][0]));
425 return (Attrs[0][1]["uid"][0],None);
429 def Group2GID(l, name):
431 Returns the numerical id of a common group
434 for g in DebianGroups.keys():
436 return DebianGroups[g]
438 filter = "(gid=%s)" % name
439 res = l.search_s(BaseDn,ldap.SCOPE_ONELEVEL,filter,["gidNumber"]);
441 return int(GetAttr(res[0], "gidNumber"))
446 if 'UD_HMAC_KEY' in os.environ:
447 HmacKey = os.environ['UD_HMAC_KEY']
449 File = open(PassDir+"/key-hmac-"+pwd.getpwuid(os.getuid())[0],"r");
450 HmacKey = File.readline().strip()
452 return hmac.new(HmacKey, str, hashlib.sha1).hexdigest()
454 def make_passwd_hmac(status, purpose, uid, uuid, hosts, cryptedpass):
455 return make_hmac(':'.join([status, purpose, uid, uuid, hosts, cryptedpass]))