テックメモ – 当ブログは自分用のメモです。昔のメモをそのまま移行しただけの記事もあり一部不正確な記述もあります。

2019-02-142019-02-14に投稿投稿者 okamura

MariaDB(Arch Linux on VirtualBox)

・先ずソースから挑戦

入ってなければ
pacman -S cmake
pacman -S ncurses

ソースをダウロードして解凍
tar zxvf mariadb-10.3.12.tar.gz
cd mariadb-10.3.12

cmake . -DCMAKE_INSTALL_PREFIX=/root/share/mariadb -DCMAKE_PREFIX_PATH=/var/lib/pacman/local/ncurses-6.1-6/ -DPLUGIN_TOKUDB=NO

(.はソースディレクトリでCMakeLists.txtが必要)
(DCMAKE_INSTALL_PREFIXはmake installしたときの配置先)

make -j 1
make -j install

パッと調べるとこんな感じのようだかエラーが出るので要調査。

・パッケージにて

pacman -S mariadb
mysql_install_db –user=mysql –basedir=/usr –datadir=/var/lib/mysql

2019-02-072019-02-13に投稿投稿者 okamura

カーネルのコンパイル(Arch Linux on VirtualBox)

・カーネルバージョン確認

uname -r

・カーネルソース保存

wget https://cdn.kernel.org/pub/linux/kernel/v4.x/linux-4.9.99.tar.gz

・シンボリックリンク

ln -s linux-4.9.99 linux

・コンフィグ作成

make clean && make mrproper
今までconfigで設定した内容の消去を行う。初期化。

Archのデフォルト設定を利用する場合。
zcat /proc/config.gz > .config

あるいは、

make localmodconfig
ゲストOS内で現在ロードされているカーネルモジュール情報から
カーネルに読みこまれていないmoduleを無効にした設定をおこなう。

・その他コンフィグ

必要な場合。

make oldconfig
今あるconfig使って、新しい設定だけを問い合わせてくるというものがある。

make config
対話型のコンフィギュレータ

make menuconfig
メニューベースのコンフィギュレータ

make xconfig
Xベースのコンフィギュレータ

・コンパイル

make

今回はbcが無いとエラーがでた。

pacman -S bc

makeは時間がかかる。

・カーネルモジュールのコンパイル

make modules_install

以下にコピーされる。

/lib/modules/xxx

・bootディレクトリにカーネルをコピー

名前の前にvmlinuz-をつけるのは必須。
cp -v /usr/src/linux-4.9.99/arch/x86_64/boot/bzImage /boot/vmlinuz-linux49

・initramfs生成

mkinitcpioを利用。

mkinitcpio -k 4.9.99 -g /boot/initramfs-linux49.img

/lib/modules/xxxのソースディレクトリ名を使う。

・ブートローダーの設定

/boot/grub/grub.cfg

linux /vmlinuz-linux …
initrd /initramfs-linux.img
この部分を変更。

これで完了。

・カーネルモジュール

一覧
lsmod

内容確認
modinfo

ロード
insmod

アンロード
rmmod

ロード・アンロードの依存関係を自分で処理。
(lsmodのUsed byにて分かる)

依存関係を自動で処理する場合のロード・アンロード
modprobe xxx
modprobe -r xxx

2019-02-072019-02-14に投稿投稿者 okamura

Arch Linux on VirtualBox ディスクサイズ変更

・VirtualBox

cd C:\Program Files\Oracle\VirtualBox
VBoxManage.exe modifyhd “G:\VirtualBox VMs\Arch Linux\arch.vdi” –resize 20480

・ブートメディアで起動

・パーティーションサイズの変更
parted
p
resizepart xxx 100%

・デバイス名チェック
fdisk -l

・整合性チェック
fsck -f /dev/sda2

・ファイル
resize2fs /dev/sda2 [size]

2019-02-052019-02-11に投稿投稿者 okamura

Arch Linuxインストール

今回はVirtualBoxにて実験

インストールメディアからブート

基本インストール

・キーボードレイアウト

loadkeys jp106

・パーティション確認

fdisk -l

・起動モード確認

ls /sys/firmware/efi/efivars

ディレクトリがあればUEFI

・パーティション作成

parted /dev/sda
mklabel msdos
mkpart primary ext4 1MiB 100MiB
mkpart primary ext4 100MiB 100%
q

・partedコマンド

p
確認

q
終了

rm
削除

・パーティションフォーマット

mkfs.ext4 /dev/sda1
mkfs.ext4 /dev/sda2

・マウント

mount /dev/sda2 /mnt
mkdir /mnt/boot
mount /dev/sda1 /mnt/boot

・リポジトリ変更

/etc/pacman.d/mirrorlist
日本のリポジトリを一番上に移動。

・ベースシステムインストール

pacstrap /mnt base base-devel

・fstab

genfstab -U /mnt >> /mnt/etc/fstab

・chroot

arch-chroot /mnt /bin/bash

・ロケール設定

/etc/locale.gen
コメントを解除
en_US.UTF UTF-8
ja_JP.UTF UTF-8

実行
locale-gen
echo LANG=en_US.UTF-8 > /etc/locale.conf

・キーマップ設定

/etc/vconsole.conf
追加
KEYMAP=jp106
FONT=lat9w-16

・タイムゾーン設定

ln -sf /usr/share/zoneinfo/Asia/Tokyo /etc/localtime

・ハードウェアとシステムの日時同期

hwclock –systohc –utc

・ホストネーム設定

echo vm > /etc/hostname

/etc/hosts
追加
127.0.0.1 localhost.localdomain localhost vm
::1 localhost.localdomain localhost vm

・DHCP有効化

systemctl enable dhcpcd

・rootパスワード設定

passwd
123

・GRUBインストール

pacman -S os-prober grub
grub-install –target=i386-pc –recheck /dev/sda
grub-mkconfig -o /boot/grub/grub.cfg

・起動

exit
umount -R /mnt
reboot

・復旧する場合

起動メディアでブート

mount /dev/sda1 /mnt/boot
mount /dev/sda2 /mnt
arch-chroot /mnt

・VirtualBoxを含めネットワークの設定

VirtualBoxの設定でネットワークをブリッジに。
ncpa.cplからVirtualBoxのNICを192.168.11.200に。

・WiFiオン

wifi-menu -o

有線は自動でつながる

・IPアドレス確認

networkctl status

・DHCP停止

systemctl disable dhcpcd

・IPアドレス指定

/etc/systemd/network/static.network

[Match]
Name=enp0s3

[Address]
Address=192.168.11.201/24

[Network]
DNS=192.168.11.1

[Route]
Gateway=192.168.11.1

systemctl start systemd-networkd
systemctl start systemd-resolved
必要ならenable

・SSHインストール

pacman -S openssh
systemctl start sshd

/etc/ssh/sshd_config
追加
PermitRootLogin yes
AllowUsers root

・iptables設定

この段階では特に編集しなくてもつながる。

確認
iptables -L

/etc/iptables/iptables.rules
追加
-A INPUT -p tcp -m state –state NEW -m tcp –dport 22 -j ACCEPT

再起動
systemctl restart iptables

・vim

pacman -S vim

・samba

必要ならユーザー追加。今回はrootで処理。

useradd -c “Guest User” -d /dev/null -s /bin/false pcguest
chown pcguest:pcguest share

作成したユーザがパスにアクセスできること。

LAN向けなので、最低限

pacman -S samba

mkdir share
chmod ugo+rwx share

設定ファイル
vim /etc/samba/smb.conf

作成されない場合ArchLinuxのサイトにサンプルがあるので写す。
あるいは直接作成。

[global]
unix charset=UTF-8
dos charset=CP932
security = user
guest account = root
map to guest = bad user

[share]
path = /root/share
writable = yes
guest ok = yes
force create mode = 0777
force directory mode = 0777
share modes = yes
vfs objects = recycle

起動
systemctl start smb
systemctl start nmb
必要ならenable

動作確認
ss -ltnp

・dotnet

pacman -S dotnet-runtime
pacman -S dotnet-sdk
pacman -S aspnet-runtime

・pacmanコマンド

レポジトリ最新
-Syy

ソフト更新
-Syyu

レポジトリ検索
-Ss

ローカル検索
-Qs

インストール済みリスト
-Q

-S
インストール

-R
アンインストール

-Rs
依存も含みアンインストール

-Rns
アンイントール時のバックアップ削除

-Scc
インストール時のキャッシュ削除

-Sg
グループに含まれるパッケージ。

GUIの設定

・GUIとCUIの切り替え

Ctrl + Alt + F1,F2～

・グラフィックドライバ

環境にあわせて選択。
pacman -S xf86-video-intel
pacman -S xf86-video-amdgpu
pacman -S xf86-video-ati
pacman -S nvidia nvidia-utils

・調べ方

lspci | grep VGA

・xserver

pacman -S xorg-server
pacman -S xorg-xinit
pacman -S xorg-apps(必要なら)
pacman -S mesa(必要なら)

・キーコンフィグ

/etc/X11/xorg.conf.d/10-keyboard.conf
追加
Section “InputClass”
Identifier “Keyboard Defaults”
MatchIsKeyboard “yes”
Option “XkbLayout” “jp”
EndSection

・デスクトップインストール

pacman -S xfce4

echo “exec startxfce4” >> ~/.xinitrc

startx

・ロケール設定

/etc/locale.conf
追加(あるいは置換)
LANG=ja_JP.UTF-8

・フォントインストール

pacman -S otf-ipafont

2019-02-05に投稿投稿者 okamura

Synergyインストール

現在Input Directorを利用中。
Linuxの端末も含めたいとなると、Synergyが有力なので試してみた。

・インストール時に聞かれる自動設定はしない。
・サーバー側、メイン画面でServerにチェック。
・サーバーを設定を開いて、ディスプレイの絵をドラッグし、クライアントのPC名を入力。
・クライアント側、メイン画面でClientにチェック。
・サーバーIPのところに入力。

これだけ。

2019-01-30に投稿投稿者 okamura

Winパーティションについて

基本的な操作は、
compmgmt.msc
か、直接、
diskmgmt.msc
から

パーティションサイズをピッタリにしたい場合、
例えば100GBにしたい場合、
102404MB(1024*100+4)
でピッタリ。

回復パーティーションの削除
diskpart
list disk
select disk n
list partition
select partition n
delete partition override

2019-01-07に投稿投稿者 okamura

SRT100でIPv6の設定、サブセグメント構築

初期化

シリアルケーブルつないでTeraTermで接続できる。
漢字コードはShift-Jisに変更

初期IPアドレス
192.168.100.1

初期パスワード
doremi

非常用パスワード
w,lXlma

administrator
管理者切り替え

cold start
初期化

quit
終了

show config
設定一覧

save
保存

サブセグメント追加

試しに既存セグメント(192.168.11.0/24)に追加。

IPアドレスの設定は、
LAN2(192.168.11.100)
LAN1(192.168.12.1)

デフォルトゲートウェイは、
192.168.11.1

NAT(IPマスカレード)は、
LAN2に外側(192.168.11.100)、内側(自動)

DHCPは中止しておく。

IPv6設定

設定
ipv6 prefix 1 ra-prefix@lan2::/64
ipv6 lan1 address ra-prefix@lan2::1/64
ipv6 lan1 rtadv send 1 o_flag=on
ipv6 lan1 dhcp service server
ipv6 lan2 dhcp service client ir=on
dns server dhcp lan2

確認
show ipv6 address lan1
show status ipv6 dhcp

繋がったけど安定しなかったので中止。

2018-12-05に投稿投稿者 okamura

パス付きaccdbにエクセルVBAからアクセス

ちょっと試しに。

Sub MainRoutine(TargetName, BaseYear, RoutineType)

ExecuteResult = False

If RoutineType = "COMPARE_YEAR" Then

QueryString = "select * from xxx"
ExecuteResult = DbExecute(QueryString, TargetName, BaseYear, RoutineType)

End If

Call TmporaryDelete

If True = ExecuteResult Then
  MsgBox "完了しました"
Else
  MsgBox "エラーが発生しています"
End If

End Sub

Function DbExecute(QueryString, TargetName, BaseYear, RoutineType)

On Error GoTo e

Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")

DbPath = "C:\xxx.accdb"
ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & DbPath & "; Jet OLEDB:Database Password=xxx"

cn.Open ConnectionString
rs.Open QueryString, cn

If RoutineType = "COMPARE_YEAR" Then
  If False = CompareYear(rs, TargetName, BaseYear, RoutineType) Then GoTo e
End If

If rs.State = 1 Then rs.Close
Set rs = Nothing
 
If cn.State = 1 Then cn.Close
Set cn = Nothing

DbExecute = True
Exit Function

e:

If rs.State = 1 Then rs.Close
Set rs = Nothing
 
If cn.State = 1 Then cn.Close
Set cn = Nothing

DbExecute = False

End Function

Function CompareYear(ByVal rs, TargetName, BaseYear, RoutineType)

On Error GoTo e

Call TmporaryDelete
Set w = Sheets.Add: w.Name = "tmp"

SheetName = "年度比較(" & BaseYear - 1 & "-" & BaseYear & ")_" & TargetName

If True = ExistSheet(SheetName) Then
  MsgBox "シート名が重複しています"
  GoTo e
End If

Sheets("(雛形)年度比較").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = SheetName

'ActiveSheet.Cells(1, 1).CopyFromRecordset rs

CompareYear = True
Exit Function

e:

CompareYear = False

End Function

Function ExistSheet(SheetName)

For Each w In Sheets
  If w.Name = SheetName Then
    ExistSheet = True
    Exit Function
  End If
Next

ExistSheet = False

End Function

Sub TmporaryDelete()

Application.DisplayAlerts = False

For Each w In Sheets
  If w.Name = "tmp" Then Sheets("tmp").Delete
Next

Application.DisplayAlerts = True

End Sub

100

101

102

103

104

105

106

107

108

109

110

111

Sub MainRoutine(TargetName, BaseYear, RoutineType)

ExecuteResult = False

If RoutineType = "COMPARE_YEAR" Then

QueryString = "select * from xxx"

ExecuteResult = DbExecute(QueryString, TargetName, BaseYear, RoutineType)

End If

Call TmporaryDelete

If True = ExecuteResult Then

MsgBox "完了しました"

Else

MsgBox "エラーが発生しています"

End If

End Sub

Function DbExecute(QueryString, TargetName, BaseYear, RoutineType)

On Error GoTo e

Set cn = CreateObject("ADODB.Connection")

Set rs = CreateObject("ADODB.Recordset")

DbPath = "C:\xxx.accdb"

ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source=" & DbPath & "; Jet OLEDB:Database Password=xxx"

cn.Open ConnectionString

rs.Open QueryString, cn

If RoutineType = "COMPARE_YEAR" Then

If False = CompareYear(rs, TargetName, BaseYear, RoutineType) Then GoTo e

End If

If rs.State = 1 Then rs.Close

Set rs = Nothing

If cn.State = 1 Then cn.Close

Set cn = Nothing

DbExecute = True

Exit Function

If rs.State = 1 Then rs.Close

Set rs = Nothing

If cn.State = 1 Then cn.Close

Set cn = Nothing

DbExecute = False

End Function

Function CompareYear(ByVal rs, TargetName, BaseYear, RoutineType)

On Error GoTo e

Call TmporaryDelete

Set w = Sheets.Add: w.Name = "tmp"

SheetName = "年度比較(" & BaseYear - 1 & "-" & BaseYear & ")_" & TargetName

If True = ExistSheet(SheetName) Then

MsgBox "シート名が重複しています"

GoTo e

End If

Sheets("(雛形)年度比較").Copy After:=Sheets(Sheets.Count)

ActiveSheet.Name = SheetName

'ActiveSheet.Cells(1, 1).CopyFromRecordset rs

CompareYear = True

Exit Function

CompareYear = False

End Function

Function ExistSheet(SheetName)

For Each w In Sheets

If w.Name = SheetName Then

ExistSheet = True

Exit Function

End If

ExistSheet = False

End Function

Sub TmporaryDelete()

Application.DisplayAlerts = False

For Each w In Sheets

If w.Name = "tmp" Then Sheets("tmp").Delete

Application.DisplayAlerts = True

End Sub

2018-12-01に投稿投稿者 okamura

C# 遅延評価、IEnumerable

        public Form1()
        {
            Stopwatch sw = new Stopwatch();
            sw.Start();

            //遅延評価

            //var c = Enumerable.Range(1, 2).Select(x => stop(x));
            //この表記だけだと即時評価されないので1秒もかからない

            //var c = Enumerable.Range(1, 2).Select(x => stop(x)).ToArray();
            //このようにToArrayやToListをつけると、10秒かかる。

            sw.Stop();
            Debug.Print(sw.Elapsed.ToString());

            //コレクションの読取専用

            //IEnumerable
            //IReadOnlyCollection / ICollection
            //IReadOnlyList       / IList
            //ReadOnlyCollection  / List

            //IReadOnlyCollectionは IEnumerable + Countのみ。
            //IReadOnlyListは IReadOnlyCollection + インデクサ。
            //ReadOnlyCollection とあるがIListを実装している。

        }

        private int stop(int n)
        {
            Debug.Print(n.ToString());
            Thread.Sleep(1000 * 5);
            return n;
        }

public Form1()

{

Stopwatch sw = new Stopwatch();

sw.Start();

//遅延評価

//var c = Enumerable.Range(1, 2).Select(x => stop(x));

//この表記だけだと即時評価されないので1秒もかからない

//var c = Enumerable.Range(1, 2).Select(x => stop(x)).ToArray();

//このようにToArrayやToListをつけると、10秒かかる。

sw.Stop();

Debug.Print(sw.Elapsed.ToString());

//コレクションの読取専用

//IEnumerable

//IReadOnlyCollection / ICollection

//IReadOnlyList / IList

//ReadOnlyCollection / List

//IReadOnlyCollectionは IEnumerable + Countのみ。

//IReadOnlyListは IReadOnlyCollection + インデクサ。

//ReadOnlyCollection とあるがIListを実装している。

}

private int stop(int n)

{

Debug.Print(n.ToString());

Thread.Sleep(1000 * 5);

return n;

}

2018-11-282018-11-28に投稿投稿者 okamura

ASP.NET Core MVCからMySQLに接続

APS.NET Core MVCは以前に数回さわっただけで、まだ使い始めたばかりなので色々調べながら試している状態。

NuGetより
MySql.Data.EntityFrameworkCore
をインストール

appsettings.json

以下を追加。

"ConnectionStrings": {
"MySQL": "server=xxx; ssl mode=none; port=xxx; user=xxx; password=xxx; database=xxx"
},

"ConnectionStrings": {

"MySQL": "server=xxx; ssl mode=none; port=xxx; user=xxx; password=xxx; database=xxx"

Startup.cs

using Microsoft.EntityFrameworkCore;
を追加。

ConfigureServices
の中に以下を追加。

services.AddDbContext<Models.MvcBasicContext>(options => options.UseMySQL(
Configuration.GetConnectionString("MySQL")));

1 2	services.AddDbContext<Models.MvcBasicContext>(options => options.UseMySQL( Configuration.GetConnectionString("MySQL")));

MvcBasicContext.cs

作成。

    public class MvcBasicContext : DbContext
    {
        public DbSet<Member> Members { get; set; }
        
        public MvcBasicContext(DbContextOptions options): base(options)
        {

        }
    }

public class MvcBasicContext : DbContext

{

public DbSet<Member> Members { get; set; }

public MvcBasicContext(DbContextOptions options): base(options)

{

}

Member.cs

作成。

    public class Member
    {
        public int Id { get; set; }
        public string Name { get; set; }

    }

public class Member

{

public int Id { get; set; }

public string Name { get; set; }

}

MySQL

VPS上のMySQLに今回は手動でテーブルを準備。

Controller

追加。

        private readonly MvcBasicContext _MvcBasicContext;

        public HomeController(MvcBasicContext mvcBasicContext)
        {
            _MvcBasicContext = mvcBasicContext;
        }

        public IActionResult Index()
        {
            return View(_MvcBasicContext.Members.ToList());
        }

private readonly MvcBasicContext _MvcBasicContext;

public HomeController(MvcBasicContext mvcBasicContext)

{

_MvcBasicContext = mvcBasicContext;

}

public IActionResult Index()

{

return View(_MvcBasicContext.Members.ToList());

}

View

試しに呼び出してみる。

@model IEnumerable<test_app.Models.Member>
@foreach (var i in Model)
{
    <p>@i.Id</p>
    <p>@i.Name</p>
}

@model IEnumerable<test_app.Models.Member>

@foreach (var i in Model)

{

}