conky_carelli_Painel.lua

require 'cairo'

-- Converte o ângulo de graus para radianos
-- E corrige o ângulo inicial do arco (-90º)
function angulo( graus )
    radianos = (graus - 90) * (math.pi/180)
    return radianos
end

function rgb( r, g, b )
    red = r/255
    green = g/255
    blue = b/255

    return red, green, blue
end

function hex2rgb(hex)
	hex = hex:gsub("#","")
	return (tonumber("0x"..hex:sub(1,2))/255), (tonumber("0x"..hex:sub(3,4))/255), tonumber(("0x"..hex:sub(5,6))/255)
end

function indicador_barra_h(x, y, valor, max, log, red, green, blue)
    --SETTINGS FOR CPU INDICATOR BAR
    bar_bottom_left_x = x
    bar_bottom_left_y = y
    bar_width = 100
    bar_height = 5

    --set bar background colors
    bar_bg_red,bar_bg_green,bar_bg_blue=rgb(200,200,200)
    bar_bg_alpha=1

    --set indicator colors
    bar_in_red=red
    bar_in_green=green
    bar_in_blue=blue
    bar_in_alpha=1

    --draw background
    cairo_set_source_rgba(cr, bar_bg_red, bar_bg_green, bar_bg_blue, bar_bg_alpha)
    cairo_rectangle(cr, bar_bottom_left_x, bar_bottom_left_y, bar_width, -bar_height)
    cairo_fill (cr)

    if log == true then
      -- Logarithmic scale
      minp = 0
      maxp = bar_width

      -- The result should be between 100 and max
      minv = math.log(1)
      maxv = math.log(max)

      -- calculate adjustment factor
      scale = (maxv-minv) / (maxp-minp)

      indicator_width = math.exp(minv + scale*(valor-minp))
    else
      proportion = valor/max
      indicator_width=proportion*bar_width
    end

    --draw indicator
    cairo_set_source_rgba (cr, bar_in_red, bar_in_green, bar_in_blue, bar_in_alpha)
    cairo_rectangle (cr, bar_bottom_left_x, bar_bottom_left_y, indicator_width, -bar_height)
    cairo_fill (cr)
end

function indicador_arco(x, y, valor, label, red, green, blue)
    --SETTINGS
    --rings size
    ring_center_x=x
    ring_center_y=y

    ring_radius=50
    ring_width=10

    --colors
    --set background colors
    ring_in_red, ring_in_green, ring_in_blue=rgb(0,0,0)
    ring_in_alpha=1

    --set indicator colors
    ring_bg_red=red
    ring_bg_green=green
    ring_bg_blue=blue
    ring_bg_alpha=1

    --indicator value settings
    value=valor
    max_value=100

    --draw background
    cairo_set_line_width (cr,ring_width)
    cairo_set_source_rgba (cr,ring_bg_red,ring_bg_green,ring_bg_blue,ring_bg_alpha)
    cairo_arc (cr,ring_center_x,ring_center_y,ring_radius,0,2*math.pi)
    cairo_stroke (cr)

    cairo_set_line_width (cr,ring_width+2)
    start_angle = angulo(0)
    end_angle=angulo( value*(360/max_value) )

    --print (end_angle)
    cairo_set_source_rgba (cr,ring_in_red,ring_in_green,ring_in_blue,ring_in_alpha)
    cairo_arc (cr,ring_center_x,ring_center_y,ring_radius,start_angle,end_angle)
    cairo_stroke (cr)

    -- Label
    -- Centraliza o texto no arco
    local extents = cairo_text_extents_t:create()
    tolua.takeownership(extents)
    cairo_text_extents(cr, label, extents)
    x = ring_center_x - (extents.width / 2 + extents.x_bearing)
    y = ring_center_y - (extents.height / 2 + extents.y_bearing) - 9

    texto(label, x, y, red, green, blue )

    txt = valor .. "%"
    cairo_text_extents(cr, txt, extents)
    x = ring_center_x - (extents.width / 2 + extents.x_bearing)
    y = ring_center_y - (extents.height / 2 + extents.y_bearing) + 9

    texto(txt, x, y, red, green, blue )
end

function texto(txt, x, y, r, g, b)
    -- Configura o tipo e o tamanho da fonte que será utilizada
    font="Technical CE"
    font_size=20
    font_slant=CAIRO_FONT_SLANT_NORMAL
    font_face=CAIRO_FONT_WEIGHT_BOLD

    -- Inicializa o Cairo com as configurações de fontes
    cairo_select_font_face (cr, font, font_slant, font_face);
    cairo_set_font_size (cr, font_size)

    text=txt
    xpos,ypos=x,y
    red,green,blue = r,g,b
    alpha=1
    cairo_set_source_rgba (cr,red,green,blue,alpha)

    cairo_move_to (cr,xpos,ypos)
    cairo_show_text (cr,text)
    cairo_stroke (cr)
end

function conky_main()

    space = 130

    -- Inicial posisions
    x=55
    y=70

    if conky_window == nil then
        return
    end

    local cs = cairo_xlib_surface_create(conky_window.display,
                                         conky_window.drawable,
                                         conky_window.visual,
                                         conky_window.width,
                                         conky_window.height)
    cr = cairo_create(cs)

    -- Indicador CPU
    valor = conky_parse("${cpu cpu0}")
    indicador_arco(x, y, valor, "CPU", rgb(255, 117, 49))

    -- Indicador RAM
    y=y+space
    valor = conky_parse("${memperc}")
    indicador_arco(x, y, valor, "RAM", rgb(255, 255, 112))

    -- Indicador SWAP
    y=y+space
    valor = conky_parse("${swapperc}")
    indicador_arco(x, y, valor, "SWAP", rgb(220, 127, 220))

    -- Indicador Disco (Home)
    y=y+space
    valor  = 100-tonumber(conky_parse("${fs_free_perc /home}"))
    indicador_arco(x, y, valor, "Home", rgb(0, 164, 209))

    -- Indicador Disco (Root)
    y=y+space
    valor  = 100-tonumber(conky_parse("${fs_free_perc /}"))
--    indicador_arco(x, y, valor, "Root", rgb(141, 255, 141))
    indicador_arco(x, y, valor, "Root", hex2rgb("#44d31f"))

    cairo_destroy(cr)
    cairo_surface_destroy(cs)
    cr=nil
end