Harbour/[x]Harbour LAN STRES UTIL

400 views
Skip to first unread message

Roberto Borges

unread,
Aug 1, 2018, 2:17:17 PM8/1/18
to Harbour Users
Greetings to my noble and dear and dear colleagues.

Recently, a Great Friend has asked me to set up a file server for one of their clients, which runs their APP on Good and Old War Clipper. But it would have to be extremely simple, robust, effective, stable at low cost and very high throughput, without the use of AD / DC, of ​​users / groups and complex passwords, it would be a resource share, appearing in the Network as a remote drive (F: \), similar to Novell NetWare, is clear and obvious keeping its due proportions. Well, I requested the purchase of a Core i8, with 16GB of RAM and 1TB of HD at 7200 RPM's. And GigaBit Ethernet network card. I installed the Ubuntu 18.04 Server LTS AMD64, as well as the SAMBA provided by the distribution packages. I used the XFS file system because of its stability, scalability, reliability, and maturity. This is in LVM configuration. When migrating to this new environment, my friend was impressed with the gain from the old server, doing and redoing the tests, even by giving up and convinced, that it was worth the migration, and in a Old server crashed moments later, UFA, lucky LUCK luck, and there is still a factor, the aina network switch is a 10/100 Fast Ethernet, I have already requested a 10/100/1000 GigaBit Ethernet switch.

To make it easier for colleagues, I created a program for network stress, using some routines that I took from NET and adding some others of my own, please take it easy, I'm an IT enthusiast, not a programmer. Rsrsrsrssr.

I'll send the sources as well as .HBP.

It's only 3 files.

smbstres.hbp
main.prg
librgblc.prg

hbmk2 smbstres.hbp, and that's it ... just check it out ...

The idea is to create a certain number of files and records, and it will create all that traffic on the network.

Limited to 62,779 (.DBF'S) in * Unix Like, and 124 in Ms-Dos Like, for Windows, I do not have any equipment available for testing.

Let's adjust first ...

As well as some tweaks in the Ubuntu configuration. That said, let's go to the facts.

How much the settings ...

In …

# /etc/security/limits.conf at the end of the file.

root hard nofile 1048576
root soft  nofile 1048576

root soft stack 16777216

nobody hard nofile 1048576
nobody soft  nofile 1048576

@nogroup hard nofile 1048576
@nogroup soft  nofile 1048576

* soft stack 16777216

* hard nofile 1048576
* soft  nofile 1048576

# End of file

In …

# /etc/sysctl.conf

# Increase size of file handles and inode cache
fs.file-max=16777216
      
In …

# / etc / rc.local

#! / bin / sh -e
#
# rc.local
#
# This script is executed at the end of each runlevel multiuser.
# Make sure that the script will "exit 0" on success or any other
# value on error.
#
# In order to enable or disable this script just change the execution
# bits.
#
# By default this script does nothing.

#
bash -c "/etc/rc.rgb 2> & 1 &"
#
exit 0
#

In …

# /etc/rc.rgb

#! / bin / bash
#
# rc.rgb

#
logmsg = "/usr/bin/logger -s -t rc.rgb"
#

########################
trap '' INT TSTP

#STTY = $ (stty -g)

#stty intr undef
#stty susp undef

########################

#
/bin/mount -t tmpfs tmpfs /run/lock -o remount, size=8388608

$ logmsg "* * * RGB-ALERT * * * -> System On and / or Rebooting ... (rc.rgb)"
#

echo "Ubuntu 18.04 Server LTS \ n \ s \ m \ l"> / etc / issue
echo "Welcome !!!"              >> / etc / issue
echo "Today is \ d \ t @ \ n" >> / etc / issue
echo "                                " >> / etc / issue

/usr/bin/screenfetch -E   >> / etc / issue

echo "" >> / etc / issue

echo "Help Call!" Roberto Borges at [robert...@gmail.com] or +55 (85) 9 8677-0779 - Fortaleza, Ce (BR). "/ etc / issue
echo "" >> / etc / issue

###############

trap - INT TSTP
#stty $ {STTY}

###############
#
# / usr / bin / setterm -blank 0
#
exit 0
#

Best Regards

files.7z

Francesco Perillo

unread,
Aug 1, 2018, 2:33:32 PM8/1/18
to harbou...@googlegroups.com
Hi Roberto
Thank you for this code.

I think that the most important file in your setup is the one you didn't send... samba configuration.

It is important, in some cases of vital importance, that OPLOCKS are disabled in samba... disabling oplocks, you will incur in speed penalties, varying depending on your code...



--
--
You received this message because you are subscribed to the Google
Groups "Harbour Users" group.
Unsubscribe: harbour-user...@googlegroups.com
Web: http://groups.google.com/group/harbour-users

---
You received this message because you are subscribed to the Google Groups "Harbour Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email to harbour-user...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.

Roberto Borges

unread,
Aug 1, 2018, 2:46:36 PM8/1/18
to Harbour Users
Oops .... TKS Fperillo ...

smb.conf
=======

#
# Sample configuration file for the Samba suite for Debian GNU/Linux.
#
#
# This is the main Samba configuration file. You should read the
# smb.conf(5) manual page in order to understand the options listed
# here. Samba has a huge number of configurable options most of which 
# are not shown in this example
#
# Some options that are often worth tuning have been included as
# commented-out examples in this file.
#  - When such options are commented with ";", the proposed setting
#    differs from the default Samba behaviour
#  - When commented with "#", the proposed setting is the default
#    behaviour of Samba but the option is considered important
#    enough to be mentioned here
#
# NOTE: Whenever you modify this file you should run the command
# "testparm" to check that you have not made any basic syntactic 
# errors. 

#======================= Global Settings =======================

[global]

## Browsing/Identification ###

# Change this to the workgroup/NT-domain name your Samba server will part of
   workgroup              = client
   netbios name           = SERVER
   realm                  = CLIENT
   netbios name           = SERVER
   server string          = SERVER
   security               = user
   usershare allow guests = Yes
   guest ok               = yes

# server string is the equivalent of the NT Description field
server string = %h server (Samba, Ubuntu)

# Windows Internet Name Serving Support Section:
# WINS Support - Tells the NMBD component of Samba to enable its WINS Server
#   wins support = no

# WINS Server - Tells the NMBD components of Samba to be a WINS Client
# Note: Samba can be either a WINS Server, or a WINS Client, but NOT both
;   wins server = w.x.y.z

# This will prevent nmbd to search for NetBIOS names through DNS.
   dns proxy = no

#### Networking ####

# The specific set of interfaces / networks to bind to
# This can be either the interface name or an IP address/netmask;
# interface names are normally preferred
;   interfaces = 127.0.0.0/8 eth0

# Only bind to the named interfaces and/or networks; you must use the
# 'interfaces' option above to use this.
# It is recommended that you enable this feature if your Samba machine is
# not protected by a firewall or is a firewall itself.  However, this
# option cannot handle dynamic or non-broadcast interfaces correctly.
;   bind interfaces only = yes



#### Debugging/Accounting ####

# This tells Samba to use a separate log file for each machine
# that connects
   log file = /var/log/samba/log.%m

# Cap the size of the individual log files (in KiB).
   max log size = 1000

# If you want Samba to only log through syslog then set the following
# parameter to 'yes'.
#   syslog only = no

# We want Samba to log a minimum amount of information to syslog. Everything
# should go to /var/log/samba/log.{smbd,nmbd} instead. If you want to log
# through syslog you should set the following parameter to something higher.
#   syslog = 0

# Do something sensible when Samba crashes: mail the admin a backtrace
   panic action = /usr/share/samba/panic-action %d


####### Authentication #######

# Server role. Defines in which mode Samba will operate. Possible
# values are "standalone server", "member server", "classic primary
# domain controller", "classic backup domain controller", "active
# directory domain controller". 
#
# Most people will want "standalone sever" or "member server".
# Running as "active directory domain controller" will require first
# running "samba-tool domain provision" to wipe databases and create a
# new domain.
   server role = standalone server

# If you are using encrypted passwords, Samba will need to know what
# password database type you are using.  
   passdb backend = tdbsam

   obey pam restrictions = yes

# This boolean parameter controls whether Samba attempts to sync the Unix
# password with the SMB password when the encrypted SMB password in the
# passdb is changed.
   unix password sync = yes

# For Unix password sync to work on a Debian GNU/Linux system, the following
# parameters must be set (thanks to Ian Kahan <<ka...@informatik.tu-muenchen.de> for
# sending the correct chat script for the passwd program in Debian Sarge).
   passwd program = /usr/bin/passwd %u
   passwd chat = *Enter\snew\s*\spassword:* %n\n *Retype\snew\s*\spassword:* %n\n *password\supdated\ssuccessfully* .

# This boolean controls whether PAM will be used for password changes
# when requested by an SMB client instead of the program listed in
# 'passwd program'. The default is 'no'.
   pam password change = yes

# This option controls how unsuccessful authentication attempts are mapped
# to anonymous connections
   map to guest = bad user

########## Domains ###########

#
# The following settings only takes effect if 'server role = primary
# classic domain controller', 'server role = backup domain controller'
# or 'domain logons' is set 
#

# It specifies the location of the user's
# profile directory from the client point of view) The following
# required a [profiles] share to be setup on the samba server (see
# below)
;   logon path = \\%N\profiles\%U
# Another common choice is storing the profile in the user's home directory
# (this is Samba's default)
#   logon path = \\%N\%U\profile

# The following setting only takes effect if 'domain logons' is set
# It specifies the location of a user's home directory (from the client
# point of view)
;   logon drive = H:
#   logon home = \\%N\%U

# The following setting only takes effect if 'domain logons' is set
# It specifies the script to run during logon. The script must be stored
# in the [netlogon] share
# NOTE: Must be store in 'DOS' file format convention
;   logon script = logon.cmd

# This allows Unix users to be created on the domain controller via the SAMR
# RPC pipe.  The example command creates a user account with a disabled Unix
# password; please adapt to your needs
; add user script = /usr/sbin/adduser --quiet --disabled-password --gecos "" %u

# This allows machine accounts to be created on the domain controller via the 
# SAMR RPC pipe.  
# The following assumes a "machines" group exists on the system
; add machine script  = /usr/sbin/useradd -g machines -c "%u machine account" -d /var/lib/samba -s /bin/false %u

# This allows Unix groups to be created on the domain controller via the SAMR
# RPC pipe.  
; add group script = /usr/sbin/addgroup --force-badname %g

############ Misc ############

# Using the following line enables you to customise your configuration
# on a per machine basis. The %m gets replaced with the netbios name
# of the machine that is connecting
;   include = /home/samba/etc/smb.conf.%m

# Some defaults for winbind (make sure you're not using the ranges
# for something else.)
;   idmap uid = 10000-20000
;   idmap gid = 10000-20000
;   template shell = /bin/bash

# Setup usershare options to enable non-root users to share folders
# with the net usershare command.

# Maximum number of usershare. 0 (default) means that usershare is disabled.
;   usershare max shares = 100

# Allow users who've been granted usershare privileges to create
# public shares, not just authenticated ones
   usershare allow guests = yes

#rpc_server:spoolss = external
#rpc_daemon:spoolssd = fork

#======================= Share Definitions =======================

# Un-comment the following (and tweak the other settings below to suit)
# to enable the default home directory shares. This will share each
# user's home directory as \\server\username
;[homes]
;   comment = Home Directories
;   browseable = no

# By default, the home directories are exported read-only. Change the
# next parameter to 'no' if you want to be able to write to them.
;   read only = yes

# File creation mask is set to 0700 for security reasons. If you want to
# create files with group=rw permissions, set next parameter to 0775.
;   create mask = 0700

# Directory creation mask is set to 0700 for security reasons. If you want to
# create dirs. with group=rw permissions, set next parameter to 0775.
;   directory mask = 0700

# By default, \\server\username shares can be connected to by anyone
# with access to the samba server.
# Un-comment the following parameter to make sure that only "username"
# can connect to \\server\username
# This might need tweaking when using external authentication schemes
;   valid users = %S

# Un-comment the following and create the netlogon directory for Domain Logons
# (you need to configure Samba to act as a domain controller too.)
;[netlogon]
;   comment = Network Logon Service
;   path = /home/samba/netlogon
;   guest ok = yes
;   read only = yes

# Un-comment the following and create the profiles directory to store
# users profiles (see the "logon path" option above)
# (you need to configure Samba to act as a domain controller too.)
# The path below should be writable by all users so that their
# profile directory may be created the first time they log on
;[profiles]
;   comment = Users profiles
;   path = /home/samba/profiles
;   guest ok = no
;   browseable = no
;   create mask = 0600
;   directory mask = 0700


[F]
   comment = "Remote Disk (F:\)"

   path = /opt/fkrt

   browsable      = Yes

   create mask    = 0775
   directory mask = 0775
   #
   create mask          = 0764
   force create mode    = 0764

   directory mask       = 0775
   force directory mode = 0775
   #

   writable       = Yes
   guest ok       = Yes
   read only      = No

#[R]   
#   comment = Disco remoto (R:\)
#   path = /home/usrosadm/.wine/drive_c
#   read only = No
#   writable=Yes
#   browseable = Yes

#[HP-2540]
#    comment=HP 2540
#    printer=HP_Deskjet_2540_series
#    path=/var/spool/samba
#    printing=cups
#    printable=yes
#    #printer admin=@admin root yourusername
#    #user client driver=yes
#    # to allow user 'guest account' to print.
#    guest ok=No
#    writable=Yes
#    #write list=@adm root yourusername
#    #valid users=@adm root yourusername

#[printers]
#   comment = All Printers
#   browseable = no
#   path = /var/spool/samba
#   printable = yes
#   guest ok = No
#   read only = no
#   create mask = 0700

# Windows clients look for this share name as a source of downloadable
# printer drivers
#[print$]
#   comment = Printer Drivers
#   path = /var/lib/samba/printers
#   browseable = yes
#   read only = no
#   guest ok = No

# Uncomment to allow remote administration of Windows print drivers.
# You may need to replace 'lpadmin' with the name of the group your
# admin users are members of.
# Please note that you also need to set appropriate Unix permissions
# to the drivers directory for these users to have write rights in it
;   write list = root, @lpadmin

#EOF

Diego Fazio

unread,
Aug 1, 2018, 4:03:20 PM8/1/18
to Harbour Users
In the smb.conf in [Global] add 

max protocol = SMB2
And disable the SMBv1 in windows clients
You did not think about using SSD? it's a really significant difference. If you host incremental databases it's perfect.

Diego.

Francesco Perillo

unread,
Aug 1, 2018, 4:17:50 PM8/1/18
to harbou...@googlegroups.com
Is smb2 usable? Shouldn't he disable oplocks?

Diego Fazio

unread,
Aug 1, 2018, 4:26:11 PM8/1/18
to Harbour Users
Both yes.
I forgot....I think the change must be...

[global]
"min protocol = SMB2"

and not "max protocol" and then restart the server.
Diego.

Roberto Borges

unread,
Aug 1, 2018, 4:33:37 PM8/1/18
to Harbour Users
Dear Diego and all

Ambient is Win-7 and Win-XP Runnig Clipper APP

TKS for tinks ...

Best Regards


Em quarta-feira, 1 de agosto de 2018 15:17:17 UTC-3, Roberto Borges escreveu:

Diego Fazio

unread,
Aug 1, 2018, 4:40:47 PM8/1/18
to Harbour Users
Uhh...Windows Xp does not support SMBv2

Diego.

Roberto Borges

unread,
Aug 1, 2018, 5:51:17 PM8/1/18
to Harbour Users
Dear All !!!

This procedures stres LAN, and this script to generate .PRG'S and make a more 800MB binary file to stres, C.P.U, RAM, SWAP and STACK ...

Prease test w/ Harbour and [x]Habour and view results ... post feedback please.

Best Regards


Em quarta-feira, 1 de agosto de 2018 15:17:17 UTC-3, Roberto Borges escreveu:
mk_prgs_hb.sh

mda.n...@gmail.com

unread,
Aug 4, 2018, 12:12:24 AM8/4/18
to Harbour Users
Thank you!. I will test it. and will get back to you.
Reply all
Reply to author
Forward
0 new messages