yasysdui 1.0.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA256:
+  metadata.gz: dc6996d90288b984473de433a8fc90e844aa0befdf4dac1a3cfd0bce05f8b675
+  data.tar.gz: 00442c19eab41de2c19b92eaeb84862510d1663b0db49270f53020f0db07fd29
+SHA512:
+  metadata.gz: 0bedfb66c7e346bdaf8b0fe4e67809570a670005cbbc3d659d6d5d49ccc19bded39e6e250308fa53484d5ae67519555aab0919502194c078e7577dde6515ea75
+  data.tar.gz: 9ca1e5c4a163c7fe0b5d91340b2382b56a60617ec3a2fc12134abfd3844022adad8a757cfe249f88781159dd6f602b01363474ccf3eedd8927f2161763924f01

data/bin/yasysdui

@@ -0,0 +1,210 @@
+#!/usr/bin/env ruby
+=begin
+  Start/stop systemd service **on demand**
+=end
+
+
+require 'gtk3'
+require 'yasysdui'
+
+# Obsolete 
+#$MANAGED_SERVICES = Array.new
+# Personalisation of managed services:
+# 
+# syntax: 
+# $MANAGED_SERVICES << "service_name" 
+#$MANAGED_SERVICES << "vpnagentd"
+#$MANAGED_SERVICES << "naclient"
+
+#*********** List of services************************
+def load_service_list
+
+  lsto = ServiceListStore.new_all_service
+
+# lsto = ServiceListStore.new
+# $MANAGED_SERVICES.each{|s| lsto.append_managed_service(s) }
+
+  lsto.sort_by_unit
+  
+  $list=FilteredServiceListStore.new(lsto)
+  sci = ServiceCatalog.instance
+
+# quick and dirty but working fast search (uses a full text index)
+	$list.set_visible_func( ){|model, iter| 
+		
+		if  $list.filterstr 
+			if $list.filterstr.length >= 2
+				servname = iter.get_value( Column_ID::Unit )
+				if servname
+					if rset = sci.idx[$list.filterstr]
+						rset.include?(servname)
+					end
+				else
+					false
+				end
+			else
+				true
+			end
+		else
+			true
+		end
+	 }
+end
+### a search field
+class FastSearchEntry < Gtk::SearchEntry
+  attr_accessor :tool_item
+  def initialize
+    super
+    @tool_item = Gtk::ToolItem.new
+    @tool_item.add(self)
+  end
+end
+
+#*********************************************************
+#The application toolbar, migh contain only global actions, like
+# reload/exit/search ...
+class AppToolbar < Gtk::Toolbar
+    def initialize
+        super
+        @item_count = 0
+        set_toolbar_style Gtk::ToolbarStyle::ICONS
+        @quit_bt = Gtk::ToolButton.new :stock_id => Gtk::Stock::QUIT
+        @reload_bt = Gtk::ToolButton.new :stock_id => Gtk::Stock::REFRESH
+        @fastsearch_in = FastSearchEntry.new
+        self.append(@reload_bt)
+        sep_start = Gtk::SeparatorToolItem.new
+        sep_start.draw = true;  sep_start.expand = false
+        self.append(sep_start)        
+        self.append(@fastsearch_in.tool_item)
+        sep_end = Gtk::SeparatorToolItem.new
+        sep_end.draw = false;  sep_end.expand = true
+        self.append(sep_end)
+        self.append(@quit_bt)   
+    end
+    def append(w)
+      self.insert(w, @item_count)
+      @item_count = @item_count + 1
+    end
+    def signal_quit_bt_clicked_connect(app)
+        @quit_bt.signal_connect("clicked"){ app.destroy; Gtk.main_quit }
+    end
+    def signal_reload_bt_clicked_connect(app)
+        @reload_bt.signal_connect("clicked"){ app.reload }
+    end
+    def signal_fastsearch_changed_connect(app)
+		@fastsearch_in.signal_connect("search_changed"){ 
+		 app.do_fastsearch(@fastsearch_in.text)
+	}
+    end
+end
+
+# the area to display informations about your units/services
+# will have a scrolled list and a detail view parts
+class InformationArea < Gtk::Paned
+    def initialize(scrolled_list, detail_area)
+        super(:vertical)
+        add1(scrolled_list)
+        add2(detail_area)
+    end
+end
+
+# The area to display a scrolled list of a part or all of your services
+class ListArea < Gtk::ScrolledWindow
+    attr_accessor :trv
+    def initialize
+        super
+        load_service_list
+        @trv = ServiceListView.new($list)
+        add(@trv)
+        self.height_request=(300)
+        self.hscrollbar_policy = self.vscrollbar_policy = :automatic
+#        self.max_content_height = 400
+#        self.min_content_height = 300
+    end
+end
+# The area to display detailled information about a selected service
+# and a service toolbar with some actions to be performed on
+# the selected service
+class DetailArea < Gtk::Box
+    def initialize(service_controler)
+
+        super(:vertical)
+
+        @tev = Gtk::TextView.new(service_controler.txtv)
+        @tev.editable = false
+        @tev.cursor_visible = false
+
+
+        @service_toolbar = ServiceToolbar.new(service_controler)
+
+        @tev_scroll = Gtk::ScrolledWindow.new
+        @tev_scroll.add(@tev)
+        @tev_scroll.height_request=(120)
+        @tev_scroll.hscrollbar_policy = @tev_scroll.vscrollbar_policy = :automatic
+        pack_start(@service_toolbar, :expand => false)
+        pack_end(@tev_scroll, :expand => true)
+
+    end
+end
+
+class ServiceToolbar < Gtk::ButtonBox
+    def initialize(service_controler)
+        super(:horizontal)
+
+        self.layout_style = :start
+        pack_start(service_controler.start_bt, :expand => false, :fill => false)
+        pack_start(service_controler.stop_bt, :expand =>false, :fill => false)
+        pack_start(service_controler.status_bt, :expand =>false, :fill => false)
+        pack_start(service_controler.restart_bt, :expand =>false, :fill => false)
+       
+    end
+end
+# the thing that everybody would call main Window
+
+# This will have:
+# a global toolbar for global actions
+# an information area (cf. below)
+# a filter area (planned)
+# no menubar yet
+class Application < Gtk::Window
+    def initialize
+        super
+        signal_connect("delete_event") {  false }
+        signal_connect("destroy") {  puts "Bye Bye";  Gtk.main_quit }
+        self.border_width = 1
+        
+        @list_area = ListArea.new
+             
+        @txtv = Gtk::TextBuffer.new
+
+        @service_controler = ServiceControler.new(@txtv, @list_area.trv)
+        @detail_area = DetailArea.new(@service_controler)
+        @info_area = InformationArea.new(@list_area, @detail_area)
+        
+        @vbox = Gtk::Box.new(:vertical)
+        @toolbar = AppToolbar.new
+        @toolbar.signal_quit_bt_clicked_connect(self)
+        @toolbar.signal_reload_bt_clicked_connect(self)
+        @toolbar.signal_fastsearch_changed_connect(self)
+        @vbox.pack_start(@toolbar, :expand => false)
+        @vbox.pack_end(@info_area, :expand => true)  
+                   
+        add(@vbox)
+        self.set_default_size(800, 500)
+    end
+    def reload
+      $list.child_model.reload 
+      @service_controler.connect_list_sel_to_textv
+    end
+    def do_fastsearch(text)
+		@list_area.trv.model.filterstr = text
+		@list_area.trv.model.refilter
+    end
+end
+
+app = Application.new
+
+app.show_all
+
+Gtk.main
+

data/lib/yasysdui.rb

@@ -0,0 +1,3 @@
+require 'pp'
+require_relative 'yasysdui/service_controler'
+require_relative 'yasysdui/service_list'

data/lib/yasysdui/command_button.rb

@@ -0,0 +1,13 @@
+require 'gtk3'
+
+class CommandButton < Gtk::Button
+
+   attr_accessor :ctrl
+   attr_accessor :actionStr
+   def initialize(actionStr, ctrl)
+      super(:label => actionStr)
+      @ctrl = ctrl
+      @actionStr = actionStr
+      self.signal_connect("clicked") {@ctrl.execute(@actionStr)}
+   end
+end

data/lib/yasysdui/index.rb

@@ -0,0 +1,37 @@
+
+require 'set'
+# quick and dirty "Full text" indexer for fastsearch.
+# works fine for small amounts of data
+
+module Indexable
+
+	def each_word
+		each_sentence{|sen|
+			sen.split(%r{[[:space:]]+|[[:punct:]]+}).each{|w| yield w }
+		}
+	end
+
+	def each_wordstart
+		each_word{|w| 
+			wstart = ''
+			w.downcase.each_char{|c|
+				wstart << c
+				yield wstart 
+			}
+		}	
+	end
+
+end
+
+
+
+class SimpleIndex < Hash
+	def compile(obj)
+		obj.each_wordstart {|ws| 
+			unless self.has_key?(ws)
+				self[ws] = Set.new
+			end
+			self[ws].add(obj)
+	}
+	end
+end

data/lib/yasysdui/service_catalog.rb

@@ -0,0 +1,118 @@
+require 'singleton'
+require_relative 'system_service'
+
+
+class ServiceCatalog < Hash
+    include Singleton
+    attr_accessor :idx
+    def initialize
+        super
+        @idx = SimpleIndex.new
+        self.get_all_service
+        self.build_index
+    end
+    def rebuild
+      clear
+      self.get_all_service
+      self.build_index
+    end
+    def build_index
+		print "Building fast search index... "
+		self.each_value{|srv|
+			@idx.compile(srv)
+		}
+		print "done\n"
+		
+    end
+    @@cmd_know_units = "sudo systemctl list-units -a -l -t service --no-pager --no-legend" 
+    @@initd= "/etc/init.d" 
+    @@initd_ignore = /README|.+~/ 
+## UNIT       LOAD   ACTIVE SUB       DESCRIPTION
+    @@rgx_ku = Regexp.new('\A([[:graph:]]+)\.service\s+' + 
+                       '([[:graph:]]+)\s+'+
+                       '([[:alnum:]]+)\s+'+
+                       '([[:alnum:]]+)\s+'+
+                       '([[:print:]]+)\Z')
+    @@cmd_list_unit_files = "sudo systemctl list-unit-files -a -l -t service --no-pager --no-legend"
+## UNIT       STATE
+    @@rgx_li = Regexp.new('\A([[:graph:]]+)\.service\s+' + 
+                          '([[:graph:]]+)\Z')       
+                                       
+# get all know systemd native units      from     systemctl list-units              
+    def get_all_known_units
+	    
+        match = nil; srv = nil
+		stdout_str, status = Open3.capture2( @@cmd_know_units )
+		if status.success?
+			stdout_str.each_line{|l|
+				match = @@rgx_ku.match(l.strip)
+				if match
+                    srv = SystemService.new(match[1] )
+                    srv.load = match[2]
+                    srv.active = match[3]
+                    srv.sub = match[4]
+                    srv.descr = match[5]
+					self[srv] = srv
+				else
+					puts l
+					raise "Failed parsing line printed above"
+				end
+			}
+			
+		end
+    end
+# add all know systemd  units  files  from  systemctl list-unit-files             
+    def add_units_from_file_list
+	    
+        match = nil; srv = nil
+		stdout_str, status = Open3.capture2( @@cmd_list_unit_files )
+		if status.success?
+			stdout_str.each_line{|l|
+				match = @@rgx_li.match(l.strip)
+				if match
+                    f = match[1]
+                    unless f.end_with?('@')    # ignore template units for now...
+						unless self.has_key?(f)
+							srv = SystemService.new( f )
+							srv.state = match[2]
+							srv.read_status_info 
+							self[srv] = srv if srv
+						else
+							self[f].state = match[2]
+						end
+                    end
+                else
+					puts l
+					raise "Failed parsing line printed above"
+				end
+			}
+			
+		end
+    end    
+# get all legacy init.d scripts    
+    def add_init_d_scripts
+        flist = Dir.glob("#@@initd/*").reject{|f| @@initd_ignore.match(f) }.map{|f| File.basename(f)}
+        flist.each{|f| 
+# only try to add an init script if it does not exist as an native systemd unit,
+# as these have precedence
+# these assumes we have to read native service before
+            if self.has_key?(f)
+                srv = self[f]
+                srv.overrides_legacy = true
+                srv.read_state
+            else
+                srv = SystemServiceLegacy.new( f )
+                self[srv] = srv if srv
+            end
+        }
+    end
+# get all available units/scripts    
+    def get_all_service
+        pp :getting_all_services
+        get_all_known_units; pp :got_all_known_units
+        add_units_from_file_list; pp :got_all_units_from_file
+        add_init_d_scripts; pp :got_all_init_scripts
+        puts "Built service catalog with #{self.size} item(s)" 
+		self
+	end   
+end

data/lib/yasysdui/service_controler.rb

@@ -0,0 +1,55 @@
+
+require 'open3'
+require_relative 'command_button'
+require_relative 'service_list'
+require_relative 'system_service'
+
+class ServiceControler
+	attr_accessor :service  
+	attr_accessor :start_bt 
+	attr_accessor :stop_bt 
+	attr_accessor :status_bt
+  attr_accessor :restart_bt
+	attr_accessor :txtv 
+  attr_accessor :listv 
+  @@cmd = "sudo systemctl"
+
+	def initialize(txtv, listv)
+		@txtv = txtv
+		self.init_textv
+		@listv = listv
+		@start_bt = CommandButton.new("Start", self)
+		@stop_bt = CommandButton.new("Stop",self)
+		@status_bt = CommandButton.new("Status", self)
+		@restart_bt = CommandButton.new("Restart", self)
+		connect_list_sel_to_textv  
+	end
+	def init_textv
+	  @txtv.text = "No service selected"
+	end
+	def connect_list_sel_to_textv
+	  @listv.signal_connect_sel_changed(self)
+	end
+  def execute(action)
+		if @service then
+			@action_output, @action_call_status = Open3.capture2e("#@@cmd #{action.downcase}  #@service" )
+            self.ui_update(action)            
+		end
+	end
+  def ui_update(action) 
+# (always) update textView buffer text    
+        result_text = "#{action}: #{@service.descr} "
+        result_text << "\n Result: #{@action_call_status}"
+        result_text << "\n" + @action_output
+        @txtv.text =  result_text
+# update status info in the result list
+        if action.downcase == 'status'
+            @status_output = @action_output
+        else  # not sure if this makes senses in case systemctl call would be non-blocking
+              # but otherwise it makes
+           @status_output, status_call_status = Open3.capture2e("#@@cmd status  #@service" )   
+        end 
+        @service.set_status_info_from_output( @status_output )    
+        @listv.update_selected_row  
+    end
+end

data/lib/yasysdui/service_list.rb

@@ -0,0 +1,128 @@
+
+
+require_relative 'service_catalog'
+
+module Column_ID
+    Unit = 0
+    Load = 1
+    Active = 2
+    Sub = 3
+    Descr = 4
+    Native_info = 5
+    State = 6
+end
+
+class FilteredServiceListStore < Gtk::TreeModelFilter
+	attr_accessor :filterstr
+end
+
+class ServiceListStore < Gtk::ListStore
+	include Column_ID
+	def self.new_all_service
+		sl = ServiceListStore.new
+		sl.load_catalog
+		sl
+	end
+	def initialize
+		super(String, String, String, String, String, String, String)
+	end
+  def load_catalog
+    sci = ServiceCatalog.instance
+    puts "Loading Catalog with #{sci.size} item(s)"
+    sci.each_value{|s| append_service(s) }
+  end
+  def reload
+    clear  # clear Gtk::ListStore
+    ServiceCatalog.instance.rebuild
+    load_catalog
+  end
+	def append_managed_service(name)
+		if service =  ServiceCatalog.instance[name] 
+			append_service(service)
+		end
+	end
+	def append_service(service)
+		row = self.append 
+		row[ Unit ] = service
+        row[ Load ] = service.load
+        row[ Active ] = service.active
+        row[ Sub ] = service.sub
+		row[ Descr  ] = service.descr
+        row[ Native_info ] = service.native_info
+        row[ State ] = service.state
+	end	
+  def sort_by_unit
+    self.set_sort_column_id( Unit, :ascending)
+  end    
+end
+
+class TreeViewColumnToggle < Gtk::TreeViewColumn
+	@@cell_renderer =  Gtk::CellRendererToggle.new
+    def initialize(title, column_id )
+        attrs = { :active => column_id }
+        super(title, @@cell_renderer , attrs )
+        self.resizable = true 
+        self.sort_column_id = column_id
+    end
+end
+
+class TreeViewColumnText < Gtk::TreeViewColumn
+	@@cell_renderer =  Gtk::CellRendererText.new
+    def initialize(title, column_id )
+        attrs = { :text => column_id }
+        super(title, @@cell_renderer , attrs )
+        self.resizable = true 
+        self.sort_column_id = column_id
+    end
+end
+
+class ServiceListView < Gtk::TreeView
+  include Column_ID
+	def initialize(list)
+		super(list)
+		@list = list
+		@col1 = TreeViewColumnText.new("Unit", Unit )
+    
+		@col1.fixed_width = 200
+		@col1.sort_indicator = true
+        
+		@col2 = TreeViewColumnText.new("Load", Load )
+		@col3 = TreeViewColumnText.new("Active", Active )        
+		@col4 = TreeViewColumnText.new("Sub", Sub)  
+		@col5 = TreeViewColumnText.new("Description", Descr)
+		@col6 = TreeViewColumnText.new("Native?", Native_info)
+		@col7 = TreeViewColumnText.new("State", State)   
+
+        
+    self.append_column(@col1)
+    self.append_column(@col6)
+    self.append_column(@col7)
+  	self.append_column(@col2)
+    self.append_column(@col3)
+  	self.append_column(@col4)
+    self.append_column(@col5)
+        
+    self.enable_search = true
+	end
+
+	def signal_connect_sel_changed(sctrl)
+		@sel = self.selection
+		@sel.mode = :browse
+		@sel.signal_connect("changed"){
+		  if @sel.selected
+        @service = ServiceCatalog.instance[@sel.selected[Unit] ]
+			  sctrl.service = @service
+			  sctrl.execute("Status")
+			else
+			  sctrl.init_textv
+			end
+		}
+	end
+    
+  def update_selected_row
+    iter = self.model.convert_iter_to_child_iter( @sel.selected )
+	iter.set_value(Load, @service.load)
+    iter.set_value(Active, @service.active)
+    iter.set_value(Sub, @service.sub)
+  end 
+end

data/lib/yasysdui/system_service.rb

@@ -0,0 +1,147 @@
+require_relative 'index' 
+require 'pp'
+
+class SystemService < String
+   include Indexable
+   attr_accessor :descr
+   attr_accessor :state
+   attr_accessor :load
+   attr_accessor :active
+   attr_accessor :sub
+   attr_accessor :overrides_legacy
+   attr_accessor :filename_full
+   
+   @@cmd_info = "sudo systemctl status" 
+   @@descr_rgx = /\A.+\.service\s+-\s+([[:print:]]+)\Z/
+   @@descr_masked_rgx = /\A.+\.service\Z/   
+   @@loaded_rgx = /\ALoaded:\s+([[:graph:]]+)\s+\((.*)\)\Z/
+   @@active_rgx = /\AActive:\s+([[:graph:]]+)\s+\(([[:graph:]]+)\).*\Z/
+   @@warning_rgx = /\AWarning:/
+   @@status_read_failed_rgx = Regexp.new('\AFailed to get properties:.*\Z')
+   @@status_unit_notfound_rgx = Regexp.new('\AUnit\s[[:graph:]]+\scould\snot\sbe\sfound.\Z')   
+   def set_status_info_from_output( action_output )
+        @status_info_raw = action_output
+        self.parse_status_info
+   end
+# This provides the texts to index (module Indexable)    
+   	def each_sentence
+		yield self.to_str
+		yield @descr unless  @descr.nil?
+	end
+   def parse_status_info
+        match = nil
+		return if self.handle_masked_info
+        info_tab = @status_info_raw.lines.reject{|l| @@warning_rgx.match(l) }
+        info_tab.map!{|r| r.strip}
+        if @@status_read_failed_rgx.match(info_tab[0])
+            return nil
+        end    
+       if @@status_unit_notfound_rgx.match(info_tab[0])
+            return nil
+        end                
+        if match = @@descr_rgx.match(info_tab[0])
+            self.descr = match[1]
+        else
+# masked script/service without description returned     
+            if match = @@descr_masked_rgx.match(info_tab[0])
+            else
+                puts info_tab[0]
+                raise "Failed parsing line printed above"
+            end
+
+        end 
+# complete data
+        if match
+            match = @@loaded_rgx.match(info_tab[1])
+            if match 
+                self.load = match[1]  
+                load_info = match[2].split(';')
+                self.filename_full = load_info[0]
+                self.state = load_info[1]
+            end    
+            match = @@active_rgx.match(info_tab[2].strip)
+            if match
+                self.active = match[1]   
+                self.sub = match[2]
+            end
+        end
+
+   end
+   def handle_masked_info
+        if self.state == 'masked'
+            @load = 'masked'
+            @active = 'inactive'
+            @sub = 'dead'
+            true
+        else
+			false
+        end   
+   end
+   def read_status_info
+        return nil if self.end_with?("@")
+        return if self.handle_masked_info
+		@status_info_raw, status = Open3.capture2("#@@cmd_info #{self.to_s}" )
+		if @status_info_raw.lines.size > 0
+            self.parse_status_info
+        else
+# TODO: a more decent error handling...        
+             puts "Failed getting service status info for"
+             pp self
+        end
+   end
+   def read_state
+        return nil if self.end_with?("@")
+        match = nil
+		stdout_str, status = Open3.capture2("#@@cmd_info #{self.to_s}" )
+		if stdout_str.lines.size > 0
+
+            info_tab = stdout_str.lines.reject{|l| @@warning_rgx.match(l) }
+            if @@status_read_failed_rgx.match(info_tab[0].strip)
+                return nil
+            end            
+            match = @@loaded_rgx.match(info_tab[1].strip)
+            if match 
+                load_info = match[2].split(';')
+                self.filename_full = load_info[0]
+                self.state = load_info[1]
+            end    
+                
+
+        else
+             puts "Failed getting service state info for"
+             pp self
+              
+        end
+   end
+# default constructor, takes unit name   
+   def initialize(str)
+      super(str)
+      @overrides_legacy = false
+   end
+   def native_info
+# yes+   : native and overrides init script
+# yes    : native and no init script
+# no     : init script   
+     if    self.native?
+        @overrides_legacy ? "yes+" : "yes"
+     else
+		"no"
+     end
+   end
+   def native?
+      true
+   end
+    
+end
+
+class SystemServiceLegacy < SystemService
+
+   def initialize(str)
+        super(str)        
+        self.read_status_info
+   end
+   def native?
+        false
+   end
+end
+

metadata

@@ -0,0 +1,66 @@
+--- !ruby/object:Gem::Specification
+name: yasysdui
+version: !ruby/object:Gem::Version
+  version: 1.0.0
+platform: ruby
+authors:
+- Denis Mertz
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2018-09-09 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: gtk3
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.2'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '3.2'
+description: A quick and dirty gtk3 ui wrapper around systemd/systemctl
+email: dev@familie-mertz.eu
+executables:
+- yasysdui
+extensions: []
+extra_rdoc_files: []
+files:
+- bin/yasysdui
+- lib/yasysdui.rb
+- lib/yasysdui/command_button.rb
+- lib/yasysdui/index.rb
+- lib/yasysdui/service_catalog.rb
+- lib/yasysdui/service_controler.rb
+- lib/yasysdui/service_list.rb
+- lib/yasysdui/system_service.rb
+homepage: https://gitlab.com/d1mertz1/yasysdui
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.7.6
+signing_key: 
+specification_version: 4
+summary: Yet another systemd ui
+test_files: []