Skip to content

Instantly share code, notes, and snippets.

View cjac's full-sized avatar

C.J. Collier cjac

View GitHub Profile
Jun 05 09:00:45 build0 ipsec[14551]: 07[CFG] received stroke: initiate 'shiftboard'
Jun 05 09:00:45 build0 ipsec[14551]: 08[IKE] queueing ISAKMP_VENDOR task
Jun 05 09:00:45 build0 ipsec[14551]: 08[IKE] queueing ISAKMP_CERT_PRE task
Jun 05 09:00:45 build0 ipsec[14551]: 08[IKE] queueing MAIN_MODE task
Jun 05 09:00:45 build0 ipsec[14551]: 08[IKE] queueing ISAKMP_CERT_POST task
Jun 05 09:00:45 build0 ipsec[14551]: 08[IKE] queueing ISAKMP_NATD task
Jun 05 09:00:45 build0 ipsec[14551]: 08[IKE] queueing QUICK_MODE task
Jun 05 09:00:45 build0 ipsec[14551]: 08[IKE] activating new tasks
Jun 05 09:00:45 build0 ipsec[14551]: 08[IKE] activating ISAKMP_VENDOR task
Jun 05 09:00:45 build0 charon[14565]: 08[IKE] queueing MAIN_MODE task
@cjac
cjac / gist:ccc73b6126d5ef8576cd259af11ea9c0
Last active July 6, 2018 20:30
repro steps for verifying DEV-6656
# Switch site to People Staffing
# Get Account ID of Aaron Aardvark
# Get Account ID of Bob Bobson
# Get Group ID of Guards
# Enable tradeboard application
# tradeboard role restriction ->
# enable tradeboard in application settings (all trades)
# app settings -> tradeboard -> approval required
# team settings -> tradeboard -> approval required
my $toolhead_node = $dom->find( 'td.toolhead-table-cell span.toolhead' );
my @found;
$toolhead_node->each(
sub {
my ( $toolhead_node ) = ( @_ );
push( @found, $toolhead_node )
if ( $toolhead_node->text eq $field_label );
} );
@cjac
cjac / gist:c1ea8ceb16f0e8cdfb4ef2008760b7f7
Created September 11, 2018 23:25
utf8 db round trip tests
with 'use utf8;' pragma:
not ok 3 - lightly mixed utf8 string [läbel] round trips correctly
# Failed test 'lightly mixed utf8 string [läbel] round trips correctly'
# at t/web/dev-7476.t line 139.
# got: 'l�bel'
# expected: 'läbel'
# $VAR1 = {
# 'got' => "l\x{e4}bel",
$dbh->do("drop table if exists $test_table_name");
my $create_query = qq{
CREATE TABLE $test_table_name (
id INT NOT NULL AUTO_INCREMENT PRIMARY KEY,
$ grep 'mysql_init' /usr/include/mariadb/mysql.h
MYSQL * STDCALL mysql_init(MYSQL *mysql);
MYSQL * (STDCALL *mysql_init)(MYSQL *mysql);
$ sudo systemctl status mariadb
● mariadb.service - MariaDB 10.3.18 database server
Loaded: loaded (/lib/systemd/system/mariadb.service; enabled; vendor preset: enabled)
Active: failed (Result: exit-code) since Mon 2019-11-18 11:16:53 PST; 9min ago
Docs: man:mysqld(8)
https://mariadb.com/kb/en/library/systemd/
Process: 32203 ExecStartPre=/usr/bin/install -m 755 -o mysql -g root -d /var/run/mysqld (code=exited, status=127)
Nov 18 11:16:53 raku systemd[1]: Starting MariaDB 10.3.18 database server...
Nov 18 11:16:53 raku systemd[1]: mariadb.service: Control process exited, code=exited status=127
Nov 18 11:27:10 raku systemd[1]: Starting MariaDB 10.3.18 database server...
-- Subject: Unit mariadb.service has begun start-up
-- Defined-By: systemd
-- Support: https://www.debian.org/support
--
-- Unit mariadb.service has begun starting up.
Nov 18 11:27:10 raku systemd[1]: mariadb.service: Control process exited, code=exited status=127
Nov 18 11:27:10 raku systemd[1]: Failed to start MariaDB 10.3.18 database server.
-- Subject: Unit mariadb.service has failed
-- Defined-By: systemd
cjac@raku:~/src$ perl6 mysql.p6
DBIish: DBDish::mysql needs 'mysqlclient', not found
in block at /home/cjac/.perl6/sources/28DDCAF3900BFC0EDFD827B501FCE9A173F5DDC5 (DBIish) line 38
in any at /home/cjac/.perl6/sources/28DDCAF3900BFC0EDFD827B501FCE9A173F5DDC5 (DBIish) line 33
in method setup at /opt/rakudo-pkg/share/perl6/core/sources/947BDAB9F96E0E5FCCB383124F923A6BF6F8D76B (NativeCall) line 287
in method CALL-ME at /opt/rakudo-pkg/share/perl6/core/sources/947BDAB9F96E0E5FCCB383124F923A6BF6F8D76B (NativeCall) line 576
in method connect at /home/cjac/.perl6/sources/1383944AE93210452C7304710C8EBAA5B11408DA (DBDish::mysql) line 12
in method connect at /home/cjac/.perl6/sources/28DDCAF3900BFC0EDFD827B501FCE9A173F5DDC5 (DBIish) line 45
in block <unit> at mysql.p6 line 8
cjac@raku:/usr/src/github/perl6/DBIish$ git diff
diff --git a/lib/DBDish/mysql/Native.pm6 b/lib/DBDish/mysql/Native.pm6
index 79e8bd9..e26c4b3 100644
--- a/lib/DBDish/mysql/Native.pm6
+++ b/lib/DBDish/mysql/Native.pm6
@@ -6,7 +6,7 @@ use NativeLibs;
use NativeHelpers::Blob;
constant LIB = NativeLibs::Searcher.at-runtime(
- Rakudo::Internals.IS-WIN ?? 'mysql' !! 'mysqlclient',