+++ /dev/null
-#
-# Copyright (C) 2013 eNovance SAS <licensing@enovance.com>
-#
-# Author: Emilien Macchi <emilien.macchi@enovance.com>
-# Martin Magr <mmagr@redhat.com>
-#
-# Licensed under the Apache License, Version 2.0 (the "License"); you may
-# not use this file except in compliance with the License. You may obtain
-# a copy of the License at
-#
-# http://www.apache.org/licenses/LICENSE-2.0
-#
-# Unless required by applicable law or agreed to in writing, software
-# distributed under the License is distributed on an "AS IS" BASIS, WITHOUT
-# WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the
-# License for the specific language governing permissions and limitations
-# under the License.
-#
-# Advanced validation for VLAN configuration
-#
-
-module Puppet::Parser::Functions
- newfunction(:validate_network_vlan_ranges) do |args|
- value = args[0]
- if not value.kind_of?(Array)
- value = [value]
- end
-
- value.each do |range|
- if m = /^(.+:)?(\d+):(\d+)$/.match(range)
- first_id = Integer(m[-2])
- second_id = Integer(m[-1])
- if (first_id > 4094) || (second_id > 4094)
- raise Puppet::Error, "vlan id are invalid."
- end
- if ((second_id - first_id) < 0 )
- raise Puppet::Error, "network vlan ranges are invalid."
- end
- elsif m = /^([^:]+)?(:\d+)?$/.match(range)
- # Either only name of physical network or single vlan id has
- # been passed. This is also correct.
- elsif range
- raise Puppet::Error, "network vlan ranges are invalid."
- end
- end
- end
-end