libs/core: Remove deprecated luci.bits which got replaced by bitlib
authorSteven Barth <steven@midlink.org>
Thu, 14 Aug 2008 22:51:12 +0000 (22:51 +0000)
committerSteven Barth <steven@midlink.org>
Thu, 14 Aug 2008 22:51:12 +0000 (22:51 +0000)
NOTICE
applications/luci-statistics/luasrc/statistics/rrdtool/colors.lua
libs/core/luasrc/bits.lua [deleted file]
libs/sys/luasrc/sys.lua

diff --git a/NOTICE b/NOTICE
index c45f01a6ea691107be7a86caa8e852a91a60a9cd..18287929b00625f5bf398f7d600215c8ed7c6063 100644 (file)
--- a/NOTICE
+++ b/NOTICE
@@ -4,6 +4,5 @@ Copyright 2008 Jo-Philipp Wich <xm@leipzig.freifunk.net>
 Licensed under the Apache License, Version 2.0.
 
 Contains code from:
-BinDecHex      - Copyright 2007 Tim Kelly/Dialectronics
 coxpcall       - Copyright 2005 - Kepler Project (www.keplerproject.org)
 ltn12/luasocket - Copyright 2004-2007 Diego Nehab
index 8f28524aa68a29298a49094a40ff480315a05cbe..2da9f5a08a3742fb3a16823c90734220f53e2b88 100644 (file)
@@ -16,16 +16,15 @@ $Id$
 module("luci.statistics.rrdtool.colors", package.seeall)
 
 require("luci.util")
-require("luci.bits")
 
 
 Instance = luci.util.class()
 
 function Instance.from_string( self, s )
        return {
-               luci.bits.Hex2Dec(s:sub(1,2)),
-               luci.bits.Hex2Dec(s:sub(3,4)),
-               luci.bits.Hex2Dec(s:sub(5,6))
+               tonumber(s:sub(1,2), 16),
+               tonumber(s:sub(3,4), 16),
+               tonumber(s:sub(5,6), 16)
        }
 end
 
diff --git a/libs/core/luasrc/bits.lua b/libs/core/luasrc/bits.lua
deleted file mode 100644 (file)
index 20cd1d5..0000000
+++ /dev/null
@@ -1,453 +0,0 @@
---[[
-/*
- * Copyright (c) 2007 Tim Kelly/Dialectronics
- *
- * Permission is hereby granted, free of charge, to any person obtaining
- * a copy of this software and associated documentation files (the
- * "Software"),  to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to permit
- * persons to whom the Software is furnished to do so, subject to the
- * following conditions:
- *
- * The above copyright notice and this permission notice shall be
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
- * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
- * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT
- * OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR
- * THE USE OR OTHER DEALINGS IN THE SOFTWARE.
- */
-
-       Modifications and documentation for LuCI made by
-               Steven Barth <steven@midlink.org> and
-               Jo-Philipp Wich <xm@leipzig.freifunk.net>
-
---]]
-
---- LuCI number conversion and bit manipulation functions.
-module("luci.bits", package.seeall);
-
-local hex2bin = {
-       ["0"] = "0000",
-       ["1"] = "0001",
-       ["2"] = "0010",
-       ["3"] = "0011",
-       ["4"] = "0100",
-       ["5"] = "0101",
-       ["6"] = "0110",
-       ["7"] = "0111",
-       ["8"] = "1000",
-       ["9"] = "1001",
-       ["a"] = "1010",
-    ["b"] = "1011",
-    ["c"] = "1100",
-    ["d"] = "1101",
-    ["e"] = "1110",
-    ["f"] = "1111"
-}
-
-local bin2hex = {
-       ["0000"] = "0",
-       ["0001"] = "1",
-       ["0010"] = "2",
-       ["0011"] = "3",
-       ["0100"] = "4",
-       ["0101"] = "5",
-       ["0110"] = "6",
-       ["0111"] = "7",
-       ["1000"] = "8",
-       ["1001"] = "9",
-       ["1010"] = "A",
-    ["1011"] = "B",
-    ["1100"] = "C",
-    ["1101"] = "D",
-    ["1110"] = "E",
-    ["1111"] = "F"
-}
-
---- Convert hexadecimal to binary number.
--- This function is big endian and can take up to 32 bits.
--- @param s    String containing hex value
--- @return     String containing binary value
-function Hex2Bin(s)
-
-       local ret = ""
-       local i = 0
-
-
-       for i in string.gfind(s, ".") do
-               i = string.lower(i)
-
-               ret = ret..hex2bin[i]
-
-       end
-
-       return ret
-end
-
---- Convert binary to hexadecimal number.
--- This function is big endian and can take up to 32 bits.
--- @param s    String containing binary value
--- @return     String containing hex value
-function Bin2Hex(s)
-
-       local l = 0
-       local h = ""
-       local b = ""
-       local rem
-
-       l = string.len(s)
-       rem = l % 4
-       l = l-1
-       h = ""
-
-       -- need to prepend zeros to eliminate mod 4
-       if (rem > 0) then
-               s = string.rep("0", 4 - rem)..s
-       end
-
-       for i = 1, l, 4 do
-               b = string.sub(s, i, i+3)
-               h = h..bin2hex[b]
-       end
-
-       return h
-
-end
-
---- Convert binary to decimal number.
--- This function is big endian and can take up to 32 bits.
--- @param s    String containing binary value
--- @return     String containing decimal value
-function Bin2Dec(s)
-
-       local num = 0
-       local ex = string.len(s) - 1
-       local l = 0
-
-       l = ex + 1
-       for i = 1, l do
-               b = string.sub(s, i, i)
-               if b == "1" then
-                       num = num + 2^ex
-               end
-               ex = ex - 1
-       end
-
-       return string.format("%u", num)
-
-end
-
---- Convert decimal to binary number.
--- This function is big endian and can take up to 32 bits.
--- @param s            String or number containing decimal value
--- @param num  Pad binary number to num bits
--- @return             String containing binary value
-function Dec2Bin(s, num)
-
-       local n
-
-       if (num == nil) then
-               n = 0
-       else
-               n = num
-       end
-
-       s = string.format("%x", s)
-
-       s = Hex2Bin(s)
-
-       while string.len(s) < n do
-               s = "0"..s
-       end
-
-       return s
-
-end
-
---- Convert hexadecimal to decimal number.
--- This function is big endian and can take up to 32 bits.
--- @param s    String containing hex value
--- @return     String containing decimal value
-function Hex2Dec(s)
-
-       local s = Hex2Bin(s)
-
-       return Bin2Dec(s)
-
-end
-
---- Convert decimal to hexadecimal number.
--- This function is big endian and can take up to 32 bits.
--- @param s    String containing decimal value
--- @return     String containing hex value
-function Dec2Hex(s)
-
-       s = string.format("%x", s)
-
-       return s
-
-end
-
-
---- Apply bitmask to value using bitwise And.
--- This function is big endian and will extend the values to 32 bits.
--- @param v    String containing hex value to be masked
--- @param m    String containing hex value of mask
--- @return     String containing hex value of masked value
-function BMAnd(v, m)
-
-       local bv = Hex2Bin(v)
-       local bm = Hex2Bin(m)
-
-       local i = 0
-       local s = ""
-
-       while (string.len(bv) < 32) do
-               bv = "0000"..bv
-       end
-
-       while (string.len(bm) < 32) do
-               bm = "0000"..bm
-       end
-
-
-       for i = 1, 32 do
-               cv = string.sub(bv, i, i)
-               cm = string.sub(bm, i, i)
-               if cv == cm then
-                       if cv == "1" then
-                               s = s.."1"
-                       else
-                               s = s.."0"
-                       end
-               else
-                       s = s.."0"
-
-               end
-       end
-
-       return Bin2Hex(s)
-
-end
-
---- Apply bitmask to value using bitwise Nand.
--- This function is big endian and will extend the values to 32 bits.
--- @param v    String containing hex value to be masked
--- @param m    String containing hex value of mask
--- @return     String containing hex value of masked value
-function BMNAnd(v, m)
-
-       local bv = Hex2Bin(v)
-       local bm = Hex2Bin(m)
-
-       local i = 0
-       local s = ""
-
-       while (string.len(bv) < 32) do
-               bv = "0000"..bv
-       end
-
-       while (string.len(bm) < 32) do
-               bm = "0000"..bm
-       end
-
-
-       for i = 1, 32 do
-               cv = string.sub(bv, i, i)
-               cm = string.sub(bm, i, i)
-               if cv == cm then
-                       if cv == "1" then
-                               s = s.."0"
-                       else
-                               s = s.."1"
-                       end
-               else
-                       s = s.."1"
-
-               end
-       end
-
-       return Bin2Hex(s)
-
-end
-
---- Apply bitmask to value using bitwise Or.
--- This function is big endian and will extend the values to 32 bits.
--- @param v    String containing hex value to be masked
--- @param m    String containing hex value of mask
--- @return     String containing hex value of masked value
-function BMOr(v, m)
-
-       local bv = Hex2Bin(v)
-       local bm = Hex2Bin(m)
-
-       local i = 0
-       local s = ""
-
-       while (string.len(bv) < 32) do
-               bv = "0000"..bv
-       end
-
-       while (string.len(bm) < 32) do
-               bm = "0000"..bm
-       end
-
-
-       for i = 1, 32 do
-               cv = string.sub(bv, i, i)
-               cm = string.sub(bm, i, i)
-               if cv == "1" then
-                               s = s.."1"
-               elseif cm == "1" then
-                               s = s.."1"
-               else
-                       s = s.."0"
-               end
-       end
-
-       return Bin2Hex(s)
-
-end
-
---- Apply bitmask to value using bitwise Xor.
--- This function is big endian and will extend the values to 32 bits.
--- @param v    String containing hex value to be masked
--- @param m    String containing hex value of mask
--- @return     String containing hex value of masked value
-function BMXOr(v, m)
-
-       local bv = Hex2Bin(v)
-       local bm = Hex2Bin(m)
-
-       local i = 0
-       local s = ""
-
-       while (string.len(bv) < 32) do
-               bv = "0000"..bv
-       end
-
-       while (string.len(bm) < 32) do
-               bm = "0000"..bm
-       end
-
-
-       for i = 1, 32 do
-               cv = string.sub(bv, i, i)
-               cm = string.sub(bm, i, i)
-               if cv == "1" then
-                       if cm == "0" then
-                               s = s.."1"
-                       else
-                               s = s.."0"
-                       end
-               elseif cm == "1" then
-                       if cv == "0" then
-                               s = s.."1"
-                       else
-                               s = s.."0"
-                       end
-               else
-                       -- cv and cm == "0"
-                       s = s.."0"
-               end
-       end
-
-       return Bin2Hex(s)
-
-end
-
---- Apply bitmask to value using bitwise Not.
--- This function is big endian and will extend the values to 32 bits.
--- @param v    String containing hex value to be masked
--- @param m    String containing hex value of mask
--- @return     String containing hex value of masked value
-function BMNot(v, m)
-
-       local bv = Hex2Bin(v)
-       local bm = Hex2Bin(m)
-
-       local i = 0
-       local s = ""
-
-       while (string.len(bv) < 32) do
-               bv = "0000"..bv
-       end
-
-       while (string.len(bm) < 32) do
-               bm = "0000"..bm
-       end
-
-
-       for i = 1, 32 do
-               cv = string.sub(bv, i, i)
-               cm = string.sub(bm, i, i)
-               if cm == "1" then
-                       if cv == "1" then
-                               -- turn off
-                               s = s.."0"
-                       else
-                               -- turn on
-                               s = s.."1"
-                       end
-               else
-                       -- leave untouched
-                       s = s..cv
-
-               end
-       end
-
-       return Bin2Hex(s)
-
-end
-
-
---- Perform righthand bit shifting on value.
--- This function pads the shifted value with zeroes and will extend to 32 bits.
--- @param v            String containing hex value to be shifted
--- @param nb   Number of bits to shift right
--- @return             String containing hex value of shifted value
-function BShRight(v, nb)
-
-       local s = Hex2Bin(v)
-
-       while (string.len(s) < 32) do
-               s = "0000"..s
-       end
-
-       s = string.sub(s, 1, 32 - nb)
-
-       while (string.len(s) < 32) do
-               s = "0"..s
-       end
-
-       return Bin2Hex(s)
-
-end
-
---- Perform lefthand bit shifting on value.
--- This function pads the shifted value with zeroes and extend to 32 bits.
--- @param v            String containing hex value to be shifted
--- @param nb   Number of bits to shift left
--- @return             String containing hex value of shifted value
-function BShLeft(v, nb)
-
-       local s = Hex2Bin(v)
-
-       while (string.len(s) < 32) do
-               s = "0000"..s
-       end
-
-       s = string.sub(s, nb + 1, 32)
-
-       while (string.len(s) < 32) do
-               s = s.."0"
-       end
-
-       return Bin2Hex(s)
-
-end
index 779e2025fea66059b43e8966829911bc578d525c..7357d4cfb00a372c711f4bc35b50564b9472647c 100644 (file)
@@ -27,7 +27,6 @@ limitations under the License.
 --- LuCI Linux and POSIX system utilities.
 module("luci.sys", package.seeall)
 require("posix")
-require("luci.bits")
 require("luci.util")
 require("luci.fs")
 require("luci.ip")