IES to Cycles addon for new nodetree system! It only works for trunk builds of blender 2.66 and later versions!!! Thread on blenderartists.org: http://blenderartists.org/forum/showthread.php?276063 Old outdated version (no rig) for official 2.66 release (old nodetrees): https://gist.github.com/Lockal/5313485

ies2cycles.py

bl_info = {
    "name": "IES to Cycles",
    "author": "Lockal S.",
    "version": (0, 1),
    "blender": (2, 6, 5),
    "location": "File > Import > IES Lamp Data (.ies)",
    "description": "Import IES lamp data to cycles",
    "warning": "",
    "wiki_url": "",
    "tracker_url": "",
    "category": "Import-Export"
}

import bpy
import os

from math import log, pow

def clamp(x, min, max):
    if x < min:
        return min
    elif x > max:
        return max
    return x

def t2rgb(tmp):
    # Temperature must fall between 1000 and 40000 degrees
    tmp = clamp(tmp, 1000, 40000)

    # All calculations require tmp / 100, so only do the conversion once
    tmp /= 100

    # red
    if tmp <= 66:
        r = 255
    else:
        # Note: the R-squared value for this approximation is .988
        r = 329.698727446 * pow(tmp - 60, -0.1332047592)
        r = clamp(r, 0, 255)

    # green
    if tmp <= 66:
        # Note: the R-squared value for this approximation is .996
        g = 99.4708025861 * log(tmp) - 161.1195681661
        g = clamp(g, 0, 255)
    else:
        # Note: the R-squared value for this approximation is .987
        g = 288.1221695283 * pow(tmp - 60, -0.0755148492)
        g = clamp(g, 0, 255)

    # blue
    if tmp >= 66:
        b = 255
    elif tmp <= 19:
        b = 0
    else:
        # Note: the R-squared value for this approximation is .998
        b = 138.5177312231 * log(tmp - 10) - 305.0447927307
        b = clamp(b, 0, 255)

    return [r/255.0, g/255.0, b/255.0, 1.0]


def simple_interp(k, x, y):
    for i in range(len(x)):
        if k == x[i]:
            return y[i]
        elif k < x[i]:
            return y[i] + (k - x[i]) * (y[i - 1] - y[i]) / (x[i - 1] - x[i])


def read_lamp_data(log, filename, multiplier, image_format, color_temperature):
    version_table = {
        'IESNA:LM-63-1986': 1986,
        'IESNA:LM-63-1991': 1991,
        'IESNA91': 1991,
        'IESNA:LM-63-1995': 1995,
        'IESNA:LM-63-2002': 2002,
    }

    name = os.path.splitext(os.path.split(filename)[1])[0]

    file = open(filename, 'rt', encoding='cp1252')
    content = file.read()
    file.close()
    s, content = content.split('\n', 1)

    if s in version_table:
        version = version_table[s]
    else:
        log({'DEBUG'}, 'IES file does not specify any version')
        version = None

    keywords = dict()

    while content and not content.startswith('TILT='):
        s, content = content.split('\n', 1)

        if s.startswith('['):
            endbracket = s.find(']')
            if endbracket != -1:
                keywords[s[1:endbracket]] = s[endbracket + 1:].strip()

    #required_kwds = ['TEST', 'TESTLAB', 'ISSUEDATE', 'MANUFAC']
    #if version == 2002:
    #    for kwd in required_kwds:
    #        if kwd not in keywords:
    #            print('Required keyword %s is missing' % kwd)

    s, content = content.split('\n', 1)

    if not s.startswith('TILT'):
        log({'ERROR'}, 'TILT keyword not found, check your IES file')
        return {'CANCELED'}

    #if s != 'TILT=NONE':
    #    print('' % kwd)

    file_data = content.replace(',', ' ').split()

    lamps_num = int(file_data[0])
    #if lamps_num != 1.0:
    #    print('Only 1 lamp is supported at this moment')

    lumens_per_lamp = float(file_data[1])
    candela_mult = float(file_data[2])
    v_angles_num = int(file_data[3])
    h_angles_num = int(file_data[4])
    photometric_type = int(file_data[5])

    units_type = int(file_data[6])
    #if units_type not in [1, 2]:
    #    print('Units type should be either 1 (feet) or 2 (meters)')

    width = float(file_data[7])
    length = float(file_data[8])
    height = float(file_data[9])

    ballast_factor = float(file_data[10])

    future_use = float(file_data[11])
    if future_use != 1.0:
        print('Invalid future use field')

    input_watts = float(file_data[12])

    v_angs = [float(s) for s in file_data[13:13 + v_angles_num]]
    h_angs = [float(s) for s in file_data[13 + v_angles_num:
                                          13 + v_angles_num + h_angles_num]]

    if v_angs[0] == 0 and v_angs[-1] == 90:
        lamp_cone_type = 'TYPE90'
    elif v_angs[0] == 0 and v_angs[-1] == 180:
        lamp_cone_type = 'TYPE180'
    else:
        log({'DEBUG'}, 'Lamps with vertical angles (%d-%d) are not supported' %
                       (v_angs[0], v_angs[-1]))
        lamp_cone_type = 'TYPE180'

    # check if angular offsets are the same
    v_d = [v_angs[i] - v_angs[i - 1] for i in range(1, len(v_angs))]
    h_d = [h_angs[i] - h_angs[i - 1] for i in range(1, len(h_angs))]

    v_same = all(abs(v_d[i] - v_d[i - 1]) < 0.001 for i in range(1, len(v_d)))
    h_same = all(abs(h_d[i] - h_d[i - 1]) < 0.001 for i in range(1, len(h_d)))

    # read candela values
    offset = 13 + len(v_angs) + len(h_angs)
    candela_num = len(v_angs) * len(h_angs)
    candela_values = [float(s) for s in file_data[offset:offset + candela_num]]

    # reshape 1d array to 2d array
    candela_2d = list(zip(*[iter(candela_values)] * len(v_angs)))

    if not v_same:
        vmin, vmax = v_angs[0], v_angs[-1]
        divisions = int((vmax - vmin) / max(1, min(v_d)))
        step = (vmax - vmin) / divisions

        # Approximating non-uniform vertical angles with step = step
        new_v_angs = [vmin + i * step for i in range(divisions + 1)]
        new_candela_2d = [[simple_interp(ang, v_angs, line)
                           for ang in new_v_angs] for line in candela_2d]
        # print(candela_2d)
        # print(new_candela_2d)
        v_angs = new_v_angs
        candela_2d = new_candela_2d

    if not h_same:
        log({'DEBUG'}, 'Different offsets for horizontal angles!')

    candela_2d = [[line[0]] + list(line) + [line[-1]] for line in candela_2d]

    # flatten 2d array to 1d
    candela_values = [y for x in candela_2d for y in x]
    maxval = max(candela_values)

    if image_format == 'PNG':
        float_buffer=False
        filepath='//' + name + '.png'
    else:
        float_buffer=True
        filepath='//' + name + '.exr'
        
    img = bpy.data.images.new(name, len(v_angs) + 2, len(h_angs),
                              float_buffer=float_buffer)

    for i in range(len(candela_values)):
        val = candela_mult * candela_values[i] / maxval
        img.pixels[4 * i] = img.pixels[4 * i + 1] = img.pixels[4 * i + 2] = val

    intensity = max(500, min(maxval * multiplier, 5000))
    bpy.ops.import_lamp.gen_exr('INVOKE_DEFAULT', image_name=img.name,
                                intensity=intensity,
                                filepath=filepath,
                                lamp_cone_type=lamp_cone_type,
                                image_format=image_format,
                                color_temperature=color_temperature)

    return {'FINISHED'}


def scale_coords(nt, sock_in, sock_out, size):
    add = nt.nodes.new('MATH')
    add.operation = 'ADD'
    nt.links.new(add.inputs[0], sock_in)
    add.inputs[1].default_value = 1.0 / (size - 2)

    mul = nt.nodes.new('MATH')
    mul.operation = 'MULTIPLY'
    nt.links.new(mul.inputs[0], add.outputs[0])
    mul.inputs[1].default_value = (size - 2.0) / size

    nt.links.new(sock_out, mul.outputs[0])


def add_img(image_name, filepath, intensity, lamp_cone_type, image_format, color_temperature):
    from math import pi

    img = bpy.data.images[image_name]
    img.filepath_raw = filepath
    img.file_format = image_format
    img.save()

    if 0 and 'lamp_routine' in bpy.data.node_groups:
        nt = bpy.data.node_groups['lamp_routine']
    else:
        nt = bpy.data.node_groups.new('Lamp ' + image_name, 'SHADER')
        n0 = nt.nodes.new('SEPRGB')

        na = nt.nodes.new('MATH')
        na.operation = 'MULTIPLY'
        nt.links.new(na.inputs[0], n0.outputs[0])
        nt.links.new(na.inputs[1], n0.outputs[0])

        nb = nt.nodes.new('MATH')
        nb.operation = 'MULTIPLY'
        nt.links.new(nb.inputs[0], n0.outputs[1])
        nt.links.new(nb.inputs[1], n0.outputs[1])

        nc = nt.nodes.new('MATH')
        nc.operation = 'ADD'
        nt.links.new(nc.inputs[0], na.outputs[0])
        nt.links.new(nc.inputs[1], nb.outputs[0])

        nd = nt.nodes.new('MATH')
        nd.operation = 'POWER'
        nt.links.new(nd.inputs[0], nc.outputs[0])
        nd.inputs[1].default_value = 0.5

        ne = nt.nodes.new('MATH')
        ne.operation = 'ARCCOSINE'
        nt.links.new(ne.inputs[0], n0.outputs[2])

        nf = nt.nodes.new('MATH')
        nf.operation = 'ADD'
        nt.links.new(nf.inputs[0], n0.outputs[0])
        nt.links.new(nf.inputs[1], nd.outputs[0])

        ng = nt.nodes.new('MATH')
        ng.operation = 'DIVIDE'
        nt.links.new(ng.inputs[0], n0.outputs[1])
        nt.links.new(ng.inputs[1], nf.outputs[0])

        nh = nt.nodes.new('MATH')
        nh.operation = 'ARCTANGENT'
        nt.links.new(nh.inputs[0], ng.outputs[0])

        ni = nt.nodes.new('MATH')
        ni.operation = 'DIVIDE'
        nt.links.new(ni.inputs[0], ne.outputs[0])

        if lamp_cone_type == 'TYPE180':
            ni.inputs[1].default_value = pi
        else:  # TYPE90:
            ni.inputs[1].default_value = pi / 2

        nj = nt.nodes.new('MATH')
        nj.operation = 'DIVIDE'
        nt.links.new(nj.inputs[0], nh.outputs[0])
        nj.inputs[1].default_value = pi

        nk = nt.nodes.new('MATH')
        nk.operation = 'ADD'
        nt.links.new(nk.inputs[0], nj.outputs[0])
        nk.inputs[1].default_value = 0.5

        n2 = nt.nodes.new('COMBRGB')
        scale_coords(nt, ni.outputs[0], n2.inputs[0], img.size[0])
        nt.links.new(n2.inputs[1], nk.outputs[0])

        nt_ima = nt.nodes.new('TEX_IMAGE')
        nt_ima.image = img
        nt_ima.color_space = 'NONE'
        nt.links.new(nt_ima.inputs[0], n2.outputs[0])

        i1 = nt.inputs.new('Vector', 'VECTOR')
        i2 = nt.inputs.new('Strength', 'VALUE')
        nt.links.new(n0.inputs[0], i1)

        nmult = nt.nodes.new('MATH')
        nmult.operation = 'MULTIPLY'
        nt.links.new(nmult.inputs[0], i2)

        o1 = nt.outputs.new('Intensity', 'VALUE')
        nt.links.new(o1, nmult.outputs[0])

        if lamp_cone_type == 'TYPE180':
            nt.links.new(nmult.inputs[1], nt_ima.outputs[0])
        else:  # TYPE90
            nlt = nt.nodes.new('MATH')
            nlt.operation = 'LESS_THAN'
            nt.links.new(nlt.inputs[0], ni.outputs[0])
            nlt.inputs[1].default_value = 1.0

            nif = nt.nodes.new('MATH')
            nif.operation = 'MULTIPLY'
            nt.links.new(nif.inputs[0], nt_ima.outputs[0])
            nt.links.new(nif.inputs[1], nlt.outputs[0])

            nt.links.new(nmult.inputs[1], nif.outputs[0])

    lampdata = bpy.data.lamps.new('Lamp ' + image_name, 'POINT')
    lampdata.use_nodes = True
    lnt = lampdata.node_tree

    #for node in lnt.nodes:
    #    print(node)

    lnt_grp = lnt.nodes.new('GROUP', group=nt)
    lnt.nodes['Emission'].inputs[0].default_value = t2rgb(color_temperature)
    lnt.links.new(lnt.nodes['Emission'].inputs[1], lnt_grp.outputs[0])
    lnt_grp.inputs[1].default_value = intensity

    lnt_map = lnt.nodes.new('MAPPING')
    lnt_map.rotation[0] = pi
    lnt.links.new(lnt_grp.inputs[0], lnt_map.outputs[0])

    lnt_geo = lnt.nodes.new('NEW_GEOMETRY')
    lnt.links.new(lnt_map.inputs[0], lnt_geo.outputs[1])

    lamp = bpy.data.objects.new('Lamp ' + image_name, lampdata)
    lamp.location = bpy.context.scene.cursor_location
    bpy.context.scene.objects.link(lamp)

    for ob in bpy.data.objects:
        ob.select = False

    lamp.select = True
    bpy.context.scene.objects.active = lamp

    return {'FINISHED'}


from bpy_extras.io_utils import ImportHelper, ExportHelper
from bpy.props import StringProperty, FloatProperty, EnumProperty, IntProperty
from bpy.types import Operator


format_prop_items = (
    ('OPEN_EXR', "EXR", "Save images to EXR format (up to 5 textures)"),
    ('PNG', "PNG", "Save images to PNG format")
)

class ImportIES(Operator, ImportHelper):
    """Import IES lamp data and generate a node group for cycles"""
    bl_idname = "import_lamp.ies"
    bl_label = "Import IES to Cycles"

    filter_glob = StringProperty(default="*.ies", options={'HIDDEN'})

    lamp_strength = FloatProperty(
        name="Strength",
        description="Multiplier for lamp strength",
        default=1.0,
    )
    
    image_format = EnumProperty(
        name='Convert to',
        items=format_prop_items, 
        default='PNG',
    )
    
    color_temperature = IntProperty(
        name="Color Temperature",
        description="Color temperature of lamp, 3000=soft white, 5000=cool white, 6500=daylight",
        default=6500,
    )
    
    def execute(self, context):
        return read_lamp_data(self.report, self.filepath, self.lamp_strength, 
            self.image_format, self.color_temperature)


class ExportLampEXR(Operator, ExportHelper):
    """Export IES lamp data in EXR format"""
    bl_idname = "import_lamp.gen_exr"
    bl_label = "Export lamp to image"

    image_name = StringProperty(options={'HIDDEN'})
    intensity = FloatProperty(options={'HIDDEN'})
    lamp_cone_type = EnumProperty(
        items=(('TYPE90', "0-90", "Angles from 0 to 90 degrees"),
               ('TYPE180', "0-180", "Angles from 0 to 90 degrees")),
        options={'HIDDEN'}
    )
    image_format = EnumProperty(items=format_prop_items, options={'HIDDEN'})
    color_temperature = IntProperty(options={'HIDDEN'})
    use_filter_image = True

    def execute(self, context):
        return add_img(self.image_name, self.filepath, self.intensity,
                       self.lamp_cone_type, self.image_format, self.color_temperature)
        # self.report({'ERROR'}, "Could not make new image %s at %s" %
        # (self.image_name, self.filepath))

    def invoke(self, context, event):
        if self.image_format == 'PNG':
            self.filename_ext = ".png"
        #    self.filter_glob = StringProperty(default="*.png", options={'HIDDEN'})
        else:
            self.filename_ext = ".exr"
        #    self.filter_glob = StringProperty(default="*.exr", options={'HIDDEN'})

        return ExportHelper.invoke(self, context, event)


def menu_func(self, context):
    self.layout.operator(ImportIES.bl_idname, text='IES Lamp Data (.ies)')


def register():
    bpy.utils.register_class(ImportIES)
    bpy.utils.register_class(ExportLampEXR)
    bpy.types.INFO_MT_file_import.append(menu_func)


def unregister():
    bpy.utils.unregister_class(ImportIES)
    bpy.types.INFO_MT_file_import.remove(menu_func)


if __name__ == "__main__":
    register()
    
    # test call
    # bpy.ops.import_lamp.ies('INVOKE_DEFAULT')