DECLARE
        ip inet;
        type character varying;
BEGIN
        ip := (netmask(NEW.subnet)&NEW.subnet)+1;
        WHILE ip << NEW.subnet LOOP
                IF ip = NEW.router THEN
                        type := 'router';
                ELSE
                        type := 'dynamic_free';
                END IF;
                EXECUTE '
                        INSERT INTO addresses (
                                subnet_id,
                                ip,
                                type
                        )
                        VALUES (
                                ' || NEW.id || ',
                                ''' || host(ip) || ''',
                                ''' || type || '''
                        )
                ';
                ip := ip + 1;
        END LOOP;
        RETURN NEW;
END;