palate 0.3.7

File type detection combining tft and hyperpolyglot
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137


local FileModder = pd.Class:new():register("vidya-file-modder")

function FileModder:initialize(sel, atoms)

	-- 1. Object-triggering bang
	-- 2. Incoming single data bytes from [binfile]
	-- 3. Total bytes in file, from [route buflength]
	-- 4. Glitch type
	-- 5. Glitch point
	-- 6. Number of times to glitch a file
	-- 7. Toggle for a randomized number of glitches within the bounds of (6)
	-- 8. Active filename
	self.inlets = 8
	
	-- 1. To [binfile] inlet - bang(get next byte), clear(clear the buffer), FLOAT(write a byte to buffer), write(write to file)
	self.outlets = 1
	
	-- Currently active file's namedata
	self.filedata = {
		"default-filename",
		0,
	}
	
	-- Glitch type (pattern, random, or splice)
	self.glitchtype = "random"
	
	-- Minimum glitch point in image data
	self.glitchpoint = 500
	
	-- Number of times to repeat random glitches on a given file
	self.randrepeat = 1
	
	-- Toggles whether the number of repeating glitches should be random, within the bounds of 1 to self.randrepeat
	self.randtoggle = "concrete"
	
	-- Hold all bytes, which are converted to ints in the 0-255 range
	self.bytebuffer = {}
	
	-- Buffer length of currently active file
	self.buflength = 0
	
	return true

end

function FileModder:in_1_bang()

	for i = 1, self.buflength do
		self:outlet(1, "bang", {})
	end
	
	self:outlet(1, "clear", {})
	
	if self.glitchtype == "pattern" then
	
		local plen = math.random(2, 1000)
		local patbuffer = {}
		
		for i = 1, plen do
			table.insert(patbuffer, math.random(1, 254))
		end
		
		for i = self.glitchpoint, self.buflength do
			self.bytebuffer[i] = patbuffer[((i - 1) % #patbuffer) + 1]
		end
		
	elseif self.glitchtype == "random" then
	
		local randlimit = 0
		if self.randtoggle == "random" then
			randlimit = math.random(1, self.randrepeat)
		else
			randlimit = self.randrepeat
		end
		
		for i = 1, randlimit do
			self.bytebuffer[math.random(self.glitchpoint, self.buflength)] = math.random(1, 244)
		end
		
	elseif self.glitchtype == "splice" then
		
		local sloc = math.random(self.glitchpoint, self.buflength)
		local schunksize = math.random(1, self.buflength - sloc)
		local splicebuffer = {}
		for i = 1, schunksize do
			table.insert(splicebuffer, table.remove(self.bytebuffer, sloc))
		end
		
		local insertpoint = math.random(self.glitchpoint, #self.bytebuffer)
		for _, v in ipairs(splicebuffer) do
			table.insert(self.bytebuffer, insertpoint, v)
		end
		
	end

	for _, v in ipairs(self.bytebuffer) do
		self:outlet(1, "float", {v})
	end
	
	local outname = self.filedata[1] .. "-glitch" .. self.filedata[2] .. ".jpeg"
	self:outlet(1, "write", {outname})
	pd.post("New glitched image: " .. outname)
	
	self:outlet(1, "clear", {})
	
	self.bytebuffer = {}

end

function FileModder:in_2_float(f)
	table.insert(self.bytebuffer, f)
end

function FileModder:in_3_list(f)
	self.buflength = f[1] + 1 -- Shift from 0-indexed to 1-indexed
end

function FileModder:in_4_list(d)
	self.glitchtype = d[1]
end

function FileModder:in_5_float(f)
	self.glitchpoint = f
end

function FileModder:in_6_float(f)
	self.randrepeat = f
end

function FileModder:in_7_list(d)
	self.randtoggle = d[1]
end

function FileModder:in_8_list(d)
	self.filedata = {d[1], d[2]}
end