local p = {}

function p.add_file_prefix(str)
  if string.match(string.lower(str), '^file:') then
    return str
  else
    return 'File:' .. str
  end
end

function p.add_separator(title)
  return mw.html.create('tr')
           :tag('td')
           :attr('class', 'chip-infobox-sep')
           :attr('colspan', '2')
           :wikitext(title)
end

function p.add_entry(value, right)
  local e = mw.html.create('tr')
  e:tag('th')
    :attr('class', 'chip-infobox-entry')
    :wikitext(value)
  e:node(right)
  return e   
end

function p.chip(frame)
    local infobox = mw.html.create('table')

    infobox
        :attr('class', 'chip-infobox')

    -- header
    if frame.args.title then
      infobox
        :tag('tr')
          :tag('td')
            :attr('class', 'chip-infobox-header')
            :attr('colspan', '2')
            :wikitext('[[name::' .. frame.args.title .. ']]')
    else
      infobox
        :tag('tr')
          :tag('td')
          :attr('style', 'font-weight: bold; font-size 2.5em; color: red;')
          :wikitext('ERROR: MISSING TITLE!')
    end

    -- image
    if frame.args.image or frame.args.no_image ~= 'true' then
      local image = frame.args.image and p.add_file_prefix(frame.args.image) or "File:no photo (ic).svg"
      local image_size = frame.args.image_size or "200px" 
      infobox
        :tag('tr')
          :tag('td')
            :attr('class', 'chip-infobox-pic')
            :attr('colspan', '2')
            :wikitext('[[image::' .. image .. '| ]][[' .. image .. '|' .. image_size .. ']]')

      -- add a caption, if provided
      if frame.args.caption then
        infobox
          :tag('tr')
            :tag('td')
              :attr('class', 'chip-infobox-pic-caption')
              :attr('colspan', '2')
              :wikitext('[[image capation::' .. frame.args.caption .. ']]')
      end
    end

    -- some general info first
    infobox:node(p.add_separator('General Info'))
    
    -- designer
    if frame.args.designer then
      local designers = mw.html.create('td'):wikitext(frame.args.designer)
      for i = 2, 10 do
      	if not frame.args['designer_' .. i] then break end
      	designers:wikitext(', [[designer::' .. frame.args['designer_' .. i] .. ']][[category:microprocessor models by ' .. mw.ustring.lower(frame.args['designer_' .. i]) .. ']]')
      end
   	  infobox:node(p.add_entry('Designer', designers))
	end
    
    -- manufacturer
    if frame.args.manufacturer then
      local manufacturers = mw.html.create('td'):wikitext(frame.args.designer)
      for i = 2, 10 do
      	if not frame.args['manufacturer_' .. i] then break end
      	manufacturers:wikitext(', [[manufacturer::' .. frame.args['manufacturer_' .. i] .. ']][[category:microprocessor models by ' .. mw.ustring.lower(frame.args['manufacturer_' .. i]) .. ']]')
      end
   	  infobox:node(p.add_entry('Manufacturer', manufacturers))
	end
	
	-- model number
	if frame.args.model_number then
	  infobox:node(p.add_entry('Model Number', mw.html.create('td'):wikitext('[[model number::' .. frame.args.model_number .. ']]')))
	end
    
    -- part number
    if frame.args.part_number then
      local parts = mw.html.create('td'):wikitext(frame.args.part_number)
      for i = 1, 10 do
      	if not frame.args['part_number_' .. i] then break end
      	parts:wikitext(', [[part number::' .. frame.args['part_number_' .. i] .. ']]')
      end
   	  infobox:node(p.add_entry('Part Number', parts))
	end
	
	-- market segment
    if frame.args.market then
      local markets = mw.html.create('td'):wikitext(frame.args.market)
      for i = 2, 5 do
      	if not frame.args['market_' .. i] then break end
      	markets:wikitext(', [[market segment::' .. frame.args['market_' .. i] .. ']]')
      end
   	  infobox:node(p.add_entry('Market', markets))
	end
	
	-- release date
	if frame.args.first_launched or frame.args.first_announced then
	  local release = mw.html.create('td')
	  if frame.args.first_announced then
	    release:wikitext('[[first launched::' .. frame.args.first_announced .. ']] (announced)')
	  end
	  if frame.args.first_launched then
	  	if frame.args.first_announced then
	  	  release:wikitext('<br>')	
  		end
	    release:wikitext('[[first launched::' .. frame.args.first_launched .. ']] (launch)')
	  end
	  infobox:node(p.add_entry('Release', release))
	end

    return infobox
end

return p