## Script (Python) "reallocate_bed"
##bind container=container
##bind context=context
##bind namespace=
##bind script=script
##bind subpath=traverse_subpath
##parameters=
##title=
##
# $Id: reallocateBed.py 1206 2007-01-05 18:24:56Z joachim $
"""
reallocate beds
"""
import logging
logger = logging.getLogger('Skins.reallocate_bed')

request = context.REQUEST
redirect = request.RESPONSE.redirect
mtool = context.portal_membership
wf = context.portal_workflow
member = mtool.getAuthenticatedMember()
member_id = str(member)
path_info = request.get('PATH_INFO').split('/')

if mtool.isAnonymousUser():
    return None
students = context.portal_url.getPortalObject().campus.students
beds = context.portal_accommodation
studs = context.students_catalog
student_id = context.getStudentId()

if student_id is not None:
    logger.info('%s requests bed_change for %s' % (member_id,student_id))
    info = context.getAccommodationInfo(student_id)
    res = beds(student=student_id)
    if len(res) == 0:
        logger.info('No bed found for %s' % (student_id))
        redirect("%s/%s" % (students.absolute_url(),student_id))
    allocated_bed = res[0]
    status = info['student_status']
    student = student_id
    bedtype = context.getBedStatusFromHall(allocated_bed.bed)
    if not bedtype.endswith("reserved"):
        logger.info('%s is NOT a reserved bed' % (bedtype))
        return redirect("%s/%s/%s" % (students.absolute_url(),student,info['acco_id']))
    logger.info('%s reallocate reserved bed %s/%s' % (student_id,bedtype,status))
    beds.modifyRecord(bed=allocated_bed.bed,
                      student='',
                      bed_type=bedtype)
    code,bed = beds.searchAndReserveBed(student_id,status)
    if code > 0:
        #from Products.zdb import set_trace; set_trace()
        d = {}
        d['bed'] = bed
        d['student_status'] = status
        acco_info = context.waeup_tool.getHallInfo(bed)
        d['acco_maint_code'] = acco_info.get('maintenance_code')
        d['acco_maint_fee'] = acco_info.get('maintenance_fee')
        acco_doc = info['acco_doc']
        acco_doc.edit(mapping=d)
        return redirect("%s/%s/%s" % (students.absolute_url(),student,info['acco_id']))
    logger.info('%s new bed allocation failed, code = %s' % (student_id,code))
    return redirect("%s/%s/%s" % (students.absolute_url(),student,info['acco_id']))

info = {}
#records = [r for r in beds() if  r.student]
records = beds.uniqueValuesFor('bed')
list = []
to_modify = []
for b in records:
    r = beds(bed=b)[0]
    bedtype = context.getBedStatusFromHall(r.bed)
    if not bedtype.endswith("reserved"):
        #logger.info('"%s", "allocated bed is NOT reserved","%s"' % (student_id,bedtype))
        #list.append("Student %s bed_type %s ok" % (r.student,bedtype))
        continue
    if not r.student:
        beds.modifyRecord(bed=b,
                      bed_type=bedtype)
        list.append("Empty bed %s set to %s" % (r.bed,bedtype))
        continue
    info = context.getAccommodationInfo(r.student)
    sbt = info.get('student_status',None)
    if sbt is None:
        continue
    list.append("Student %s bed_type %s != %s" % (r.student,
                                                  r.bed_type,
                                                  bedtype))
    to_modify.append((r.bed,r.student,info['student_status'],info['acco_doc'],bedtype))
for former_bed, student, status,acco_doc,bedtype in to_modify:
    beds.modifyRecord(bed=former_bed,
                      student='',
                      bed_type=bedtype)
    code,bed = beds.searchAndReserveBed(student,status)
    if code > 0:
        #from Products.zdb import set_trace; set_trace()
        d = {}
        d['bed'] = bed
        d['student_status'] = status
        acco_info = context.waeup_tool.getHallInfo(bed)
        d['acco_maint_code'] = acco_info.get('maintenance_code')
        d['acco_maint_fee'] = acco_info.get('maintenance_fee')
        acco_doc.edit(mapping=d)
        list.append("Student %s got bed %s, code = %s" % (student,
                                                              bed,
                                                              code))
return "\r".join(list)